#!/usr/bin/env python3
# Copyright 2004,2009 Toby Dickenson
#
# Permission is hereby granted, free of charge, to any person obtaining
# a copy of this software and associated documentation files (the
# "Software"), to deal in the Software without restriction, including
# without limitation the rights to use, copy, modify, merge, publish,
# distribute, sublicense, and/or sell copies of the Software, and to
# permit persons to whom the Software is furnished to do so, subject
# to the following conditions:
#
# The above copyright notice and this permission notice shall be included
# in all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
# IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
# CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
# TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
# SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

import sys
import pprint
import modulefinder

focus = ['sfa', 'OpenSSL', 'M2Crypto', 'xmlrpclib', 'threading']


class mymf(modulefinder.ModuleFinder):

    def __init__(self, *args, **kwargs):
        self._depgraph = {}
        self._types = {}
        self._last_caller = None
        modulefinder.ModuleFinder.__init__(self, *args, **kwargs)

    def import_hook(self, name, caller=None, fromlist=None, level=None):
        old_last_caller = self._last_caller
        try:
            self._last_caller = caller
            return modulefinder.ModuleFinder.import_hook(self, name, caller, fromlist)
        finally:
            self._last_caller = old_last_caller

    def import_module(self, partnam, fqname, parent):
        keep = False
        for start in focus:
            if fqname.startswith(start):
                keep = True
        if not keep:
            print("Trimmed fqname", fqname, file=sys.stderr)
            return
        r = modulefinder.ModuleFinder.import_module(
            self, partnam, fqname, parent)
        if r is not None:
            self._depgraph.setdefault(self._last_caller.__name__, {})[
                r.__name__] = 1
        return r

    def load_module(self, fqname, fp, pathname, xxx_todo_changeme):
        (suffix, mode, type) = xxx_todo_changeme
        r = modulefinder.ModuleFinder.load_module(
            self, fqname, fp, pathname, (suffix, mode, type))
        if r is not None:
            self._types[r.__name__] = type
        return r


def main(argv):
    path = sys.path[:]
    debug = 0
    exclude = []
    mf = mymf(path, debug, exclude)
    mf.run_script(argv[0])
    pprint.pprint({'depgraph': mf._depgraph, 'types': mf._types})

if __name__ == '__main__':
    main(sys.argv[1:])