loader/glibc.c

   1 /*
   2  * glibc threading support
   3  *
   4  * Copyright 2003 Alexandre Julliard
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include "config.h"
  22 #include "wine/port.h"
  23
  24 #include <errno.h>
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #ifdef HAVE_SYS_MMAN_H
  28 # include <sys/mman.h>
  29 #endif
  30 #ifdef HAVE_SYS_RESOURCE_H
  31 # include <sys/resource.h>
  32 #endif
  33 #ifdef HAVE_UNISTD_H
  34 # include <unistd.h>
  35 #endif
  36 #ifdef HAVE_PTHREAD_H
  37 # include <pthread.h>
  38 #endif
  39
  40 #include "wine/library.h"
  41
  42 /* malloc wrapper */
  43 static void *xmalloc( size_t size )
  44 {
  45     void *res;
  46
  47     if (!size) size = 1;
  48     if (!(res = malloc( size )))
  49     {
  50         fprintf( stderr, "wine: virtual memory exhausted\n" );
  51         exit(1);
  52     }
  53     return res;
  54 }
  55
  56 /* separate thread to check for NPTL and TLS features */
  57 static void *needs_pthread( void *arg )
  58 {
  59     pid_t tid = gettid();
  60     /* check for NPTL */
  61     if (tid != -1 && tid != getpid()) return (void *)1;
  62     /* check for TLS glibc */
  63     if (wine_get_gs() != 0) return (void *)1;
  64     /* check for exported epoll_create to detect new glibc versions without TLS */
  65     if (wine_dlsym( RTLD_DEFAULT, "epoll_create", NULL, 0 ))
  66         fprintf( stderr,
  67                  "wine: glibc >= 2.3 without NPTL or TLS is not a supported combination.\n"
  68                  "      Please upgrade to a glibc with NPTL support.\n" );
  69     else
  70         fprintf( stderr,
  71                  "wine: Your C library is too old. You need at least glibc 2.3 with NPTL support.\n" );
  72     return 0;
  73 }
  74
  75 /* check if we support the glibc threading model */
  76 static void check_threading(void)
  77 {
  78     pthread_t id;
  79     void *ret;
  80
  81     pthread_create( &id, NULL, needs_pthread, NULL );
  82     pthread_join( id, &ret );
  83     if (!ret) exit(1);
  84 }
  85
  86 /* build a new full path from the specified path and name */
  87 static const char *build_new_path( const char *path, const char *name )
  88 {
  89     const char *p;
  90     char *ret;
  91
  92     if (!(p = strrchr( path, '/' ))) return name;
  93     p++;
  94     ret = xmalloc( (p - path) + strlen(name) + 1 );
  95     memcpy( ret, path, p - path );
  96     strcpy( ret + (p - path), name );
  97     return ret;
  98 }
  99
 100 static void check_vmsplit( void *stack )
 101 {
 102     if (stack < (void *)0x80000000)
 103     {
 104         /* if the stack is below 0x80000000, assume we can safely try a munmap there */
 105         if (munmap( (void *)0x80000000, 1 ) == -1 && errno == EINVAL)
 106             fprintf( stderr,
 107                      "Warning: memory above 0x80000000 doesn't seem to be accessible.\n"
 108                      "Wine requires a 3G/1G user/kernel memory split to work properly.\n" );
 109     }
 110 }
 111
 112 static void set_max_limit( int limit )
 113 {
 114     struct rlimit rlimit;
 115
 116     if (!getrlimit( limit, &rlimit ))
 117     {
 118         rlimit.rlim_cur = rlimit.rlim_max;
 119         setrlimit( limit, &rlimit );
 120     }
 121 }
 122
 123
 124 /**********************************************************************
 125  *           main
 126  */
 127 int main( int argc, char *argv[] )
 128 {
 129     const char *loader = getenv( "WINELOADER" );
 130     const char *new_argv0 = build_new_path( argv[0], "wine-pthread" );
 131
 132     wine_init_argv0_path( new_argv0 );
 133
 134     /* set the address space limit before starting the preloader */
 135     set_max_limit( RLIMIT_AS );
 136
 137     if (loader)
 138     {
 139         /* update WINELOADER with the new name */
 140         const char *new_name = build_new_path( loader, "wine-pthread" );
 141         char *new_loader = xmalloc( sizeof("WINELOADER=") + strlen(new_name) );
 142         strcpy( new_loader, "WINELOADER=" );
 143         strcat( new_loader, new_name );
 144         putenv( new_loader );
 145         loader = new_name;
 146     }
 147
 148     check_threading();
 149     check_vmsplit( &argc );
 150     wine_exec_wine_binary( NULL, argv, loader );
 151     fprintf( stderr, "wine: could not exec wine-pthread\n" );
 152     exit(1);
 153 }