misc/callback.c

   1 /*
   2  * Function callbacks for the library
   3  *
   4  * Copyright 1997 Alexandre Julliard
   5  */
   6
   7 #include <assert.h>
   8 #include "winuser.h"
   9 #include "callback.h"
  10 #include "task.h"
  11 #include "syslevel.h"
  12 #include "cursoricon.h"
  13 #include "user.h"
  14 #include "queue.h"
  15 #include "debug.h"
  16
  17
  18 /**********************************************************************
  19  *           CALLBACK_CallWndProc
  20  */
  21 static LRESULT WINAPI CALLBACK_CallWndProc( WNDPROC16 proc, HWND16 hwnd,
  22                                             UINT16 msg, WPARAM16 wParam,
  23                                             LPARAM lParam )
  24 {
  25     return proc( hwnd, msg, wParam, lParam );
  26 }
  27
  28
  29 /**********************************************************************
  30  *           CALLBACK_CallRegisterProc
  31  */
  32 static LONG WINAPI CALLBACK_CallRegisterProc( CONTEXT *context, INT offset)
  33 {
  34     ERR(relay, "Cannot call a register proc in Winelib\n" );
  35     assert( FALSE );
  36     return 0;
  37 }
  38
  39
  40 /**********************************************************************
  41  *           CALLBACK_CallDriverProc
  42  */
  43 static LRESULT WINAPI CALLBACK_CallDriverProc( DRIVERPROC16 proc, DWORD dwId,
  44                                                HDRVR16 hdrvr, UINT16 msg,
  45                                                LPARAM lp1, LPARAM lp2 )
  46 {
  47     return proc( dwId, hdrvr, msg, lp1, lp2 );
  48 }
  49
  50
  51 /**********************************************************************
  52  *           CALLBACK_CallDriverCallback
  53  */
  54 static LRESULT WINAPI CALLBACK_CallDriverCallback( FARPROC16 proc,
  55                                                    HANDLE16 hDev, UINT16 msg,
  56                                                    DWORD dwUser, LPARAM lp1,
  57                                                    LPARAM lp2 )
  58 {
  59     return proc( hDev, msg, dwUser, lp1, lp2 );
  60 }
  61
  62
  63 /**********************************************************************
  64  *           CALLBACK_CallTimeFuncProc
  65  */
  66 static LRESULT WINAPI CALLBACK_CallTimeFuncProc( FARPROC16 proc, WORD id,
  67                                                  UINT16 msg, DWORD dwUser,
  68                                                  LPARAM lp1, LPARAM lp2 )
  69 {
  70     return proc( id, msg, dwUser, lp1, lp2 );
  71 }
  72
  73
  74 /**********************************************************************
  75  *           CALLBACK_CallWindowsExitProc
  76  */
  77 static INT16 WINAPI CALLBACK_CallWindowsExitProc( FARPROC16 proc, INT16 type)
  78 {
  79     return proc( type );
  80 }
  81
  82
  83 /**********************************************************************
  84  *           CALLBACK_CallWordBreakProc
  85  */
  86 static INT16 WINAPI CALLBACK_CallWordBreakProc( EDITWORDBREAKPROC16 proc,
  87                                                 SEGPTR text, INT16 word,
  88                                                 INT16 len, INT16 action )
  89 {
  90     return proc( (LPSTR)text, word, len, action );
  91 }
  92
  93
  94 /**********************************************************************
  95  *           CALLBACK_CallBootAppProc
  96  */
  97 static void WINAPI CALLBACK_CallBootAppProc( FARPROC16 proc, HANDLE16 module,
  98                                              HFILE16 file )
  99 {
 100     proc( module, file );
 101 }
 102
 103
 104 /**********************************************************************
 105  *           CALLBACK_CallLoadAppSegProc
 106  */
 107 static WORD WINAPI CALLBACK_CallLoadAppSegProc( FARPROC16 proc,
 108                                                 HANDLE16 module, HFILE16 file,
 109                                                 WORD seg )
 110 {
 111     return proc( module, file, seg );
 112 }
 113
 114
 115 /**********************************************************************
 116  *           CALLBACK_CallLocalNotifyFunc
 117  */
 118 static WORD WINAPI CALLBACK_CallLocalNotifyFunc( FARPROC16 proc,
 119                                                  WORD wMsg, HLOCAL16 hMem,
 120                                                  WORD wArg )
 121 {
 122     return proc( wMsg, hMem, wArg );
 123 }
 124
 125
 126 /**********************************************************************
 127  *           CALLBACK_CallResourceHandlerProc
 128  */
 129 static HGLOBAL16 WINAPI CALLBACK_CallResourceHandlerProc( FARPROC16 proc,
 130                                                           HGLOBAL16 hMemObj,
 131                                                           HMODULE16 hModule,
 132                                                           HRSRC16 hRsrc )
 133 {
 134     ERR( relay, "Cannot call a 16-bit resource handler in Winelib\n" );
 135     assert( FALSE );
 136     return 0;
 137 }
 138
 139
 140 /**********************************************************************
 141  *           CALLBACK_CallASPIPostProc
 142  */
 143 static LRESULT WINAPI CALLBACK_CallASPIPostProc( FARPROC16 proc, SEGPTR ptr )
 144 {
 145     return proc( ptr );
 146 }
 147
 148
 149 /**********************************************************************
 150  *           CALLBACK_CallWOWCallbackProc
 151  */
 152 static DWORD WINAPI CALLBACK_CallWOWCallbackProc( FARPROC16 proc, DWORD dw )
 153 {
 154     return proc( dw );
 155 }
 156
 157 /**********************************************************************
 158  *           CALLBACK_CallWOWCallback16Ex
 159  *
 160  * WCB16_MAX_CBARGS (16) is the maximum number of args.
 161  *
 162  * Can call functions using CDECL or PASCAL calling conventions. The CDECL
 163  * ones are reversed (not 100% sure about that).
 164  */
 165 static BOOL WINAPI CALLBACK_CallWOWCallback16Ex(
 166         FARPROC16 proc, DWORD dwFlags, DWORD cbArgs, LPVOID xargs,LPDWORD pdwret
 167 ) {
 168     LPDWORD     args = (LPDWORD)xargs;
 169     DWORD       ret,i;
 170
 171     if (dwFlags == WCB16_CDECL) {
 172         /* swap the arguments */
 173         args = HeapAlloc(GetProcessHeap(),0,cbArgs*sizeof(DWORD));
 174         for (i=0;i<cbArgs;i++)
 175                 args[i] = ((DWORD*)xargs)[cbArgs-i-1];
 176     }
 177     switch (cbArgs) {
 178     case 0: ret = proc();break;
 179     case 1: ret = proc(args[0]);break;
 180     case 2: ret = proc(args[0],args[1]);break;
 181     case 3: ret = proc(args[0],args[1],args[2]);break;
 182     case 4: ret = proc(args[0],args[1],args[2],args[3]);break;
 183     case 5: ret = proc(args[0],args[1],args[2],args[3],args[4]);break;
 184     case 6: ret = proc(args[0],args[1],args[2],args[3],args[4],args[5]);
 185             break;
 186     case 7: ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 187                     args[6]
 188             );
 189             break;
 190     case 8: ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 191                     args[6],args[7]
 192             );
 193             break;
 194     case 9: ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 195                     args[6],args[7],args[8]
 196             );
 197             break;
 198     case 10:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 199                     args[6],args[7],args[8],args[9]
 200             );
 201             break;
 202     case 11:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 203                     args[6],args[7],args[8],args[9],args[10]
 204             );
 205             break;
 206     case 12:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 207                     args[6],args[7],args[8],args[9],args[10],args[11]
 208             );
 209             break;
 210     case 13:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 211                     args[6],args[7],args[8],args[9],args[10],args[11],
 212                     args[12]
 213             );
 214             break;
 215     case 14:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 216                     args[6],args[7],args[8],args[9],args[10],args[11],
 217                     args[12],args[13]
 218             );
 219             break;
 220     case 15:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 221                     args[6],args[7],args[8],args[9],args[10],args[11],
 222                     args[12],args[13],args[14]
 223             );
 224             break;
 225     case 16:ret = proc(args[0],args[1],args[2],args[3],args[4],args[5],
 226                     args[6],args[7],args[8],args[9],args[10],args[11],
 227                     args[12],args[13],args[14],args[15]
 228             );
 229             break;
 230     default:
 231             WARN(relay,"(%ld) arguments not supported.\n",cbArgs);
 232             if (dwFlags == WCB16_CDECL)
 233                 HeapFree(GetProcessHeap(),0,args);
 234             return FALSE;
 235     }
 236     if (dwFlags == WCB16_CDECL)
 237         HeapFree(GetProcessHeap(),0,args);
 238     if (pdwret)
 239         *pdwret = ret;
 240     return TRUE;
 241 }
 242
 243 /**********************************************************************
 244  *           CALLBACK_CallUTProc
 245  */
 246 static DWORD WINAPI CALLBACK_CallUTProc( FARPROC16 proc, DWORD w1, DWORD w2 )
 247 {
 248     ERR( relay, "Cannot call a UT thunk proc in Winelib\n" );
 249     assert( FALSE );
 250     return 0;
 251 }
 252
 253 /**********************************************************************
 254  *           CALLBACK_CallTaskRescheduleProc
 255  */
 256 static BOOL WINAPI CALLBACK_CallTaskRescheduleProc( void )
 257 {
 258     BOOL pending;
 259
 260     SYSLEVEL_EnterWin16Lock();
 261     pending = TASK_Reschedule();
 262     SYSLEVEL_LeaveWin16Lock();
 263
 264     return pending;
 265 }
 266
 267
 268 /**********************************************************************
 269  *           CALLBACK_WinelibTable
 270  *
 271  * The callbacks function table for Winelib
 272  */
 273 static const CALLBACKS_TABLE CALLBACK_WinelibTable =
 274 {
 275     CALLBACK_CallRegisterProc,        /* CallRegisterShortProc */
 276     CALLBACK_CallRegisterProc,        /* CallRegisterLongProc */
 277     CALLBACK_CallTaskRescheduleProc,  /* CallTaskRescheduleProc */
 278     NULL,                             /* CallFrom16WndProc */
 279     CALLBACK_CallWndProc,             /* CallWndProc */
 280     CALLBACK_CallDriverProc,          /* CallDriverProc */
 281     CALLBACK_CallDriverCallback,      /* CallDriverCallback */
 282     CALLBACK_CallTimeFuncProc,        /* CallTimeFuncProc */
 283     CALLBACK_CallWindowsExitProc,     /* CallWindowsExitProc */
 284     CALLBACK_CallWordBreakProc,       /* CallWordBreakProc */
 285     CALLBACK_CallBootAppProc,         /* CallBootAppProc */
 286     CALLBACK_CallLoadAppSegProc,      /* CallLoadAppSegProc */
 287     CALLBACK_CallLocalNotifyFunc,     /* CallLocalNotifyFunc */
 288     CALLBACK_CallResourceHandlerProc, /* CallResourceHandlerProc */
 289     CALLBACK_CallWOWCallbackProc,     /* CallWOWCallbackProc */
 290     CALLBACK_CallWOWCallback16Ex,     /* CallWOWCallback16Ex */
 291     CALLBACK_CallUTProc,              /* CallUTProc */
 292     CALLBACK_CallASPIPostProc,        /* CallASPIPostProc */
 293     /* The graphics driver callbacks are never used in Winelib */
 294     NULL,                             /* CallDrvControlProc */
 295     NULL,                             /* CallDrvEnableProc */
 296     NULL,                             /* CallDrvEnumDFontsProc */
 297     NULL,                             /* CallDrvEnumObjProc */
 298     NULL,                             /* CallDrvOutputProc */
 299     NULL,                             /* CallDrvRealizeProc */
 300     NULL,                             /* CallDrvStretchBltProc */
 301     NULL,                             /* CallDrvExtTextOutProc */
 302     NULL,                             /* CallDrvGetCharWidth */
 303     NULL                              /* CallDrvAbortProc */
 304 };
 305
 306 const CALLBACKS_TABLE *Callbacks = &CALLBACK_WinelibTable;
 307
 308
 309 /**********************************************************************
 310  *           CALLOUT_Table
 311  *
 312  * The callout function table for Winelib
 313  */
 314
 315 CALLOUT_TABLE Callout =
 316 {
 317     PeekMessage16, PeekMessageA, PeekMessageW,
 318     GetMessage16, GetMessageA, GetMessageW,
 319     SendMessage16, SendMessageA, SendMessageW,
 320     PostMessage16, PostMessageA, PostMessageW,
 321     PostAppMessage16, PostThreadMessageA, PostThreadMessageW,
 322     TranslateMessage16, TranslateMessage,
 323     DispatchMessage16, DispatchMessageA, DispatchMessageW,
 324     RedrawWindow16, RedrawWindow,
 325     UserSignalProc,
 326     InitThreadInput16,
 327     UserYield16,
 328     CURSORICON_Destroy
 329 };
 330