Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

86 lines
2.3 KiB

/***
*mbtowenv.c - convert multibyte environment block to wide
*
* Copyright (c) 1993-2001, Microsoft Corporation. All rights reserved.
*
*Purpose:
* defines __mbtow_environ(). Create a wide character equivalent of
* an existing multibyte environment block.
*
*Revision History:
* 11-30-93 CFW initial version
* 02-07-94 CFW POSIXify.
* 01-10-95 CFW Debug CRT allocs.
* 08-28-98 GJF Use CP_ACP instead of CP_OEMCP.
* 07-06-01 BWT Free wenvp before exiting on MultiByteToWideChar failure
*
*******************************************************************************/
#ifndef _POSIX_
#include <windows.h>
#include <cruntime.h>
#include <internal.h>
#include <stdlib.h>
#include <dbgint.h>
/***
*__mbtow_environ - copy multibyte environment block to wide environment block
*
*Purpose:
* Create a wide character equivalent of an existing multibyte
* environment block.
*
*Entry:
* Assume _environ (global pointer) points to existing multibyte
* environment block.
*
*Exit:
* If success, every multibyte environment variable has been added to
* the wide environment block and returns 0.
* If failure, returns -1.
*
*Exceptions:
* If space cannot be allocated, returns -1.
*
*******************************************************************************/
int __cdecl __mbtow_environ (
void
)
{
int size;
wchar_t *wenvp;
char **envp = _environ;
/*
* For every environment variable in the multibyte environment,
* convert it and add it to the wide environment.
*/
while (*envp)
{
/* find out how much space is needed */
if ((size = MultiByteToWideChar(CP_ACP, 0, *envp, -1, NULL, 0)) == 0)
return -1;
/* allocate space for variable */
if ((wenvp = (wchar_t *) _malloc_crt(size * sizeof(wchar_t))) == NULL)
return -1;
/* convert it */
if ((size = MultiByteToWideChar(CP_ACP, 0, *envp, -1, wenvp, size)) == 0) {
_free_crt(wenvp);
return -1;
}
/* set it - this is not primary call, so set primary == 0 */
__crtwsetenv(wenvp, 0);
envp++;
}
return 0;
}
#endif /* _POSIX_ */