444 lines
10 KiB
C++
444 lines
10 KiB
C++
// * This file is part of the COLOBOT source code
|
||
// * Copyright (C) 2001-2008, Daniel ROUX & EPSITEC SA, www.epsitec.ch
|
||
// *
|
||
// * This program is free software: you can redistribute it and/or modify
|
||
// * it under the terms of the GNU General Public License as published by
|
||
// * the Free Software Foundation, either version 3 of the License, or
|
||
// * (at your option) any later version.
|
||
// *
|
||
// * This program is distributed in the hope that it will be useful,
|
||
// * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
// * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
// * GNU General Public License for more details.
|
||
// *
|
||
// * You should have received a copy of the GNU General Public License
|
||
// * along with this program. If not, see http://www.gnu.org/licenses/.
|
||
|
||
// misc.cpp
|
||
|
||
|
||
#include <math.h>
|
||
#include <stdlib.h>
|
||
#include <stdio.h>
|
||
#include <ctype.h>
|
||
//#include <direct.h>
|
||
#include <time.h>
|
||
//#include <d3d.h>
|
||
|
||
#include "common/struct.h"
|
||
//#include "old/d3dengine.h"
|
||
#include "graphics/engine/engine.h"
|
||
//#include "old/d3dmath.h"
|
||
//#include "math/math.h"
|
||
//#include "old/d3dutil.h"
|
||
#include "common/language.h"
|
||
#include "common/event.h"
|
||
#include "common/misc.h"
|
||
|
||
|
||
|
||
CMetaFile g_metafile;
|
||
|
||
static EventType g_uniqueEventType = EVENT_USER;
|
||
static bool g_bUserDir = false;
|
||
static char g_userDir[100] = "";
|
||
|
||
|
||
|
||
// Gives a single user event.
|
||
|
||
EventType GetUniqueEventType()
|
||
{
|
||
int i;
|
||
|
||
i = static_cast <int> (g_uniqueEventType+1);
|
||
g_uniqueEventType = static_cast<EventType>(i);
|
||
return g_uniqueEventType;
|
||
}
|
||
|
||
|
||
|
||
// Returns a non-accented letter.
|
||
|
||
char GetNoAccent(char letter)
|
||
{
|
||
if ( letter < 0 )
|
||
{
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'a';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'e';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'i';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'o';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'u';
|
||
|
||
if ( letter == '<EFBFBD>' ) return 'c';
|
||
|
||
if ( letter == '<EFBFBD>' ) return 'n';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'A';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'E';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'I';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'O';
|
||
|
||
if ( letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ||
|
||
letter == '<EFBFBD>' ) return 'U';
|
||
|
||
if ( letter == '<EFBFBD>' ) return 'C';
|
||
|
||
if ( letter == '<EFBFBD>' ) return 'N';
|
||
}
|
||
|
||
return letter;
|
||
}
|
||
|
||
// Returns an uppercase letter.
|
||
|
||
char GetToUpper(char letter)
|
||
{
|
||
if ( letter < 0 )
|
||
{
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
}
|
||
|
||
return toupper(letter);
|
||
}
|
||
|
||
// Returns a lowercase letter.
|
||
|
||
char GetToLower(char letter)
|
||
{
|
||
if ( letter < 0 )
|
||
{
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
|
||
if ( letter == '<EFBFBD>' ) return '<EFBFBD>';
|
||
}
|
||
|
||
return tolower(letter);
|
||
}
|
||
|
||
|
||
// Converting time to string.
|
||
|
||
void GimeToAscii(time_t time, char *buffer)
|
||
{
|
||
struct tm when;
|
||
int year;
|
||
|
||
when = *localtime(&time);
|
||
year = when.tm_year+1900;
|
||
if ( year < 2000 ) year -= 1900;
|
||
else year -= 2000;
|
||
#if _FRENCH
|
||
sprintf(buffer, "%.2d.%.2d.%.2d %.2d:%.2d",
|
||
when.tm_mday, when.tm_mon+1, year,
|
||
when.tm_hour, when.tm_min);
|
||
#endif
|
||
#if _GERMAN | _WG
|
||
sprintf(buffer, "%.2d.%.2d.%.2d %.2d:%.2d",
|
||
when.tm_mday, when.tm_mon+1, year,
|
||
when.tm_hour, when.tm_min);
|
||
#endif
|
||
#if _ENGLISH
|
||
char format[10];
|
||
int hour;
|
||
|
||
hour = when.tm_hour; // 0..23
|
||
if ( hour < 12 ) // morning?
|
||
{
|
||
strcpy(format, "am");
|
||
}
|
||
else // afternoon?
|
||
{
|
||
strcpy(format, "pm");
|
||
hour -= 12; // 0..11
|
||
}
|
||
if ( hour == 0 ) hour = 12;
|
||
|
||
sprintf(buffer, "%.2d.%.2d.%.2d %.2d:%.2d %s",
|
||
when.tm_mon+1, when.tm_mday, year,
|
||
hour, when.tm_min, format);
|
||
#endif
|
||
#if _POLISH
|
||
sprintf(buffer, "%.2d.%.2d.%.2d %.2d:%.2d",
|
||
when.tm_mday, when.tm_mon+1, year,
|
||
when.tm_hour, when.tm_min);
|
||
#endif
|
||
}
|
||
|
||
|
||
// Makes a copy of a file.
|
||
|
||
bool Xfer(char* src, char* dst)
|
||
{
|
||
FILE *fs, *fd;
|
||
char *buffer;
|
||
int len;
|
||
|
||
fs = fopen(src, "rb");
|
||
if ( fs == 0 )
|
||
{
|
||
return false;
|
||
}
|
||
|
||
fd = fopen(dst, "wb");
|
||
if ( fd == 0 )
|
||
{
|
||
fclose(fs);
|
||
return false;
|
||
}
|
||
|
||
buffer = (char*)malloc(10000);
|
||
|
||
while ( true )
|
||
{
|
||
len = fread(buffer, 1, 10000, fs);
|
||
if ( len == 0 ) break;
|
||
fwrite(buffer, 1, len, fd);
|
||
}
|
||
|
||
free(buffer);
|
||
fclose(fs);
|
||
fclose(fd);
|
||
return true;
|
||
}
|
||
|
||
// Copy a file into the temporary folder.
|
||
|
||
bool CopyFileToTemp(char* filename)
|
||
{
|
||
char src[100];
|
||
char dst[100];
|
||
char save[100];
|
||
|
||
UserDir(src, filename, "textures");
|
||
|
||
strcpy(save, g_userDir);
|
||
strcpy(g_userDir, "temp");
|
||
UserDir(dst, filename, "textures");
|
||
strcpy(g_userDir, save);
|
||
|
||
// _mkdir("temp"); TODO
|
||
if ( !Xfer(src, dst) ) return false;
|
||
|
||
strcpy(filename, dst);
|
||
return true;
|
||
}
|
||
|
||
// Copy a list of numbered files into the temporary folder.
|
||
|
||
bool CopyFileListToTemp(char* filename, int* list, int total)
|
||
{
|
||
char name[100];
|
||
char ext[10];
|
||
char file[100];
|
||
char save[100];
|
||
char* p;
|
||
int i;
|
||
|
||
strcpy(name, filename);
|
||
p = strchr(name, '.');
|
||
if ( p == 0 )
|
||
{
|
||
strcpy(ext, ".tga");
|
||
}
|
||
else
|
||
{
|
||
strcpy(ext, p);
|
||
*p = 0;
|
||
}
|
||
|
||
for ( i=0 ; i<total ; i++ )
|
||
{
|
||
sprintf(file, "%s%.3d%s", name, list[i], ext); // nameNNN.ext
|
||
CopyFileToTemp(file);
|
||
}
|
||
|
||
strcpy(save, g_userDir);
|
||
strcpy(g_userDir, "temp");
|
||
UserDir(file, filename, "textures");
|
||
strcpy(filename, file);
|
||
strcpy(g_userDir, save);
|
||
|
||
return true;
|
||
}
|
||
|
||
|
||
// Adds an extension to file, if doesn't already one.
|
||
|
||
void AddExt(char* filename, char* ext)
|
||
{
|
||
if ( strchr(filename, '.') != 0 ) return; // already an extension?
|
||
strcat(filename, ext);
|
||
}
|
||
|
||
|
||
// Specifies the user folder.
|
||
|
||
void UserDir(bool bUser, char* dir)
|
||
{
|
||
g_bUserDir = bUser;
|
||
strcpy(g_userDir, dir);
|
||
}
|
||
|
||
// Replaces the string %user% by the user folder.
|
||
// in: dir = "%user%toto.txt"
|
||
// def = "abc\"
|
||
// out: buffer = "abc\toto.txt"
|
||
|
||
void UserDir(char* buffer, char* dir, const char* def)
|
||
{
|
||
char ddir[100];
|
||
char* add;
|
||
|
||
if ( strstr(dir, "\\") == 0 && def[0] != 0 )
|
||
{
|
||
sprintf(ddir, "%s\\%s", def, dir);
|
||
}
|
||
else
|
||
{
|
||
strcpy(ddir, dir);
|
||
}
|
||
dir = ddir;
|
||
|
||
while ( *dir != 0 )
|
||
{
|
||
if ( dir[0] == '%' &&
|
||
dir[1] == 'u' &&
|
||
dir[2] == 's' &&
|
||
dir[3] == 'e' &&
|
||
dir[4] == 'r' &&
|
||
dir[5] == '%' ) // %user% ?
|
||
{
|
||
if ( g_bUserDir ) add = g_userDir;
|
||
else add = def;
|
||
|
||
while ( *add != 0 )
|
||
{
|
||
*buffer++ = *add++;
|
||
}
|
||
dir += 6; // jumps to %user%
|
||
continue;
|
||
}
|
||
|
||
*buffer++ = *dir++;
|
||
}
|
||
*buffer = 0;
|
||
}
|
||
|
||
|
||
// Returns the letter corresponding to the language.
|
||
|
||
char RetLanguageLetter()
|
||
{
|
||
#if _FRENCH
|
||
return 'F';
|
||
#endif
|
||
#if _ENGLISH
|
||
return 'E';
|
||
#endif
|
||
#if _GERMAN | _WG
|
||
return 'D';
|
||
#endif
|
||
#if _POLISH
|
||
return 'P';
|
||
#endif
|
||
return 'X';
|
||
}
|
||
|