tron@2186: /* $Id$ */
tron@2186: 
belugas@6677: /** @file os2.cpp */
belugas@6677: 
darkvater@801: #include "stdafx.h"
Darkvater@1892: #include "openttd.h"
orudge@2167: #include "variables.h"
orudge@1888: #include "gui.h"
rubidium@6624: #include "fileio.h"
orudge@7541: #include "fios.h" // opendir/readdir/closedir
rubidium@8627: #include "functions.h"
rubidium@8627: #include "core/random_func.hpp"
orudge@8746: #include "string_func.h"
orudge@8746: #include "textbuf_gui.h"
darkvater@801: 
rubidium@8760: #include "table/strings.h"
rubidium@8760: 
orudge@5842: #include <dirent.h>
darkvater@801: #include <unistd.h>
darkvater@801: #include <sys/stat.h>
orudge@1887: #include <stdlib.h>
darkvater@801: #include <time.h>
orudge@5842: #ifndef __INNOTEK_LIBC__
orudge@5842: 	#include <dos.h>
orudge@5842: #endif
darkvater@801: 
truelight@818: #define INCL_WIN
celestar@1524: #define INCL_WINCLIPBOARD
truelight@810: 
darkvater@801: #include <os2.h>
orudge@5842: #ifndef __INNOTEK_LIBC__
orudge@5842: 	#include <i86.h>
orudge@5842: #endif
orudge@2167: 
Darkvater@4223: bool FiosIsRoot(const char *file)
truelight@810: {
orudge@5842: 	return file[3] == '\0';
truelight@810: }
truelight@810: 
rubidium@6573: void FiosGetDrives()
darkvater@801: {
Darkvater@4221: 	unsigned disk, disk2, save, total;
darkvater@801: 
orudge@5842: #ifndef __INNOTEK_LIBC__
Darkvater@4221: 	_dos_getdrive(&save); // save original drive
orudge@5842: #else
orudge@5842: 	save = _getdrive(); // save original drive
orudge@7798: 	char wd[MAX_PATH];
orudge@7798: 	getcwd(wd, MAX_PATH);
orudge@5842: 	total = 'z';
orudge@5842: #endif
tron@1486: 
Darkvater@4221: 	/* get an available drive letter */
orudge@5842: #ifndef __INNOTEK_LIBC__
Darkvater@4221: 	for (disk = 1;; disk++) {
Darkvater@4221: 		_dos_setdrive(disk, &total);
orudge@5842: #else
orudge@5842: 	for (disk = 'A';; disk++) {
orudge@5842: 		_chdrive(disk);
orudge@5842: #endif
orudge@7798: 		if (disk >= total)  break;
orudge@5842: 
orudge@5842: #ifndef __INNOTEK_LIBC__
Darkvater@4221: 		_dos_getdrive(&disk2);
orudge@5842: #else
orudge@5842: 		disk2 = _getdrive();
orudge@5842: #endif
Darkvater@2099: 
Darkvater@4221: 		if (disk == disk2) {
Darkvater@4221: 			FiosItem *fios = FiosAlloc();
Darkvater@4221: 			fios->type = FIOS_TYPE_DRIVE;
Darkvater@4221: 			fios->mtime = 0;
orudge@5842: #ifndef __INNOTEK_LIBC__
Darkvater@4221: 			snprintf(fios->name, lengthof(fios->name),  "%c:", 'A' + disk - 1);
orudge@5842: #else
orudge@5842: 			snprintf(fios->name, lengthof(fios->name),  "%c:", disk);
orudge@5842: #endif
Darkvater@4221: 			ttd_strlcpy(fios->title, fios->name, lengthof(fios->title));
darkvater@801: 		}
darkvater@801: 	}
darkvater@801: 
orudge@5842: 	/* Restore the original drive */
orudge@5842: #ifndef __INNOTEK_LIBC__
orudge@5842: 	_dos_setdrive(save, &total);
orudge@5842: #else
orudge@7798: 	chdir(wd);
orudge@5842: #endif
darkvater@801: }
darkvater@801: 
Darkvater@4222: bool FiosGetDiskFreeSpace(const char *path, uint32 *tot)
Darkvater@4222: {
orudge@5842: #ifndef __INNOTEK_LIBC__
Darkvater@4222: 	struct diskfree_t free;
Darkvater@4222: 	char drive = path[0] - 'A' + 1;
Darkvater@4222: 
Darkvater@4222: 	if (tot != NULL && _getdiskfree(drive, &free) == 0) {
Darkvater@4222: 		*tot = free.avail_clusters * free.sectors_per_cluster * free.bytes_per_sector;
Darkvater@4222: 		return true;
Darkvater@4222: 	}
Darkvater@4222: 
Darkvater@4222: 	return false;
orudge@5842: #else
orudge@5842: 	uint32 free = 0;
orudge@5842: 
orudge@5842: #ifdef HAS_STATVFS
orudge@5842: 	{
orudge@5842: 		struct statvfs s;
orudge@5842: 
orudge@5842: 		if (statvfs(path, &s) != 0) return false;
orudge@5842: 		free = (uint64)s.f_frsize * s.f_bavail >> 20;
orudge@5842: 	}
orudge@5842: #endif
orudge@5842: 	if (tot != NULL) *tot = free;
orudge@5842: 	return true;
orudge@5842: #endif
Darkvater@4222: }
Darkvater@4222: 
Darkvater@4221: bool FiosIsValidFile(const char *path, const struct dirent *ent, struct stat *sb)
darkvater@801: {
darkvater@801: 	char filename[MAX_PATH];
darkvater@801: 
Darkvater@4221: 	snprintf(filename, lengthof(filename), "%s" PATHSEP "%s", path, ent->d_name);
rubidium@6566: 	return stat(filename, sb) == 0;
rubidium@6566: }
tron@1486: 
rubidium@6566: bool FiosIsHiddenFile(const struct dirent *ent)
rubidium@6566: {
rubidium@6566: 	return ent->d_name[0] == '.';
darkvater@801: }
darkvater@801: 
orudge@7541: void ShowInfo(const char *str)
darkvater@801: {
truelight@818: 	HAB hab;
truelight@818: 	HMQ hmq;
truelight@818: 	ULONG rc;
tron@915: 
truelight@818: 	// init PM env.
truelight@818: 	hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0);
truelight@818: 
truelight@818: 	// display the box
orudge@7541: 	rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, (const unsigned char *)str, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_INFORMATION);
truelight@818: 
truelight@818: 	// terminate PM env.
truelight@818: 	WinDestroyMsgQueue(hmq);
truelight@818: 	WinTerminate(hab);
darkvater@801: }
darkvater@801: 
orudge@7541: void ShowOSErrorBox(const char *buf)
darkvater@801: {
truelight@818: 	HAB hab;
truelight@818: 	HMQ hmq;
truelight@818: 	ULONG rc;
tron@915: 
truelight@818: 	// init PM env.
truelight@818: 	hmq = WinCreateMsgQueue((hab = WinInitialize(0)), 0);
truelight@818: 
truelight@818: 	// display the box
orudge@7541: 	rc = WinMessageBox(HWND_DESKTOP, HWND_DESKTOP, (const unsigned char *)buf, (const unsigned char *)"OpenTTD", 0, MB_OK | MB_MOVEABLE | MB_ERROR);
truelight@818: 
truelight@818: 	// terminate PM env.
truelight@818: 	WinDestroyMsgQueue(hmq);
truelight@818: 	WinTerminate(hab);
darkvater@801: }
darkvater@801: 
darkvater@801: int CDECL main(int argc, char* argv[])
darkvater@801: {
skidd13@8431: 	SetRandomSeed(time(NULL));
darkvater@801: 
darkvater@801: 	return ttd_main(argc, argv);
darkvater@801: }
darkvater@801: 
orudge@1888: /**
orudge@1888:  * Insert a chunk of text from the clipboard onto the textbuffer. Get TEXT clipboard
orudge@1888:  * and append this up to the maximum length (either absolute or screenlength). If maxlength
orudge@1888:  * is zero, we don't care about the screenlength but only about the physical length of the string
belugas@6979:  * @param tb Textbuf type to be changed
peter1138@7868:  * @return Return true on successful change of Textbuf, or false otherwise
orudge@1888:  */
tron@1486: bool InsertTextBufferClipboard(Textbuf *tb)
tron@1486: {
orudge@5842: /* XXX -- Currently no clipboard support implemented with GCC */
orudge@5842: #ifndef __INNOTEK_LIBC__
orudge@1893: 	HAB hab = 0;
celestar@1524: 
celestar@1524: 	if (WinOpenClipbrd(hab))
celestar@1524: 	{
orudge@1893: 		const char* text = (const char*)WinQueryClipbrdData(hab, CF_TEXT);
orudge@1893: 
orudge@1893: 		if (text != NULL)
orudge@1893: 		{
orudge@1893: 			uint length = 0;
orudge@1893: 			uint width = 0;
orudge@1893: 			const char* i;
orudge@1893: 
orudge@1893: 			for (i = text; IsValidAsciiChar(*i); i++)
orudge@1893: 			{
orudge@1893: 				uint w;
orudge@1893: 
orudge@1893: 				if (tb->length + length >= tb->maxlength - 1) break;
orudge@1893: 
peter1138@3800: 				w = GetCharacterWidth(FS_NORMAL, (byte)*i);
orudge@1893: 				if (tb->maxwidth != 0 && width + tb->width + w > tb->maxwidth) break;
orudge@1893: 
orudge@1893: 				width += w;
orudge@1893: 				length++;
orudge@1893: 			}
orudge@1893: 
orudge@1893: 			memmove(tb->buf + tb->caretpos + length, tb->buf + tb->caretpos, tb->length - tb->caretpos + 1);
orudge@1893: 			memcpy(tb->buf + tb->caretpos, text, length);
orudge@1893: 			tb->width += width;
orudge@1893: 			tb->caretxoffs += width;
orudge@1893: 			tb->length += length;
orudge@1893: 			tb->caretpos += length;
orudge@1893: 
orudge@1893: 			WinCloseClipbrd(hab);
orudge@1893: 			return true;
orudge@1893: 		}
orudge@1888: 
celestar@1524: 		WinCloseClipbrd(hab);
celestar@1524: 	}
orudge@5842: #endif
orudge@1893: 	return false;
tron@1486: }
orudge@1887: 
orudge@2167: 
orudge@2167: void CSleep(int milliseconds)
orudge@2167: {
orudge@5842: #ifndef __INNOTEK_LIBC__
rubidium@6988: 	delay(milliseconds);
orudge@5842: #else
orudge@5842: 	usleep(milliseconds * 1000);
orudge@5842: #endif
orudge@2167: }
Darkvater@5167: 
Darkvater@5167: const char *FS2OTTD(const char *name) {return name;}
Darkvater@5167: const char *OTTD2FS(const char *name) {return name;}