2012-06-26 20:23:05 +00:00
|
|
|
|
// * 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/.
|
|
|
|
|
|
|
|
|
|
|
2012-09-09 15:51:10 +00:00
|
|
|
|
#include "common/misc.h"
|
|
|
|
|
|
2012-06-26 20:23:05 +00:00
|
|
|
|
#include <math.h>
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
#include <stdio.h>
|
2012-09-09 15:51:10 +00:00
|
|
|
|
#include <string.h>
|
2012-06-26 20:23:05 +00:00
|
|
|
|
#include <ctype.h>
|
|
|
|
|
#include <time.h>
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
static bool g_bUserDir = false;
|
|
|
|
|
static char g_userDir[100] = "";
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// Returns a non-accented letter.
|
|
|
|
|
|
2012-08-14 23:48:49 +00:00
|
|
|
|
char GetNoAccent(char letter)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
2012-09-15 16:50:51 +00:00
|
|
|
|
/*
|
2012-06-26 20:23:05 +00:00
|
|
|
|
if ( letter < 0 )
|
|
|
|
|
{
|
2012-08-14 23:48:49 +00:00
|
|
|
|
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';
|
2012-09-15 16:50:51 +00:00
|
|
|
|
}*/
|
2012-06-26 20:23:05 +00:00
|
|
|
|
|
|
|
|
|
return letter;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// Returns an uppercase letter.
|
|
|
|
|
|
2012-08-14 23:48:49 +00:00
|
|
|
|
char GetToUpper(char letter)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
2012-09-15 16:50:51 +00:00
|
|
|
|
/*if ( letter < 0 )
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
2012-08-14 23:48:49 +00:00
|
|
|
|
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>';
|
2012-09-15 16:50:51 +00:00
|
|
|
|
}*/
|
2012-06-26 20:23:05 +00:00
|
|
|
|
|
|
|
|
|
return toupper(letter);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// Returns a lowercase letter.
|
|
|
|
|
|
2012-08-14 23:48:49 +00:00
|
|
|
|
char GetToLower(char letter)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
2012-09-15 16:50:51 +00:00
|
|
|
|
/*if ( letter < 0 )
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
2012-08-14 23:48:49 +00:00
|
|
|
|
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>';
|
2012-09-15 16:50:51 +00:00
|
|
|
|
}*/
|
2012-06-26 20:23:05 +00:00
|
|
|
|
|
|
|
|
|
return tolower(letter);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// Converting time to string.
|
|
|
|
|
|
2012-09-15 19:47:19 +00:00
|
|
|
|
void TimeToAscii(time_t time, char *buffer)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
|
|
|
|
struct tm when;
|
|
|
|
|
int year;
|
|
|
|
|
|
|
|
|
|
when = *localtime(&time);
|
|
|
|
|
year = when.tm_year+1900;
|
|
|
|
|
if ( year < 2000 ) year -= 1900;
|
|
|
|
|
else year -= 2000;
|
2012-09-15 16:50:51 +00:00
|
|
|
|
/* TODO
|
2012-06-26 20:23:05 +00:00
|
|
|
|
#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
|
2012-09-15 16:50:51 +00:00
|
|
|
|
#if _ENGLISH*/
|
2012-06-26 20:23:05 +00:00
|
|
|
|
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);
|
2012-09-15 16:50:51 +00:00
|
|
|
|
/*#endif
|
2012-06-26 20:23:05 +00:00
|
|
|
|
#if _POLISH
|
|
|
|
|
sprintf(buffer, "%.2d.%.2d.%.2d %.2d:%.2d",
|
|
|
|
|
when.tm_mday, when.tm_mon+1, year,
|
|
|
|
|
when.tm_hour, when.tm_min);
|
2012-09-15 16:50:51 +00:00
|
|
|
|
#endif*/
|
2012-06-26 20:23:05 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// 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;
|
|
|
|
|
}
|
|
|
|
|
|
2012-09-17 22:01:00 +00:00
|
|
|
|
buffer = static_cast<char*>(malloc(10000));
|
2012-06-26 20:23:05 +00:00
|
|
|
|
|
|
|
|
|
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);
|
|
|
|
|
|
2012-09-09 15:51:10 +00:00
|
|
|
|
//_mkdir("temp");
|
|
|
|
|
system("mkdir temp");
|
2012-09-15 16:50:51 +00:00
|
|
|
|
|
2012-06-26 20:23:05 +00:00
|
|
|
|
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.
|
|
|
|
|
|
2012-09-17 22:01:00 +00:00
|
|
|
|
void AddExt(char* filename, const char* ext)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
|
|
|
|
if ( strchr(filename, '.') != 0 ) return; // already an extension?
|
|
|
|
|
strcat(filename, ext);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
// Specifies the user folder.
|
|
|
|
|
|
2012-09-18 20:33:28 +00:00
|
|
|
|
void UserDir(bool bUser, const char* dir)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
|
|
|
|
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"
|
|
|
|
|
|
2012-08-31 20:28:07 +00:00
|
|
|
|
void UserDir(char* buffer, const char* dir, const char* def)
|
2012-06-26 20:23:05 +00:00
|
|
|
|
{
|
|
|
|
|
char ddir[100];
|
2012-09-15 16:50:51 +00:00
|
|
|
|
const char* add;
|
2012-06-26 20:23:05 +00:00
|
|
|
|
|
|
|
|
|
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;
|
|
|
|
|
}
|