## -*- Mode: python; py-indent-offset: 4; indent-tabs-mode: nil; coding: utf-8; -*-

import types

import re

import os

import pproc as subprocess

import shutil

import sys

import Task

import Options

import Configure

import TaskGen

import Logs

import Build

import Utils

## https://launchpad.net/pybindgen/

REQUIRED_PYGCCXML_VERSION = (0, 9, 5)

from TaskGen import feature, after

import Task, ccroot

@feature('pch')

@after('apply_link')

def process_pch(self):

    node = self.path.find_resource(self.pch)

    assert node

    tsk = self.create_task('gchx')

    tsk.set_inputs(node)

    tsk.set_outputs(node.parent.find_or_declare(node.name + '.gch'))

comp_line = '${CXX} ${CXXFLAGS} ${CPPFLAGS} ${_CXXINCFLAGS} ${_CXXDEFFLAGS} ${SRC} -o ${TGT}'

cls = Task.simple_task_type('gchx', comp_line, before='cc cxx')

cls.scan = ccroot.scan

def add_to_python_path(path):

    if os.environ.get('PYTHONPATH', ''):

        os.environ['PYTHONPATH'] = path + os.pathsep + os.environ.get('PYTHONPATH')

    else:

        os.environ['PYTHONPATH'] = path

def set_pybindgen_pythonpath(env):

    if env['WITH_PYBINDGEN']:

        add_to_python_path(env['WITH_PYBINDGEN'])

def set_options(opt):

    opt.tool_options('python')

    c = ("monolithic", "modular", "both")

    opt.add_option('--bindings-type', type="choice",

                   choices=c,

                   help=("Type of Python bindings to build %r.  "

                         "Warning: the modular bindings are still experimental." % (c,)),

                   default="monolithic",

                   dest='bindings_type')

    opt.add_option('--disable-python',

                   help=("Don't build Python bindings."),

                   action="store_true", default=False,

                   dest='python_disable')

    opt.add_option('--python-scan',

                   help=("Rescan Python bindings.  Needs working GCCXML / pygccxml environment."),

                   action="store_true", default=False,

                   dest='python_scan')

    opt.add_option('--apiscan',

                   help=("EXPERIMENTAL: Rescan the API for the indicated module(s), for Python bindings.  "

                         "Needs working GCCXML / pygccxml environment.  "

                         "The metamodule 'all' expands to all available ns-3 modules."),

                   default=None, dest='apiscan', metavar="MODULE[,MODULE...]")

    opt.add_option('--with-pybindgen',

                   help=('Path to an existing pybindgen source tree to use.'),

                   default=None,

                   dest='with_pybindgen', type="string")

    opt.add_option('--enable-python-pch',

                   help=("Enable precompiled headers when compiling python bindings, to speed up compilation."),

                   action="store_true", default=False,

                   dest='enable_python_pch')

def configure(conf):

    conf.env['ENABLE_PYTHON_PCH'] = Options.options.enable_python_pch

    conf.env['ENABLE_PYTHON_BINDINGS'] = False

    if Options.options.python_disable:

        conf.report_optional_feature("python", "Python Bindings", False,

                                     "disabled by user request")

        return

    enabled_modules = list(conf.env['NS3_ENABLED_MODULES'])

    enabled_modules.sort()

    available_modules = list(conf.env['NS3_MODULES'])

    available_modules.sort()

    all_modules_enabled = (enabled_modules == available_modules)

    conf.check_tool('misc')

    if sys.platform == 'cygwin':

        conf.report_optional_feature("python", "Python Bindings", False,

                                     "unsupported platform 'cygwin'")

        Logs.warn("Python is not supported in CygWin environment.  Try MingW instead.")

        return

    ## Check for Python

    try:

        conf.check_tool('python')

        conf.check_python_version((2,3))

        conf.check_python_headers()

    except Configure.ConfigurationError, ex:

        conf.report_optional_feature("python", "Python Bindings", False, str(ex))

        return

    # -fvisibility=hidden optimization

    if (conf.env['CXX_NAME'] == 'gcc' and [int(x) for x in conf.env['CC_VERSION']] >= [4,0,0]

        and conf.check_compilation_flag('-fvisibility=hidden')):

        conf.env.append_value('CXXFLAGS_PYEXT', '-fvisibility=hidden')

        conf.env.append_value('CCFLAGS_PYEXT', '-fvisibility=hidden')

    # Check for the location of pybindgen

    if Options.options.with_pybindgen is not None:

        if os.path.isdir(Options.options.with_pybindgen):

            conf.check_message("pybindgen location", '', True, ("%s (given)" % Options.options.with_pybindgen))

            conf.env['WITH_PYBINDGEN'] = os.path.abspath(Options.options.with_pybindgen)

    else:

        # ns-3-dev uses ../pybindgen, while ns-3 releases use ../REQUIRED_PYBINDGEN_VERSION

        pybindgen_dir = os.path.join('..', "pybindgen")

        pybindgen_release_str = "pybindgen-" + '.'.join([str(x) for x in REQUIRED_PYBINDGEN_VERSION])

        pybindgen_release_dir = os.path.join('..', pybindgen_release_str)

        if os.path.isdir(pybindgen_dir):

            conf.check_message("pybindgen location", '', True, ("%s (guessed)" % pybindgen_dir))

            conf.env['WITH_PYBINDGEN'] = os.path.abspath(pybindgen_dir)

        elif os.path.isdir(pybindgen_release_dir):

            conf.check_message("pybindgen location", '', True, ("%s (guessed)" % pybindgen_release_dir))

            conf.env['WITH_PYBINDGEN'] = os.path.abspath(pybindgen_release_dir)

        del pybindgen_dir

        del pybindgen_release_dir

    if not conf.env['WITH_PYBINDGEN']:

        conf.check_message("pybindgen location", '', False)

    # Check for pybindgen

    set_pybindgen_pythonpath(conf.env)

    try:

        conf.check_python_module('pybindgen')

    except Configure.ConfigurationError:

        Logs.warn("pybindgen missing => no python bindings")

        conf.report_optional_feature("python", "Python Bindings", False,

                                     "PyBindGen missing")

        return

    else:

        out = subprocess.Popen([conf.env['PYTHON'], "-c",

                                "import pybindgen.version; "

                                "print '.'.join([str(x) for x in pybindgen.version.__version__])"],

                                stdout=subprocess.PIPE).communicate()[0]

        pybindgen_version_str = out.strip()

        pybindgen_version = tuple([int(x) for x in pybindgen_version_str.split('.')])

        conf.check_message('pybindgen', 'version',

                           (pybindgen_version == REQUIRED_PYBINDGEN_VERSION),

                           pybindgen_version_str)

        if not (pybindgen_version == REQUIRED_PYBINDGEN_VERSION):

            Logs.warn("pybindgen (found %s), (need %s)" %

                    (pybindgen_version_str,

                     '.'.join([str(x) for x in REQUIRED_PYBINDGEN_VERSION])))

            conf.report_optional_feature("python", "Python Bindings", False,

                                         "PyBindGen version not correct and newer version could not be retrieved")

            return

    def test(t1, t2):

        test_program = '''

#include <stdint.h>

#include <vector>

int main ()

{

   std::vector< %(type1)s > t = std::vector< %(type2)s > ();

   return 0;

}

''' % dict(type1=t1, type2=t2)

        try:

            ret = conf.run_c_code(code=test_program,

                                  env=conf.env.copy(), compile_filename='test.cc',

                                  compile_mode='cxx',type='cprogram', execute=False)

        except Configure.ConfigurationError:

            ret = 1

        conf.check_message_custom('types %s and %s' % (t1, t2), 'equivalency', (ret and 'no' or 'yes'))

        return not ret

    uint64_is_long = test("uint64_t", "unsigned long")

    uint64_is_long_long = test("uint64_t", "unsigned long long")

    if uint64_is_long:

        conf.env['PYTHON_BINDINGS_APIDEFS'] = 'gcc-LP64'

    elif uint64_is_long_long:

        conf.env['PYTHON_BINDINGS_APIDEFS'] = 'gcc-ILP32'

    else:

        conf.env['PYTHON_BINDINGS_APIDEFS'] = None

    if conf.env['PYTHON_BINDINGS_APIDEFS'] is None:

        msg = 'none available'

    else:

        msg = conf.env['PYTHON_BINDINGS_APIDEFS']

    conf.check_message_custom('the apidefs that can be used for Python bindings', '', msg)

    if conf.env['PYTHON_BINDINGS_APIDEFS'] is None:

        conf.report_optional_feature("python", "Python Bindings", False,

                                     "No apidefs are available that can be used in this system")

        return

    conf.env['BINDINGS_TYPE'] = Options.options.bindings_type

    if not all_modules_enabled:

        if conf.env['BINDINGS_TYPE'] == 'both':

            conf.env['BINDINGS_TYPE'] = 'modular'

        elif conf.env['BINDINGS_TYPE'] == 'monolithic':

            conf.report_optional_feature("python", "Python Bindings", False, "Monolithic python bindings need all ns-3 modules to be enabled")

            return

    ## If all has gone well, we finally enable the Python bindings

    conf.env['ENABLE_PYTHON_BINDINGS'] = True

    conf.report_optional_feature("python", "Python Bindings", True, None)

    if conf.env['BINDINGS_TYPE'] == 'both':

        msg = "monolithic and modular"

    else:

        msg = conf.env['BINDINGS_TYPE']

    conf.check_message_custom('type of bindings to build', '', msg)

    ## Check for pygccxml

    try:

        conf.check_python_module('pygccxml')

    except Configure.ConfigurationError:

        conf.report_optional_feature("pygccxml", "Python API Scanning Support", False,

                                     "Missing 'pygccxml' Python module")

        return

    out = subprocess.Popen([conf.env['PYTHON'], "-c",

                            "import pygccxml; print pygccxml.__version__"],

                            stdout=subprocess.PIPE).communicate()[0]

    pygccxml_version_str = out.strip()

    pygccxml_version = tuple([int(x) for x in pygccxml_version_str.split('.')])

    conf.check_message('pygccxml', 'version',

                       (pygccxml_version >= REQUIRED_PYGCCXML_VERSION),

                       pygccxml_version_str)

    if not (pygccxml_version >= REQUIRED_PYGCCXML_VERSION):

        Logs.warn("pygccxml (found %s) is too old (need %s) => "

                "automatic scanning of API definitions will not be possible" %

                (pygccxml_version_str,

                 '.'.join([str(x) for x in REQUIRED_PYGCCXML_VERSION])))

        conf.report_optional_feature("pygccxml", "Python API Scanning Support", False,

                                     "pygccxml too old")

        return

    ## Check gccxml version

    gccxml = conf.find_program('gccxml', var='GCCXML')

    if not gccxml:

        Logs.warn("gccxml missing; automatic scanning of API definitions will not be possible")

        conf.report_optional_feature("pygccxml", "Python API Scanning Support", False,

                                     "gccxml missing")

        return

    gccxml_version_line = os.popen(gccxml + " --version").readline().strip()

    m = re.match( "^GCC-XML version (\d\.\d(\.\d)?)$", gccxml_version_line)

    gccxml_version = m.group(1)

    gccxml_version_ok = ([int(s) for s in gccxml_version.split('.')] >= [0, 9])

    conf.check_message('gccxml', 'version', True, gccxml_version)

    if not gccxml_version_ok:

        Logs.warn("gccxml too old, need version >= 0.9; automatic scanning of API definitions will not be possible")

        conf.report_optional_feature("pygccxml", "Python API Scanning Support", False,

                                     "gccxml too old")

        return

    ## If we reached

    conf.env['ENABLE_PYTHON_SCANNING'] = True

    conf.report_optional_feature("pygccxml", "Python API Scanning Support", True, None)

# ---------------------

def get_headers_map(bld):

    headers_map = {} # header => module

    for ns3headers in bld.all_task_gen:

        if type(ns3headers).__name__ == 'ns3header_taskgen': # XXX: find less hackish way to compare

            for h in ns3headers.to_list(ns3headers.source):

                headers_map[os.path.basename(h)] = ns3headers.module

    return headers_map

def get_module_path(bld, module):

    for ns3headers in bld.all_task_gen:

        if type(ns3headers).__name__ == 'ns3header_taskgen': # XXX: find less hackish way to compare

            if ns3headers.module == module:

                break

    else:

        raise ValueError("Module %r not found" % module)

    return ns3headers.path.abspath()

class apiscan_task(Task.TaskBase):

    """Uses gccxml to scan the file 'everything.h' and extract API definitions.

    """

    after = 'gen_ns3_module_header_task ns3header_task'

    before = 'cc cxx gchx'

    color = "BLUE"

    def __init__(self, curdirnode, env, bld, target, cflags, module):

        self.bld = bld

        super(apiscan_task, self).__init__(generator=self)

        self.curdirnode = curdirnode

        self.env = env

        self.target = target

        self.cflags = cflags

        self.module = module

    def display(self):

        return 'api-scan-%s\n' % (self.target,)

    def run(self):

        top_builddir = self.curdirnode.find_dir('../..').abspath(self.env)

        module_path = get_module_path(self.bld, self.module)

        headers_map = get_headers_map(self.bld)

        scan_header = os.path.join(top_builddir, "ns3", "%s-module.h" % self.module)

        if not os.path.exists(scan_header):

            Logs.error("Cannot apiscan module %r: %s does not exist" % (self.module, scan_header))

            return 0

        argv = [

            self.env['PYTHON'],

            os.path.join(self.curdirnode.abspath(), 'ns3modulescan-modular.py'), # scanning script

            top_builddir,

            self.module,

            repr(get_headers_map(self.bld)),

            os.path.join(module_path, "bindings", 'modulegen__%s.py' % (self.target)), # output file

            self.cflags,

            ]

        scan = subprocess.Popen(argv, stdin=subprocess.PIPE)

        retval = scan.wait()

        return retval

# --------------

prio_headers = {

    -2: (

        "string.h", # work around http://www.gccxml.org/Bug/view.php?id=6682

        ),

    -1: (

        "propagation-delay-model.h",

        "propagation-loss-model.h",

        "net-device.h",

        "ipv4-interface.h",

        )

     }

def get_header_prio(header):

    for prio, headers in prio_headers.iteritems():

        if header in headers:

            return prio

    return 1

def calc_header_include(path):

    (head, tail) = os.path.split (path)

    if tail == 'ns3':

        return ''

    else:

        return os.path.join (calc_header_include (head), tail)

class gen_everything_h_task(Task.Task):

    before = 'cc cxx gchx'

    after = 'ns3header_task'

    color = 'BLUE'

    def run(self):

        assert len(self.outputs) == 1

        header_files = [calc_header_include(node.abspath(self.env)) for node in self.inputs]

        outfile = file(self.outputs[0].bldpath(self.env), "w")

        def sort_func(h1, h2):

            return cmp((get_header_prio(h1), h1), (get_header_prio(h1), h2))

        header_files.sort(sort_func)

        print >> outfile, """

/* http://www.nsnam.org/bugzilla/show_bug.cgi?id=413 */

#ifdef ECHO

# undef ECHO

#endif

    """

        for header in header_files:

            print >> outfile, "#include \"ns3/%s\"" % (header,)

        print >> outfile, """

namespace ns3 {

static inline Ptr<Object>

__dummy_function_to_force_template_instantiation (Ptr<Object> obj, TypeId typeId)

{

   return obj->GetObject<Object> (typeId);

}

static inline void

__dummy_function_to_force_template_instantiation_v2 ()

{

   Time t1, t2, t3;

   t1 = t2 + t3;

   t1 = t2 - t3;

   TimeSquare tsq = t2*t3;

   Time tsqdiv = tsq/Seconds(1);

   Scalar scal = t2/t3;

   TimeInvert inv = scal/t3;

   t1 = scal*t1;

   t1 = t1/scal;

   t1 < t2;

   t1 <= t2;

   t1 == t2;

   t1 != t2;

   t1 >= t2;

   t1 > t2;

}

}

"""

        outfile.close()

        return 0

class all_ns3_headers_taskgen(TaskGen.task_gen):

    """Generates a 'everything.h' header file that includes some/all public ns3 headers.

    This single header file is to be parsed only once by gccxml, for greater efficiency.

    """

    def __init__(self, *args, **kwargs):

        super(all_ns3_headers_taskgen, self).__init__(*args, **kwargs)

        self.install_path = None

        #self.inst_dir = 'ns3'

    def apply(self):

        ## get all of the ns3 headers

        ns3_dir_node = self.bld.path.find_dir("ns3")

        all_headers_inputs = []

        for filename in self.to_list(self.source):

            src_node = ns3_dir_node.find_or_declare(filename)

            if src_node is None:

                raise Utils.WafError("source ns3 header file %s not found" % (filename,))

            all_headers_inputs.append(src_node)

        ## if self.source was empty, include all ns3 headers in enabled modules

        if not all_headers_inputs:

            for ns3headers in self.bld.all_task_gen:

                if type(ns3headers).__name__ == 'ns3header_taskgen': # XXX: find less hackish way to compare

                    ## skip headers not part of enabled modules

                    if self.env['NS3_ENABLED_MODULES']:

                        if ("ns3-%s" % ns3headers.module) not in self.env['NS3_ENABLED_MODULES']:

                            continue

                    for source in ns3headers.to_list(ns3headers.source):

                        #source = os.path.basename(source)

                        node = ns3_dir_node.find_or_declare(os.path.basename(source))

                        if node is None:

                            raise Utils.WafError("missing header file %s" % (source,))

                        all_headers_inputs.append(node)

        assert all_headers_inputs

        all_headers_outputs = [self.path.find_or_declare("everything.h")]

        task = self.create_task('gen_everything_h', env=self.env)

        task.set_inputs(all_headers_inputs)

        task.set_outputs(all_headers_outputs)

    def install(self):

        pass

def get_modules_and_headers(bld):

    """

    Gets a dict of

       module_name => ([module_dep1, module_dep2, ...], [module_header1, module_header2, ...])

    tuples, one for each module.

    """

    retval = {}

    for module in bld.all_task_gen:

        if not module.name.startswith('ns3-'):