author | KUDr |
Fri, 20 Apr 2007 19:43:06 +0000 | |
changeset 6513 | 454347ca3dfb |
parent 6492 | 286a52449b54 |
child 7045 | 5d5306f074db |
permissions | -rw-r--r-- |
2186 | 1 |
/* $Id$ */ |
2 |
||
6351
8d0b6cce8d6d
(svn r9390) -Documentation : correct Doxygen of comments and @file inclusion. This time, brought to you by the letter O
belugas
parents:
6318
diff
changeset
|
3 |
/** @file os2.cpp */ |
8d0b6cce8d6d
(svn r9390) -Documentation : correct Doxygen of comments and @file inclusion. This time, brought to you by the letter O
belugas
parents:
6318
diff
changeset
|
4 |
|
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
5 |
#include "stdafx.h" |
1892
8717d92b32b1
(svn r2398) - CodeChange: forgot to update unix and os2 specific files as well.
Darkvater
parents:
1890
diff
changeset
|
6 |
#include "openttd.h" |
2167
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
7 |
#include "variables.h" |
1317
3c90086ff34f
(svn r1821) Move generic string handling functions to string.[ch] and introduce stre{cpy,cat}, see string.h for their semantics
tron
parents:
1301
diff
changeset
|
8 |
#include "string.h" |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
9 |
#include "table/strings.h" |
1888
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
10 |
#include "gfx.h" |
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
11 |
#include "gui.h" |
2167
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
12 |
#include "functions.h" |
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
13 |
#include "macros.h" |
6298
01c80746f308
(svn r9129) -Codechange: unify parts of DeterminePaths.
rubidium
parents:
6247
diff
changeset
|
14 |
#include "fileio.h" |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
15 |
|
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
16 |
#include <dirent.h> |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
17 |
#include <unistd.h> |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
18 |
#include <sys/stat.h> |
1887 | 19 |
#include <stdlib.h> |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
20 |
#include <time.h> |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
21 |
#ifndef __INNOTEK_LIBC__ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
22 |
#include <dos.h> |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
23 |
#endif |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
24 |
|
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
25 |
#define INCL_WIN |
1524
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
26 |
#define INCL_WINCLIPBOARD |
810
a1494b19bd2a
(svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents:
801
diff
changeset
|
27 |
|
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
28 |
#include <os2.h> |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
29 |
#ifndef __INNOTEK_LIBC__ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
30 |
#include <i86.h> |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
31 |
#endif |
2167
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
32 |
|
4223
d4c9ef555f43
(svn r5767) - Cleanup: Improve upon the header file mess regarding fios. Move all relevant types from hal.h into fios.h, eliminate the unneccessary passing of a global variable, and extern variables in header files (declare in fios.c and misc_gui.c
Darkvater
parents:
4222
diff
changeset
|
33 |
bool FiosIsRoot(const char *file) |
810
a1494b19bd2a
(svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents:
801
diff
changeset
|
34 |
{ |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
35 |
return file[3] == '\0'; |
810
a1494b19bd2a
(svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents:
801
diff
changeset
|
36 |
} |
a1494b19bd2a
(svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents:
801
diff
changeset
|
37 |
|
6247 | 38 |
void FiosGetDrives() |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
39 |
{ |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
40 |
unsigned disk, disk2, save, total; |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
41 |
|
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
42 |
#ifndef __INNOTEK_LIBC__ |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
43 |
_dos_getdrive(&save); // save original drive |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
44 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
45 |
save = _getdrive(); // save original drive |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
46 |
total = 'z'; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
47 |
#endif |
1486
647d3a2be4fe
(svn r1990) Reduce the diff between the OS specific files with respect to file handling and fix some inconsitencies (I hope I didn't break the OS/2 part, couldn't test it, feedback is welcome)
tron
parents:
1482
diff
changeset
|
48 |
|
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
49 |
/* get an available drive letter */ |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
50 |
#ifndef __INNOTEK_LIBC__ |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
51 |
for (disk = 1;; disk++) { |
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
52 |
_dos_setdrive(disk, &total); |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
53 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
54 |
for (disk = 'A';; disk++) { |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
55 |
_chdrive(disk); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
56 |
#endif |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
57 |
if (disk >= total) return; |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
58 |
|
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
59 |
#ifndef __INNOTEK_LIBC__ |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
60 |
_dos_getdrive(&disk2); |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
61 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
62 |
disk2 = _getdrive(); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
63 |
#endif |
2099
02c5a49863e9
(svn r2609) - Feature: remove extension from savegames/scenarios when browsing the folders.
Darkvater
parents:
1893
diff
changeset
|
64 |
|
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
65 |
if (disk == disk2) { |
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
66 |
FiosItem *fios = FiosAlloc(); |
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
67 |
fios->type = FIOS_TYPE_DRIVE; |
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
68 |
fios->mtime = 0; |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
69 |
#ifndef __INNOTEK_LIBC__ |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
70 |
snprintf(fios->name, lengthof(fios->name), "%c:", 'A' + disk - 1); |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
71 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
72 |
snprintf(fios->name, lengthof(fios->name), "%c:", disk); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
73 |
#endif |
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
74 |
ttd_strlcpy(fios->title, fios->name, lengthof(fios->title)); |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
75 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
76 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
77 |
|
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
78 |
/* Restore the original drive */ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
79 |
#ifndef __INNOTEK_LIBC__ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
80 |
_dos_setdrive(save, &total); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
81 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
82 |
_chdrive(save); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
83 |
#endif |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
84 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
85 |
|
4222
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
86 |
bool FiosGetDiskFreeSpace(const char *path, uint32 *tot) |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
87 |
{ |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
88 |
#ifndef __INNOTEK_LIBC__ |
4222
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
89 |
struct diskfree_t free; |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
90 |
char drive = path[0] - 'A' + 1; |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
91 |
|
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
92 |
if (tot != NULL && _getdiskfree(drive, &free) == 0) { |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
93 |
*tot = free.avail_clusters * free.sectors_per_cluster * free.bytes_per_sector; |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
94 |
return true; |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
95 |
} |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
96 |
|
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
97 |
return false; |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
98 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
99 |
uint32 free = 0; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
100 |
|
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
101 |
#ifdef HAS_STATVFS |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
102 |
{ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
103 |
struct statvfs s; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
104 |
|
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
105 |
if (statvfs(path, &s) != 0) return false; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
106 |
free = (uint64)s.f_frsize * s.f_bavail >> 20; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
107 |
} |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
108 |
#endif |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
109 |
if (tot != NULL) *tot = free; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
110 |
return true; |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
111 |
#endif |
4222
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
112 |
} |
36e9bd216011
(svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents:
4221
diff
changeset
|
113 |
|
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
114 |
bool FiosIsValidFile(const char *path, const struct dirent *ent, struct stat *sb) |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
115 |
{ |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
116 |
char filename[MAX_PATH]; |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
117 |
|
4221
ff4a040f30c6
(svn r5765) - Codechange: Fully unify the OS-specific FiosGet...List functions into fios.c, as well as FiosGetSavegameList and FiosGetScenarioList functions with the help of some callbacks.
Darkvater
parents:
4220
diff
changeset
|
118 |
snprintf(filename, lengthof(filename), "%s" PATHSEP "%s", path, ent->d_name); |
6240
9d9874ef9f0b
(svn r9043) -Fix [FS#652]: the personal (.openttd) directories were hidden in the load/save directory listings (stepancheg).
rubidium
parents:
5591
diff
changeset
|
119 |
return stat(filename, sb) == 0; |
9d9874ef9f0b
(svn r9043) -Fix [FS#652]: the personal (.openttd) directories were hidden in the load/save directory listings (stepancheg).
rubidium
parents:
5591
diff
changeset
|
120 |
} |
1486
647d3a2be4fe
(svn r1990) Reduce the diff between the OS specific files with respect to file handling and fix some inconsitencies (I hope I didn't break the OS/2 part, couldn't test it, feedback is welcome)
tron
parents:
1482
diff
changeset
|
121 |
|
6240
9d9874ef9f0b
(svn r9043) -Fix [FS#652]: the personal (.openttd) directories were hidden in the load/save directory listings (stepancheg).
rubidium
parents:
5591
diff
changeset
|
122 |
bool FiosIsHiddenFile(const struct dirent *ent) |
9d9874ef9f0b
(svn r9043) -Fix [FS#652]: the personal (.openttd) directories were hidden in the load/save directory listings (stepancheg).
rubidium
parents:
5591
diff
changeset
|
123 |
{ |
9d9874ef9f0b
(svn r9043) -Fix [FS#652]: the personal (.openttd) directories were hidden in the load/save directory listings (stepancheg).
rubidium
parents:
5591
diff
changeset
|
124 |
return ent->d_name[0] == '.'; |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
125 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
126 |
|
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
127 |
void ShowInfo(const unsigned char *str) |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
128 |
{ |
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
129 |
HAB hab; |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
130 |
HMQ hmq; |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
131 |
ULONG rc; |
915 | 132 |
|
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
133 |
// init PM env. |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
134 |
hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0); |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
135 |
|
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
136 |
// display the box |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
137 |
rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, str, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_INFORMATION); |
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
138 |
|
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
139 |
// terminate PM env. |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
140 |
WinDestroyMsgQueue(hmq); |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
141 |
WinTerminate(hab); |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
142 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
143 |
|
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
144 |
void ShowOSErrorBox(const unsigned char *buf) |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
145 |
{ |
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
146 |
HAB hab; |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
147 |
HMQ hmq; |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
148 |
ULONG rc; |
915 | 149 |
|
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
150 |
// init PM env. |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
151 |
hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0); |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
152 |
|
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
153 |
// display the box |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
154 |
rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, buf, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_ERROR); |
818
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
155 |
|
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
156 |
// terminate PM env. |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
157 |
WinDestroyMsgQueue(hmq); |
546a7894f312
(svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents:
810
diff
changeset
|
158 |
WinTerminate(hab); |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
159 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
160 |
|
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
161 |
int CDECL main(int argc, char* argv[]) |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
162 |
{ |
4369
3812b4335df9
(svn r6086) -Fix: InteractiveRandom was not seeded properly resulting in the dedicated server always generating the same map. Thanks to the #openttdcoop team for detecting.
rubidium
parents:
4300
diff
changeset
|
163 |
_random_seeds[1][1] = _random_seeds[1][0] = _random_seeds[0][1] = _random_seeds[0][0] = time(NULL); |
801
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
164 |
|
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
165 |
return ttd_main(argc, argv); |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
166 |
} |
7b6cb481359c
(svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents:
782
diff
changeset
|
167 |
|
1888
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
168 |
/** |
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
169 |
* Insert a chunk of text from the clipboard onto the textbuffer. Get TEXT clipboard |
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
170 |
* and append this up to the maximum length (either absolute or screenlength). If maxlength |
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
171 |
* is zero, we don't care about the screenlength but only about the physical length of the string |
6483
ae78fc3c6b20
(svn r9664) -Documentation: Doxygen corrections,errors and omissions
belugas
parents:
6351
diff
changeset
|
172 |
* @param tb Textbuf type to be changed |
1888
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
173 |
* @return Return true on successfull change of Textbuf, or false otherwise |
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
174 |
*/ |
1486
647d3a2be4fe
(svn r1990) Reduce the diff between the OS specific files with respect to file handling and fix some inconsitencies (I hope I didn't break the OS/2 part, couldn't test it, feedback is welcome)
tron
parents:
1482
diff
changeset
|
175 |
bool InsertTextBufferClipboard(Textbuf *tb) |
647d3a2be4fe
(svn r1990) Reduce the diff between the OS specific files with respect to file handling and fix some inconsitencies (I hope I didn't break the OS/2 part, couldn't test it, feedback is welcome)
tron
parents:
1482
diff
changeset
|
176 |
{ |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
177 |
/* XXX -- Currently no clipboard support implemented with GCC */ |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
178 |
#ifndef __INNOTEK_LIBC__ |
1893
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
179 |
HAB hab = 0; |
1524
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
180 |
|
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
181 |
if (WinOpenClipbrd(hab)) |
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
182 |
{ |
1893
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
183 |
const char* text = (const char*)WinQueryClipbrdData(hab, CF_TEXT); |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
184 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
185 |
if (text != NULL) |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
186 |
{ |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
187 |
uint length = 0; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
188 |
uint width = 0; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
189 |
const char* i; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
190 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
191 |
for (i = text; IsValidAsciiChar(*i); i++) |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
192 |
{ |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
193 |
uint w; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
194 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
195 |
if (tb->length + length >= tb->maxlength - 1) break; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
196 |
|
3800
75a58f751bfe
(svn r4808) - Fix GetCharacterWidth() change in os2.c missed in r4802.
peter1138
parents:
3329
diff
changeset
|
197 |
w = GetCharacterWidth(FS_NORMAL, (byte)*i); |
1893
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
198 |
if (tb->maxwidth != 0 && width + tb->width + w > tb->maxwidth) break; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
199 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
200 |
width += w; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
201 |
length++; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
202 |
} |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
203 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
204 |
memmove(tb->buf + tb->caretpos + length, tb->buf + tb->caretpos, tb->length - tb->caretpos + 1); |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
205 |
memcpy(tb->buf + tb->caretpos, text, length); |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
206 |
tb->width += width; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
207 |
tb->caretxoffs += width; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
208 |
tb->length += length; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
209 |
tb->caretpos += length; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
210 |
|
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
211 |
WinCloseClipbrd(hab); |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
212 |
return true; |
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
213 |
} |
1888
dac7806032f8
(svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents:
1887
diff
changeset
|
214 |
|
1524
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
215 |
WinCloseClipbrd(hab); |
d5cb3a8cfddc
(svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents:
1508
diff
changeset
|
216 |
} |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
217 |
#endif |
1893
99e4c49938af
(svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents:
1892
diff
changeset
|
218 |
return false; |
1486
647d3a2be4fe
(svn r1990) Reduce the diff between the OS specific files with respect to file handling and fix some inconsitencies (I hope I didn't break the OS/2 part, couldn't test it, feedback is welcome)
tron
parents:
1482
diff
changeset
|
219 |
} |
1887 | 220 |
|
2167
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
221 |
|
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
222 |
void CSleep(int milliseconds) |
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
223 |
{ |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
224 |
#ifndef __INNOTEK_LIBC__ |
6492
286a52449b54
(svn r9673) -Cleanup: remove spaces before tabs and replace non-indenting tabs with spaces.
rubidium
parents:
6483
diff
changeset
|
225 |
delay(milliseconds); |
5591
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
226 |
#else |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
227 |
usleep(milliseconds * 1000); |
51e4c59c31dd
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents:
5584
diff
changeset
|
228 |
#endif |
2167
5686131337a4
(svn r2681) - Fix OS/2 port, please do not modify openttd.wpj/tgt by hand unless you know what you're doing!
orudge
parents:
2099
diff
changeset
|
229 |
} |
5167
12c46fb7eccf
(svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents:
4369
diff
changeset
|
230 |
|
12c46fb7eccf
(svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents:
4369
diff
changeset
|
231 |
const char *FS2OTTD(const char *name) {return name;} |
12c46fb7eccf
(svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents:
4369
diff
changeset
|
232 |
const char *OTTD2FS(const char *name) {return name;} |