WebSVN – QNX 8.QNX8 linker driver – Diff – /linkerdriver.c

-// QNX 8.0 linker driver by Pierre-Marie Baty <pm@pmbaty.com>
+// QNX 8.0 'gcc' linker driver drop-in replacement by Pierre-Marie Baty <pm@pmbaty.com>
 // RATIONALE
 // until a proper QNXToolchain class is implemented in the Clang driver, Clang relies on GNU GCC to drive the system linker 'ld'.
 // So we *HAVE* to provide a 'gcc' executable for Clang to be able to link QNX files.
 // GNU GCC is itself a driver which can also invoke a compiler or a linker (gcc invokes collect2 which in turn invokes ld).
 // This means our GCC will need to either chain-call 'clang' when it is called for *compiling* and chain-call 'ld' when it is called for *linking*.
 // When proper support is added to it, GNU GCC contains a linker specification for the system which it uses to construct the linker command line.
 // The linker specifications for QNX 8.0 can be extracted from '<target triple>-gcc -dumpspecs' and have been reimplemented in this file.
 // The GNU specs language is documented here: https://gcc.gnu.org/onlinedocs/gcc/Spec-Files.html
+// environment variables:
+//   DEBUG_LINKER_DRIVER - when defined to any value (incl. empty string), print the constructed command line to stderr before calling the linker.
 #include <stdio.h>
 #include <stdlib.h>
 #include <stdarg.h>
 #include <stdbool.h>
    //                   "%{!nostdlib:"
    //                           "%{!nodefaultlibs:"     "%:pass-through-libs(%(link_gcc_c_sequence))"   "}"
    //                   "}     "
    //           "}"
    //   "}"
-   /*if (!ARGV_CONTAINS_SINGLEARG ("-fno-use-linker-plugin") && !ARGV_CONTAINS_SINGLEARG ("-fno-lto"))
+   if (!ARGV_CONTAINS_SINGLEARG ("-fno-use-linker-plugin") && !ARGV_CONTAINS_SINGLEARG ("-fno-lto"))
+   {
-      ADD_LINKER_ARG ("-plugin");
+      /*ADD_LINKER_ARG ("-plugin");
       ADD_LINKER_ARG (resolve_envvars ("${QNX_HOST}/usr/lib/gcc/" TARGET_TRIPLE "/" BASEVER "/liblto_plugin.so"));
       ADD_LINKER_ARG (resolve_envvars ("-plugin-opt=${QNX_HOST}/usr/lib/gcc/" TARGET_TRIPLE "/" BASEVER "/lto-wrapper"));
-      ADD_LINKER_ARG (makefmtstr ("-plugin-opt=-fresolution=%s.res", "FIXME-UNKNOWN")); // FIXME: how to get the linker resolution file? Are the GCC and LLVM LTO ABI-compatible?
+      ADD_LINKER_ARG (makefmtstr ("-plugin-opt=-fresolution=%s.res", "TODO-UNKNOWN")); // LTO is not interoperable between clang and ld. See below.
       if (ARGV_CONTAINS_ARGWITHEQUALVAL ("-flinker-output"))
          ADD_LINKER_ARG ("-plugin-opt=-linker-output-known");
       if (!ARGV_CONTAINS_SINGLEARG ("-nostdlib") && !ARGV_CONTAINS_SINGLEARG ("-nodefaultlibs"))
          for (arg_index = 0; arg_index < larg_count; arg_index++)
-            ADD_LINKER_ARG (makefmtstr ("-plugin-opt=-pass-through=%s", largs[arg_index]));
+            ADD_LINKER_ARG (makefmtstr ("-plugin-opt=-pass-through=%s", largs[arg_index]));*/
+      // looks like LTO is a no-go. See: https://stackoverflow.com/questions/51259340/interoperability-between-clang-gcc-and-lto
-   }*/
+   }
    //   "%{flto|flto=*:"        "%<fcompare-debug*"     "}     "
    if (ARGV_CONTAINS_SINGLEARG ("-flto") || ARGV_CONTAINS_ARGWITHEQUALVAL ("-flto"))
       for (arg_index = 1; arg_index < argc; arg_index++)
          if (strncmp (argv[arg_index], "-fcompare-debug", 15) == 0)
    //   "%o      "
    for (arg_index = 0; arg_index < oarg_count; arg_index++)
       ADD_LINKER_ARG (oargs[arg_index]);
-   //   "%{fopenacc|fopenmp|%:"
+   // QUOTE FROM https://gcc.gnu.org/onlinedocs/gcc/Spec-Files.html -- BEGIN
-   //           "gt("
+   // "The following example inserts the link_gomp spec if the last -ftree-parallelize-loops= option given on the command line is greater than 1:
-   //                   "%{ftree-parallelize-loops=*:"  "%*"    "}"
+   //  %{                 %:gt(%{ftree-parallelize-loops=*:%*} 1):%:include(libgomp.spec)%(link_gomp)}"
+   // QUOTE FROM https://gcc.gnu.org/onlinedocs/gcc/Spec-Files.html -- END
-   //           " 1):   %:include(libgomp.spec)%(link_gomp)"
+   //   "%{fopenacc|fopenmp|%:gt(%{ftree-parallelize-loops=*:%*} 1):%:include(libgomp.spec)%(link_gomp)}    "
-   //   "}    "
-   /* FIXME: TODO */
+   // nothing to do (link_gomp is an empty string in this GCC)
    //   "%{fgnu-tm:"    "%:include(libitm.spec)%(link_itm)"     "}    "
    if (ARGV_CONTAINS_SINGLEARG ("-fgnu-tm"))
+   {
       ADD_LINKER_ARG ("-litm");
          //             "-lasan "
          //             "%{static-libasan:"             "-Bdynamic"                                             "} "
          //             "%{static-libasan|static:"      "%:include(libsanitizer.spec)%(link_libasan)"           "}    "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=address"      "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=address"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libasan")) ADD_LINKER_ARG ("-Bstatic");
+            ADD_LINKER_ARG ("-lasan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libasan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libasan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libasan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=address\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(hwaddress):"
          //             "%{static-libhwasan:"           "-Bstatic"                                              "} "
          //             "-lhwasan "
          //             "%{static-libhwasan:"           "-Bdynamic"                                             "} "
          //             "%{static-libhwasan|static:"    "%:include(libsanitizer.spec)%(link_libhwasan)"         "}      "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=hwaddress"    "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=hwaddress"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libhwasan")) ADD_LINKER_ARG ("-Bstatic");
+            ADD_LINKER_ARG ("-lhwasan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libhwasan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libhwasan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libhwasan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=hwaddress\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(thread):"
          //             "%{static-libtsan:"             "-Bstatic"                                              "} "
          //             "-ltsan "
          //             "%{static-libtsan:"             "-Bdynamic"                                             "} "
          //             "%{static-libtsan|static:"      "%:include(libsanitizer.spec)%(link_libtsan)"           "}    "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=thread"       "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=thread"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libtsan")) ADD_LINKER_ARG ("-Bstatic");
+            ADD_LINKER_ARG ("-ltsan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libtsan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libtsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libtsan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=thread\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(undefined):"
          //             "%{static-libubsan:"            "-Bstatic"                                              "} "
          //             "-lubsan "
          //             "%{static-libubsan:"            "-Bdynamic"                                             "} "
          //             "%{static-libubsan|static:"     "%:include(libsanitizer.spec)%(link_libubsan)"          "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=undefined"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan")) ADD_LINKER_ARG ("-Bstatic");
+            ADD_LINKER_ARG ("-lubsan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libubsan on QNX
+         }
          //     "%{%:sanitize(leak):"
          //             "%{static-liblsan:"             "-Bstatic"                                              "} "
          //             "-llsan "
          //             "%{static-liblsan:"             "-Bdynamic"                                             "} "
          //             "%{static-liblsan|static:"      "%:include(libsanitizer.spec)%(link_liblsan)"           "}"
          //     "}"
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=leak"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-liblsan")) ADD_LINKER_ARG ("-Bstatic");
-         /* FIXME: TODO */
+            ADD_LINKER_ARG ("-llsan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-liblsan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-liblsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to liblsan on QNX
+         }
 #else // !IS_TARGET_INTEL
          //     "%{%:sanitize(address): "
          //             "%{static-libasan|static:"      "%:include(libsanitizer.spec)%(link_libasan)"           "}    "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=address"      "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=address"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libasan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libasan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=address\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(hwaddress): "
          //             "%{static-libhwasan|static:"    "%:include(libsanitizer.spec)%(link_libhwasan)"         "}      "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=hwaddress"    "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=hwaddress"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libhwasan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libhwasan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=hwaddress\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(thread): "
          //             "%{static-libtsan|static:"      "%:include(libsanitizer.spec)%(link_libtsan)"           "}    "
          //             "%{static:"                     "%ecannot specify -static with -fsanitize=thread"       "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=thread"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libtsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libtsan on QNX
+            if (ARGV_CONTAINS_SINGLEARG ("-static"))
+            {
+               fprintf (stderr, "%s: error: cannot specify -static with -fsanitize=thread\n", argv[0]);
+               exit (1);
+            }
+         }
          //     "%{%:sanitize(undefined):"
          //             "%{static-libubsan:"            "-Bstatic"                                              "} "
          //             "-lubsan "
          //             "%{static-libubsan:"            "-Bdynamic"                                             "} "
          //             "%{static-libubsan|static:"     "%:include(libsanitizer.spec)%(link_libubsan)"          "}"
          //     "}    "
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=undefined"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan")) ADD_LINKER_ARG ("-Bstatic");
+            ADD_LINKER_ARG ("-lubsan");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan")) ADD_LINKER_ARG ("-Bdynamic");
+            if (ARGV_CONTAINS_SINGLEARG ("-static-libubsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to libubsan on QNX
+         }
          //     "%{%:sanitize(leak): "
          //             "%{static-liblsan|static:"      "%:include(libsanitizer.spec)%(link_liblsan)"           "}"
          //     "}"
+         if (ARGV_CONTAINS_SINGLEARG ("-fsanitize=leak"))
+         {
+            if (ARGV_CONTAINS_SINGLEARG ("-static-liblsan") || ARGV_CONTAINS_SINGLEARG ("-static"))
+               ADD_LINKER_ARG ("-lm"); // only known dependency to liblsan on QNX
-         /* FIXME: TODO */
+         }
 #endif // IS_TARGET_INTEL
          // "%{fstack-protector|fstack-protector-all|fstack-protector-strong|fstack-protector-explicit:}"
          // nothing to do
          was_cpluspluslib_included = false;
          for (arg_index = 0; arg_index < larg_count; arg_index++)
+         {
             ADD_LINKER_ARG (largs[arg_index]);
-            if (strstr (largs[arg_index], "c++") != NULL)
+            if (((arg = strstr (largs[arg_index], "c++")) != NULL) && (arg[3] == 0))
-               was_cpluspluslib_included = true;
+               was_cpluspluslib_included = true; // catches -lstdc++ and -lc++
+         }
          if (!was_cpluspluslib_included)
+         {
             if (strstr (argv[0], "g++") != NULL)
-               ADD_LINKER_ARG ("-lc++"); // if we were invoked as g++ to link stuff it probably means we need a C++ library
+               ADD_LINKER_ARG ("-lc++"); // if clang invoked us as g++ to link stuff it probably means we need a C++ library
             else
+            {
                requires_libcplusplus = false; // figure it out the hard way: if we see a C++ mangled symbol name in one of the object files, it means we need a C++ library
                for (arg_index = 0; !requires_libcplusplus && (arg_index < oarg_count); arg_index++)
+               {
+      }
       else if ((strncmp (argv[arg_index], "-T", 2) == 0) && ((argv[arg_index])[2] != 0))
          ADD_LINKER_ARG (argv[arg_index]);
    // since clang doesn't seem to generate .note.GNU-stack sections in output ELF files we explicitly specify the linker that we don't want an executable stack
+   // TODO: fix this in clang itself
    ADD_LINKER_ARG ("-z");
    ADD_LINKER_ARG ("noexecstack");
-   if (ARGV_CONTAINS_SINGLEARG ("-v"))
+   if (ARGV_CONTAINS_SINGLEARG ("-v") || (getenv ("DEBUG_LINKER_DRIVER") != NULL))
+   {
       fputs ("LINKER DRIVER: CONSTRUCTED COMMAND LINE BEGIN\n", stderr);
       for (arg_index = 0; arg_index < linker_argc; arg_index++)
          fprintf (stderr, "%s%s%s\n", (arg_index > 0 ? "\t" : ""), linker_argv[arg_index], ((size_t) arg_index + 1 < linker_argc ? " \\" : ""));
       fputs ("LINKER DRIVER: CONSTRUCTED COMMAND LINE END\n", stderr);

Subversion Repositories QNX 8.QNX8 linker driver

QNX 8.QNX8 linker driver/linkerdriver.c – Rev 1 → 2