1/*************************************************************************** 2 * _ _ ____ _ 3 * Project ___| | | | _ \| | 4 * / __| | | | |_) | | 5 * | (__| |_| | _ <| |___ 6 * \___|\___/|_| \_\_____| 7 * 8 * Copyright (C) 1998 - 2014, Daniel Stenberg, <daniel@haxx.se>, et al. 9 * 10 * This software is licensed as described in the file COPYING, which 11 * you should have received as part of this distribution. The terms 12 * are also available at http://curl.haxx.se/docs/copyright.html. 13 * 14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell 15 * copies of the Software, and permit persons to whom the Software is 16 * furnished to do so, under the terms of the COPYING file. 17 * 18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY 19 * KIND, either express or implied. 20 * 21 ***************************************************************************/ 22#include "tool_setup.h" 23 24#if defined(MSDOS) || defined(WIN32) 25 26#if defined(HAVE_LIBGEN_H) && defined(HAVE_BASENAME) 27# include <libgen.h> 28#endif 29 30#ifdef WIN32 31# include "tool_cfgable.h" 32# include "tool_libinfo.h" 33#endif 34 35#include "tool_bname.h" 36#include "tool_doswin.h" 37 38#include "memdebug.h" /* keep this as LAST include */ 39 40/* 41 * Macros ALWAYS_TRUE and ALWAYS_FALSE are used to avoid compiler warnings. 42 */ 43 44#define ALWAYS_TRUE (1) 45#define ALWAYS_FALSE (0) 46 47#if defined(_MSC_VER) && !defined(__POCC__) 48# undef ALWAYS_TRUE 49# undef ALWAYS_FALSE 50# if (_MSC_VER < 1500) 51# define ALWAYS_TRUE (0, 1) 52# define ALWAYS_FALSE (1, 0) 53# else 54# define ALWAYS_TRUE \ 55__pragma(warning(push)) \ 56__pragma(warning(disable:4127)) \ 57(1) \ 58__pragma(warning(pop)) 59# define ALWAYS_FALSE \ 60__pragma(warning(push)) \ 61__pragma(warning(disable:4127)) \ 62(0) \ 63__pragma(warning(pop)) 64# endif 65#endif 66 67#ifdef WIN32 68# undef PATH_MAX 69# define PATH_MAX MAX_PATH 70#endif 71 72#ifndef S_ISCHR 73# ifdef S_IFCHR 74# define S_ISCHR(m) (((m) & S_IFMT) == S_IFCHR) 75# else 76# define S_ISCHR(m) (0) /* cannot tell if file is a device */ 77# endif 78#endif 79 80#ifdef WIN32 81# define _use_lfn(f) ALWAYS_TRUE /* long file names always available */ 82#elif !defined(__DJGPP__) || (__DJGPP__ < 2) /* DJGPP 2.0 has _use_lfn() */ 83# define _use_lfn(f) ALWAYS_FALSE /* long file names never available */ 84#elif defined(__DJGPP__) 85# include <fcntl.h> /* _use_lfn(f) prototype */ 86#endif 87 88static const char *msdosify (const char *file_name); 89static char *rename_if_dos_device_name (char *file_name); 90 91/* 92 * sanitize_dos_name: returns a newly allocated string holding a 93 * valid file name which will be a transformation of given argument 94 * in case this wasn't already a valid file name. 95 * 96 * This function takes ownership of given argument, free'ing it before 97 * returning. Caller is responsible of free'ing returned string. Upon 98 * out of memory condition function returns NULL. 99 */ 100 101char *sanitize_dos_name(char *file_name) 102{ 103 char new_name[PATH_MAX]; 104 105 if(!file_name) 106 return NULL; 107 108 if(strlen(file_name) >= PATH_MAX) 109 file_name[PATH_MAX-1] = '\0'; /* truncate it */ 110 111 strcpy(new_name, msdosify(file_name)); 112 113 Curl_safefree(file_name); 114 115 return strdup(rename_if_dos_device_name(new_name)); 116} 117 118/* The following functions are taken with modification from the DJGPP 119 * port of tar 1.12. They use algorithms originally from DJTAR. */ 120 121static const char *msdosify (const char *file_name) 122{ 123 static char dos_name[PATH_MAX]; 124 static const char illegal_chars_dos[] = ".+, ;=[]" /* illegal in DOS */ 125 "|<>\\\":?*"; /* illegal in DOS & W95 */ 126 static const char *illegal_chars_w95 = &illegal_chars_dos[8]; 127 int idx, dot_idx; 128 const char *s = file_name; 129 char *d = dos_name; 130 const char *const dlimit = dos_name + sizeof(dos_name) - 1; 131 const char *illegal_aliens = illegal_chars_dos; 132 size_t len = sizeof(illegal_chars_dos) - 1; 133 134 /* Support for Windows 9X VFAT systems, when available. */ 135 if(_use_lfn(file_name)) { 136 illegal_aliens = illegal_chars_w95; 137 len -= (illegal_chars_w95 - illegal_chars_dos); 138 } 139 140 /* Get past the drive letter, if any. */ 141 if(s[0] >= 'A' && s[0] <= 'z' && s[1] == ':') { 142 *d++ = *s++; 143 *d++ = *s++; 144 } 145 146 for(idx = 0, dot_idx = -1; *s && d < dlimit; s++, d++) { 147 if(memchr(illegal_aliens, *s, len)) { 148 /* Dots are special: DOS doesn't allow them as the leading character, 149 and a file name cannot have more than a single dot. We leave the 150 first non-leading dot alone, unless it comes too close to the 151 beginning of the name: we want sh.lex.c to become sh_lex.c, not 152 sh.lex-c. */ 153 if(*s == '.') { 154 if(idx == 0 && (s[1] == '/' || (s[1] == '.' && s[2] == '/'))) { 155 /* Copy "./" and "../" verbatim. */ 156 *d++ = *s++; 157 if(*s == '.') 158 *d++ = *s++; 159 *d = *s; 160 } 161 else if(idx == 0) 162 *d = '_'; 163 else if(dot_idx >= 0) { 164 if(dot_idx < 5) { /* 5 is a heuristic ad-hoc'ery */ 165 d[dot_idx - idx] = '_'; /* replace previous dot */ 166 *d = '.'; 167 } 168 else 169 *d = '-'; 170 } 171 else 172 *d = '.'; 173 174 if(*s == '.') 175 dot_idx = idx; 176 } 177 else if(*s == '+' && s[1] == '+') { 178 if(idx - 2 == dot_idx) { /* .c++, .h++ etc. */ 179 *d++ = 'x'; 180 *d = 'x'; 181 } 182 else { 183 /* libg++ etc. */ 184 memcpy (d, "plus", 4); 185 d += 3; 186 } 187 s++; 188 idx++; 189 } 190 else 191 *d = '_'; 192 } 193 else 194 *d = *s; 195 if(*s == '/') { 196 idx = 0; 197 dot_idx = -1; 198 } 199 else 200 idx++; 201 } 202 203 *d = '\0'; 204 return dos_name; 205} 206 207static char *rename_if_dos_device_name (char *file_name) 208{ 209 /* We could have a file whose name is a device on MS-DOS. Trying to 210 * retrieve such a file would fail at best and wedge us at worst. We need 211 * to rename such files. */ 212 char *base; 213 struct_stat st_buf; 214 char fname[PATH_MAX]; 215 216 strncpy(fname, file_name, PATH_MAX-1); 217 fname[PATH_MAX-1] = '\0'; 218 base = basename(fname); 219 if(((stat(base, &st_buf)) == 0) && (S_ISCHR(st_buf.st_mode))) { 220 size_t blen = strlen(base); 221 222 if(strlen(fname) >= PATH_MAX-1) { 223 /* Make room for the '_' */ 224 blen--; 225 base[blen] = '\0'; 226 } 227 /* Prepend a '_'. */ 228 memmove(base + 1, base, blen + 1); 229 base[0] = '_'; 230 strcpy(file_name, fname); 231 } 232 return file_name; 233} 234 235#if defined(MSDOS) && (defined(__DJGPP__) || defined(__GO32__)) 236 237/* 238 * Disable program default argument globbing. We do it on our own. 239 */ 240char **__crt0_glob_function(char *arg) 241{ 242 (void)arg; 243 return (char**)0; 244} 245 246#endif /* MSDOS && (__DJGPP__ || __GO32__) */ 247 248#ifdef WIN32 249 250/* 251 * Function to find CACert bundle on a Win32 platform using SearchPath. 252 * (SearchPath is already declared via inclusions done in setup header file) 253 * (Use the ASCII version instead of the unicode one!) 254 * The order of the directories it searches is: 255 * 1. application's directory 256 * 2. current working directory 257 * 3. Windows System directory (e.g. C:\windows\system32) 258 * 4. Windows Directory (e.g. C:\windows) 259 * 5. all directories along %PATH% 260 * 261 * For WinXP and later search order actually depends on registry value: 262 * HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\SafeProcessSearchMode 263 */ 264 265CURLcode FindWin32CACert(struct OperationConfig *config, 266 const char *bundle_file) 267{ 268 CURLcode result = CURLE_OK; 269 270 /* search and set cert file only if libcurl supports SSL */ 271 if(curlinfo->features & CURL_VERSION_SSL) { 272 273 DWORD res_len; 274 DWORD buf_tchar_size = PATH_MAX + 1; 275 DWORD buf_bytes_size = sizeof(TCHAR) * buf_tchar_size; 276 char *ptr = NULL; 277 278 char *buf = malloc(buf_bytes_size); 279 if(!buf) 280 return CURLE_OUT_OF_MEMORY; 281 buf[0] = '\0'; 282 283 res_len = SearchPathA(NULL, bundle_file, NULL, buf_tchar_size, buf, &ptr); 284 if(res_len > 0) { 285 Curl_safefree(config->cacert); 286 config->cacert = strdup(buf); 287 if(!config->cacert) 288 result = CURLE_OUT_OF_MEMORY; 289 } 290 291 Curl_safefree(buf); 292 } 293 294 return result; 295} 296 297#endif /* WIN32 */ 298 299#endif /* MSDOS || WIN32 */ 300