Ticket #68: built-in.conf.2.diff

lib/python/soclib_cc/config/built-in.conf

@@ -25 +25 @@
     Retrieves platform information and make it look-like systemc's
     lib-xxx thing.
     """
-    import sys
-    pf = sys.platform
+    import os
 
-    # Strip numeric suffix from platform name
-    while pf[-1] in "0123456789":
-        pf = pf[:-1]
+    def _guess_directory():
+        systemc = os.getenv('SYSTEMC')
+        if systemc:
+            candidates = filter(lambda x:x.startswith('lib-'),
+                                os.listdir(systemc))
+            if len(candidates) == 1:
+                return candidates[0][4:]
+        return None
 
-    if pf == 'darwin': pf = 'macosx'
-    return pf
+    def _suffix(triple):
+        '''SystemC lib directory suffix oracle'''
+        from fnmatch import fnmatch
+        for pattern, value in (
+            ("sparc-sun-solaris*",    'gccsparcOS5'),
+            ("x86_64*linux*",         'linux64'    ),
+            ("*linux*",               'linux'      ),
+            ("i?86-apple-macosx*",    'macosx'     ),
+            ("powerpc-apple-macosx*", 'macosx'     ),
+            ("x86_64*freebsd*",       'freebsd64'  ),
+            ("amd64*freebsd*",        'freebsd64'  ),
+            ("*freebsd*",             'freebsd'    ),
+            ("*cygwin*",              'cygwin'     ),
+            ("*mingw*",               'mingw'      ),
+            ("*hpux11*",              'gcchpux11'  ),
+            ):
+            if fnmatch(triple, pattern):
+                return value
+        return None
 
+    def _machine_triple():
+        '''triple like the one produced by config.guess'''
+        import subprocess
+        try:
+            proc = subprocess.Popen(['gcc', '-dumpmachine'], shell = False, stdout = subprocess.PIPE)
+            out, err = proc.communicate()
+        except:
+            out = ''
+        return out
+
+    return _suffix(_machine_triple()) or _guess_directory() or ''
+
 config.systemc = Library(
     name = 'systemc',
     vendor = 'OSCI',