4 * Copyright 1998 Marcus Meissner
5 * Copyright 1998 Ulrich Weigand
6 * Copyright 1998 Patrik Stridvall
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/port.h"
30 #include <sys/types.h>
31 #ifdef HAVE_SYS_STAT_H
32 # include <sys/stat.h>
42 #include "kernel16_private.h"
43 #include "wine/library.h"
44 #include "wine/unicode.h"
45 #include "wine/server.h"
46 #include "wine/debug.h"
48 WINE_DEFAULT_DEBUG_CHANNEL(vxd
);
50 typedef DWORD (WINAPI
*VxDCallProc
)(DWORD
, CONTEXT86
*);
51 typedef BOOL (WINAPI
*DeviceIoProc
)(DWORD
, LPVOID
, DWORD
, LPVOID
, DWORD
, LPDWORD
, LPOVERLAPPED
);
61 struct vxdcall_service
69 #define MAX_VXD_MODULES 32
71 static struct vxd_module vxd_modules
[MAX_VXD_MODULES
];
73 static struct vxdcall_service vxd_services
[] =
75 { {'v','m','m','.','v','x','d',0}, 0x0001, NULL
, NULL
},
76 { {'v','w','i','n','3','2','.','v','x','d',0}, 0x002a, NULL
, NULL
}
79 #define NB_VXD_SERVICES (sizeof(vxd_services)/sizeof(vxd_services[0]))
81 static CRITICAL_SECTION vxd_section
;
82 static CRITICAL_SECTION_DEBUG critsect_debug
=
85 { &critsect_debug
.ProcessLocksList
, &critsect_debug
.ProcessLocksList
},
86 0, 0, { (DWORD_PTR
)(__FILE__
": vxd_section") }
88 static CRITICAL_SECTION vxd_section
= { &critsect_debug
, -1, 0, 0, 0, 0 };
91 /* create a file handle to represent a VxD, by opening a dummy file in the wineserver directory */
92 static HANDLE
open_vxd_handle( LPCWSTR name
)
94 static const WCHAR prefixW
[] = {'\\','?','?','\\','u','n','i','x'};
95 const char *dir
= wine_get_server_dir();
99 OBJECT_ATTRIBUTES attr
;
100 UNICODE_STRING nameW
;
103 len
= MultiByteToWideChar( CP_UNIXCP
, 0, dir
, -1, NULL
, 0 );
104 nameW
.Length
= sizeof(prefixW
) + (len
+ strlenW( name
)) * sizeof(WCHAR
);
105 nameW
.MaximumLength
= nameW
.Length
+ sizeof(WCHAR
);
106 if (!(nameW
.Buffer
= HeapAlloc( GetProcessHeap(), 0, nameW
.MaximumLength
)))
108 SetLastError( ERROR_NOT_ENOUGH_MEMORY
);
111 memcpy( nameW
.Buffer
, prefixW
, sizeof(prefixW
) );
112 MultiByteToWideChar( CP_UNIXCP
, 0, dir
, -1, nameW
.Buffer
+ sizeof(prefixW
)/sizeof(WCHAR
), len
);
113 len
+= sizeof(prefixW
) / sizeof(WCHAR
);
114 nameW
.Buffer
[len
-1] = '/';
115 strcpyW( nameW
.Buffer
+ len
, name
);
117 attr
.Length
= sizeof(attr
);
118 attr
.RootDirectory
= 0;
120 attr
.ObjectName
= &nameW
;
121 attr
.SecurityDescriptor
= NULL
;
122 attr
.SecurityQualityOfService
= NULL
;
124 status
= NtCreateFile( &ret
, 0, &attr
, &io
, NULL
, 0,
125 FILE_SHARE_READ
|FILE_SHARE_WRITE
, FILE_OPEN_IF
,
126 FILE_SYNCHRONOUS_IO_ALERT
, NULL
, 0 );
130 SetLastError( RtlNtStatusToDosError(status
) );
132 RtlFreeUnicodeString( &nameW
);
136 /* retrieve the DeviceIoControl function for a Vxd given a file handle */
137 DeviceIoProc
__wine_vxd_get_proc( HANDLE handle
)
139 DeviceIoProc ret
= NULL
;
142 FILE_INTERNAL_INFORMATION info
;
144 status
= NtQueryInformationFile( handle
, &io
, &info
, sizeof(info
), FileInternalInformation
);
147 SetLastError( RtlNtStatusToDosError(status
) );
151 RtlEnterCriticalSection( &vxd_section
);
153 for (i
= 0; i
< MAX_VXD_MODULES
; i
++)
155 if (!vxd_modules
[i
].module
) break;
156 if (vxd_modules
[i
].index
.QuadPart
== info
.IndexNumber
.QuadPart
)
158 if (!(ret
= vxd_modules
[i
].proc
)) SetLastError( ERROR_INVALID_FUNCTION
);
162 /* FIXME: Here we could go through the directory to find the VxD name and load it. */
163 /* Let's wait to find out if there are actually apps out there that try to share */
164 /* VxD handles between processes, before we go to the trouble of implementing it. */
165 ERR( "handle %p not found in module list, inherited from another process?\n", handle
);
168 RtlLeaveCriticalSection( &vxd_section
);
173 /* load a VxD and return a file handle to it */
174 HANDLE
__wine_vxd_open( LPCWSTR filenameW
, DWORD access
, SECURITY_ATTRIBUTES
*sa
)
176 static const WCHAR dotVxDW
[] = {'.','v','x','d',0};
182 /* normalize the filename */
184 if (strlenW( filenameW
) >= sizeof(name
)/sizeof(WCHAR
) - 4 ||
185 strchrW( filenameW
, '/' ) || strchrW( filenameW
, '\\' ))
187 SetLastError( ERROR_FILE_NOT_FOUND
);
190 strcpyW( name
, filenameW
);
192 p
= strchrW( name
, '.' );
193 if (!p
) strcatW( name
, dotVxDW
);
194 else if (strcmpiW( p
, dotVxDW
)) /* existing extension has to be .vxd */
196 SetLastError( ERROR_FILE_NOT_FOUND
);
200 /* try to load the module first */
202 if (!(module
= LoadLibraryW( name
)))
204 FIXME( "Unknown/unsupported VxD %s. Try setting Windows version to 'nt40' or 'win31'.\n",
206 SetLastError( ERROR_FILE_NOT_FOUND
);
210 /* register the module in the global list if necessary */
212 RtlEnterCriticalSection( &vxd_section
);
214 for (i
= 0; i
< MAX_VXD_MODULES
; i
++)
216 if (vxd_modules
[i
].module
== module
)
218 handle
= vxd_modules
[i
].handle
;
219 goto done
; /* already registered */
221 if (!vxd_modules
[i
].module
) /* new one, register it */
224 FILE_INTERNAL_INFORMATION info
;
226 /* get a file handle to the dummy file */
227 if (!(handle
= open_vxd_handle( name
)))
229 FreeLibrary( module
);
232 if (!NtQueryInformationFile( handle
, &io
, &info
, sizeof(info
), FileInternalInformation
))
233 vxd_modules
[i
].index
= info
.IndexNumber
;
235 vxd_modules
[i
].module
= module
;
236 vxd_modules
[i
].handle
= handle
;
237 vxd_modules
[i
].proc
= (DeviceIoProc
)GetProcAddress( module
, "DeviceIoControl" );
242 ERR("too many open VxD modules, please report\n" );
243 FreeLibrary( module
);
247 RtlLeaveCriticalSection( &vxd_section
);
248 if (!DuplicateHandle( GetCurrentProcess(), handle
, GetCurrentProcess(), &handle
, 0,
249 (sa
&& (sa
->nLength
>=sizeof(*sa
)) && sa
->bInheritHandle
),
250 DUP_HANDLE_SAME_ACCESS
))
256 /***********************************************************************
257 * VxDCall0 (KERNEL32.1)
258 * VxDCall1 (KERNEL32.2)
259 * VxDCall2 (KERNEL32.3)
260 * VxDCall3 (KERNEL32.4)
261 * VxDCall4 (KERNEL32.5)
262 * VxDCall5 (KERNEL32.6)
263 * VxDCall6 (KERNEL32.7)
264 * VxDCall7 (KERNEL32.8)
265 * VxDCall8 (KERNEL32.9)
267 void WINAPI
__regs_VxDCall( DWORD service
, CONTEXT86
*context
)
270 VxDCallProc proc
= NULL
;
272 RtlEnterCriticalSection( &vxd_section
);
273 for (i
= 0; i
< NB_VXD_SERVICES
; i
++)
275 if (HIWORD(service
) != vxd_services
[i
].service
) continue;
276 if (!vxd_services
[i
].module
) /* need to load it */
278 if ((vxd_services
[i
].module
= LoadLibraryW( vxd_services
[i
].name
)))
279 vxd_services
[i
].proc
= (VxDCallProc
)GetProcAddress( vxd_services
[i
].module
, "VxDCall" );
281 proc
= vxd_services
[i
].proc
;
284 RtlLeaveCriticalSection( &vxd_section
);
286 if (proc
) context
->Eax
= proc( service
, context
);
289 FIXME( "Unknown/unimplemented VxD (%08x)\n", service
);
290 context
->Eax
= 0xffffffff; /* FIXME */
293 #ifdef DEFINE_REGS_ENTRYPOINT
294 DEFINE_REGS_ENTRYPOINT( VxDCall
, 1 )