win32/newfns.c

   1 /*
   2  * Win32 miscellaneous functions
   3  *
   4  * Copyright 1995 Thomas Sandford (tdgsandf@prds-grn.demon.co.uk)
   5  */
   6
   7 /* Misc. new functions - they should be moved into appropriate files
   8 at a later date. */
   9
  10 #include <string.h>
  11 #include <sys/time.h>
  12 #include <unistd.h>
  13 #include "windef.h"
  14 #include "winerror.h"
  15 #include "heap.h"
  16 #include "debugtools.h"
  17
  18 DEFAULT_DEBUG_CHANNEL(win32);
  19 DECLARE_DEBUG_CHANNEL(debug);
  20
  21
  22 /****************************************************************************
  23  *              QueryPerformanceCounter (KERNEL32.564)
  24  */
  25 BOOL WINAPI QueryPerformanceCounter(PLARGE_INTEGER counter)
  26 {
  27     struct timeval tv;
  28
  29     gettimeofday(&tv,NULL);
  30     counter->s.LowPart = tv.tv_usec+tv.tv_sec*1000000;
  31     counter->s.HighPart = 0;
  32     return TRUE;
  33 }
  34
  35 /****************************************************************************
  36  *              QueryPerformanceFrequency (KERNEL32.565)
  37  */
  38 BOOL WINAPI QueryPerformanceFrequency(PLARGE_INTEGER frequency)
  39 {
  40         frequency->s.LowPart    = 1000000;
  41         frequency->s.HighPart   = 0;
  42         return TRUE;
  43 }
  44
  45 /****************************************************************************
  46  *              FlushInstructionCache (KERNEL32.261)
  47  */
  48 BOOL WINAPI FlushInstructionCache(DWORD x,DWORD y,DWORD z) {
  49         FIXME_(debug)("(0x%08lx,0x%08lx,0x%08lx): stub\n",x,y,z);
  50         return TRUE;
  51 }
  52
  53 /***********************************************************************
  54  *           CreateNamedPipeA   (KERNEL32.168)
  55  */
  56 HANDLE WINAPI CreateNamedPipeA (LPCSTR lpName, DWORD dwOpenMode,
  57                                   DWORD dwPipeMode, DWORD nMaxInstances,
  58                                   DWORD nOutBufferSize, DWORD nInBufferSize,
  59                                   DWORD nDefaultTimeOut,
  60                                   LPSECURITY_ATTRIBUTES lpSecurityAttributes)
  61 {
  62   FIXME("(Name=%s, OpenMode=%#08lx, dwPipeMode=%#08lx, MaxInst=%ld, OutBSize=%ld, InBuffSize=%ld, DefTimeOut=%ld, SecAttr=%p): stub\n",
  63         debugstr_a(lpName), dwOpenMode, dwPipeMode, nMaxInstances,
  64         nOutBufferSize, nInBufferSize, nDefaultTimeOut, lpSecurityAttributes);
  65   /* if (nMaxInstances > PIPE_UNLIMITED_INSTANCES) {
  66     SetLastError (ERROR_INVALID_PARAMETER);
  67     return INVALID_HANDLE_VALUE;
  68   } */
  69
  70   SetLastError (ERROR_UNKNOWN);
  71   return INVALID_HANDLE_VALUE;
  72 }
  73
  74 /***********************************************************************
  75  *           CreateNamedPipeW   (KERNEL32.169)
  76  */
  77 HANDLE WINAPI CreateNamedPipeW (LPCWSTR lpName, DWORD dwOpenMode,
  78                                   DWORD dwPipeMode, DWORD nMaxInstances,
  79                                   DWORD nOutBufferSize, DWORD nInBufferSize,
  80                                   DWORD nDefaultTimeOut,
  81                                   LPSECURITY_ATTRIBUTES lpSecurityAttributes)
  82 {
  83   FIXME("(Name=%s, OpenMode=%#08lx, dwPipeMode=%#08lx, MaxInst=%ld, OutBSize=%ld, InBuffSize=%ld, DefTimeOut=%ld, SecAttr=%p): stub\n",
  84         debugstr_w(lpName), dwOpenMode, dwPipeMode, nMaxInstances,
  85         nOutBufferSize, nInBufferSize, nDefaultTimeOut, lpSecurityAttributes);
  86
  87   SetLastError (ERROR_UNKNOWN);
  88   return INVALID_HANDLE_VALUE;
  89 }
  90
  91 /***********************************************************************
  92  *           GetSystemPowerStatus      (KERNEL32.621)
  93  */
  94 BOOL WINAPI GetSystemPowerStatus(LPSYSTEM_POWER_STATUS sps_ptr)
  95 {
  96     return FALSE;   /* no power management support */
  97 }
  98
  99
 100 /***********************************************************************
 101  *           SetSystemPowerState      (KERNEL32.630)
 102  */
 103 BOOL WINAPI SetSystemPowerState(BOOL suspend_or_hibernate,
 104                                   BOOL force_flag)
 105 {
 106     /* suspend_or_hibernate flag: w95 does not support
 107        this feature anyway */
 108
 109     for ( ;0; )
 110     {
 111         if ( force_flag )
 112         {
 113         }
 114         else
 115         {
 116         }
 117     }
 118     return TRUE;
 119 }
 120
 121
 122 /******************************************************************************
 123  * CreateMailslot32A [KERNEL32.164]
 124  */
 125 HANDLE WINAPI CreateMailslotA( LPCSTR lpName, DWORD nMaxMessageSize,
 126                                    DWORD lReadTimeout, LPSECURITY_ATTRIBUTES sa)
 127 {
 128     FIXME("(%s,%ld,%ld,%p): stub\n", debugstr_a(lpName),
 129           nMaxMessageSize, lReadTimeout, sa);
 130     return 1;
 131 }
 132
 133
 134 /******************************************************************************
 135  * CreateMailslot32W [KERNEL32.165]  Creates a mailslot with specified name
 136  *
 137  * PARAMS
 138  *    lpName          [I] Pointer to string for mailslot name
 139  *    nMaxMessageSize [I] Maximum message size
 140  *    lReadTimeout    [I] Milliseconds before read time-out
 141  *    sa              [I] Pointer to security structure
 142  *
 143  * RETURNS
 144  *    Success: Handle to mailslot
 145  *    Failure: INVALID_HANDLE_VALUE
 146  */
 147 HANDLE WINAPI CreateMailslotW( LPCWSTR lpName, DWORD nMaxMessageSize,
 148                                    DWORD lReadTimeout, LPSECURITY_ATTRIBUTES sa )
 149 {
 150     FIXME("(%s,%ld,%ld,%p): stub\n", debugstr_w(lpName),
 151           nMaxMessageSize, lReadTimeout, sa);
 152     return 1;
 153 }
 154
 155
 156 /******************************************************************************
 157  * GetMailslotInfo [KERNEL32.347]  Retrieves info about specified mailslot
 158  *
 159  * PARAMS
 160  *    hMailslot        [I] Mailslot handle
 161  *    lpMaxMessageSize [O] Address of maximum message size
 162  *    lpNextSize       [O] Address of size of next message
 163  *    lpMessageCount   [O] Address of number of messages
 164  *    lpReadTimeout    [O] Address of read time-out
 165  *
 166  * RETURNS
 167  *    Success: TRUE
 168  *    Failure: FALSE
 169  */
 170 BOOL WINAPI GetMailslotInfo( HANDLE hMailslot, LPDWORD lpMaxMessageSize,
 171                                LPDWORD lpNextSize, LPDWORD lpMessageCount,
 172                                LPDWORD lpReadTimeout )
 173 {
 174     FIXME("(%04x): stub\n",hMailslot);
 175     if (lpMaxMessageSize) *lpMaxMessageSize = (DWORD)NULL;
 176     if (lpNextSize) *lpNextSize = (DWORD)NULL;
 177     if (lpMessageCount) *lpMessageCount = (DWORD)NULL;
 178     if (lpReadTimeout) *lpReadTimeout = (DWORD)NULL;
 179     return TRUE;
 180 }
 181
 182
 183 /******************************************************************************
 184  * GetCompressedFileSize32A [KERNEL32.291]
 185  *
 186  * NOTES
 187  *    This should call the W function below
 188  */
 189 DWORD WINAPI GetCompressedFileSizeA(
 190     LPCSTR lpFileName,
 191     LPDWORD lpFileSizeHigh)
 192 {
 193     FIXME("(...): stub\n");
 194     return 0xffffffff;
 195 }
 196
 197
 198 /******************************************************************************
 199  * GetCompressedFileSize32W [KERNEL32.292]
 200  *
 201  * RETURNS
 202  *    Success: Low-order doubleword of number of bytes
 203  *    Failure: 0xffffffff
 204  */
 205 DWORD WINAPI GetCompressedFileSizeW(
 206     LPCWSTR lpFileName,     /* [in]  Pointer to name of file */
 207     LPDWORD lpFileSizeHigh) /* [out] Receives high-order doubleword of size */
 208 {
 209     FIXME("(%s,%p): stub\n",debugstr_w(lpFileName),lpFileSizeHigh);
 210     return 0xffffffff;
 211 }
 212
 213
 214 /******************************************************************************
 215  * GetProcessWindowStation [USER32.280]  Returns handle of window station
 216  *
 217  * NOTES
 218  *    Docs say the return value is HWINSTA
 219  *
 220  * RETURNS
 221  *    Success: Handle to window station associated with calling process
 222  *    Failure: NULL
 223  */
 224 DWORD WINAPI GetProcessWindowStation(void)
 225 {
 226     FIXME("(void): stub\n");
 227     return 1;
 228 }
 229
 230
 231 /******************************************************************************
 232  * GetThreadDesktop [USER32.295]  Returns handle to desktop
 233  *
 234  * NOTES
 235  *    Docs say the return value is HDESK
 236  *
 237  * PARAMS
 238  *    dwThreadId [I] Thread identifier
 239  *
 240  * RETURNS
 241  *    Success: Handle to desktop associated with specified thread
 242  *    Failure: NULL
 243  */
 244 DWORD WINAPI GetThreadDesktop( DWORD dwThreadId )
 245 {
 246     FIXME("(%lx): stub\n",dwThreadId);
 247     return 1;
 248 }
 249
 250
 251 /******************************************************************************
 252  * SetDebugErrorLevel [USER32.475]
 253  * Sets the minimum error level for generating debugging events
 254  *
 255  * PARAMS
 256  *    dwLevel [I] Debugging error level
 257  */
 258 VOID WINAPI SetDebugErrorLevel( DWORD dwLevel )
 259 {
 260     FIXME("(%ld): stub\n", dwLevel);
 261 }
 262
 263
 264 /******************************************************************************
 265  * SetComputerName32A [KERNEL32.621]
 266  */
 267 BOOL WINAPI SetComputerNameA( LPCSTR lpComputerName )
 268 {
 269     LPWSTR lpComputerNameW = HEAP_strdupAtoW(GetProcessHeap(),0,lpComputerName);
 270     BOOL ret = SetComputerNameW(lpComputerNameW);
 271     HeapFree(GetProcessHeap(),0,lpComputerNameW);
 272     return ret;
 273 }
 274
 275
 276 /******************************************************************************
 277  * SetComputerName32W [KERNEL32.622]
 278  *
 279  * PARAMS
 280  *    lpComputerName [I] Address of new computer name
 281  *
 282  * RETURNS STD
 283  */
 284 BOOL WINAPI SetComputerNameW( LPCWSTR lpComputerName )
 285 {
 286     FIXME("(%s): stub\n", debugstr_w(lpComputerName));
 287     return TRUE;
 288 }
 289
 290
 291 BOOL WINAPI EnumPortsA(LPSTR name,DWORD level,LPBYTE ports,DWORD bufsize,LPDWORD bufneeded,LPDWORD bufreturned) {
 292         FIXME("(%s,%ld,%p,%ld,%p,%p), stub!\n",name,level,ports,bufsize,bufneeded,bufreturned);
 293         return FALSE;
 294 }
 295
 296 /******************************************************************************
 297  * IsDebuggerPresent [KERNEL32.827]
 298  *
 299  */
 300 BOOL WINAPI IsDebuggerPresent() {
 301         FIXME(" ... no debuggers yet, returning FALSE.\n");
 302         return FALSE;
 303 }
 304
 305 /******************************************************************************
 306  * OpenDesktop32A [USER32.408]
 307  *
 308  * NOTES
 309  *    Return type should be HDESK
 310  *
 311  *    Not supported on Win9x - returns NULL and calls SetLastError.
 312  */
 313 HANDLE WINAPI OpenDesktopA( LPCSTR lpszDesktop, DWORD dwFlags,
 314                                 BOOL fInherit, DWORD dwDesiredAccess )
 315 {
 316     FIXME("(%s,%lx,%i,%lx): stub\n",debugstr_a(lpszDesktop),dwFlags,
 317           fInherit,dwDesiredAccess);
 318
 319     SetLastError(ERROR_CALL_NOT_IMPLEMENTED);
 320     return 0;
 321 }
 322
 323
 324 BOOL WINAPI SetUserObjectInformationA( HANDLE hObj, int nIndex,
 325                                            LPVOID pvInfo, DWORD nLength )
 326 {
 327     FIXME("(%x,%d,%p,%lx): stub\n",hObj,nIndex,pvInfo,nLength);
 328     return TRUE;
 329 }
 330
 331
 332 BOOL WINAPI SetThreadDesktop( HANDLE hDesktop )
 333 {
 334     FIXME("(%x): stub\n",hDesktop);
 335     return TRUE;
 336 }
 337
 338 HANDLE WINAPI CreateIoCompletionPort(HANDLE hFileHandle,
 339 HANDLE hExistingCompletionPort, DWORD dwCompletionKey,
 340 DWORD dwNumberOfConcurrentThreads)
 341 {
 342     FIXME("(%04x, %04x, %08lx, %08lx): stub.\n", hFileHandle, hExistingCompletionPort, dwCompletionKey, dwNumberOfConcurrentThreads);
 343     return (HANDLE)NULL;
 344 }
 345
 346
 347 /******************************************************************************
 348  *                    GetProcessDefaultLayout [USER32.802]
 349  *
 350  * Gets the default layout for parentless windows.
 351  * Right now, just returns 0 (left-to-right).
 352  *
 353  * RETURNS
 354  *    Success: Nonzero
 355  *    Failure: Zero
 356  *
 357  * BUGS
 358  *    No RTL
 359  */
 360 BOOL WINAPI GetProcessDefaultLayout( DWORD *pdwDefaultLayout )
 361 {
 362     if ( !pdwDefaultLayout ) {
 363         SetLastError( ERROR_INVALID_PARAMETER );
 364         return FALSE;
 365      }
 366     FIXME( "( %p ): No BiDi\n", pdwDefaultLayout );
 367     *pdwDefaultLayout = 0;
 368     return TRUE;
 369 }
 370
 371
 372 /******************************************************************************
 373  *                    SetProcessDefaultLayout [USER32.803]
 374  *
 375  * Sets the default layout for parentless windows.
 376  * Right now, only accepts 0 (left-to-right).
 377  *
 378  * RETURNS
 379  *    Success: Nonzero
 380  *    Failure: Zero
 381  *
 382  * BUGS
 383  *    No RTL
 384  */
 385 BOOL WINAPI SetProcessDefaultLayout( DWORD dwDefaultLayout )
 386 {
 387     if ( dwDefaultLayout == 0 )
 388         return TRUE;
 389     FIXME( "( %08lx ): No BiDi\n", dwDefaultLayout );
 390     SetLastError( ERROR_CALL_NOT_IMPLEMENTED );
 391     return FALSE;
 392 }
 393