main/libgcc/config/i386/cygming-crtbegin.c

   1 /* crtbegin object for windows32 targets.
   2    Copyright (C) 2007-2014 Free Software Foundation, Inc.
   3
   4    Contributed by Danny Smith <dannysmith@users.sourceforge.net>
   5
   6 This file is part of GCC.
   7
   8 GCC is free software; you can redistribute it and/or modify it under
   9 the terms of the GNU General Public License as published by the Free
  10 Software Foundation; either version 3, or (at your option) any later
  11 version.
  12
  13 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
  14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  16 for more details.
  17
  18 Under Section 7 of GPL version 3, you are granted additional
  19 permissions described in the GCC Runtime Library Exception, version
  20 3.1, as published by the Free Software Foundation.
  21
  22 You should have received a copy of the GNU General Public License and
  23 a copy of the GCC Runtime Library Exception along with this program;
  24 see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
  25 <http://www.gnu.org/licenses/>.  */
  26
  27 /* Target machine header files require this define. */
  28 #define IN_LIBGCC2
  29
  30 #include "auto-host.h"
  31 #include "tconfig.h"
  32 #include "tsystem.h"
  33 #include "coretypes.h"
  34 #include "tm.h"
  35 #include "libgcc_tm.h"
  36 #include "unwind-dw2-fde.h"
  37
  38 #define WIN32_LEAN_AND_MEAN
  39 #include <windows.h>
  40
  41 #ifndef LIBGCC_SONAME
  42 #define LIBGCC_SONAME "libgcc_s.dll"
  43 #endif
  44
  45 #ifndef LIBGCJ_SONAME
  46 #define LIBGCJ_SONAME "libgcj_s.dll"
  47 #endif
  48
  49 #if DWARF2_UNWIND_INFO
  50 /* Make the declarations weak.  This is critical for
  51    _Jv_RegisterClasses because it lives in libgcj.a  */
  52 extern void __register_frame_info (__attribute__((unused)) const void *,
  53                                    __attribute__((unused)) struct object *)
  54                                    TARGET_ATTRIBUTE_WEAK;
  55 extern void *__deregister_frame_info (__attribute__((unused)) const void *)
  56                                       TARGET_ATTRIBUTE_WEAK;
  57
  58 /* Work around for current cygwin32 build problems (Bug gas/16858).
  59    Compile weak default functions only for 64-bit systems,
  60    when absolutely necessary.  */
  61 #ifdef __x86_64__
  62 TARGET_ATTRIBUTE_WEAK void
  63 __register_frame_info (__attribute__((unused)) const void *p,
  64                        __attribute__((unused)) struct object *o)
  65 {
  66 }
  67
  68 TARGET_ATTRIBUTE_WEAK void *
  69 __deregister_frame_info (__attribute__((unused)) const void *p)
  70 {
  71   return (void*) 0;
  72 }
  73 #endif
  74 #endif /* DWARF2_UNWIND_INFO */
  75
  76 #if TARGET_USE_JCR_SECTION
  77 extern void _Jv_RegisterClasses (__attribute__((unused)) const void *)
  78   TARGET_ATTRIBUTE_WEAK;
  79
  80 #ifdef __x86_64__
  81 TARGET_ATTRIBUTE_WEAK void
  82 _Jv_RegisterClasses (__attribute__((unused)) const void *p)
  83 {
  84 }
  85 #endif
  86 #endif /* TARGET_USE_JCR_SECTION */
  87
  88 #if defined(HAVE_LD_RO_RW_SECTION_MIXING)
  89 # define EH_FRAME_SECTION_CONST const
  90 #else
  91 # define EH_FRAME_SECTION_CONST
  92 #endif
  93
  94 /* Stick a label at the beginning of the frame unwind info so we can
  95    register/deregister it with the exception handling library code.  */
  96 #if DWARF2_UNWIND_INFO
  97 static EH_FRAME_SECTION_CONST char __EH_FRAME_BEGIN__[]
  98   __attribute__((used, section(EH_FRAME_SECTION_NAME), aligned(4)))
  99   = { };
 100
 101 static struct object obj;
 102
 103 /* Handle of libgcc's DLL reference.  */
 104 HANDLE hmod_libgcc;
 105 static void *  (*deregister_frame_fn) (const void *) == NULL;
 106 #endif
 107
 108 #if TARGET_USE_JCR_SECTION
 109 static void *__JCR_LIST__[]
 110   __attribute__ ((used, section(JCR_SECTION_NAME), aligned(4)))
 111   = { };
 112 #endif
 113
 114 /* Pull in references from libgcc.a(unwind-dw2-fde.o) in the
 115    startfile. These are referenced by a ctor and dtor in crtend.o.  */
 116 extern void __gcc_register_frame (void);
 117 extern void __gcc_deregister_frame (void);
 118
 119 void
 120 __gcc_register_frame (void)
 121 {
 122 #if DWARF2_UNWIND_INFO
 123 /* Weak undefined symbols won't be pulled in from dlls; hence
 124    we first test if the dll is already loaded and, if so,
 125    get the symbol's address at run-time.  If the dll is not loaded,
 126    fallback to weak linkage to static archive.  */
 127
 128   void (*register_frame_fn) (const void *, struct object *);
 129   HANDLE h = GetModuleHandle (LIBGCC_SONAME);
 130
 131   if (h)
 132     {
 133       /* Increasing the load-count of LIBGCC_SONAME DLL.  */
 134       hmod_libgcc = LoadLibrary (LIBGCC_SONAME);
 135       register_frame_fn = (void (*) (const void *, struct object *))
 136                           GetProcAddress (h, "__register_frame_info");
 137       deregister_frame_fn = (void* (*) (const void *))
 138                             GetProcAddress (h, "__deregister_frame_info");
 139     }
 140   else
 141     {
 142       register_frame_fn = __register_frame_info;
 143       deregister_frame_fn = __deregister_frame_info;
 144     }
 145   if (register_frame_fn)
 146      register_frame_fn (__EH_FRAME_BEGIN__, &obj);
 147 #endif
 148
 149 #if TARGET_USE_JCR_SECTION
 150   if (__JCR_LIST__[0])
 151     {
 152       void (*register_class_fn) (const void *);
 153       HANDLE h = GetModuleHandle (LIBGCJ_SONAME);
 154       if (h)
 155         register_class_fn = (void (*) (const void *))
 156                              GetProcAddress (h, "_Jv_RegisterClasses");
 157       else
 158         register_class_fn = _Jv_RegisterClasses;
 159
 160       if (register_class_fn)
 161         register_class_fn (__JCR_LIST__);
 162     }
 163 #endif
 164 }
 165
 166 void
 167 __gcc_deregister_frame (void)
 168 {
 169 #if DWARF2_UNWIND_INFO
 170   if (deregister_frame_fn)
 171      deregister_frame_fn (__EH_FRAME_BEGIN__);
 172   if (hmod_libgcc)
 173     FreeLibrary (hmod_libgcc);
 174 #endif
 175 }