-/* Directory entry code for Window platforms.\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-\r
-#include <sys/types.h>\r
-#include <sys/stat.h>\r
-#include <errno.h>\r
-#include <string.h>\r
-#include <stdlib.h>\r
-#include "dirent.h"\r
-\r
-\r
-DIR*\r
-opendir(const char* pDirName)\r
-{\r
- struct stat sb;\r
- DIR* pDir;\r
- char* pEndDirName;\r
- int nBufferLen;\r
-\r
- /* sanity checks */\r
- if (!pDirName) {\r
- errno = EINVAL;\r
- return NULL;\r
- }\r
- if (stat(pDirName, &sb) != 0) {\r
- errno = ENOENT;\r
- return NULL;\r
- }\r
- if ((sb.st_mode & S_IFMT) != S_IFDIR) {\r
- errno = ENOTDIR;\r
- return NULL;\r
- }\r
-\r
- /* allocate a DIR structure to return */\r
- pDir = (DIR *) malloc(sizeof (DIR));\r
-\r
- if (!pDir)\r
- return NULL;\r
-\r
- /* input directory name length */\r
- nBufferLen = strlen(pDirName);\r
-\r
- /* copy input directory name to DIR buffer */\r
- strcpy(pDir->dir_pDirectoryName, pDirName);\r
-\r
- /* point to end of the copied directory name */\r
- pEndDirName = &pDir->dir_pDirectoryName[nBufferLen - 1];\r
-\r
- /* if directory name did not end in '/' or '\', add '/' */\r
- if ((*pEndDirName != '/') && (*pEndDirName != '\\')) {\r
- pEndDirName++;\r
- *pEndDirName = '/';\r
- }\r
-\r
- /* now append the wildcard character to the buffer */\r
- pEndDirName++;\r
- *pEndDirName = '*';\r
- pEndDirName++;\r
- *pEndDirName = '\0';\r
-\r
- /* other values defaulted */\r
- pDir->dir_nNumFiles = 0;\r
- pDir->dir_hDirHandle = INVALID_HANDLE_VALUE;\r
- pDir->dir_ulCookie = __DIRENT_COOKIE;\r
-\r
- return pDir;\r
-}\r
-\r
-void\r
-closedir(DIR *pDir)\r
-{\r
- /* got a valid pointer? */\r
- if (!pDir) {\r
- errno = EINVAL;\r
- return;\r
- }\r
-\r
- /* sanity check that this is a DIR pointer */\r
- if (pDir->dir_ulCookie != __DIRENT_COOKIE) {\r
- errno = EINVAL;\r
- return;\r
- }\r
-\r
- /* close the WINDOWS32 directory handle */\r
- if (pDir->dir_hDirHandle != INVALID_HANDLE_VALUE)\r
- FindClose(pDir->dir_hDirHandle);\r
-\r
- free(pDir);\r
-\r
- return;\r
-}\r
-\r
-struct dirent *\r
-readdir(DIR* pDir)\r
-{\r
- WIN32_FIND_DATA wfdFindData;\r
-\r
- if (!pDir) {\r
- errno = EINVAL;\r
- return NULL;\r
- }\r
-\r
- /* sanity check that this is a DIR pointer */\r
- if (pDir->dir_ulCookie != __DIRENT_COOKIE) {\r
- errno = EINVAL;\r
- return NULL;\r
- }\r
-\r
- if (pDir->dir_nNumFiles == 0) {\r
- pDir->dir_hDirHandle = FindFirstFile(pDir->dir_pDirectoryName, &wfdFindData);\r
- if (pDir->dir_hDirHandle == INVALID_HANDLE_VALUE)\r
- return NULL;\r
- } else if (!FindNextFile(pDir->dir_hDirHandle, &wfdFindData))\r
- return NULL;\r
-\r
- /* bump count for next call to readdir() or telldir() */\r
- pDir->dir_nNumFiles++;\r
-\r
- /* fill in struct dirent values */\r
- pDir->dir_sdReturn.d_ino = -1;\r
- strcpy(pDir->dir_sdReturn.d_name, wfdFindData.cFileName);\r
-\r
- return &pDir->dir_sdReturn;\r
-}\r
-\r
-void\r
-rewinddir(DIR* pDir)\r
-{\r
- if (!pDir) {\r
- errno = EINVAL;\r
- return;\r
- }\r
-\r
- /* sanity check that this is a DIR pointer */\r
- if (pDir->dir_ulCookie != __DIRENT_COOKIE) {\r
- errno = EINVAL;\r
- return;\r
- }\r
-\r
- /* close the WINDOWS32 directory handle */\r
- if (pDir->dir_hDirHandle != INVALID_HANDLE_VALUE)\r
- if (!FindClose(pDir->dir_hDirHandle))\r
- errno = EBADF;\r
-\r
- /* reset members which control readdir() */\r
- pDir->dir_hDirHandle = INVALID_HANDLE_VALUE;\r
- pDir->dir_nNumFiles = 0;\r
-\r
- return;\r
-}\r
-\r
-int\r
-telldir(DIR* pDir)\r
-{\r
- if (!pDir) {\r
- errno = EINVAL;\r
- return -1;\r
- }\r
-\r
- /* sanity check that this is a DIR pointer */\r
- if (pDir->dir_ulCookie != __DIRENT_COOKIE) {\r
- errno = EINVAL;\r
- return -1;\r
- }\r
-\r
- /* return number of times readdir() called */\r
- return pDir->dir_nNumFiles;\r
-}\r
-\r
-void\r
-seekdir(DIR* pDir, long nPosition)\r
-{\r
- if (!pDir)\r
- return;\r
-\r
- /* sanity check that this is a DIR pointer */\r
- if (pDir->dir_ulCookie != __DIRENT_COOKIE)\r
- return;\r
-\r
- /* go back to beginning of directory */\r
- rewinddir(pDir);\r
-\r
- /* loop until we have found position we care about */\r
- for (--nPosition; nPosition && readdir(pDir); nPosition--);\r
-\r
- /* flag invalid nPosition value */\r
- if (nPosition)\r
- errno = EINVAL;\r
-\r
- return;\r
-}\r
+/* Directory entry code for Window platforms.
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <errno.h>
+#include <string.h>
+#include <stdlib.h>
+#include "dirent.h"
+
+
+DIR*
+opendir(const char* pDirName)
+{
+ struct stat sb;
+ DIR* pDir;
+ char* pEndDirName;
+ int nBufferLen;
+
+ /* sanity checks */
+ if (!pDirName) {
+ errno = EINVAL;
+ return NULL;
+ }
+ if (stat(pDirName, &sb) != 0) {
+ errno = ENOENT;
+ return NULL;
+ }
+ if ((sb.st_mode & S_IFMT) != S_IFDIR) {
+ errno = ENOTDIR;
+ return NULL;
+ }
+
+ /* allocate a DIR structure to return */
+ pDir = (DIR *) malloc(sizeof (DIR));
+
+ if (!pDir)
+ return NULL;
+
+ /* input directory name length */
+ nBufferLen = strlen(pDirName);
+
+ /* copy input directory name to DIR buffer */
+ strcpy(pDir->dir_pDirectoryName, pDirName);
+
+ /* point to end of the copied directory name */
+ pEndDirName = &pDir->dir_pDirectoryName[nBufferLen - 1];
+
+ /* if directory name did not end in '/' or '\', add '/' */
+ if ((*pEndDirName != '/') && (*pEndDirName != '\\')) {
+ pEndDirName++;
+ *pEndDirName = '/';
+ }
+
+ /* now append the wildcard character to the buffer */
+ pEndDirName++;
+ *pEndDirName = '*';
+ pEndDirName++;
+ *pEndDirName = '\0';
+
+ /* other values defaulted */
+ pDir->dir_nNumFiles = 0;
+ pDir->dir_hDirHandle = INVALID_HANDLE_VALUE;
+ pDir->dir_ulCookie = __DIRENT_COOKIE;
+
+ return pDir;
+}
+
+void
+closedir(DIR *pDir)
+{
+ /* got a valid pointer? */
+ if (!pDir) {
+ errno = EINVAL;
+ return;
+ }
+
+ /* sanity check that this is a DIR pointer */
+ if (pDir->dir_ulCookie != __DIRENT_COOKIE) {
+ errno = EINVAL;
+ return;
+ }
+
+ /* close the WINDOWS32 directory handle */
+ if (pDir->dir_hDirHandle != INVALID_HANDLE_VALUE)
+ FindClose(pDir->dir_hDirHandle);
+
+ free(pDir);
+
+ return;
+}
+
+struct dirent *
+readdir(DIR* pDir)
+{
+ WIN32_FIND_DATA wfdFindData;
+
+ if (!pDir) {
+ errno = EINVAL;
+ return NULL;
+ }
+
+ /* sanity check that this is a DIR pointer */
+ if (pDir->dir_ulCookie != __DIRENT_COOKIE) {
+ errno = EINVAL;
+ return NULL;
+ }
+
+ if (pDir->dir_nNumFiles == 0) {
+ pDir->dir_hDirHandle = FindFirstFile(pDir->dir_pDirectoryName, &wfdFindData);
+ if (pDir->dir_hDirHandle == INVALID_HANDLE_VALUE)
+ return NULL;
+ } else if (!FindNextFile(pDir->dir_hDirHandle, &wfdFindData))
+ return NULL;
+
+ /* bump count for next call to readdir() or telldir() */
+ pDir->dir_nNumFiles++;
+
+ /* fill in struct dirent values */
+ pDir->dir_sdReturn.d_ino = -1;
+ strcpy(pDir->dir_sdReturn.d_name, wfdFindData.cFileName);
+
+ return &pDir->dir_sdReturn;
+}
+
+void
+rewinddir(DIR* pDir)
+{
+ if (!pDir) {
+ errno = EINVAL;
+ return;
+ }
+
+ /* sanity check that this is a DIR pointer */
+ if (pDir->dir_ulCookie != __DIRENT_COOKIE) {
+ errno = EINVAL;
+ return;
+ }
+
+ /* close the WINDOWS32 directory handle */
+ if (pDir->dir_hDirHandle != INVALID_HANDLE_VALUE)
+ if (!FindClose(pDir->dir_hDirHandle))
+ errno = EBADF;
+
+ /* reset members which control readdir() */
+ pDir->dir_hDirHandle = INVALID_HANDLE_VALUE;
+ pDir->dir_nNumFiles = 0;
+
+ return;
+}
+
+int
+telldir(DIR* pDir)
+{
+ if (!pDir) {
+ errno = EINVAL;
+ return -1;
+ }
+
+ /* sanity check that this is a DIR pointer */
+ if (pDir->dir_ulCookie != __DIRENT_COOKIE) {
+ errno = EINVAL;
+ return -1;
+ }
+
+ /* return number of times readdir() called */
+ return pDir->dir_nNumFiles;
+}
+
+void
+seekdir(DIR* pDir, long nPosition)
+{
+ if (!pDir)
+ return;
+
+ /* sanity check that this is a DIR pointer */
+ if (pDir->dir_ulCookie != __DIRENT_COOKIE)
+ return;
+
+ /* go back to beginning of directory */
+ rewinddir(pDir);
+
+ /* loop until we have found position we care about */
+ for (--nPosition; nPosition && readdir(pDir); nPosition--);
+
+ /* flag invalid nPosition value */
+ if (nPosition)
+ errno = EINVAL;
+
+ return;
+}
-/* Definitions for Windows process invocation.\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-#ifndef SUB_PROC_H\r
-#define SUB_PROC_H\r
-\r
-/*\r
- * Component Name:\r
- *\r
- * $Date$\r
- *\r
- * $Source$\r
- *\r
- * $Id$\r
- */\r
-\r
-#define EXTERN_DECL(entry, args) extern entry args\r
-#define VOID_DECL void\r
-\r
-EXTERN_DECL(HANDLE process_init, (VOID_DECL));\r
-EXTERN_DECL(HANDLE process_init_fd, (HANDLE stdinh, HANDLE stdouth,\r
- HANDLE stderrh));\r
-EXTERN_DECL(long process_begin, (HANDLE proc, char **argv, char **envp,\r
- char *exec_path, char *as_user));\r
-EXTERN_DECL(long process_pipe_io, (HANDLE proc, char *stdin_data,\r
- int stdin_data_len));\r
-EXTERN_DECL(long process_file_io, (HANDLE proc));\r
-EXTERN_DECL(void process_cleanup, (HANDLE proc));\r
-EXTERN_DECL(HANDLE process_wait_for_any, (VOID_DECL));\r
-EXTERN_DECL(void process_register, (HANDLE proc));\r
-EXTERN_DECL(HANDLE process_easy, (char** argv, char** env));\r
-EXTERN_DECL(BOOL process_kill, (HANDLE proc, int signal));\r
-EXTERN_DECL(int process_used_slots, (VOID_DECL));\r
-\r
-/* support routines */\r
-EXTERN_DECL(long process_errno, (HANDLE proc));\r
-EXTERN_DECL(long process_last_err, (HANDLE proc));\r
-EXTERN_DECL(long process_exit_code, (HANDLE proc));\r
-EXTERN_DECL(long process_signal, (HANDLE proc));\r
-EXTERN_DECL(char * process_outbuf, (HANDLE proc));\r
-EXTERN_DECL(char * process_errbuf, (HANDLE proc));\r
-EXTERN_DECL(int process_outcnt, (HANDLE proc));\r
-EXTERN_DECL(int process_errcnt, (HANDLE proc));\r
-EXTERN_DECL(void process_pipes, (HANDLE proc, int pipes[3]));\r
-\r
-#endif\r
+/* Definitions for Windows process invocation.
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#ifndef SUB_PROC_H
+#define SUB_PROC_H
+
+/*
+ * Component Name:
+ *
+ * $Date$
+ *
+ * $Source$
+ *
+ * $Id$
+ */
+
+#define EXTERN_DECL(entry, args) extern entry args
+#define VOID_DECL void
+
+EXTERN_DECL(HANDLE process_init, (VOID_DECL));
+EXTERN_DECL(HANDLE process_init_fd, (HANDLE stdinh, HANDLE stdouth,
+ HANDLE stderrh));
+EXTERN_DECL(long process_begin, (HANDLE proc, char **argv, char **envp,
+ char *exec_path, char *as_user));
+EXTERN_DECL(long process_pipe_io, (HANDLE proc, char *stdin_data,
+ int stdin_data_len));
+EXTERN_DECL(long process_file_io, (HANDLE proc));
+EXTERN_DECL(void process_cleanup, (HANDLE proc));
+EXTERN_DECL(HANDLE process_wait_for_any, (VOID_DECL));
+EXTERN_DECL(void process_register, (HANDLE proc));
+EXTERN_DECL(HANDLE process_easy, (char** argv, char** env));
+EXTERN_DECL(BOOL process_kill, (HANDLE proc, int signal));
+EXTERN_DECL(int process_used_slots, (VOID_DECL));
+
+/* support routines */
+EXTERN_DECL(long process_errno, (HANDLE proc));
+EXTERN_DECL(long process_last_err, (HANDLE proc));
+EXTERN_DECL(long process_exit_code, (HANDLE proc));
+EXTERN_DECL(long process_signal, (HANDLE proc));
+EXTERN_DECL(char * process_outbuf, (HANDLE proc));
+EXTERN_DECL(char * process_errbuf, (HANDLE proc));
+EXTERN_DECL(int process_outcnt, (HANDLE proc));
+EXTERN_DECL(int process_errcnt, (HANDLE proc));
+EXTERN_DECL(void process_pipes, (HANDLE proc, int pipes[3]));
+
+#endif
-/* Definitions for Windows error handling.\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-#ifndef _W32ERR_H_\r
-#define _W32ERR_H_\r
-\r
-#ifndef EXTERN_DECL\r
-#define EXTERN_DECL(entry, args) entry args\r
-#endif\r
-\r
-EXTERN_DECL(char * map_windows32_error_to_string, (DWORD error));\r
-\r
-#endif /* !_W32ERR_H */\r
+/* Definitions for Windows error handling.
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#ifndef _W32ERR_H_
+#define _W32ERR_H_
+
+#ifndef EXTERN_DECL
+#define EXTERN_DECL(entry, args) entry args
+#endif
+
+EXTERN_DECL(char * map_windows32_error_to_string, (DWORD error));
+
+#endif /* !_W32ERR_H */
-/* Process handling for Windows\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-#include <stddef.h>\r
-#include <stdlib.h>\r
-#include <string.h>\r
-#include <windows.h>\r
-#include "proc.h"\r
-\r
-\r
-/*\r
- * Description: Convert a NULL string terminated UNIX environment block to\r
- * an environment block suitable for a windows32 system call\r
- *\r
- * Returns: TRUE= success, FALSE=fail\r
- *\r
- * Notes/Dependencies: the environment block is sorted in case-insensitive\r
- * order, is double-null terminated, and is a char *, not a char **\r
- */\r
-int _cdecl compare(const void *a1, const void *a2)\r
-{\r
- return _stricoll(*((char**)a1),*((char**)a2));\r
-}\r
-bool_t\r
-arr2envblk(char **arr, char **envblk_out)\r
-{\r
- char **tmp;\r
- int size_needed;\r
- int arrcnt;\r
- char *ptr;\r
-\r
- arrcnt = 0;\r
- while (arr[arrcnt]) {\r
- arrcnt++;\r
- }\r
-\r
- tmp = (char**) calloc(arrcnt + 1, sizeof(char *));\r
- if (!tmp) {\r
- return FALSE;\r
- }\r
-\r
- arrcnt = 0;\r
- size_needed = 0;\r
- while (arr[arrcnt]) {\r
- tmp[arrcnt] = arr[arrcnt];\r
- size_needed += strlen(arr[arrcnt]) + 1;\r
- arrcnt++;\r
- }\r
- size_needed++;\r
-\r
- qsort((void *) tmp, (size_t) arrcnt, sizeof (char*), compare);\r
-\r
- ptr = *envblk_out = calloc(size_needed, 1);\r
- if (!ptr) {\r
- free(tmp);\r
- return FALSE;\r
- }\r
-\r
- arrcnt = 0;\r
- while (tmp[arrcnt]) {\r
- strcpy(ptr, tmp[arrcnt]);\r
- ptr += strlen(tmp[arrcnt]) + 1;\r
- arrcnt++;\r
- }\r
-\r
- free(tmp);\r
- return TRUE;\r
-}\r
+/* Process handling for Windows
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#include <stddef.h>
+#include <stdlib.h>
+#include <string.h>
+#include <windows.h>
+#include "proc.h"
+
+
+/*
+ * Description: Convert a NULL string terminated UNIX environment block to
+ * an environment block suitable for a windows32 system call
+ *
+ * Returns: TRUE= success, FALSE=fail
+ *
+ * Notes/Dependencies: the environment block is sorted in case-insensitive
+ * order, is double-null terminated, and is a char *, not a char **
+ */
+int _cdecl compare(const void *a1, const void *a2)
+{
+ return _stricoll(*((char**)a1),*((char**)a2));
+}
+bool_t
+arr2envblk(char **arr, char **envblk_out)
+{
+ char **tmp;
+ int size_needed;
+ int arrcnt;
+ char *ptr;
+
+ arrcnt = 0;
+ while (arr[arrcnt]) {
+ arrcnt++;
+ }
+
+ tmp = (char**) calloc(arrcnt + 1, sizeof(char *));
+ if (!tmp) {
+ return FALSE;
+ }
+
+ arrcnt = 0;
+ size_needed = 0;
+ while (arr[arrcnt]) {
+ tmp[arrcnt] = arr[arrcnt];
+ size_needed += strlen(arr[arrcnt]) + 1;
+ arrcnt++;
+ }
+ size_needed++;
+
+ qsort((void *) tmp, (size_t) arrcnt, sizeof (char*), compare);
+
+ ptr = *envblk_out = calloc(size_needed, 1);
+ if (!ptr) {
+ free(tmp);
+ return FALSE;
+ }
+
+ arrcnt = 0;
+ while (tmp[arrcnt]) {
+ strcpy(ptr, tmp[arrcnt]);
+ ptr += strlen(tmp[arrcnt]) + 1;
+ arrcnt++;
+ }
+
+ free(tmp);
+ return TRUE;
+}
-/* Definitions for Windows\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-#ifndef _PROC_H\r
-#define _PROC_H\r
-\r
-typedef int bool_t;\r
-\r
-#define E_SCALL 101\r
-#define E_IO 102\r
-#define E_NO_MEM 103\r
-#define E_FORK 104\r
-\r
-extern bool_t arr2envblk(char **arr, char **envblk_out);\r
-\r
-#endif\r
+/* Definitions for Windows
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#ifndef _PROC_H
+#define _PROC_H
+
+typedef int bool_t;
+
+#define E_SCALL 101
+#define E_IO 102
+#define E_NO_MEM 103
+#define E_FORK 104
+
+extern bool_t arr2envblk(char **arr, char **envblk_out);
+
+#endif
-/* Error handling for Windows\r
-Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,\r
-2006, 2007 Free Software Foundation, Inc.\r
-This file is part of GNU Make.\r
-\r
-GNU Make is free software; you can redistribute it and/or modify it under the\r
-terms of the GNU General Public License as published by the Free Software\r
-Foundation; either version 3 of the License, or (at your option) any later\r
-version.\r
-\r
-GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY\r
-WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR\r
-A PARTICULAR PURPOSE. See the GNU General Public License for more details.\r
-\r
-You should have received a copy of the GNU General Public License along with\r
-this program. If not, see <http://www.gnu.org/licenses/>. */\r
-\r
-#include <windows.h>\r
-#include "w32err.h"\r
-\r
-/*\r
- * Description: the windows32 version of perror()\r
- *\r
- * Returns: a pointer to a static error\r
- *\r
- * Notes/Dependencies: I got this from\r
- * comp.os.ms-windows.programmer.win32\r
- */\r
-char *\r
-map_windows32_error_to_string (DWORD ercode) {\r
-/* __declspec (thread) necessary if you will use multiple threads on MSVC */\r
-#ifdef _MSC_VER\r
-__declspec (thread) static char szMessageBuffer[128];\r
-#else\r
-static char szMessageBuffer[128];\r
-#endif\r
- /* Fill message buffer with a default message in\r
- * case FormatMessage fails\r
- */\r
- wsprintf (szMessageBuffer, "Error %ld\n", ercode);\r
-\r
- /*\r
- * Special code for winsock error handling.\r
- */\r
- if (ercode > WSABASEERR) {\r
- HMODULE hModule = GetModuleHandle("wsock32");\r
- if (hModule != NULL) {\r
- FormatMessage(FORMAT_MESSAGE_FROM_HMODULE,\r
- hModule,\r
- ercode,\r
- LANG_NEUTRAL,\r
- szMessageBuffer,\r
- sizeof(szMessageBuffer),\r
- NULL);\r
- FreeLibrary(hModule);\r
- }\r
- } else {\r
- /*\r
- * Default system message handling\r
- */\r
- FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,\r
- NULL,\r
- ercode,\r
- LANG_NEUTRAL,\r
- szMessageBuffer,\r
- sizeof(szMessageBuffer),\r
- NULL);\r
- }\r
- return szMessageBuffer;\r
-}\r
+/* Error handling for Windows
+Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
+2006, 2007 Free Software Foundation, Inc.
+This file is part of GNU Make.
+
+GNU Make is free software; you can redistribute it and/or modify it under the
+terms of the GNU General Public License as published by the Free Software
+Foundation; either version 3 of the License, or (at your option) any later
+version.
+
+GNU Make is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
+A PARTICULAR PURPOSE. See the GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License along with
+this program. If not, see <http://www.gnu.org/licenses/>. */
+
+#include <windows.h>
+#include "w32err.h"
+
+/*
+ * Description: the windows32 version of perror()
+ *
+ * Returns: a pointer to a static error
+ *
+ * Notes/Dependencies: I got this from
+ * comp.os.ms-windows.programmer.win32
+ */
+char *
+map_windows32_error_to_string (DWORD ercode) {
+/* __declspec (thread) necessary if you will use multiple threads on MSVC */
+#ifdef _MSC_VER
+__declspec (thread) static char szMessageBuffer[128];
+#else
+static char szMessageBuffer[128];
+#endif
+ /* Fill message buffer with a default message in
+ * case FormatMessage fails
+ */
+ wsprintf (szMessageBuffer, "Error %ld\n", ercode);
+
+ /*
+ * Special code for winsock error handling.
+ */
+ if (ercode > WSABASEERR) {
+ HMODULE hModule = GetModuleHandle("wsock32");
+ if (hModule != NULL) {
+ FormatMessage(FORMAT_MESSAGE_FROM_HMODULE,
+ hModule,
+ ercode,
+ LANG_NEUTRAL,
+ szMessageBuffer,
+ sizeof(szMessageBuffer),
+ NULL);
+ FreeLibrary(hModule);
+ }
+ } else {
+ /*
+ * Default system message handling
+ */
+ FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM,
+ NULL,
+ ercode,
+ LANG_NEUTRAL,
+ szMessageBuffer,
+ sizeof(szMessageBuffer),
+ NULL);
+ }
+ return szMessageBuffer;
+}
projects / platform / upstream / make.git / commitdiff