kerberos: Add support for SECPKG_CRED_BOTH.
[wine.git] / dlls / msvcrt / data.c
blob6e764e52eae5080ced2a57eefe65e6fd577594fc
1 /*
2 * msvcrt.dll dll data items
4 * Copyright 2000 Jon Griffiths
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.
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.
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
21 #include <fcntl.h>
22 #include <math.h>
23 #include "msvcrt.h"
24 #include <winnls.h>
25 #include "wine/debug.h"
27 WINE_DEFAULT_DEBUG_CHANNEL(msvcrt);
29 static WCHAR **initial_wargv;
30 static int initial_argc;
31 int MSVCRT___argc = 0;
32 static int wargc_expand;
33 unsigned int MSVCRT__commode = 0;
34 int MSVCRT__fmode = 0;
35 unsigned int MSVCRT__osver = 0;
36 unsigned int MSVCRT__osplatform = 0;
37 unsigned int MSVCRT__winmajor = 0;
38 unsigned int MSVCRT__winminor = 0;
39 unsigned int MSVCRT__winver = 0;
40 #ifdef _CRTDLL
41 unsigned int CRTDLL__basemajor_dll = 0;
42 unsigned int CRTDLL__baseminor_dll = 0;
43 unsigned int CRTDLL__baseversion_dll = 0;
44 unsigned int CRTDLL__cpumode_dll = 1;
45 unsigned int CRTDLL__osmode_dll = 1;
46 #endif
47 unsigned int MSVCRT___setlc_active = 0;
48 unsigned int MSVCRT___unguarded_readlc_active = 0;
49 double MSVCRT__HUGE = 0;
50 char **MSVCRT___argv = NULL;
51 wchar_t **MSVCRT___wargv = NULL;
52 static wchar_t **wargv_expand;
53 char *MSVCRT__acmdln = NULL;
54 wchar_t *MSVCRT__wcmdln = NULL;
55 char **MSVCRT__environ = NULL;
56 wchar_t **MSVCRT__wenviron = NULL;
57 char **MSVCRT___initenv = NULL;
58 wchar_t **MSVCRT___winitenv = NULL;
59 int MSVCRT_app_type = 0;
60 char* MSVCRT__pgmptr = NULL;
61 WCHAR* MSVCRT__wpgmptr = NULL;
63 static char **build_argv( WCHAR **wargv )
65 int argc;
66 char *p, **argv;
67 DWORD total = 0;
69 for (argc = 0; wargv[argc]; argc++)
70 total += WideCharToMultiByte( CP_ACP, 0, wargv[argc], -1, NULL, 0, NULL, NULL );
72 argv = HeapAlloc( GetProcessHeap(), 0, total + (argc + 1) * sizeof(*argv) );
73 p = (char *)(argv + argc + 1);
74 for (argc = 0; wargv[argc]; argc++)
76 DWORD reslen = WideCharToMultiByte( CP_ACP, 0, wargv[argc], -1, p, total, NULL, NULL );
77 argv[argc] = p;
78 p += reslen;
79 total -= reslen;
81 argv[argc] = NULL;
82 return argv;
85 static WCHAR **cmdline_to_argv( const WCHAR *src, int *ret_argc )
87 WCHAR **argv, *arg, *dst;
88 int argc, in_quotes = 0, bcount = 0, len = wcslen(src) + 1;
90 argc = 2 + len / 2;
91 argv = HeapAlloc( GetProcessHeap(), 0, argc * sizeof(*argv) + len * sizeof(WCHAR) );
92 arg = dst = (WCHAR *)(argv + argc);
93 argc = 0;
94 while (*src)
96 if ((*src == ' ' || *src == '\t') && !in_quotes)
98 /* skip the remaining spaces */
99 while (*src == ' ' || *src == '\t') src++;
100 if (!*src) break;
101 /* close the argument and copy it */
102 *dst++ = 0;
103 argv[argc++] = arg;
104 /* start with a new argument */
105 arg = dst;
106 bcount = 0;
108 else if (*src == '\\')
110 *dst++ = *src++;
111 bcount++;
113 else if (*src == '"')
115 if ((bcount & 1) == 0)
117 /* Preceded by an even number of '\', this is half that
118 * number of '\', plus a '"' which we discard.
120 dst -= bcount / 2;
121 src++;
122 if (in_quotes && *src == '"') *dst++ = *src++;
123 else in_quotes = !in_quotes;
125 else
127 /* Preceded by an odd number of '\', this is half that
128 * number of '\' followed by a '"'
130 dst -= bcount / 2 + 1;
131 *dst++ = *src++;
133 bcount = 0;
135 else /* a regular character */
137 *dst++ = *src++;
138 bcount = 0;
141 *dst = 0;
142 argv[argc++] = arg;
143 argv[argc] = NULL;
144 *ret_argc = argc;
145 return argv;
148 typedef void (CDECL *_INITTERMFUN)(void);
149 typedef int (CDECL *_INITTERM_E_FN)(void);
151 /***********************************************************************
152 * __p___argc (MSVCRT.@)
154 int* CDECL __p___argc(void) { return &MSVCRT___argc; }
156 /***********************************************************************
157 * __p__commode (MSVCRT.@)
159 unsigned int* CDECL __p__commode(void) { return &MSVCRT__commode; }
162 /***********************************************************************
163 * __p__pgmptr (MSVCRT.@)
165 char** CDECL __p__pgmptr(void) { return &MSVCRT__pgmptr; }
167 /***********************************************************************
168 * __p__wpgmptr (MSVCRT.@)
170 WCHAR** CDECL __p__wpgmptr(void) { return &MSVCRT__wpgmptr; }
172 /***********************************************************************
173 * _get_pgmptr (MSVCRT.@)
175 int CDECL _get_pgmptr(char** p)
177 if (!MSVCRT_CHECK_PMT(p)) return EINVAL;
179 *p = MSVCRT__pgmptr;
180 return 0;
183 /***********************************************************************
184 * _get_wpgmptr (MSVCRT.@)
186 int CDECL _get_wpgmptr(WCHAR** p)
188 if (!MSVCRT_CHECK_PMT(p)) return EINVAL;
189 *p = MSVCRT__wpgmptr;
190 return 0;
193 /***********************************************************************
194 * __p__fmode (MSVCRT.@)
196 int* CDECL __p__fmode(void) { return &MSVCRT__fmode; }
198 /***********************************************************************
199 * _set_fmode (MSVCRT.@)
201 int CDECL _set_fmode(int mode)
203 /* TODO: support _O_WTEXT */
204 if(!MSVCRT_CHECK_PMT(mode==_O_TEXT || mode==_O_BINARY))
205 return EINVAL;
207 MSVCRT__fmode = mode;
208 return 0;
211 /***********************************************************************
212 * _get_fmode (MSVCRT.@)
214 int CDECL _get_fmode(int *mode)
216 if(!MSVCRT_CHECK_PMT(mode))
217 return EINVAL;
219 *mode = MSVCRT__fmode;
220 return 0;
223 /***********************************************************************
224 * __p__osver (MSVCRT.@)
226 unsigned int* CDECL __p__osver(void) { return &MSVCRT__osver; }
228 /***********************************************************************
229 * __p__winmajor (MSVCRT.@)
231 unsigned int* CDECL __p__winmajor(void) { return &MSVCRT__winmajor; }
233 /***********************************************************************
234 * __p__winminor (MSVCRT.@)
236 unsigned int* CDECL __p__winminor(void) { return &MSVCRT__winminor; }
238 /***********************************************************************
239 * __p__winver (MSVCRT.@)
241 unsigned int* CDECL __p__winver(void) { return &MSVCRT__winver; }
243 /*********************************************************************
244 * __p__acmdln (MSVCRT.@)
246 char** CDECL __p__acmdln(void) { return &MSVCRT__acmdln; }
248 /*********************************************************************
249 * __p__wcmdln (MSVCRT.@)
251 wchar_t** CDECL __p__wcmdln(void) { return &MSVCRT__wcmdln; }
253 /*********************************************************************
254 * __p___argv (MSVCRT.@)
256 char*** CDECL __p___argv(void) { return &MSVCRT___argv; }
258 /*********************************************************************
259 * __p___wargv (MSVCRT.@)
261 wchar_t*** CDECL __p___wargv(void) { return &MSVCRT___wargv; }
263 /*********************************************************************
264 * __p__environ (MSVCRT.@)
266 char*** CDECL __p__environ(void)
268 return &MSVCRT__environ;
271 /*********************************************************************
272 * __p__wenviron (MSVCRT.@)
274 wchar_t*** CDECL __p__wenviron(void)
276 return &MSVCRT__wenviron;
279 /*********************************************************************
280 * __p___initenv (MSVCRT.@)
282 char*** CDECL __p___initenv(void) { return &MSVCRT___initenv; }
284 /*********************************************************************
285 * __p___winitenv (MSVCRT.@)
287 wchar_t*** CDECL __p___winitenv(void) { return &MSVCRT___winitenv; }
289 /*********************************************************************
290 * _get_osplatform (MSVCRT.@)
292 int CDECL _get_osplatform(int *pValue)
294 if (!MSVCRT_CHECK_PMT(pValue != NULL)) return EINVAL;
295 *pValue = MSVCRT__osplatform;
296 return 0;
299 /* INTERNAL: Create a wide string from an ascii string */
300 wchar_t *msvcrt_wstrdupa(const char *str)
302 const unsigned int len = strlen(str) + 1 ;
303 wchar_t *wstr = malloc(len* sizeof (wchar_t));
304 if (!wstr)
305 return NULL;
306 MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED,str,len,wstr,len);
307 return wstr;
310 /*********************************************************************
311 * ___unguarded_readlc_active_add_func (MSVCRT.@)
313 unsigned int * CDECL ___unguarded_readlc_active_add_func(void)
315 return &MSVCRT___unguarded_readlc_active;
318 /*********************************************************************
319 * ___setlc_active_func (MSVCRT.@)
321 unsigned int CDECL ___setlc_active_func(void)
323 return MSVCRT___setlc_active;
326 /* INTERNAL: Since we can't rely on Winelib startup code calling w/getmainargs,
327 * we initialise data values during DLL loading. When called by a native
328 * program we simply return the data we've already initialised. This also means
329 * you can call multiple times without leaking
331 void msvcrt_init_args(void)
333 OSVERSIONINFOW osvi;
335 MSVCRT__acmdln = _strdup( GetCommandLineA() );
336 MSVCRT__wcmdln = _wcsdup( GetCommandLineW() );
337 initial_wargv = cmdline_to_argv( GetCommandLineW(), &initial_argc );
338 MSVCRT___argc = initial_argc;
339 MSVCRT___wargv = initial_wargv;
340 MSVCRT___argv = build_argv( initial_wargv );
342 TRACE("got %s, wide = %s argc=%d\n", debugstr_a(MSVCRT__acmdln),
343 debugstr_w(MSVCRT__wcmdln),MSVCRT___argc);
345 osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOW);
346 GetVersionExW( &osvi );
347 MSVCRT__winver = (osvi.dwMajorVersion << 8) | osvi.dwMinorVersion;
348 MSVCRT__winmajor = osvi.dwMajorVersion;
349 MSVCRT__winminor = osvi.dwMinorVersion;
350 MSVCRT__osver = osvi.dwBuildNumber;
351 MSVCRT__osplatform = osvi.dwPlatformId;
352 TRACE( "winver %08x winmajor %08x winminor %08x osver %08x\n",
353 MSVCRT__winver, MSVCRT__winmajor, MSVCRT__winminor, MSVCRT__osver);
354 #ifdef _CRTDLL
355 CRTDLL__baseversion_dll = (GetVersion() >> 16);
356 CRTDLL__basemajor_dll = CRTDLL__baseversion_dll >> 8;
357 CRTDLL__baseminor_dll = CRTDLL__baseversion_dll & 0xff;
358 #endif
360 MSVCRT__HUGE = HUGE_VAL;
361 MSVCRT___setlc_active = 0;
362 MSVCRT___unguarded_readlc_active = 0;
363 MSVCRT__fmode = _O_TEXT;
365 env_init(FALSE, FALSE);
367 MSVCRT__pgmptr = HeapAlloc(GetProcessHeap(), 0, MAX_PATH);
368 if (MSVCRT__pgmptr)
370 if (!GetModuleFileNameA(0, MSVCRT__pgmptr, MAX_PATH))
371 MSVCRT__pgmptr[0] = '\0';
372 else
373 MSVCRT__pgmptr[MAX_PATH - 1] = '\0';
376 MSVCRT__wpgmptr = HeapAlloc(GetProcessHeap(), 0, MAX_PATH * sizeof(WCHAR));
377 if (MSVCRT__wpgmptr)
379 if (!GetModuleFileNameW(0, MSVCRT__wpgmptr, MAX_PATH))
380 MSVCRT__wpgmptr[0] = '\0';
381 else
382 MSVCRT__wpgmptr[MAX_PATH - 1] = '\0';
386 /* INTERNAL: free memory used by args */
387 void msvcrt_free_args(void)
389 /* FIXME: more things to free */
390 HeapFree(GetProcessHeap(), 0, MSVCRT___argv);
391 HeapFree(GetProcessHeap(), 0, MSVCRT__pgmptr);
392 HeapFree(GetProcessHeap(), 0, MSVCRT__wpgmptr);
393 HeapFree(GetProcessHeap(), 0, wargv_expand);
396 static int build_expanded_wargv(int *argc, wchar_t **argv)
398 int i, size=0, args_no=0, path_len;
399 BOOL is_expandable;
400 HANDLE h;
402 args_no = 0;
403 for(i=0; i < initial_argc; i++) {
404 WIN32_FIND_DATAW data;
405 int len = 0;
407 is_expandable = FALSE;
408 for(path_len = wcslen(initial_wargv[i])-1; path_len>=0; path_len--) {
409 if(initial_wargv[i][path_len]=='*' || initial_wargv[i][path_len]=='?')
410 is_expandable = TRUE;
411 else if(initial_wargv[i][path_len]=='\\' || initial_wargv[i][path_len]=='/')
412 break;
414 path_len++;
416 if(is_expandable)
417 h = FindFirstFileW(initial_wargv[i], &data);
418 else
419 h = INVALID_HANDLE_VALUE;
421 if(h != INVALID_HANDLE_VALUE) {
422 do {
423 if(data.cFileName[0]=='.' && (data.cFileName[1]=='\0' ||
424 (data.cFileName[1]=='.' && data.cFileName[2]=='\0')))
425 continue;
427 len = wcslen(data.cFileName)+1;
428 if(argv) {
429 argv[args_no] = (wchar_t*)(argv+*argc+1)+size;
430 memcpy(argv[args_no], initial_wargv[i], path_len*sizeof(wchar_t));
431 memcpy(argv[args_no]+path_len, data.cFileName, len*sizeof(wchar_t));
433 args_no++;
434 size += len+path_len;
435 }while(FindNextFileW(h, &data));
436 FindClose(h);
439 if(!len) {
440 len = wcslen(initial_wargv[i])+1;
441 if(argv) {
442 argv[args_no] = (wchar_t*)(argv+*argc+1)+size;
443 memcpy(argv[args_no], initial_wargv[i], len*sizeof(wchar_t));
445 args_no++;
446 size += len;
450 if(argv)
451 argv[args_no] = NULL;
452 size *= sizeof(wchar_t);
453 size += (args_no+1)*sizeof(wchar_t*);
454 *argc = args_no;
455 return size;
458 /*********************************************************************
459 * __wgetmainargs (MSVCRT.@)
461 int CDECL __wgetmainargs(int *argc, wchar_t** *wargv, wchar_t** *wenvp,
462 int expand_wildcards, int *new_mode)
464 TRACE("(%p,%p,%p,%d,%p).\n", argc, wargv, wenvp, expand_wildcards, new_mode);
466 if (expand_wildcards) {
467 HeapFree(GetProcessHeap(), 0, wargv_expand);
468 wargv_expand = HeapAlloc(GetProcessHeap(), 0,
469 build_expanded_wargv(&wargc_expand, NULL));
470 if (wargv_expand) {
471 build_expanded_wargv(&wargc_expand, wargv_expand);
473 MSVCRT___argc = wargc_expand;
474 MSVCRT___wargv = wargv_expand;
475 }else {
476 expand_wildcards = 0;
479 if (!expand_wildcards) {
480 MSVCRT___argc = initial_argc;
481 MSVCRT___wargv = initial_wargv;
484 env_init(TRUE, FALSE);
486 *argc = MSVCRT___argc;
487 *wargv = MSVCRT___wargv;
488 *wenvp = MSVCRT__wenviron;
489 if (new_mode)
490 _set_new_mode( *new_mode );
491 return 0;
494 /*********************************************************************
495 * __getmainargs (MSVCRT.@)
497 int CDECL __getmainargs(int *argc, char** *argv, char** *envp,
498 int expand_wildcards, int *new_mode)
500 TRACE("(%p,%p,%p,%d,%p).\n", argc, argv, envp, expand_wildcards, new_mode);
502 if (expand_wildcards) {
503 HeapFree(GetProcessHeap(), 0, wargv_expand);
504 wargv_expand = HeapAlloc(GetProcessHeap(), 0,
505 build_expanded_wargv(&wargc_expand, NULL));
506 if (wargv_expand) {
507 build_expanded_wargv(&wargc_expand, wargv_expand);
509 MSVCRT___argc = wargc_expand;
510 MSVCRT___argv = build_argv( wargv_expand );
511 }else {
512 expand_wildcards = 0;
515 if (!expand_wildcards) {
516 MSVCRT___argc = initial_argc;
517 MSVCRT___argv = build_argv( initial_wargv );
520 *argc = MSVCRT___argc;
521 *argv = MSVCRT___argv;
522 *envp = MSVCRT__environ;
524 if (new_mode)
525 _set_new_mode( *new_mode );
526 return 0;
529 #ifdef _CRTDLL
530 /*********************************************************************
531 * __GetMainArgs (CRTDLL.@)
533 void CDECL __GetMainArgs( int *argc, char ***argv, char ***envp, int expand_wildcards )
535 int new_mode = 0;
536 __getmainargs( argc, argv, envp, expand_wildcards, &new_mode );
538 #endif
540 /*********************************************************************
541 * _initterm (MSVCRT.@)
543 void CDECL _initterm(_INITTERMFUN *start,_INITTERMFUN *end)
545 _INITTERMFUN* current = start;
547 TRACE("(%p,%p)\n",start,end);
548 while (current<end)
550 if (*current)
552 TRACE("Call init function %p\n",*current);
553 (**current)();
554 TRACE("returned\n");
556 current++;
560 /*********************************************************************
561 * _initterm_e (MSVCRT.@)
563 * call an array of application initialization functions and report the return value
565 int CDECL _initterm_e(_INITTERM_E_FN *table, _INITTERM_E_FN *end)
567 int res = 0;
569 TRACE("(%p, %p)\n", table, end);
571 while (!res && table < end) {
572 if (*table) {
573 TRACE("calling %p\n", **table);
574 res = (**table)();
575 if (res)
576 TRACE("function %p failed: %#x\n", *table, res);
579 table++;
581 return res;
584 /*********************************************************************
585 * __set_app_type (MSVCRT.@)
587 void CDECL __set_app_type(int app_type)
589 TRACE("(%d) %s application\n", app_type, app_type == 2 ? "Gui" : "Console");
590 MSVCRT_app_type = app_type;
593 #if _MSVCR_VER>=140
595 /*********************************************************************
596 * _configure_narrow_argv (UCRTBASE.@)
598 int CDECL _configure_narrow_argv(int mode)
600 TRACE("(%d)\n", mode);
601 return 0;
604 /*********************************************************************
605 * _initialize_narrow_environment (UCRTBASE.@)
607 int CDECL _initialize_narrow_environment(void)
609 TRACE("\n");
610 return env_init(FALSE, FALSE);
613 /*********************************************************************
614 * _get_initial_narrow_environment (UCRTBASE.@)
616 char** CDECL _get_initial_narrow_environment(void)
618 TRACE("\n");
619 _initialize_narrow_environment();
620 return MSVCRT___initenv;
623 /*********************************************************************
624 * _configure_wide_argv (UCRTBASE.@)
626 int CDECL _configure_wide_argv(int mode)
628 WARN("(%d) stub\n", mode);
629 return 0;
632 /*********************************************************************
633 * _initialize_wide_environment (UCRTBASE.@)
635 int CDECL _initialize_wide_environment(void)
637 TRACE("\n");
638 return env_init(TRUE, FALSE);
641 /*********************************************************************
642 * _get_initial_wide_environment (UCRTBASE.@)
644 wchar_t** CDECL _get_initial_wide_environment(void)
646 TRACE("\n");
647 _initialize_wide_environment();
648 return MSVCRT___winitenv;
651 /*********************************************************************
652 * _get_narrow_winmain_command_line (UCRTBASE.@)
654 char* CDECL _get_narrow_winmain_command_line(void)
656 static char *narrow_command_line;
657 char *s;
659 if (narrow_command_line)
660 return narrow_command_line;
662 s = GetCommandLineA();
663 while (*s && *s != ' ' && *s != '\t')
665 if (*s++ == '"')
667 while (*s && *s++ != '"')
672 while (*s == ' ' || *s == '\t')
673 s++;
675 return narrow_command_line = s;
678 /*********************************************************************
679 * _get_wide_winmain_command_line (UCRTBASE.@)
681 wchar_t* CDECL _get_wide_winmain_command_line(void)
683 static wchar_t *wide_command_line;
684 wchar_t *s;
686 if (wide_command_line)
687 return wide_command_line;
689 s = GetCommandLineW();
690 while (*s && *s != ' ' && *s != '\t')
692 if (*s++ == '"')
694 while (*s && *s++ != '"')
699 while (*s == ' ' || *s == '\t')
700 s++;
702 return wide_command_line = s;
705 #endif /* _MSVCR_VER>=140 */
707 /*********************************************************************
708 * _get_winmajor (MSVCRT.@)
710 int CDECL _get_winmajor(int* value)
712 if (!MSVCRT_CHECK_PMT(value != NULL)) return EINVAL;
713 *value = MSVCRT__winmajor;
714 return 0;
717 /*********************************************************************
718 * _get_winminor (MSVCRT.@)
720 int CDECL _get_winminor(int* value)
722 if (!MSVCRT_CHECK_PMT(value != NULL)) return EINVAL;
723 *value = MSVCRT__winminor;
724 return 0;
727 /*********************************************************************
728 * _get_osver (MSVCRT.@)
730 int CDECL _get_osver(int* value)
732 if (!MSVCRT_CHECK_PMT(value != NULL)) return EINVAL;
733 *value = MSVCRT__osver;
734 return 0;