Alexandre Julliard | cdcdede | 1996-04-21 14:57:41 +0000 | [diff] [blame] | 1 | /* |
| 2 | * W32SYS |
| 3 | * helper DLL for Win32s |
| 4 | * |
| 5 | * Copyright (c) 1996 Anand Kumria |
Alexandre Julliard | 0799c1a | 2002-03-09 23:29:33 +0000 | [diff] [blame] | 6 | * |
| 7 | * This library is free software; you can redistribute it and/or |
| 8 | * modify it under the terms of the GNU Lesser General Public |
| 9 | * License as published by the Free Software Foundation; either |
| 10 | * version 2.1 of the License, or (at your option) any later version. |
| 11 | * |
| 12 | * This library is distributed in the hope that it will be useful, |
| 13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| 15 | * Lesser General Public License for more details. |
| 16 | * |
| 17 | * You should have received a copy of the GNU Lesser General Public |
| 18 | * License along with this library; if not, write to the Free Software |
| 19 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
Alexandre Julliard | cdcdede | 1996-04-21 14:57:41 +0000 | [diff] [blame] | 20 | */ |
| 21 | |
Patrik Stridvall | d016f81 | 2002-08-17 00:43:16 +0000 | [diff] [blame^] | 22 | #include "config.h" |
| 23 | |
| 24 | #ifdef HAVE_UNISTD_H |
| 25 | # include <unistd.h> |
| 26 | #endif |
Alexandre Julliard | 2682bc2 | 2000-11-27 22:03:23 +0000 | [diff] [blame] | 27 | |
Jim Aston | 2e1cafa | 1999-03-14 16:35:05 +0000 | [diff] [blame] | 28 | #include "windef.h" |
Alexandre Julliard | 83f52d1 | 2000-09-26 22:20:14 +0000 | [diff] [blame] | 29 | #include "wine/windef16.h" |
Alexandre Julliard | 2682bc2 | 2000-11-27 22:03:23 +0000 | [diff] [blame] | 30 | #include "wine/winbase16.h" |
Alexandre Julliard | 0799c1a | 2002-03-09 23:29:33 +0000 | [diff] [blame] | 31 | #include "wine/debug.h" |
Marcus Meissner | 2f521d3 | 1999-09-10 13:51:11 +0000 | [diff] [blame] | 32 | |
Alexandre Julliard | 0799c1a | 2002-03-09 23:29:33 +0000 | [diff] [blame] | 33 | WINE_DEFAULT_DEBUG_CHANNEL(dll); |
Alexandre Julliard | a007f33 | 2000-08-09 00:54:58 +0000 | [diff] [blame] | 34 | |
| 35 | typedef struct |
| 36 | { |
| 37 | BYTE bMajor; |
| 38 | BYTE bMinor; |
| 39 | WORD wBuildNumber; |
| 40 | BOOL16 fDebug; |
| 41 | } WIN32SINFO, *LPWIN32SINFO; |
Marcus Meissner | 2f521d3 | 1999-09-10 13:51:11 +0000 | [diff] [blame] | 42 | |
Alexandre Julliard | cdcdede | 1996-04-21 14:57:41 +0000 | [diff] [blame] | 43 | /*********************************************************************** |
| 44 | * GetWin32sInfo (W32SYS.12) |
Alexandre Julliard | 54c2711 | 1998-03-29 19:44:57 +0000 | [diff] [blame] | 45 | * RETURNS |
| 46 | * 0 on success, 1 on failure |
Alexandre Julliard | cdcdede | 1996-04-21 14:57:41 +0000 | [diff] [blame] | 47 | */ |
Alexandre Julliard | a396029 | 1999-02-26 11:11:13 +0000 | [diff] [blame] | 48 | WORD WINAPI GetWin32sInfo16( |
Alexandre Julliard | 54c2711 | 1998-03-29 19:44:57 +0000 | [diff] [blame] | 49 | LPWIN32SINFO lpInfo /* [out] Win32S special information */ |
| 50 | ) { |
Alexandre Julliard | cdcdede | 1996-04-21 14:57:41 +0000 | [diff] [blame] | 51 | lpInfo->bMajor = 1; |
| 52 | lpInfo->bMinor = 3; |
| 53 | lpInfo->wBuildNumber = 0; |
| 54 | lpInfo->fDebug = FALSE; |
| 55 | |
| 56 | return 0; |
| 57 | } |
Alexandre Julliard | 54c2711 | 1998-03-29 19:44:57 +0000 | [diff] [blame] | 58 | |
| 59 | /*********************************************************************** |
Patrik Stridvall | 01d5e5b | 2001-07-02 19:59:40 +0000 | [diff] [blame] | 60 | * GetW32SysVersion (W32SYS.5) |
Alexandre Julliard | 4220b29 | 1999-07-11 17:20:01 +0000 | [diff] [blame] | 61 | */ |
Alexandre Julliard | e02a540 | 1999-07-24 10:28:37 +0000 | [diff] [blame] | 62 | WORD WINAPI GetW32SysVersion16(void) |
Alexandre Julliard | 4220b29 | 1999-07-11 17:20:01 +0000 | [diff] [blame] | 63 | { |
| 64 | return 0x100; |
| 65 | } |
| 66 | |
| 67 | /*********************************************************************** |
Alexandre Julliard | 54c2711 | 1998-03-29 19:44:57 +0000 | [diff] [blame] | 68 | * GetPEResourceTable (W32SYS.7) |
| 69 | * retrieves the resourcetable from the passed filedescriptor |
| 70 | * RETURNS |
| 71 | * dunno what. |
| 72 | */ |
Alexandre Julliard | a396029 | 1999-02-26 11:11:13 +0000 | [diff] [blame] | 73 | WORD WINAPI GetPEResourceTable16( |
Alexandre Julliard | 54c2711 | 1998-03-29 19:44:57 +0000 | [diff] [blame] | 74 | HFILE16 hf /* [in] filedescriptor to opened executeable */ |
| 75 | ) { |
| 76 | return 0; |
| 77 | } |
Marcus Meissner | 2f521d3 | 1999-09-10 13:51:11 +0000 | [diff] [blame] | 78 | |
Patrik Stridvall | 54fe838 | 2000-04-06 20:21:16 +0000 | [diff] [blame] | 79 | /*********************************************************************** |
Patrik Stridvall | 044855c | 2001-07-11 18:56:41 +0000 | [diff] [blame] | 80 | * LoadPeResource (W32SYS.11) |
Patrik Stridvall | 54fe838 | 2000-04-06 20:21:16 +0000 | [diff] [blame] | 81 | */ |
Marcus Meissner | 2f521d3 | 1999-09-10 13:51:11 +0000 | [diff] [blame] | 82 | DWORD WINAPI LoadPeResource16(WORD x,SEGPTR y) { |
| 83 | FIXME("(0x%04x,0x%08lx),stub!\n",x,y); |
| 84 | return 0; |
| 85 | } |
Alexandre Julliard | 2682bc2 | 2000-11-27 22:03:23 +0000 | [diff] [blame] | 86 | |
| 87 | |
| 88 | /********************************************************************** |
Patrik Stridvall | 01d5e5b | 2001-07-02 19:59:40 +0000 | [diff] [blame] | 89 | * IsPeFormat (W32SYS.2) |
Alexandre Julliard | 2682bc2 | 2000-11-27 22:03:23 +0000 | [diff] [blame] | 90 | * Checks the passed filename if it is a PE format executeable |
| 91 | * RETURNS |
| 92 | * TRUE, if it is. |
| 93 | * FALSE if not. |
| 94 | */ |
| 95 | BOOL16 WINAPI IsPeFormat16( LPSTR fn, /* [in] filename to executeable */ |
| 96 | HFILE16 hf16 ) /* [in] open file, if filename is NULL */ |
| 97 | { |
| 98 | BOOL16 ret = FALSE; |
| 99 | IMAGE_DOS_HEADER mzh; |
| 100 | OFSTRUCT ofs; |
| 101 | DWORD xmagic; |
| 102 | HFILE hf; |
| 103 | |
| 104 | if (fn) hf = OpenFile(fn,&ofs,OF_READ); |
| 105 | else hf = DosFileHandleToWin32Handle( hf16 ); |
| 106 | if (hf == HFILE_ERROR) return FALSE; |
| 107 | _llseek(hf,0,SEEK_SET); |
| 108 | if (sizeof(mzh)!=_lread(hf,&mzh,sizeof(mzh))) goto done; |
| 109 | if (mzh.e_magic!=IMAGE_DOS_SIGNATURE) goto done; |
| 110 | _llseek(hf,mzh.e_lfanew,SEEK_SET); |
| 111 | if (sizeof(DWORD)!=_lread(hf,&xmagic,sizeof(DWORD))) goto done; |
| 112 | ret = (xmagic == IMAGE_NT_SIGNATURE); |
| 113 | done: |
| 114 | if (fn) _lclose(hf); |
| 115 | return ret; |
| 116 | } |