mirror of
git://source.winehq.org/git/wine.git
synced 2024-09-14 17:06:19 +00:00
60ce85c965
Sun Feb 1 13:24:54 1998 Alexandre Julliard <julliard@lrc.epfl.ch> * [files/drive.c] Added Device= parameter to drive configuration. * [if1632/relay.c] Throw() and Catch() now use the correct CATCHBUF layout (untested). * [tools/build.c] [include/stackframe.h] [loader/task.c] Moved 16-bit stack pointer into thread database. Save current %fs while running 16-bit code. Fri Jan 30 09:25:49 1998 Martin Boehme <boehme@informatik.mu-luebeck.de> * [graphics/mapping.c] Made DPtoLP32 and LPtoDP32 respect world transforms. * [graphics/path.c] [graphics/painting.c] [if1632/gdi.spec] [include/path.h] More path support. * [include/gdi.h] [include/windows.h] [objects/dc.c] [relay/gdi32.spec] Support for Get/SetArcDirection and Get/SetWorldTransform * [windows/hook.c] Fixed a bug in HOOK_Map16To32Common. Thu Jan 29 23:43:18 1998 Douglas Ridgway <ridgway@taiga.gmcl.com> * [graphics/metafiledrv/init.c] [objects/metafile.c] Documentation for metafile related API calls. Fixed a bug to avoid documenting it. * [include/windows.h] Declaration for LoadImage. Thu Jan 29 21:44:45 1998 Huw D M Davies <h.davies1@physics.oxford.ac.uk> * [graphics/win16drv/*] Changes to printing code to enable use of printer fonts with the win3.1 postscript driver. Remember to add printer=on to [wine] section of wine.conf . You will also need to disable truetype fonts from control panel. Winword 6.0 and Write seem to be happy with this... * [include/bitmap.h] Fix Widthbytes for 15bpp displays. Tue Jan 27 20:54:08 1998 Kristian Nielsen <kristian.nielsen@risoe.dk> * [tsx11/*] [include/ts*] [tools/make_X11wrappers] Implemented thread-safe X11 wrappers. Tue Jan 27 13:54:09 1998 Constantine Sapuntzakis <csapuntz@tma-1.lcs.mit.edu> * [windows/queue.c] Forgot to convert thdb to thread_id. * [misc/registry.c] Sped up Windows 95 registry reading. Changed code to traverse registry as a tree rather than read in all possible keys (including dead ones). Tue Jan 27 12:46:09 1998 Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de> * [loader/pe_image.c][Makefile.in][scheduler/thread.c] [libtest/hello5.c] Don't exit() on failed to load referenced dlls. Fixed static tls allocation for multiple threads. WINELIB should now be able to load PE dlls. A sample winelib program, that dynamically loads a internal dll is included. * [graphics/ddraw.c][include/ddraw.h][include/d3d.h] Cleaned up and enhanced further. Added several DirectX5 interface definitions and DirectSurface3 implementation. Stubs for D3D (NOT coming soon, just there so it fails safely). * [multimedia/dsound.c][include/dsound.h] Actually works now for a lot of cases. Some DirectX5 stuff added. Still lacking several features. * [windows/dinput.c][include/dinput.h] Started implementing DirectInput. Doesn't work yet, don't know why. * [if1632/thunk.c][misc/callbacks.c] [win32/kernel.c][include/callbacks.h] Added WOWCallback16Ex, WOWHandle32. * [misc/cpu.c] Fixed GetSystemInfo, IsProcessorFeaturePresent. * [multimedia/joystick.c][multimedia/time.c] Several fixes. Small hack to get timerevents in timeGetTime() loops. Tue Jan 20 11:26:27 1998 Slaven Rezic <eserte@cs.tu-berlin.de> * [configure.in] Fixed check for union semun on FreeBSD systems. Sun Jan 18 23:05:04 1998 Karl Backström <karl_b@geocities.com> * [misc/ole2nls.c] [programs/progman/Sw.rc] [programs/winhelp/Sw.rc] [resources/sysres_Sw.rc] Added/updated Swedish language support. Sun Jan 18 18:49:01 1998 Alex Korobka <alex@trantor.pharm.sunysb.edu> * [misc/winsock.c] [misc/winsock_dns.c] [windows/event.c] [windows/win.c] [windows/dce.c] [windows/winpos.c] Bug fixes. Sun Jan 18 12:45:23 1997 Andreas Mohr <100.30936@germany.net> * [msdos/int25.c] [msdos/int26.c] Implemented "native" absolute disk read/write access. * [msdos/int13.c] [msdos/ioports.c] Enhanced GET DRIVE PARAMETERS (int13 AH=08). * [graphics/win16drv/prtdrv.c] [if1632/gdi.spec] Fixed typos, implemented dmEnumDFonts, Started implementation of dmRealizeObject. * [if1632/compobj.spec] [ole/compobj.c] [relay32/ole32.spec] Stubs CoCreateInstance, CoFreeUnusedLibraries, implemented CoFileTimeNow. * [if1632/kernel.spec] [include/windows.h] [memory/global.c] [memory/string.c] [misc/kernel.c] [misc/Makefile.in] [misc/toolhelp.c] [msdos/int21.c] Implemented GlobalHandleNoRIP, GetFreeMemInfo, DebugFillBuffer, stubs GetSetKernelDOSProc, DiagQuery, DiagOutput, ToolHelpHook (Undocumented Windows). * [if1632/user.spec] [if1632/win32s16.spec] [misc/win32s16.c] Misc stubs. * [if1632/winaspi.spec] [misc/aspi.c] Implemented GetASPIDLLVersion. * [if1632/wprocs.spec] [msdos/int20.c] [msdos/Makefile.in] Added handler for Int 0x20 (terminate program, _very_ old-fashioned). * [misc/w32scomb.c] Implemented Get16DLLAddress() partially (big thanks to Marcus and Alexandre). * [relay32/Makefile.in] [relay32/builtin32.c] [relay32/dplay.spec] Added built-in DPLAY.DLL. * [relay32/winmm.spec] [multimedia/joystick.c] Added joySetThreshold. * [misc/windebug.c] Added WinNotify. * [win32/console.c] Stubs CreateConsoleScreenBuffer, SetConsoleActiveScreenBuffer, WriteConsoleOutput32A. * [windows/user.c] Stub SetEventHook. Sat Jan 17 19:30:35 1998 Matthew Toseland <Paul.Toseland@btinternet.com> * [windows/painting.c] Fixed broken restore-to-maximized. Mon Jan 12 21:25:32 1998 Perceval - Marc Huguet Puig <mhp@tinet.fut.es> * [documentation/wine.man] [include/options.h] [misc/main.c] [ole/ole2nls.c] [resources/sysres.c] [resources/sysres_Ca.rc] [resources/Makefile.in] Added language catalan. (Afegit l'idioma català).
286 lines
6.5 KiB
C
286 lines
6.5 KiB
C
/*
|
|
* COMPOBJ library
|
|
*
|
|
* Copyright 1995 Martin von Loewis
|
|
*/
|
|
|
|
#define INITGUID
|
|
|
|
#include <ctype.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
#include "ole.h"
|
|
#include "ole2.h"
|
|
#include "stddebug.h"
|
|
#include "debug.h"
|
|
#include "file.h"
|
|
#include "compobj.h"
|
|
#include "interfaces.h"
|
|
#include "shlobj.h"
|
|
#include "ddraw.h"
|
|
#include "dsound.h"
|
|
#include "dinput.h"
|
|
#include "d3d.h"
|
|
|
|
DWORD currentMalloc=0;
|
|
|
|
/***********************************************************************
|
|
* CoBuildVersion [COMPOBJ.1]
|
|
*/
|
|
DWORD WINAPI CoBuildVersion()
|
|
{
|
|
dprintf_ole(stddeb,"CoBuildVersion()\n");
|
|
return (rmm<<16)+rup;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoInitialize [COMPOBJ.2]
|
|
* lpReserved is an IMalloc pointer in 16bit OLE. We just stored it as-is.
|
|
*/
|
|
HRESULT WINAPI CoInitialize(DWORD lpReserved)
|
|
{
|
|
dprintf_ole(stdnimp,"CoInitialize\n");
|
|
/* remember the LPMALLOC, maybe somebody wants to read it later on */
|
|
currentMalloc = lpReserved;
|
|
return S_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoUnitialize [COMPOBJ.3]
|
|
*/
|
|
void WINAPI CoUnitialize()
|
|
{
|
|
dprintf_ole(stdnimp,"CoUnitialize()\n");
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoGetMalloc [COMPOBJ.4]
|
|
*/
|
|
HRESULT WINAPI CoGetMalloc(DWORD dwMemContext, DWORD * lpMalloc)
|
|
{
|
|
if(currentMalloc)
|
|
{
|
|
*lpMalloc = currentMalloc;
|
|
return S_OK;
|
|
}
|
|
*lpMalloc = 0;
|
|
/* 16-bit E_NOTIMPL */
|
|
return 0x80000001L;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoDisconnectObject
|
|
*/
|
|
OLESTATUS WINAPI CoDisconnectObject( LPUNKNOWN lpUnk, DWORD reserved )
|
|
{
|
|
dprintf_ole(stdnimp,"CoDisconnectObject:%p %lx\n",lpUnk,reserved);
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* IsEqualGUID [COMPOBJ.18]
|
|
*/
|
|
BOOL16 WINAPI IsEqualGUID(GUID* g1, GUID* g2)
|
|
{
|
|
return !memcmp( g1, g2, sizeof(GUID) );
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CLSIDFromString [COMPOBJ.20]
|
|
*/
|
|
|
|
/* Class id: DWORD-WORD-WORD-BYTES[2]-BYTES[6] */
|
|
|
|
OLESTATUS WINAPI CLSIDFromString(const LPCSTR idstr, CLSID *id)
|
|
{
|
|
BYTE *s = (BYTE *) idstr;
|
|
BYTE *p;
|
|
int i;
|
|
BYTE table[256];
|
|
|
|
dprintf_ole(stddeb,"ClsIDFromString() %s -> %p\n", idstr, id);
|
|
|
|
/* quick lookup table */
|
|
memset(table, 0, 256);
|
|
|
|
for (i = 0; i < 10; i++) {
|
|
table['0' + i] = i;
|
|
}
|
|
for (i = 0; i < 6; i++) {
|
|
table['A' + i] = i+10;
|
|
table['a' + i] = i+10;
|
|
}
|
|
|
|
/* in form {XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX} */
|
|
|
|
if (strlen(idstr) != 38)
|
|
return OLE_ERROR_OBJECT;
|
|
|
|
p = (BYTE *) id;
|
|
|
|
s++; /* skip leading brace */
|
|
for (i = 0; i < 4; i++) {
|
|
p[3 - i] = table[*s]<<4 | table[*(s+1)];
|
|
s += 2;
|
|
}
|
|
p += 4;
|
|
s++; /* skip - */
|
|
|
|
for (i = 0; i < 2; i++) {
|
|
p[1-i] = table[*s]<<4 | table[*(s+1)];
|
|
s += 2;
|
|
}
|
|
p += 2;
|
|
s++; /* skip - */
|
|
|
|
for (i = 0; i < 2; i++) {
|
|
p[1-i] = table[*s]<<4 | table[*(s+1)];
|
|
s += 2;
|
|
}
|
|
p += 2;
|
|
s++; /* skip - */
|
|
|
|
/* these are just sequential bytes */
|
|
for (i = 0; i < 2; i++) {
|
|
*p++ = table[*s]<<4 | table[*(s+1)];
|
|
s += 2;
|
|
}
|
|
s++; /* skip - */
|
|
|
|
for (i = 0; i < 6; i++) {
|
|
*p++ = table[*s]<<4 | table[*(s+1)];
|
|
s += 2;
|
|
}
|
|
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* StringFromCLSID [COMPOBJ.19]
|
|
*/
|
|
OLESTATUS WINAPI StringFromCLSID(const CLSID *id, LPSTR idstr)
|
|
{
|
|
static const char *hex = "0123456789ABCDEF";
|
|
char *s;
|
|
int i;
|
|
|
|
sprintf(idstr, "{%08lx-%04x-%04x-%02x%02x-",
|
|
id->Data1, id->Data2, id->Data3,
|
|
id->Data4[0], id->Data4[1]);
|
|
s = &idstr[25];
|
|
|
|
/* 6 hex bytes */
|
|
for (i = 2; i < 8; i++) {
|
|
*s++ = hex[id->Data4[i]>>4];
|
|
*s++ = hex[id->Data4[i] & 0xf];
|
|
}
|
|
|
|
*s++ = '}';
|
|
*s++ = '\0';
|
|
|
|
for (i = strlen(idstr)-1; i >= 0; i--) {
|
|
idstr[i] = toupper(idstr[i]);
|
|
}
|
|
|
|
dprintf_ole(stddeb,"StringFromClsID: %p->%s\n", id, idstr);
|
|
|
|
return OLE_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CLSIDFromProgID [COMPOBJ.61]
|
|
*/
|
|
|
|
OLESTATUS WINAPI CLSIDFromProgID(LPCSTR progid,LPCLSID riid)
|
|
{
|
|
char *buf,buf2[80];
|
|
DWORD buf2len;
|
|
HRESULT err;
|
|
HKEY xhkey;
|
|
|
|
buf = HeapAlloc(GetProcessHeap(),0,strlen(progid)+8);
|
|
sprintf(buf,"%s\\CLSID",progid);
|
|
if ((err=RegOpenKey32A(HKEY_CLASSES_ROOT,buf,&xhkey))) {
|
|
HeapFree(GetProcessHeap(),0,buf);
|
|
return OLE_ERROR_GENERIC;
|
|
}
|
|
HeapFree(GetProcessHeap(),0,buf);
|
|
buf2len = sizeof(buf2);
|
|
if ((err=RegQueryValue32A(xhkey,NULL,buf2,&buf2len))) {
|
|
RegCloseKey(xhkey);
|
|
return OLE_ERROR_GENERIC;
|
|
}
|
|
RegCloseKey(xhkey);
|
|
return CLSIDFromString(buf2,riid);
|
|
}
|
|
|
|
OLESTATUS WINAPI LookupETask(LPVOID p1,LPVOID p2) {
|
|
fprintf(stderr,"LookupETask(%p,%p),stub!\n",p1,p2);
|
|
return 0;
|
|
}
|
|
|
|
OLESTATUS WINAPI CallObjectInWOW(LPVOID p1,LPVOID p2) {
|
|
fprintf(stderr,"CallObjectInWOW(%p,%p),stub!\n",p1,p2);
|
|
return 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoRegisterClassObject [COMPOBJ.5]
|
|
*/
|
|
OLESTATUS WINAPI CoRegisterClassObject(
|
|
REFCLSID rclsid, LPUNKNOWN pUnk,DWORD dwClsContext,DWORD flags,
|
|
LPDWORD lpdwRegister
|
|
) {
|
|
char buf[80];
|
|
|
|
StringFromCLSID(rclsid,buf);
|
|
|
|
fprintf(stderr,"CoRegisterClassObject(%s,%p,0x%08lx,0x%08lx,%p),stub\n",
|
|
buf,pUnk,dwClsContext,flags,lpdwRegister
|
|
);
|
|
return 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoRegisterClassObject [COMPOBJ.27]
|
|
*/
|
|
OLESTATUS WINAPI CoRegisterMessageFilter16(
|
|
LPMESSAGEFILTER lpMessageFilter,LPMESSAGEFILTER *lplpMessageFilter
|
|
) {
|
|
fprintf(stderr,"CoRegisterMessageFilter(%p,%p),stub!\n",
|
|
lpMessageFilter,lplpMessageFilter
|
|
);
|
|
return 0;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoCreateInstance [COMPOBJ.13, OLE32.7]
|
|
*/
|
|
HRESULT WINAPI CoCreateInstance(REFCLSID rclsid, LPUNKNOWN pUnkOuter,
|
|
DWORD dwClsContext, REFIID riid, LPVOID *ppv)
|
|
{
|
|
fprintf(stderr, "CoCreateInstance(): stub !\n");
|
|
*ppv = NULL;
|
|
return S_OK;
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoFreeUnusedLibraries [COMPOBJ.17]
|
|
*/
|
|
void WINAPI CoFreeUnusedLibraries()
|
|
{
|
|
fprintf(stderr, "CoFreeUnusedLibraries(): stub !\n");
|
|
}
|
|
|
|
/***********************************************************************
|
|
* CoFileTimeNow [COMPOBJ.82, OLE32.10]
|
|
*
|
|
* stores the current system time in lpFileTime
|
|
*/
|
|
HRESULT WINAPI CoFileTimeNow(FILETIME *lpFileTime)
|
|
{
|
|
DOSFS_UnixTimeToFileTime(time(NULL), lpFileTime, 0);
|
|
return S_OK;
|
|
}
|