loader/selector.c

   1 /*
   2  * Selector manipulation functions
   3  *
   4  * Copyright 1993 Robert J. Amstadt
   5  * Copyright 1995 Alexandre Julliard
   6  */
   7
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10 #include <string.h>
  11 #include <sys/types.h>
  12 #include <sys/stat.h>
  13 #include <fcntl.h>
  14 #include <unistd.h>
  15
  16 #ifndef WINELIB
  17
  18 #ifdef __linux__
  19 #include <sys/mman.h>
  20 #include <linux/unistd.h>
  21 #include <linux/head.h>
  22 #include <linux/mman.h>
  23 #include <linux/a.out.h>
  24 #include <linux/ldt.h>
  25 #endif
  26 #if defined(__NetBSD__) || defined(__FreeBSD__)
  27 #include <sys/mman.h>
  28 #include <machine/segments.h>
  29 #endif
  30
  31 #include "windows.h"
  32 #include "ldt.h"
  33 #include "wine.h"
  34 #include "global.h"
  35 #include "dlls.h"
  36 #include "neexe.h"
  37 #include "prototypes.h"
  38 #include "module.h"
  39 #include "stddebug.h"
  40 /* #define DEBUG_SELECTORS */
  41 #include "debug.h"
  42
  43
  44 #define MAX_ENV_SIZE 16384  /* Max. environment size (ought to be dynamic) */
  45
  46 static HANDLE EnvironmentHandle = 0;
  47
  48
  49 extern char WindowsPath[256];
  50
  51 extern char **environ;
  52
  53
  54
  55 WNDPROC GetWndProcEntry16( char *name )
  56 {
  57     WORD ordinal;
  58     static HMODULE hModule = 0;
  59
  60     if (!hModule) hModule = GetModuleHandle( "WINPROCS" );
  61     ordinal = MODULE_GetOrdinal( hModule, name );
  62     return MODULE_GetEntryPoint( hModule, ordinal );
  63 }
  64
  65
  66 /***********************************************************************
  67  *           GetDOSEnvironment   (KERNEL.131)
  68  */
  69 SEGPTR GetDOSEnvironment(void)
  70 {
  71     return WIN16_GlobalLock( EnvironmentHandle );
  72 }
  73
  74
  75 /**********************************************************************
  76  *           CreateEnvironment
  77  */
  78 static HANDLE CreateEnvironment(void)
  79 {
  80     HANDLE handle;
  81     char **e;
  82     char *p;
  83
  84     handle = GlobalAlloc( GMEM_MOVEABLE, MAX_ENV_SIZE );
  85     if (!handle) return 0;
  86     p = (char *) GlobalLock( handle );
  87
  88     /*
  89      * Fill environment with Windows path, the Unix environment,
  90      * and program name.
  91      */
  92     strcpy(p, "PATH=");
  93     strcat(p, WindowsPath);
  94     p += strlen(p) + 1;
  95
  96     for (e = environ; *e; e++)
  97     {
  98         if (strncasecmp(*e, "path", 4))
  99         {
 100             strcpy(p, *e);
 101             p += strlen(p) + 1;
 102         }
 103     }
 104
 105     *p++ = '\0';
 106
 107     /*
 108      * Display environment
 109      */
 110     p = (char *) GlobalLock( handle );
 111     dprintf_selectors(stddeb, "Environment at %p\n", p);
 112     for (; *p; p += strlen(p) + 1) dprintf_selectors(stddeb, "    %s\n", p);
 113
 114     return handle;
 115 }
 116
 117
 118
 119 /**********************************************************************
 120  *                                      CreateSelectors
 121  */
 122 void CreateSelectors(void)
 123 {
 124     if(!EnvironmentHandle) EnvironmentHandle = CreateEnvironment();
 125 }
 126
 127
 128 #endif /* ifndef WINELIB */