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     const char *loader;
  60     pid_t tid = gettid();
  61     /* check for NPTL */
  62     if (tid != -1 && tid != getpid()) return (void *)1;
  63     /* check for TLS glibc */
  64     if (wine_get_gs() != 0) return (void *)1;
  65     /* check for exported epoll_create to detect new glibc versions without TLS */
  66     if (wine_dlsym( RTLD_DEFAULT, "epoll_create", NULL, 0 ))
  67         fprintf( stderr,
  68                  "wine: glibc >= 2.3 without NPTL or TLS is not a supported combination.\n"
  69                  "      Please upgrade to a glibc with NPTL support.\n" );
  70     else
  71         fprintf( stderr,
  72                  "wine: Your C library is too old. You need at least glibc 2.3 with NPTL support.\n" );
  73     if (!(loader = getenv( "WINELOADER" )) || !strstr( loader, "wine-kthread" ))
  74         exit(1);
  75     return 0;
  76 }
  77
  78 /* return the name of the Wine threading variant to use */
  79 static const char *get_threading(void)
  80 {
  81     pthread_t id;
  82     void *ret;
  83
  84     pthread_create( &id, NULL, needs_pthread, NULL );
  85     pthread_join( id, &ret );
  86     return ret ? "wine-pthread" : "wine-kthread";
  87 }
  88
  89 /* build a new full path from the specified path and name */
  90 static const char *build_new_path( const char *path, const char *name )
  91 {
  92     const char *p;
  93     char *ret;
  94
  95     if (!(p = strrchr( path, '/' ))) return name;
  96     p++;
  97     ret = xmalloc( (p - path) + strlen(name) + 1 );
  98     memcpy( ret, path, p - path );
  99     strcpy( ret + (p - path), name );
 100     return ret;
 101 }
 102
 103 static void check_vmsplit( void *stack )
 104 {
 105     if (stack < (void *)0x80000000)
 106     {
 107         /* if the stack is below 0x80000000, assume we can safely try a munmap there */
 108         if (munmap( (void *)0x80000000, 1 ) == -1 && errno == EINVAL)
 109             fprintf( stderr,
 110                      "Warning: memory above 0x80000000 doesn't seem to be accessible.\n"
 111                      "Wine requires a 3G/1G user/kernel memory split to work properly.\n" );
 112     }
 113 }
 114
 115 static void set_max_limit( int limit )
 116 {
 117     struct rlimit rlimit;
 118
 119     if (!getrlimit( limit, &rlimit ))
 120     {
 121         rlimit.rlim_cur = rlimit.rlim_max;
 122         setrlimit( limit, &rlimit );
 123     }
 124 }
 125
 126
 127 /**********************************************************************
 128  *           main
 129  */
 130 int main( int argc, char *argv[] )
 131 {
 132     const char *loader = getenv( "WINELOADER" );
 133     const char *threads = get_threading();
 134     const char *new_argv0 = build_new_path( argv[0], threads );
 135
 136     wine_init_argv0_path( new_argv0 );
 137
 138     /* set the address space limit before starting the preloader */
 139     set_max_limit( RLIMIT_AS );
 140
 141     if (loader)
 142     {
 143         /* update WINELOADER with the new name */
 144         const char *new_name = build_new_path( loader, threads );
 145         char *new_loader = xmalloc( sizeof("WINELOADER=") + strlen(new_name) );
 146         strcpy( new_loader, "WINELOADER=" );
 147         strcat( new_loader, new_name );
 148         putenv( new_loader );
 149         loader = new_name;
 150     }
 151
 152     check_vmsplit( &argc );
 153     wine_exec_wine_binary( NULL, argv, loader );
 154     fprintf( stderr, "wine: could not exec %s\n", threads );
 155     exit(1);
 156 }