dwindows: dwcompat.c annotate

annotate dwcompat.c @ 3005:522ef24b0aba default tip

GTK4: Fix even more deprecation warnings in GTK 4.10 and later. Migrate to GtkAlertDialog for 4.10 from GtkMessageDialog. Still need to center the dialog or something.

author	bsmith@81767d24-ef19-dc11-ae90-00e081727c95
date	Wed, 20 Dec 2023 05:17:54 +0000
parents	cb984fab3a17
children

rev	line source
1909 cb5f9aa9aebb Added detection support for Windows 10. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1860 diff changeset	1 /* $Id$ */
1617 f8d1da63fb77 Add code to allow building DW.DLL as Unicode on Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1609 diff changeset	2 #undef UNICODE
f8d1da63fb77 Add code to allow building DW.DLL as Unicode on Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1609 diff changeset	3 #undef _UNICODE
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	4
1601 71e0a3ad07f7 Enable level 3 warnings in DEBUG mode with Visual C to show deprecation warnings. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1594 diff changeset	5 #ifdef __WIN32__
71e0a3ad07f7 Enable level 3 warnings in DEBUG mode with Visual C to show deprecation warnings. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1594 diff changeset	6 #include <direct.h>
71e0a3ad07f7 Enable level 3 warnings in DEBUG mode with Visual C to show deprecation warnings. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1594 diff changeset	7 #endif
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	8 #if defined(__OS2__) \|\| defined(__WIN32__)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	9 #include <share.h>
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	10 #endif
1839 22225eb286e5 Fixes for building with MINGW64 (specifically http://tdm-gcc.tdragon.net/). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1710 diff changeset	11 #define _DW_INTERNAL
1601 71e0a3ad07f7 Enable level 3 warnings in DEBUG mode with Visual C to show deprecation warnings. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1594 diff changeset	12 #include "dwcompat.h"
71e0a3ad07f7 Enable level 3 warnings in DEBUG mode with Visual C to show deprecation warnings. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1594 diff changeset	13 #include "dw.h"
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	14
2549 736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	15 #if defined(__UNIX__) \|\| defined(__MAC__) \|\| defined(__IOS__) \|\| defined(__ANDROID__)
2385 a126b04b9996 iOS: dwcompat now builds on iOS as well... Fixes for running dwtest. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2164 diff changeset	16 #if defined(__FreeBSD__) \|\| defined(__MAC__) \|\| defined(__IOS__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	17 #include <sys/param.h>
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	18 #include <sys/ucred.h>
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	19 #include <sys/mount.h>
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	20 #elif defined(__sun__)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	21 #include <sys/mnttab.h>
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	22 #include <sys/param.h>
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	23 #include <sys/mount.h>
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	24 #include <sys/statvfs.h>
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	25 #elif defined(__linux__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	26 #include <mntent.h>
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	27 #include <sys/vfs.h>
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	28 #endif
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	29 #endif
47 997e9ed670ef Fixes for box alignment problem on OS/2, crash in dw_bitmap_new() on unix bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 42 diff changeset	30 #include <time.h>
870 59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	31 #include <errno.h>
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	32
2549 736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	33 #if defined(__UNIX__) \|\| defined(__MAC__) \|\| defined(__IOS__) \|\| defined(__ANDROID__)
37 360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	34 void msleep(long period)
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	35 {
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	36 #ifdef __sun__
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	37 /* usleep() isn't threadsafe on Solaris */
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	38 struct timespec req;
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	39
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	40 req.tv_sec = 0;
870 59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	41 if(period >= 1000)
59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	42 {
59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	43 req.tv_sec = (int)(period / 1000);
59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	44 period -= (req.tv_sec * 1000);
59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	45 }
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	46 req.tv_nsec = period * 10000000;
870 59c4fac42fb5 Need to use tv_sec if tv_nsec exceeds one second on Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 697 diff changeset	47
37 360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	48 nanosleep(&req, NULL);
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	49 #else
1110 404b639f096b Minor typecast fixes for warnings reported by clang on Mac. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1109 diff changeset	50 usleep((int)(period * 1000));
37 360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	51 #endif
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	52 }
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	53 #endif
360bc6a5f1c9 Sync with latest Dynamic Windows code. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 36 diff changeset	54
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	55 int API makedir(char *path)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	56 {
2164 05dd5189099f Win: Fix some warnings reported with -W3 in Visual C. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1991 diff changeset	57 #if defined(__IBMC__) \|\| defined(__WATCOMC__) \|\| defined(__MINGW32__) \|\| defined(__MINGW64__)
1839 22225eb286e5 Fixes for building with MINGW64 (specifically http://tdm-gcc.tdragon.net/). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1710 diff changeset	58 return mkdir(path);
2164 05dd5189099f Win: Fix some warnings reported with -W3 in Visual C. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1991 diff changeset	59 #elif defined(_MSC_VER)
05dd5189099f Win: Fix some warnings reported with -W3 in Visual C. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1991 diff changeset	60 return _mkdir(path);
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	61 #else
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	62 return mkdir(path,S_IRWXU);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	63 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	64 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	65
580 d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	66 char * API vargs(char buf, int len, char format, ...)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	67 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	68 va_list args;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	69
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	70 va_start(args, format);
580 d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	71 #ifdef HAVE_VSNPRINTF
d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	72 vsnprintf(buf, len, format, args);
d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	73 #else
d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	74 len = len;
d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	75 vsprintf(buf, format, args);
d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	76 #endif
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	77 va_end(args);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	78
580 d7c338ac926a Sweeping changes to the compatibility module, moved all socket code out bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 557 diff changeset	79 return buf;
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	80 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	81
1860 02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	82 #ifdef __MINGW32__
02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	83 double API drivefree(int drive)
02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	84 #else
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	85 long double API drivefree(int drive)
1860 02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	86 #endif
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	87 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	88 #if defined(__EMX__) \|\| defined(__OS2__)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	89 ULONG aulFSInfoBuf[40] = {0};
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	90 APIRET rc = NO_ERROR;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	91
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	92 DosError(FERR_DISABLEHARDERR);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	93 rc = DosQueryFSInfo(drive,
35 432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	94 FSIL_ALLOC,
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	95 (PVOID)aulFSInfoBuf,
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	96 sizeof(aulFSInfoBuf));
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	97
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	98 DosError(FERR_ENABLEHARDERR);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	99 if (rc != NO_ERROR)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	100 return 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	101
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	102 return (long double)((double)aulFSInfoBuf[3] * (double)aulFSInfoBuf[1] * (double)aulFSInfoBuf[4]);
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	103 #elif defined(__WIN32__) \|\| defined(WINNT)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	104 char buffer[10] = "C:\\";
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	105 DWORD spc, bps, fc, tc;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	106
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	107 buffer[0] = drive + 'A' - 1;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	108
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	109 if(GetDiskFreeSpace(buffer, &spc, &bps, &fc, &tc) == 0)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	110 return 0;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	111
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	112 return (long double)((double)spc(double)bps(double)fc);
2385 a126b04b9996 iOS: dwcompat now builds on iOS as well... Fixes for running dwtest. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2164 diff changeset	113 #elif defined(__FreeBSD__) \|\| defined(__MAC__) \|\| defined(__IOS__)
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	114 int entries = getfsstat(NULL, 0, MNT_NOWAIT), index = 1;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	115
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	116 if(entries > 0)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	117 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	118 struct statfs fsp = alloca(sizeof(struct statfs) entries);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	119
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	120 entries = getfsstat(fsp, sizeof(struct statfs) * entries, MNT_NOWAIT);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	121
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	122 for(; entries-- > 0; fsp++)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	123 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	124 if(index == drive)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	125 return (long double)((double)fsp->f_bsize * (double)fsp->f_bavail);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	126 index++;
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	127 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	128 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	129 return 0;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	130 #elif defined(__sun__)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	131 FILE *fp = fopen("/etc/mnttab", "r");
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	132 struct mnttab mnt;
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	133 struct statvfs sfs;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	134 int index = 1;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	135
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	136 if(fp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	137 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	138 while((getmntent(fp, &mnt) == 0))
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	139 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	140 if(index == drive)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	141 {
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	142 long double size = 0;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	143
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	144 if(mnt.mnt_mountp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	145 {
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	146 if(!statvfs(mnt.mnt_mountp, &sfs))
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	147 {
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	148 size = (long double)((double)sfs.f_bsize * (double)sfs.f_bavail);
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	149 }
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	150 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	151 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	152 return size;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	153 }
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	154 index++;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	155 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	156 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	157 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	158 return 0;
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	159 #elif defined(__linux__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	160 FILE *fp = setmntent(MOUNTED, "r");
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	161 struct mntent mnt;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	162 struct statfs sfs;
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	163 char buffer[1024];
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	164 int index = 1;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	165
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	166 if(fp)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	167 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	168 while(getmntent_r(fp, &mnt, buffer, sizeof(buffer)))
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	169 {
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	170 if(index == drive)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	171 {
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	172 long double size = 0;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	173
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	174 if(mnt.mnt_dir)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	175 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	176 if(!statfs(mnt.mnt_dir, &sfs))
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	177 {
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	178 size = (long double)((double)sfs.f_bsize * (double)sfs.f_bavail);
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	179 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	180 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	181 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	182 return size;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	183 }
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	184 index++;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	185 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	186 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	187 }
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	188 return 0;
2549 736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	189 #else
736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	190 return 0;
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	191 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	192 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	193
1860 02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	194 #ifdef __MINGW32__
02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	195 double API drivesize(int drive)
02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	196 #else
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	197 long double API drivesize(int drive)
1860 02a23143334c Apparently Visual C's "long double" type is "double" for gcc... bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1839 diff changeset	198 #endif
35 432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	199 {
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	200 #if defined(__EMX__) \|\| defined(__OS2__)
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	201 ULONG aulFSInfoBuf[40] = {0};
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	202 APIRET rc = NO_ERROR;
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	203
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	204 DosError(FERR_DISABLEHARDERR);
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	205 rc = DosQueryFSInfo(drive,
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	206 FSIL_ALLOC,
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	207 (PVOID)aulFSInfoBuf,
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	208 sizeof(aulFSInfoBuf));
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	209
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	210 DosError(FERR_ENABLEHARDERR);
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	211 if (rc != NO_ERROR)
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	212 return 0;
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	213
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	214 return (long double)((double)aulFSInfoBuf[2] * (double)aulFSInfoBuf[1] * (double)aulFSInfoBuf[4]);
35 432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	215 #elif defined(__WIN32__) \|\| defined(WINNT)
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	216 char buffer[10] = "C:\\";
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	217 DWORD spc, bps, fc, tc;
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	218
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	219 buffer[0] = drive + 'A' - 1;
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	220
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	221 if(GetDiskFreeSpace(buffer, &spc, &bps, &fc, &tc) == 0)
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	222 return 0;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	223
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	224 return (long double)((double)spc(double)bps(double)tc);
2385 a126b04b9996 iOS: dwcompat now builds on iOS as well... Fixes for running dwtest. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2164 diff changeset	225 #elif defined(__FreeBSD__) \|\| defined(__MAC__) \|\| defined(__IOS__)
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	226 int entries = getfsstat(NULL, 0, MNT_NOWAIT), index = 1;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	227
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	228 if(entries > 0)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	229 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	230 struct statfs fsp = alloca(sizeof(struct statfs) entries);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	231
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	232 entries = getfsstat(fsp, sizeof(struct statfs) * entries, MNT_NOWAIT);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	233
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	234 for(; entries-- > 0; fsp++)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	235 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	236 if(index == drive)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	237 return (long double)((double)fsp->f_bsize * (double)fsp->f_blocks);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	238 index++;
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	239 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	240 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	241 return 0;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	242 #elif defined(__sun__)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	243 FILE *fp = fopen("/etc/mnttab", "r");
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	244 struct mnttab mnt;
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	245 struct statvfs sfs;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	246 int index = 1;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	247
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	248 if(fp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	249 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	250 while(getmntent(fp, &mnt) == 0)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	251 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	252 if(index == drive)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	253 {
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	254 long double size = 0;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	255
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	256 if(mnt.mnt_mountp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	257 {
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	258 if(!statvfs(mnt.mnt_mountp, &sfs))
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	259 {
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	260 size = (long double)((double)sfs.f_bsize * (double)sfs.f_blocks);
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	261 }
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	262 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	263 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	264 return size;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	265 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	266 index++;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	267 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	268 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	269 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	270 return 0;
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	271 #elif defined(__linux__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	272 FILE *fp = setmntent(MOUNTED, "r");
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	273 struct mntent mnt;
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	274 char buffer[1024];
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	275 struct statfs sfs;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	276 int index = 1;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	277
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	278 if(fp)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	279 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	280 while(getmntent_r(fp, &mnt, buffer, sizeof(buffer)))
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	281 {
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	282 if(index == drive)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	283 {
101 a5da1ac53b34 Use long double instead of long long for drivesize and drivefree. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 100 diff changeset	284 long double size = 0;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	285
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	286 if(mnt.mnt_dir)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	287 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	288 if(!statfs(mnt.mnt_dir, &sfs))
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	289 {
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	290 size = (long double)((double)sfs.f_bsize * (double)sfs.f_blocks);
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	291 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	292 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	293 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	294 return size;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	295 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	296 index++;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	297 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	298 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	299 }
35 432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	300 return 0;
2549 736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	301 #else
736282fddac5 Android: Get dwcompat building on Android. Had to disable the filesystem functions for now. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2385 diff changeset	302 return 0;
35 432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	303 #endif
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	304 }
432c39a4ff86 New code for checking drive size on OS/2 and Windows. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 22 diff changeset	305
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	306 int API isdrive(int drive)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	307 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	308 #if defined(__EMX__) \|\| defined(__OS2__)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	309 APIRET rc = NO_ERROR;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	310 FSINFO volinfo;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	311
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	312 DosError(FERR_DISABLEHARDERR);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	313 rc = DosQueryFSInfo(drive,
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	314 FSIL_VOLSER,
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	315 (PVOID)&volinfo,
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	316 sizeof(FSINFO));
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	317
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	318 DosError(FERR_ENABLEHARDERR);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	319 if (rc == NO_ERROR)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	320 return 1;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	321 #elif defined(__WIN32__) \|\| defined(WINNT)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	322 char buffer[10] = "C:\\", volname[100];
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	323 DWORD spc, bps, fc;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	324
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	325 buffer[0] = drive + 'A' - 1;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	326
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	327 if(GetVolumeInformation(buffer, volname, 100, &spc, &bps, &fc, NULL, 0) != 0)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	328 return 1;
2385 a126b04b9996 iOS: dwcompat now builds on iOS as well... Fixes for running dwtest. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2164 diff changeset	329 #elif defined(__FreeBSD__) \|\| defined(__MAC__) \|\| defined(__IOS__)
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	330 int entries = getfsstat(NULL, 0, MNT_NOWAIT), index = 1;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	331
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	332 if(entries > 0)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	333 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	334 struct statfs fsp = alloca(sizeof(struct statfs) entries);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	335
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	336 entries = getfsstat(fsp, sizeof(struct statfs) * entries, MNT_NOWAIT);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	337
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	338 for (; entries-- > 0; fsp++)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	339 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	340 if(index == drive && fsp->f_blocks)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	341 return 1;
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	342 index++;
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	343 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	344 }
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	345 #elif defined(__sun__)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	346 FILE *fp = fopen("/etc/mnttab", "r");
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	347 struct mnttab mnt;
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	348 struct statvfs sfs;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	349 int index = 1;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	350
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	351 if(fp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	352 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	353 while(getmntent(fp, &mnt) == 0)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	354 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	355 if(index == drive)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	356 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	357 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	358 if(mnt.mnt_mountp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	359 {
871 b15ad609365e Solaris recommends using statvfs() instead of statfs() bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 870 diff changeset	360 if(!statvfs(mnt.mnt_mountp, &sfs) && sfs.f_blocks)
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	361 return 1;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	362 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	363 return 0;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	364 }
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	365 index++;
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	366 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	367 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	368 }
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	369 #elif defined(__linux__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	370 FILE *fp = setmntent(MOUNTED, "r");
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	371 struct mntent mnt;
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	372 char buffer[1024];
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	373 struct statfs sfs;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	374 int index = 1;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	375
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	376 if(fp)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	377 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	378 while(getmntent_r(fp, &mnt, buffer, sizeof(buffer)))
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	379 {
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	380 if(index == drive)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	381 {
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	382 endmntent(fp);
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	383 if(mnt.mnt_dir)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	384 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	385 if(!statfs(mnt.mnt_dir, &sfs) && sfs.f_blocks)
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	386 {
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	387 return 1;
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	388 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	389 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	390 return 0;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	391 }
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	392 index++;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	393 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	394 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	395 }
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	396 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	397 return 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	398 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	399
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	400 void API getfsname(int drive, char *buf, int len)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	401 {
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	402 #if defined(__UNIX__) \|\| defined(__MAC__) \|\| defined(__IOS__) \|\| defined(__ANDROID__)
2385 a126b04b9996 iOS: dwcompat now builds on iOS as well... Fixes for running dwtest. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2164 diff changeset	403 #if defined(__FreeBSD__) \|\| defined(__MAC__) \|\| defined(__IOS__)
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	404 int entries = getfsstat(NULL, 0, MNT_NOWAIT), index = 1;
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	405
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	406 if(entries > 0)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	407 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	408 struct statfs fsp = alloca(sizeof(struct statfs) entries);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	409
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	410 entries = getfsstat(fsp, sizeof(struct statfs) * entries, MNT_NOWAIT);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	411
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	412 strncpy(buf, "Unknown", len);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	413
2645 cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	414 for(; entries-- > 0; fsp++)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	415 {
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	416 if(index == drive)
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	417 strncpy(buf, fsp->f_mntonname, len);
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	418 index++;
cb984fab3a17 Mac/iOS/FreeBSD: Rewrite the filesystem code using getfsstat(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2644 diff changeset	419 }
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	420 }
42 eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	421 #elif defined(__sun__)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	422 FILE *fp = fopen("/etc/mnttab", "r");
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	423 struct mnttab mnt;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	424 int index = 1;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	425
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	426 strncpy(buf, "Unknown", len);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	427
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	428 if(fp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	429 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	430 while(getmntent(fp, &mnt) == 0)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	431 {
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	432 if(index == drive && mnt.mnt_mountp)
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	433 strncpy(buf, mnt.mnt_mountp, len);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	434 index++;
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	435 }
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	436 fclose(fp);
eb003f77538c Added the filesystem functions for Solaris. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 37 diff changeset	437 }
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	438 #elif defined(__linux__)
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	439 FILE *fp = setmntent(MOUNTED, "r");
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	440 struct mntent mnt;
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	441 char buffer[1024];
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	442 int index = 1;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	443
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	444 strncpy(buf, "Unknown", len);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	445
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	446 if(fp)
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	447 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	448 while(getmntent_r(fp, &mnt, buffer, sizeof(buffer)))
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	449 {
649 3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	450 if(index == drive && mnt.mnt_dir)
3e2ada9ee0ac Switched to using reentrant version of getmntent on Linux. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 647 diff changeset	451 strncpy(buf, mnt.mnt_dir, len);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	452 index++;
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	453 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	454 endmntent(fp);
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	455 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	456 #endif
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	457 #else
1989 1dd49705bd1a Fix potential buffer overflow scenarios, reported by gcc fortify. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1909 diff changeset	458 snprintf(buf, len, "Drive %c", (char)drive + 'A' - 1);
36 cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	459 #endif
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	460 }
cddb02f847e1 Added unix versions of functions in compat, and added getfsname, plus bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 35 diff changeset	461
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	462 void API setfileinfo(char filename, char url, char *logfile)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	463 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	464 time_t ltime;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	465 struct tm *tm;
1989 1dd49705bd1a Fix potential buffer overflow scenarios, reported by gcc fortify. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1909 diff changeset	466 char buffer[250], timebuf[200];
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	467 #ifdef __OS2__
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	468 const unsigned fea2listsize = 6000;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	469 char *pData;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	470 EAOP2 eaop2;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	471 PFEA2 pFEA2;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	472 #else
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	473 FILE *urlfile;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	474 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	475
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	476 ltime = time(NULL);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	477
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	478 tm = localtime(&ltime);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	479
1989 1dd49705bd1a Fix potential buffer overflow scenarios, reported by gcc fortify. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1909 diff changeset	480 strftime(timebuf, sizeof(timebuf), "%c", tm);
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	481
1989 1dd49705bd1a Fix potential buffer overflow scenarios, reported by gcc fortify. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1909 diff changeset	482 snprintf(buffer, sizeof(buffer), "%s %s", url, timebuf);
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	483
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	484 #ifdef __OS2__
485 469ff8133ed3 Simplified the folder browser on OS/2, following some Unix changes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 441 diff changeset	485 logfile = logfile;
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	486 eaop2.fpGEA2List = 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	487 eaop2.fpFEA2List = (PFEA2LIST)malloc(fea2listsize);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	488 pFEA2 = &eaop2.fpFEA2List->list[0];
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	489
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	490 pFEA2->fEA = 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	491 /* .COMMENTS is 9 characters long */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	492 pFEA2->cbName = 9;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	493
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	494 /* space for the type and length field. */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	495 pFEA2->cbValue = strlen(buffer)+2*sizeof(USHORT);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	496
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	497 strcpy(pFEA2->szName, ".COMMENTS");
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	498 pData = pFEA2->szName+pFEA2->cbName+1;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	499 /* data begins at first byte after the name */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	500
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	501 (USHORT)pData = EAT_ASCII; /* type */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	502 ((USHORT)pData+1) = strlen(buffer); /* length */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	503 strcpy(pData+2sizeof(USHORT), buffer);/ content */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	504
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	505 pFEA2->oNextEntryOffset = 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	506
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	507 eaop2.fpFEA2List->cbList = ((PCHAR)pData+2*sizeof(USHORT)+
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	508 pFEA2->cbValue)-((PCHAR)eaop2.fpFEA2List);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	509
1341 184b3aedc2ff Added PMPrintf support to dw_debug() on OS/2. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1110 diff changeset	510 DosSetPathInfo((PSZ)filename,
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	511 FIL_QUERYEASIZE,
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	512 &eaop2,
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	513 sizeof(eaop2),
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	514 0);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	515
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	516 free((void *)eaop2.fpFEA2List);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	517 #else
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	518
53 8add9a616d0e Added a log filename parameter to setfileinfo(). bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 47 diff changeset	519 if((urlfile = fopen(logfile, "a"))!=NULL)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	520 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	521 fprintf(urlfile, "%s\n", buffer);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	522 fclose(urlfile);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	523 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	524 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	525 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	526
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	527 #if defined(__OS2__) \|\| defined(__WIN32__)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	528 typedef struct _fsinfo {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	529 FILE *fp;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	530 int fd;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	531 } FSInfo;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	532
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	533 FSInfo *FSIRoot = NULL;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	534
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	535 #define FSI_MAX 100
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	536 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	537
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	538 /* Sharable fopen() and fclose() calls. */
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	539 FILE * API fsopen(char path, char modes)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	540 {
172 0fc45e386376 Get Dynamic Windows building with Watcom. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 101 diff changeset	541 #if (defined(__OS2__) && !defined(__WATCOMC__)) \|\| defined(__WIN32__)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	542 int z;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	543
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	544 if(!FSIRoot)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	545 FSIRoot = calloc(sizeof(struct _fsinfo), FSI_MAX);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	546
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	547 for(z=0;z<FSI_MAX;z++)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	548 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	549 if(FSIRoot[z].fd < 1)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	550 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	551 int s, sopenmode = 0, wrmode = 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	552
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	553 /* Check the flags passed */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	554 for(s=0;s<3;s++)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	555 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	556 if(modes[s] == 'b')
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	557 sopenmode \|= O_BINARY;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	558 if(modes[s] == 'r')
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	559 wrmode \|= O_RDONLY;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	560 if(modes[s] == 'w')
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	561 wrmode \|= O_WRONLY;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	562 if(modes[s] == 'a')
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	563 sopenmode \|= O_APPEND;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	564 if(modes[s] == 't')
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	565 sopenmode \|= O_TEXT;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	566 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	567
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	568 /* Check the read/write request */
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	569 if((wrmode & O_RDONLY) && (wrmode & O_WRONLY))
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	570 sopenmode \|= O_RDWR;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	571 else
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	572 sopenmode \|= wrmode;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	573 FSIRoot[z].fd = _sopen(path, sopenmode, SH_DENYNO, S_IREAD\|S_IWRITE);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	574 if(FSIRoot[z].fd > 0)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	575 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	576 FSIRoot[z].fp = fdopen(FSIRoot[z].fd, modes);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	577
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	578 return FSIRoot[z].fp;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	579 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	580 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	581 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	582 return NULL;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	583 #else
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	584 return fopen(path, modes);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	585 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	586 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	587
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	588 int API fsclose(FILE *fp)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	589 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	590 #if defined(__OS2__) \|\| defined(__WIN32__)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	591 if(FSIRoot)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	592 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	593
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	594 int z;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	595 for(z=0;z<FSI_MAX;z++)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	596 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	597 if(fp == FSIRoot[z].fp)
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	598 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	599 int ret = fclose(fp);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	600 close(FSIRoot[z].fd);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	601 FSIRoot[z].fd = 0;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	602 FSIRoot[z].fp = NULL;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	603 return ret;
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	604 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	605 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	606 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	607 #endif
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	608 return fclose(fp);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	609 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	610
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	611 char * API fsgets(char str, int size, FILE stream)
3 67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	612 {
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	613 return fgets(str, size, stream);
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	614 }
67a643a734d9 Import ktk@81767d24-ef19-dc11-ae90-00e081727c95 parents: diff changeset	615
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	616 int API fsseek(FILE *stream, long offset, int whence)
22 6a246b3bb14f Added tree widgets, fixed some delete event processing, fixed a layout bug bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 3 diff changeset	617 {
6a246b3bb14f Added tree widgets, fixed some delete event processing, fixed a layout bug bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 3 diff changeset	618 return fseek(stream, offset, whence);
6a246b3bb14f Added tree widgets, fixed some delete event processing, fixed a layout bug bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 3 diff changeset	619 }
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	620
557 1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	621 void API nice_strformat(char *dest, long double val, int dec)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	622 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	623 char formatbuf[10];
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	624 char format = 0;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	625 double printval;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	626
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	627 /* 1024 ^ 3 = Gigabytes */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	628 if(val >= 1073741824L)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	629 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	630 printval = val/(1073741824L);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	631 format = 'G';
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	632 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	633 /* 1024 ^ 2 = Megabytes */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	634 else if(val >= 1048576)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	635 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	636 printval = val/(1048576);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	637 format = 'M';
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	638 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	639 /* 1024 = Kilobytes */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	640 else if(val > 1024)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	641 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	642 printval = val/1024;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	643 format = 'K';
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	644 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	645 else
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	646 printval = val;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	647
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	648 /* Generate the format string */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	649 sprintf(formatbuf, "%%.%df%c", dec, format);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	650 /* Create the pretty value */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	651 sprintf(dest, formatbuf, printval);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	652 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	653
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	654 /* Update the current working directory based on the
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	655 * path of the executable being executed.
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	656 */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	657 void API initdir(int argc, char *argv[])
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	658 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	659 if(argc > 0)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	660 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	661 char *tmpdir = strdup(argv[0]);
1110 404b639f096b Minor typecast fixes for warnings reported by clang on Mac. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1109 diff changeset	662 int z, len = (int)strlen(argv[0]);
557 1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	663
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	664 for(z=len;z > -1;z--)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	665 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	666 if(tmpdir[z] == '/')
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	667 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	668 tmpdir[z+1] = 0;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	669 setpath(tmpdir);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	670 free(tmpdir);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	671 return;
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	672 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	673 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	674 free(tmpdir);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	675 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	676 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	677
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	678 /*
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	679 * Sets the current directory (and drive) information.
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	680 * Parameters:
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	681 * path: A buffer containing the new path.
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	682 * Returns:
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	683 * -1 on error.
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	684 */
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	685 int API setpath(char *path)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	686 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	687 #if defined(__OS2__) \|\| defined(__WIN32__)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	688 if(strlen(path) > 2)
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	689 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	690 if(path[1] == ':')
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	691 {
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	692 char drive = toupper(path[0]);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	693 _chdrive((drive - 'A')+1);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	694 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	695 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	696 #endif
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	697 return chdir(path);
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	698 }
1a210e2f214b Added a bunch of support routines I now own due to the settlement bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 485 diff changeset	699
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	700 static int locale_number = -1, locale_count = 0;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	701 static char **locale_text = NULL;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	702
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	703 void _dwcompat_free_locale(void)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	704 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	705 if(locale_text)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	706 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	707 int z;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	708
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	709 for(z=0;z<locale_count;z++)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	710 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	711 if(locale_text[z])
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	712 free(locale_text[z]);
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	713 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	714 free(locale_text);
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	715 locale_text = NULL;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	716 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	717 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	718
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	719 int _dwcompat_stripcrlf(char *buf)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	720 {
1110 404b639f096b Minor typecast fixes for warnings reported by clang on Mac. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1109 diff changeset	721 int z, len = (int)strlen(buf);
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	722
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	723 for(z=0;z<len;z++)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	724 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	725 if(buf[z] == '\r' \|\| buf[z] == '\n')
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	726 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	727 buf[z] = 0;
1109 1c24949cf853 Fixed a configure warning about datarootdir. (Just ignoring it for now) bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 872 diff changeset	728 return 1;
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	729 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	730 }
1109 1c24949cf853 Fixed a configure warning about datarootdir. (Just ignoring it for now) bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 872 diff changeset	731 return 1;
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	732 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	733
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	734 /* Initialize the locale engine
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	735 * Returns: TRUE on success, FALSE on failure.
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	736 */
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	737 int API locale_init(char *filename, int my_locale)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	738 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	739 FILE *fp = fopen(filename, FOPEN_READ_TEXT);
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	740 static char text[1025];
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	741 int count = 0;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	742
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	743 _dwcompat_free_locale();
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	744
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	745 if(fp)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	746 {
1109 1c24949cf853 Fixed a configure warning about datarootdir. (Just ignoring it for now) bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 872 diff changeset	747 if(fgets(text, 1024, fp) && strncasecmp(text, "MESSAGES=", 9) == 0 && (count = atoi(&text[9])) > 0)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	748 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	749 int current = -1;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	750
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	751 locale_text = calloc(count, sizeof(char *));
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	752
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	753 while(!feof(fp))
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	754 {
2644 45a6b33a003a Linux: Isolate linux/android specific code in #ifdef __linux__ bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 2549 diff changeset	755 if(fgets(text, 1024, fp) && _dwcompat_stripcrlf(text) &&
1109 1c24949cf853 Fixed a configure warning about datarootdir. (Just ignoring it for now) bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 872 diff changeset	756 strncasecmp(text, "LOCALE=", 7) == 0)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	757 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	758 if(current > -1)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	759 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	760 fclose(fp);
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	761 locale_count = count;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	762 locale_number = my_locale;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	763 return 1;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	764 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	765 if(atoi(&text[7]) == my_locale)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	766 current = 0;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	767 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	768 else if(current > -1 && current < count)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	769 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	770 /* Use defaults on blank lines */
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	771 if(text[0])
73 2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	772 {
1110 404b639f096b Minor typecast fixes for warnings reported by clang on Mac. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 1109 diff changeset	773 int x = 0, z, len = (int)strlen(text);
73 2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	774
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	775 locale_text[current] = calloc(1, len + 1);
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	776
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	777 for(z=0;z<len;z++)
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	778 {
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	779 if(text[z] == '\\' && (text[z+1] == 'r' \|\| text[z+1] == 'n'
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	780 \|\| text[z+1] == '\"' \|\| text[z+1] == '\''))
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	781 {
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	782 switch(text[z+1])
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	783 {
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	784 case 'r':
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	785 locale_text[current][x] = '\r';
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	786 break;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	787 case 'n':
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	788 locale_text[current][x] = '\n';
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	789 break;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	790 case '\"':
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	791 locale_text[current][x] = '\"';
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	792 break;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	793 case '\'':
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	794 locale_text[current][x] = '\'';
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	795 break;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	796 }
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	797 x++;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	798 z++;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	799 }
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	800 else
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	801 {
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	802 locale_text[current][x] = text[z];
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	803 x++;
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	804 }
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	805 }
2f339dd13496 Added C/C++ style escape sequence processing. And fixed a couple OS/2 and bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 72 diff changeset	806 }
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	807 current++;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	808 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	809 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	810 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	811 fclose(fp);
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	812 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	813 if(locale_text && count)
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	814 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	815 locale_count = count;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	816 locale_number = my_locale;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	817 return 1;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	818 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	819 return 0;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	820 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	821
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	822 /* Retrieve a localized string if available */
176 4e3407df0e38 Specify calling convention for compat functions. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 172 diff changeset	823 char * API locale_string(char *default_text, int message)
72 ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	824 {
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	825 if(locale_number > -1 && message < locale_count && message > -1 && locale_text[message])
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	826 return locale_text[message];
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	827 return default_text;
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	828 }
ab77a22a2a36 Added localization APIs as well as some miscellaneous bug fixes. bsmith@81767d24-ef19-dc11-ae90-00e081727c95 parents: 62 diff changeset	829

Mercurial > dwindows

annotate dwcompat.c @ 3005:522ef24b0aba default tip