pd.if.org Git - pdclib/blob - platform/win32/functions/_PDCLIB/_PDCLIB_open.c

   1 /* $Id$ */
   2
   3 /* _PDCLIB_open( char const * const, int )
   4
   5    This file is part of the Public Domain C Library (PDCLib).
   6    Permission is granted to use, modify, and / or redistribute at will.
   7 */
   8
   9 /* This is a stub implementation of open.
  10 */
  11
  12 #include <stdio.h>
  13 #include <errno.h>
  14
  15 #ifndef REGTEST
  16 #include <_PDCLIB_glue.h>
  17 #include <windows.h>
  18
  19 void _PDCLIB_w32errno(void);
  20 HANDLE _PDCLIB_open( char const * const filename, unsigned int mode )
  21 {
  22     DWORD desiredAccess;
  23     DWORD creationDisposition;
  24
  25     switch(mode & ( _PDCLIB_FREAD | _PDCLIB_FWRITE | _PDCLIB_FAPPEND
  26                     | _PDCLIB_FRW ))
  27     {
  28     case _PDCLIB_FREAD: /* "r" */
  29         desiredAccess = GENERIC_READ;
  30         creationDisposition = OPEN_EXISTING;
  31         break;
  32     case _PDCLIB_FWRITE: /* "w" */
  33         desiredAccess = GENERIC_WRITE;
  34         creationDisposition = CREATE_ALWAYS;
  35         break;
  36     case _PDCLIB_FAPPEND: /* "a" */
  37         desiredAccess = GENERIC_WRITE;
  38         creationDisposition = OPEN_ALWAYS;
  39         break;
  40     case _PDCLIB_FREAD | _PDCLIB_FRW: /* "r+" */
  41         desiredAccess = GENERIC_READ | GENERIC_WRITE;
  42         creationDisposition = OPEN_EXISTING;
  43         break;
  44     case _PDCLIB_FWRITE | _PDCLIB_FRW: /* "w+" */
  45         desiredAccess = GENERIC_WRITE | GENERIC_READ;
  46         creationDisposition = CREATE_ALWAYS;
  47         break;
  48     case _PDCLIB_FAPPEND | _PDCLIB_FRW: /* "a+" */
  49         desiredAccess = GENERIC_WRITE | GENERIC_READ;
  50         creationDisposition = OPEN_ALWAYS;
  51         break;
  52     default: /* Invalid mode */
  53         errno = EINVAL;
  54         return NULL;
  55     }
  56
  57     HANDLE fd = CreateFileA(filename, desiredAccess,
  58         FILE_SHARE_READ | FILE_SHARE_DELETE,
  59         NULL, creationDisposition, FILE_ATTRIBUTE_NORMAL, NULL);
  60
  61     if(fd == INVALID_HANDLE_VALUE) {
  62 #if 0
  63         DWORD dw = GetLastError();
  64         char* msgBuf;
  65         FormatMessage(
  66             FORMAT_MESSAGE_ALLOCATE_BUFFER |
  67             FORMAT_MESSAGE_FROM_SYSTEM |
  68             FORMAT_MESSAGE_IGNORE_INSERTS,
  69             NULL,
  70             dw,
  71             MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
  72             (LPSTR) &msgBuf,
  73             0, NULL );
  74
  75         fprintf(stderr, "Error: %s\n", msgBuf);
  76 #endif
  77         _PDCLIB_w32errno();
  78         return NULL;
  79     }
  80
  81     if(mode & _PDCLIB_FAPPEND) {
  82         LARGE_INTEGER offs;
  83         offs.QuadPart = 0;
  84         BOOL ok = SetFilePointerEx(fd, offs, NULL, FILE_END);
  85         if(!ok) {
  86             _PDCLIB_w32errno();
  87             CloseHandle(fd);
  88             return NULL;
  89         }
  90     }
  91
  92     return fd;
  93 }
  94
  95 #endif
  96
  97 #ifdef TEST
  98 #include <_PDCLIB_test.h>
  99
 100 #include <stdlib.h>
 101 #include <string.h>
 102
 103 int main( void )
 104 {
 105     return TEST_RESULTS;
 106 }
 107
 108 #endif
 109