widl: Fix typelib lcid fields to match those produced by midl.
[wine] / dlls / crtdll / crtdll_main.c
1 /*
2  * Old C RunTime DLL - All functionality is provided by msvcrt.
3  *
4  * Copyright 2000 Jon Griffiths
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include "config.h"
22
23 #include <stdarg.h>
24 #ifdef HAVE_SYS_STAT_H
25 # include <sys/stat.h>
26 #endif
27
28 #include "windef.h"
29 #include "winbase.h"
30
31 #include "wine/debug.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(crtdll);
34
35 /* from msvcrt */
36 extern void CDECL __getmainargs( int *argc, char ***argv, char ***envp,
37                                  int expand_wildcards, int *new_mode );
38
39 /* The following data items are not exported from msvcrt */
40 unsigned int CRTDLL__basemajor_dll = 0;
41 unsigned int CRTDLL__baseminor_dll = 0;
42 unsigned int CRTDLL__baseversion_dll = 0;
43 unsigned int CRTDLL__cpumode_dll = 0;
44 unsigned int CRTDLL__osmajor_dll = 0;
45 unsigned int CRTDLL__osminor_dll = 0;
46 unsigned int CRTDLL__osmode_dll = 0;
47 unsigned int CRTDLL__osversion_dll = 0;
48
49 /* dev_t is a short in crtdll but an unsigned int in msvcrt */
50 typedef short crtdll_dev_t;
51
52 struct crtdll_stat
53 {
54   crtdll_dev_t   st_dev;
55   _ino_t         st_ino;
56   unsigned short st_mode;
57   short          st_nlink;
58   short          st_uid;
59   short          st_gid;
60   crtdll_dev_t   st_rdev;
61   _off_t         st_size;
62   time_t         st_atime;
63   time_t         st_mtime;
64   time_t         st_ctime;
65 };
66
67 /* convert struct _stat from crtdll format to msvcrt format */
68 static void convert_struct_stat( struct crtdll_stat *dst, const struct _stat *src )
69 {
70     dst->st_dev   = src->st_dev;
71     dst->st_ino   = src->st_ino;
72     dst->st_mode  = src->st_mode;
73     dst->st_nlink = src->st_nlink;
74     dst->st_uid   = src->st_uid;
75     dst->st_gid   = src->st_gid;
76     dst->st_rdev  = src->st_rdev;
77     dst->st_size  = src->st_size;
78     dst->st_atime = src->st_atime;
79     dst->st_mtime = src->st_mtime;
80     dst->st_ctime = src->st_ctime;
81 }
82
83
84 /*********************************************************************
85  *                  DllMain  (CRTDLL.init)
86  */
87 BOOL WINAPI DllMain(HINSTANCE hinstDLL,DWORD fdwReason,LPVOID lpvReserved)
88 {
89   TRACE("(%p,%d,%p)\n",hinstDLL,fdwReason,lpvReserved);
90
91   if (fdwReason == DLL_PROCESS_ATTACH)
92   {
93     DWORD version = GetVersion();
94
95     DisableThreadLibraryCalls(hinstDLL);
96
97     CRTDLL__basemajor_dll   = (version >> 24) & 0xFF;
98     CRTDLL__baseminor_dll   = (version >> 16) & 0xFF;
99     CRTDLL__baseversion_dll = (version >> 16);
100     CRTDLL__cpumode_dll     = 1; /* FIXME */
101     CRTDLL__osmajor_dll     = (version>>8) & 0xFF;
102     CRTDLL__osminor_dll     = (version & 0xFF);
103     CRTDLL__osmode_dll      = 1; /* FIXME */
104     CRTDLL__osversion_dll   = (version & 0xFFFF);
105   }
106   return TRUE;
107 }
108
109
110 /*********************************************************************
111  *                  __GetMainArgs  (CRTDLL.@)
112  */
113 void CDECL __GetMainArgs( int *argc, char ***argv, char ***envp, int expand_wildcards )
114 {
115     int new_mode = 0;
116     __getmainargs( argc, argv, envp, expand_wildcards, &new_mode );
117 }
118
119
120 /*********************************************************************
121  *              _fstat (CRTDLL.@)
122  */
123 int CDECL CRTDLL__fstat(int fd, struct crtdll_stat* buf)
124 {
125     struct _stat st;
126     int ret;
127
128     if (!(ret = _fstat( fd, &st ))) convert_struct_stat( buf, &st );
129     return ret;
130 }
131
132
133 /*********************************************************************
134  *              _stat (CRTDLL.@)
135  */
136 int CDECL CRTDLL__stat(const char* path, struct crtdll_stat * buf)
137 {
138     struct _stat st;
139     int ret;
140
141     if (!(ret = _stat( path, &st ))) convert_struct_stat( buf, &st );
142     return ret;
143 }
144
145
146 /*********************************************************************
147  *              _strdec (CRTDLL.@)
148  */
149 char * CDECL _strdec(const char *str1, const char *str2)
150 {
151     return (char *)(str2 - 1);
152 }
153
154
155 /*********************************************************************
156  *              _strinc (CRTDLL.@)
157  */
158 char * CDECL _strinc(const char *str)
159 {
160     return (char *)(str + 1);
161 }
162
163
164 /*********************************************************************
165  *              _strncnt (CRTDLL.@)
166  */
167 size_t CDECL _strncnt(const char *str, size_t maxlen)
168 {
169     size_t len = strlen(str);
170     return (len > maxlen) ? maxlen : len;
171 }
172
173
174 /*********************************************************************
175  *              _strnextc (CRTDLL.@)
176  */
177 unsigned int CDECL _strnextc(const char *str)
178 {
179     return (unsigned int)str[0];
180 }
181
182
183 /*********************************************************************
184  *              _strninc (CRTDLL.@)
185  */
186 char * CDECL _strninc(const char *str, size_t len)
187 {
188     return (char *)(str + len);
189 }
190
191
192 /*********************************************************************
193  *              _strspnp (CRTDLL.@)
194  */
195 char * CDECL _strspnp( const char *str1, const char *str2)
196 {
197     str1 += strspn( str1, str2 );
198     return *str1 ? (char*)str1 : NULL;
199 }