]> pd.if.org Git - pdclib/blob - platform/win32/functions/_PDCLIB/_PDCLIB_open.c
a6ac387c8842dc1f476c376ac37d7f213554ade4
[pdclib] / 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