src/os2.cpp
author orudge
Wed, 10 Jan 2007 19:39:54 +0000
changeset 5842 180c71b8fc14
parent 5835 e0ff603ae0b7
child 6298 c30fe89622df
child 6566 a780a47d6af3
child 9895 7bd07f43b0e3
permissions -rw-r--r--
(svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
2186
461a2aff3486 (svn r2701) Insert Id tags into all source files
tron
parents: 2180
diff changeset
     1
/* $Id$ */
461a2aff3486 (svn r2701) Insert Id tags into all source files
tron
parents: 2180
diff changeset
     2
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
     3
#include "stdafx.h"
1892
45894b95a925 (svn r2398) - CodeChange: forgot to update unix and os2 specific files as well.
Darkvater
parents: 1890
diff changeset
     4
#include "openttd.h"
2167
99d31f4eeb37 (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
     5
#include "variables.h"
1317
f382f1b439c7 (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
     6
#include "string.h"
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
     7
#include "table/strings.h"
1888
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
     8
#include "gfx.h"
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
     9
#include "gui.h"
2167
99d31f4eeb37 (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
    10
#include "functions.h"
99d31f4eeb37 (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
    11
#include "macros.h"
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    12
#include "fios.h"
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    13
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    14
#include <dirent.h>
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    15
#include <unistd.h>
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    16
#include <sys/stat.h>
1887
9f1af4f412d4 (svn r2393) - Implemented threaded saving for OS/2
orudge
parents: 1817
diff changeset
    17
#include <stdlib.h>
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    18
#include <time.h>
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    19
#ifndef __INNOTEK_LIBC__
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    20
	#include <dos.h>
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    21
#endif
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    22
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
    23
#define INCL_WIN
1524
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
    24
#define INCL_WINCLIPBOARD
810
7c51ba5a4368 (svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents: 801
diff changeset
    25
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    26
#include <os2.h>
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    27
#ifndef __INNOTEK_LIBC__
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    28
	#include <i86.h>
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    29
#endif
2167
99d31f4eeb37 (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
    30
4223
0f9535dda7ed (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
    31
bool FiosIsRoot(const char *file)
810
7c51ba5a4368 (svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents: 801
diff changeset
    32
{
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    33
	return file[3] == '\0';
810
7c51ba5a4368 (svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents: 801
diff changeset
    34
}
7c51ba5a4368 (svn r1281) -Fix: the OS/2 is now finished. Fixes:
truelight
parents: 801
diff changeset
    35
4221
bb06fe8dcce2 (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
    36
void FiosGetDrives(void)
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    37
{
4221
bb06fe8dcce2 (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
    38
	unsigned disk, disk2, save, total;
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    39
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    40
#ifndef __INNOTEK_LIBC__
4221
bb06fe8dcce2 (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
    41
	_dos_getdrive(&save); // save original drive
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    42
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    43
	save = _getdrive(); // save original drive
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    44
	total = 'z';
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    45
#endif
1486
6a31e3d7dfe3 (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
    46
4221
bb06fe8dcce2 (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
    47
	/* get an available drive letter */
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    48
#ifndef __INNOTEK_LIBC__
4221
bb06fe8dcce2 (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
	for (disk = 1;; disk++) {
bb06fe8dcce2 (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
    50
		_dos_setdrive(disk, &total);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    51
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    52
	for (disk = 'A';; disk++) {
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    53
		_chdrive(disk);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    54
#endif
4221
bb06fe8dcce2 (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
    55
		if (disk >= total) return;
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    56
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    57
#ifndef __INNOTEK_LIBC__
4221
bb06fe8dcce2 (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
    58
		_dos_getdrive(&disk2);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    59
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    60
		disk2 = _getdrive();
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    61
#endif
2099
22f535ad9eea (svn r2609) - Feature: remove extension from savegames/scenarios when browsing the folders.
Darkvater
parents: 1893
diff changeset
    62
4221
bb06fe8dcce2 (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
    63
		if (disk == disk2) {
bb06fe8dcce2 (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
    64
			FiosItem *fios = FiosAlloc();
bb06fe8dcce2 (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
			fios->type = FIOS_TYPE_DRIVE;
bb06fe8dcce2 (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
			fios->mtime = 0;
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    67
#ifndef __INNOTEK_LIBC__
4221
bb06fe8dcce2 (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
			snprintf(fios->name, lengthof(fios->name),  "%c:", 'A' + disk - 1);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    69
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    70
			snprintf(fios->name, lengthof(fios->name),  "%c:", disk);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    71
#endif
4221
bb06fe8dcce2 (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
    72
			ttd_strlcpy(fios->title, fios->name, lengthof(fios->title));
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    73
		}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    74
	}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    75
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    76
	/* Restore the original drive */
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    77
#ifndef __INNOTEK_LIBC__
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    78
	_dos_setdrive(save, &total);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    79
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    80
	_chdrive(save);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    81
#endif
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    82
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
    83
4222
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    84
bool FiosGetDiskFreeSpace(const char *path, uint32 *tot)
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    85
{
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    86
#ifndef __INNOTEK_LIBC__
4222
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    87
	struct diskfree_t free;
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    88
	char drive = path[0] - 'A' + 1;
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    89
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    90
	if (tot != NULL && _getdiskfree(drive, &free) == 0) {
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    91
		*tot = free.avail_clusters * free.sectors_per_cluster * free.bytes_per_sector;
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    92
		return true;
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    93
	}
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    94
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
    95
	return false;
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    96
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    97
	uint32 free = 0;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    98
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
    99
#ifdef HAS_STATVFS
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   100
	{
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   101
		struct statvfs s;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   102
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   103
		if (statvfs(path, &s) != 0) return false;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   104
		free = (uint64)s.f_frsize * s.f_bavail >> 20;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   105
	}
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   106
#endif
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   107
	if (tot != NULL) *tot = free;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   108
	return true;
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   109
#endif
4222
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
   110
}
951fbf19b1ad (svn r5766) - Cleanup: Unify FiosBrowseTo and FiosGetDescText
Darkvater
parents: 4221
diff changeset
   111
4221
bb06fe8dcce2 (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
   112
bool FiosIsValidFile(const char *path, const struct dirent *ent, struct stat *sb)
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   113
{
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   114
	char filename[MAX_PATH];
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   115
4221
bb06fe8dcce2 (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
   116
	snprintf(filename, lengthof(filename), "%s" PATHSEP "%s", path, ent->d_name);
bb06fe8dcce2 (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
   117
	if (stat(filename, sb) != 0) return false;
1486
6a31e3d7dfe3 (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
   118
4221
bb06fe8dcce2 (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
   119
	return (ent->d_name[0] != '.'); // hidden file
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   120
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   121
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   122
static void ChangeWorkingDirectory(char *exe)
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   123
{
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   124
	char *s = strrchr(exe, PATHSEPCHAR);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   125
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   126
	if (s != NULL) {
1486
6a31e3d7dfe3 (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
   127
		*s = '\0';
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   128
		chdir(exe);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   129
		*s = PATHSEPCHAR;
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   130
	}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   131
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   132
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   133
void ShowInfo(const unsigned char *str)
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   134
{
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   135
	HAB hab;
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   136
	HMQ hmq;
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   137
	ULONG rc;
915
013cb2d74800 (svn r1402) Trim trailing whitespace
tron
parents: 818
diff changeset
   138
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   139
	// init PM env.
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   140
	hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0);
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   141
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   142
	// display the box
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   143
	rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, str, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_INFORMATION);
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   144
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   145
	// terminate PM env.
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   146
	WinDestroyMsgQueue(hmq);
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   147
	WinTerminate(hab);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   148
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   149
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   150
void ShowOSErrorBox(const unsigned char *buf)
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   151
{
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   152
	HAB hab;
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   153
	HMQ hmq;
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   154
	ULONG rc;
915
013cb2d74800 (svn r1402) Trim trailing whitespace
tron
parents: 818
diff changeset
   155
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   156
	// init PM env.
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   157
	hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0);
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   158
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   159
	// display the box
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   160
	rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, buf, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_ERROR);
818
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   161
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   162
	// terminate PM env.
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   163
	WinDestroyMsgQueue(hmq);
906f21e653b2 (svn r1289) -Fix: Minor fix for OS/2 message boxes (orudge)
truelight
parents: 810
diff changeset
   164
	WinTerminate(hab);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   165
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   166
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   167
int CDECL main(int argc, char* argv[])
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   168
{
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   169
	// change the working directory to enable doubleclicking in UIs
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   170
	ChangeWorkingDirectory(argv[0]);
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   171
4369
02b9ab2cf501 (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
   172
	_random_seeds[1][1] = _random_seeds[1][0] = _random_seeds[0][1] = _random_seeds[0][0] = time(NULL);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   173
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   174
	return ttd_main(argc, argv);
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   175
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   176
1390
53a5713cf3f9 (svn r1894) - Codechange: cleaned up the console a bit, wholly unified handling of text with that of editboxes
Darkvater
parents: 1346
diff changeset
   177
void DeterminePaths(void)
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   178
{
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   179
	char *s;
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   180
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   181
	_paths.game_data_dir = (char *)malloc(MAX_PATH);
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   182
	ttd_strlcpy(_paths.game_data_dir, GAME_DATA_DIR, MAX_PATH);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   183
#if defined SECOND_DATA_DIR
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   184
	_paths.second_data_dir = malloc(MAX_PATH);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   185
	ttd_strlcpy(_paths.second_data_dir, SECOND_DATA_DIR, MAX_PATH);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   186
#endif
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   187
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   188
#if defined(USE_HOMEDIR)
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   189
	{
1486
6a31e3d7dfe3 (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
   190
		const char *homedir = getenv("HOME");
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   191
1486
6a31e3d7dfe3 (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
   192
		if (homedir == NULL) {
6a31e3d7dfe3 (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
   193
			const struct passwd *pw = getpwuid(getuid());
6a31e3d7dfe3 (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
   194
			if (pw != NULL) homedir = pw->pw_dir;
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   195
		}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   196
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   197
		_paths.personal_dir = str_fmt("%s" PATHSEP "%s", homedir, PERSONAL_DIR);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   198
	}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   199
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   200
#else /* not defined(USE_HOMEDIR) */
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   201
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   202
	_paths.personal_dir = (char *)malloc(MAX_PATH);
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   203
	ttd_strlcpy(_paths.personal_dir, PERSONAL_DIR, MAX_PATH);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   204
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   205
	// check if absolute or relative path
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   206
	s = strchr(_paths.personal_dir, PATHSEPCHAR);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   207
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   208
	// add absolute path
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   209
	if (s == NULL || _paths.personal_dir != s) {
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   210
		getcwd(_paths.personal_dir, MAX_PATH);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   211
		s = strchr(_paths.personal_dir, 0);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   212
		*s++ = PATHSEPCHAR;
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   213
		ttd_strlcpy(s, PERSONAL_DIR, MAX_PATH);
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   214
	}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   215
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   216
#endif /* defined(USE_HOMEDIR) */
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   217
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   218
	s = strchr(_paths.personal_dir, 0);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   219
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   220
	// append a / ?
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   221
	if (s[-1] != PATHSEPCHAR) strcpy(s, PATHSEP);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   222
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   223
	_paths.save_dir = str_fmt("%ssave", _paths.personal_dir);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   224
	_paths.autosave_dir = str_fmt("%s" PATHSEP "autosave", _paths.save_dir);
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   225
	_paths.scenario_dir = str_fmt("%sscenario", _paths.personal_dir);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   226
	_paths.heightmap_dir = str_fmt("%sscenario" PATHSEP "heightmap", _paths.personal_dir);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   227
	_paths.gm_dir = str_fmt("%sgm" PATHSEP, _paths.game_data_dir);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   228
	_paths.data_dir = str_fmt("%sdata" PATHSEP, _paths.game_data_dir);
1482
46a8146adecf (svn r1986) - Fix: free _config_file when shutting down openttd. Strange that Valgrind didn't catch this, kudos to TrueLight
Darkvater
parents: 1390
diff changeset
   229
46a8146adecf (svn r1986) - Fix: free _config_file when shutting down openttd. Strange that Valgrind didn't catch this, kudos to TrueLight
Darkvater
parents: 1390
diff changeset
   230
	if (_config_file == NULL)
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   231
		_config_file = str_fmt("%sopenttd.cfg", _paths.personal_dir);
915
013cb2d74800 (svn r1402) Trim trailing whitespace
tron
parents: 818
diff changeset
   232
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   233
	_highscore_file = str_fmt("%shs.dat", _paths.personal_dir);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   234
	_log_file = str_fmt("%sopenttd.log", _paths.personal_dir);
1486
6a31e3d7dfe3 (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
   235
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   236
#if defined CUSTOM_LANG_DIR
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   237
	// sets the search path for lng files to the custom one
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   238
	_paths.lang_dir = malloc( MAX_PATH );
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   239
	ttd_strlcpy( _paths.lang_dir, CUSTOM_LANG_DIR, MAX_PATH);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   240
#else
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   241
	_paths.lang_dir = str_fmt("%slang" PATHSEP, _paths.game_data_dir);
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   242
#endif
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   243
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   244
	// create necessary folders
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   245
#ifndef __INNOTEK_LIBC__
5296
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   246
	mkdir(_paths.personal_dir);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   247
	mkdir(_paths.save_dir);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   248
	mkdir(_paths.autosave_dir);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   249
	mkdir(_paths.scenario_dir);
6a4aaa66eed3 (svn r7449) -Codechange: Rename _path to _paths as it is technically more correct, but mainly because
Darkvater
parents: 5167
diff changeset
   250
	mkdir(_paths.heightmap_dir);
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   251
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   252
	mkdir(_paths.personal_dir, 0755);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   253
	mkdir(_paths.save_dir, 0755);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   254
	mkdir(_paths.autosave_dir, 0755);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   255
	mkdir(_paths.scenario_dir, 0755);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   256
	mkdir(_paths.heightmap_dir, 0755);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   257
#endif
801
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   258
}
bfa47ec110b0 (svn r1271) -Fix: set eol-style to native on missing files
darkvater
parents: 782
diff changeset
   259
1888
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   260
/**
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   261
 * Insert a chunk of text from the clipboard onto the textbuffer. Get TEXT clipboard
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   262
 * and append this up to the maximum length (either absolute or screenlength). If maxlength
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   263
 * is zero, we don't care about the screenlength but only about the physical length of the string
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   264
 * @param tb @Textbuf type to be changed
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   265
 * @return Return true on successfull change of Textbuf, or false otherwise
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   266
 */
1486
6a31e3d7dfe3 (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
   267
bool InsertTextBufferClipboard(Textbuf *tb)
6a31e3d7dfe3 (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
   268
{
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   269
/* XXX -- Currently no clipboard support implemented with GCC */
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   270
#ifndef __INNOTEK_LIBC__
1893
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   271
	HAB hab = 0;
1524
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
   272
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
   273
	if (WinOpenClipbrd(hab))
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
   274
	{
1893
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   275
		const char* text = (const char*)WinQueryClipbrdData(hab, CF_TEXT);
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   276
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   277
		if (text != NULL)
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   278
		{
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   279
			uint length = 0;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   280
			uint width = 0;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   281
			const char* i;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   282
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   283
			for (i = text; IsValidAsciiChar(*i); i++)
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   284
			{
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   285
				uint w;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   286
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   287
				if (tb->length + length >= tb->maxlength - 1) break;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   288
3800
6ea101b2464b (svn r4808) - Fix GetCharacterWidth() change in os2.c missed in r4802.
peter1138
parents: 3329
diff changeset
   289
				w = GetCharacterWidth(FS_NORMAL, (byte)*i);
1893
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   290
				if (tb->maxwidth != 0 && width + tb->width + w > tb->maxwidth) break;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   291
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   292
				width += w;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   293
				length++;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   294
			}
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   295
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   296
			memmove(tb->buf + tb->caretpos + length, tb->buf + tb->caretpos, tb->length - tb->caretpos + 1);
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   297
			memcpy(tb->buf + tb->caretpos, text, length);
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   298
			tb->width += width;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   299
			tb->caretxoffs += width;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   300
			tb->length += length;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   301
			tb->caretpos += length;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   302
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   303
			WinCloseClipbrd(hab);
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   304
			return true;
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   305
		}
1888
5f0398340e05 (svn r2394) - Completed clipboard functions for OS/2 port
orudge
parents: 1887
diff changeset
   306
1524
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
   307
		WinCloseClipbrd(hab);
85efc2f52e2c (svn r2028) Added detection of SVN version (rev.c generation) for OS/2, updated readme, initial clipboard support (orudge)
celestar
parents: 1508
diff changeset
   308
	}
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   309
#endif
1893
278bddd649be (svn r2399) - Fix: Update OS/2 project file with filename changes
orudge
parents: 1892
diff changeset
   310
	return false;
1486
6a31e3d7dfe3 (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
   311
}
1887
9f1af4f412d4 (svn r2393) - Implemented threaded saving for OS/2
orudge
parents: 1817
diff changeset
   312
2167
99d31f4eeb37 (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
   313
99d31f4eeb37 (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
   314
void CSleep(int milliseconds)
99d31f4eeb37 (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
   315
{
5842
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   316
#ifndef __INNOTEK_LIBC__
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   317
 	delay(milliseconds);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   318
#else
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   319
	usleep(milliseconds * 1000);
180c71b8fc14 (svn r8042) - Fix: OS/2 compilation with GCC (thanks to Paul Smedley and TrueBrain for their help)
orudge
parents: 5835
diff changeset
   320
#endif
2167
99d31f4eeb37 (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
   321
}
5167
2b9d61386688 (svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents: 4369
diff changeset
   322
2b9d61386688 (svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents: 4369
diff changeset
   323
const char *FS2OTTD(const char *name) {return name;}
2b9d61386688 (svn r7274) -Codechange [utf8]: Add input/output unicode support. This actually only changes win32
Darkvater
parents: 4369
diff changeset
   324
const char *OTTD2FS(const char *name) {return name;}