luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

tilde.c, enable search for home dir under MS Windows

This commit is contained in:
h_vogt 2013-10-24 20:08:32 +02:00 committed by rlar
parent 51bbd8c4d4
commit 6480fabeaf
1 changed files with 20 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/misc/tilde.c
View File

@ -10,6 +10,11 @@ Modified: 2002 R. Oktas, <roktas@omu.edu.tr>
#include <pwd.h> #include <pwd.h>
#endif #endif
#if defined(__MINGW32__) || defined(_MSC_VER)
#undef BOOLEAN
#include <windows.h> /* win32 functions */
#include "Shlobj.h" /* SHGetFolderPath */
#endif
/* XXX To prevent a name collision with `readline's `tilde_expand', /* XXX To prevent a name collision with `readline's `tilde_expand',
the original name: `tilde_expand' has changed to `tildexpand'. This the original name: `tilde_expand' has changed to `tildexpand'. This
@ -28,6 +33,9 @@ tildexpand(char *string)
#ifdef HAVE_PWD_H #ifdef HAVE_PWD_H
char buf[BSIZE_SP]; char buf[BSIZE_SP];
char *k, c; char *k, c;
#endif
#if defined(__MINGW32__) || defined(_MSC_VER)
char buf2[BSIZE_SP];
#endif #endif
char *result = NULL; char *result = NULL;
@ -82,6 +90,18 @@ tildexpand(char *string)
/* Emulate the old behavior to prevent side effects. -- ro */ /* Emulate the old behavior to prevent side effects. -- ro */
return copy(string); return copy(string);
} }
#if defined(__MINGW32__) || defined(_MSC_VER)
else if(SUCCEEDED(SHGetFolderPath(NULL,
CSIDL_PERSONAL,
NULL,
0,
buf2)))
{
if (*string)
strcat(buf2, string);
return copy(buf2);
}
#endif
return NULL; return NULL;
#endif #endif
} }