git.oblomov.eu Git - wine/blob - dlls/win32s/w32sys.c

   1 /*
   2  * W32SYS
   3  * helper DLL for Win32s
   4  *
   5  * Copyright (c) 1996 Anand Kumria
   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
  20  */
  21
  22 #include "config.h"
  23
  24 #include <stdarg.h>
  25 #include <stdio.h>
  26 #ifdef HAVE_UNISTD_H
  27 # include <unistd.h>
  28 #endif
  29
  30 #include "windef.h"
  31 #include "winbase.h"
  32 #include "wine/windef16.h"
  33 #include "wine/winbase16.h"
  34 #include "wine/debug.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(dll);
  37
  38 typedef struct
  39 {
  40     BYTE   bMajor;
  41     BYTE   bMinor;
  42     WORD   wBuildNumber;
  43     BOOL16 fDebug;
  44 } WIN32SINFO, *LPWIN32SINFO;
  45
  46 /***********************************************************************
  47  *           GetWin32sInfo   (W32SYS.12)
  48  * RETURNS
  49  *  0 on success, 1 on failure
  50  */
  51 WORD WINAPI GetWin32sInfo16(
  52         LPWIN32SINFO lpInfo     /* [out] Win32S special information */
  53 ) {
  54     lpInfo->bMajor = 1;
  55     lpInfo->bMinor = 3;
  56     lpInfo->wBuildNumber = 0;
  57     lpInfo->fDebug = FALSE;
  58
  59     return 0;
  60 }
  61
  62 /***********************************************************************
  63  *            GetW32SysVersion  (W32SYS.5)
  64  */
  65 WORD WINAPI GetW32SysVersion16(void)
  66 {
  67     return 0x100;
  68 }
  69
  70 /***********************************************************************
  71  *           GetPEResourceTable   (W32SYS.7)
  72  * retrieves the resourcetable from the passed filedescriptor
  73  * RETURNS
  74  *      dunno what.
  75  */
  76 WORD WINAPI GetPEResourceTable16(
  77         HFILE16 hf              /* [in] Handle of executable file */
  78 ) {
  79         return 0;
  80 }
  81
  82 /***********************************************************************
  83  *           LoadPeResource (W32SYS.11)
  84  */
  85 DWORD WINAPI LoadPeResource16(WORD x,SEGPTR y) {
  86         FIXME("(0x%04x,0x%08lx),stub!\n",x,y);
  87         return 0;
  88 }
  89
  90
  91 /**********************************************************************
  92  *              IsPeFormat              (W32SYS.2)
  93  * Check if a file is a PE format executable.
  94  * RETURNS
  95  *  TRUE, if it is.
  96  *  FALSE if not.
  97  */
  98 BOOL16 WINAPI IsPeFormat16( LPSTR fn,      /* [in] filename of executable */
  99                             HFILE16 hf16 ) /* [in] open file, if filename is NULL */
 100 {
 101     BOOL16 ret = FALSE;
 102     IMAGE_DOS_HEADER mzh;
 103     OFSTRUCT ofs;
 104     DWORD xmagic;
 105     HFILE hf;
 106
 107     if (fn) hf = OpenFile(fn,&ofs,OF_READ);
 108     else hf = (HFILE)DosFileHandleToWin32Handle( hf16 );
 109     if (hf == HFILE_ERROR) return FALSE;
 110     _llseek(hf,0,SEEK_SET);
 111     if (sizeof(mzh)!=_lread(hf,&mzh,sizeof(mzh))) goto done;
 112     if (mzh.e_magic!=IMAGE_DOS_SIGNATURE) goto done;
 113     _llseek(hf,mzh.e_lfanew,SEEK_SET);
 114     if (sizeof(DWORD)!=_lread(hf,&xmagic,sizeof(DWORD))) goto done;
 115     ret = (xmagic == IMAGE_NT_SIGNATURE);
 116  done:
 117     if (fn) _lclose(hf);
 118     return ret;
 119 }