Subversion Repositories spk

Rev

Rev 88 | Rev 98 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
7 cycrow 1 
//header
1 cycrow 2 
#include "SpkFile.h"
3 
 
7 cycrow 4 
// debug logging
5 
#include "Logging/Log.h"
6 
 
7 
// old style compression (needed to convert old formats)
8 
#include "../../HiP/HiP.h"
9 
 
88 cycrow 10 
#include "TextDB.h"
11 
 
10 cycrow 12 
//TODO: remove this
14 cycrow 13 
unsigned char *LineByLineRead ( unsigned char *data, const Utils::String &end, Utils::String *readData )
10 cycrow 14 
{
14 cycrow 15 
	Utils::String line;
10 cycrow 16 
	while ( true )
17 
	{
14 cycrow 18 
		data = line.readToEndOfLine(data);
7 cycrow 19 
 
14 cycrow 20 
		if ( (*readData).empty() && line.empty() ) continue;
10 cycrow 21 
		if ( line == end )
22 
			break;
23 
		*readData += (line + "\r\n");
24 
	}
25 
 
26 
	return data;
27 
}
28 
 
29 
 
1 cycrow 30 
CSpkFile::CSpkFile() : CBaseFile ()
31 
{
32 
	SetDefaults ();
33 
}
34 
 
35 
CSpkFile::~CSpkFile()
36 
{
37 
	Delete ();
38 
}
39 
/*
40 
	Func:   SetDefaults
41 
	Desc:   Sets the  default values when class is created
42 
*/
43 
void CSpkFile::SetDefaults ()
44 
{
45 
	m_pLastWare = NULL;
46 
	m_iPackageType = PACKAGETYPE_NORMAL;
47 
	m_bForceProfile = false;
48 
	m_iScriptType = SCRIPTTYPE_CUSTOM;
49 
 
50 
	CBaseFile::SetDefaults ();
51 
}
52 
 
53 
void CSpkFile::Delete ()
54 
{
55 
	m_lWares.clear(true);
56 
	m_lSettings.clear(true);
57 
 
58 
	CBaseFile::Delete ();
59 
}
60 
 
61 
 
14 cycrow 62 
bool CSpkFile::CheckHeader(const Utils::String header) const
1 cycrow 63 
{
64 
	if ( header.Compare("SPKCycrow") )
65 
		return true;
66 
	return false;
67 
}
68 
/*
69 
	Func:   ParseValueLine
70 
	Input:  String - single line from a file to set
71 
	Return: Boolean - returns true if value exists
72 
	Desc:   Reads the line and assigns the parameters for the file
73 
*/
14 cycrow 74 
bool CSpkFile::ParseValueLine(const Utils::String &line)
1 cycrow 75 
{
14 cycrow 76 
	Utils::String first = line.token(" ", 1);
77 
	Utils::String rest  = line.tokens(" ", 2);
1 cycrow 78 
 
79 
	if ( first == "AnotherMod:" )
80 
	{
10 cycrow 81 
		m_sOtherAuthor = rest.token("|", 1);
82 
		m_sOtherName = rest.tokens("|", 2);
1 cycrow 83 
	}
84 
	else if ( line == "CustomStart" )
85 
		m_iPackageType = PACKAGETYPE_CUSTOMSTART;
86 
	else if ( line == "PackageUpdate" )
87 
		m_iPackageType = PACKAGETYPE_UPDATE;
88 
	else if ( line == "Patch" )
89 
		m_iPackageType = PACKAGETYPE_PATCH;
90 
	else if ( line == "ForceProfile" )
91 
		m_bForceProfile = true;
92 
	else if ( line == "Signed" )
93 
		m_bSigned = true;
94 
	else if ( first == "ScriptType:" )
95 
		m_sScriptType = rest;
96 
	else if ( first == "ScriptTypeNew:" )
10 cycrow 97 
		m_iScriptType = rest;
1 cycrow 98 
	else if ( first == "PackageType:" )
10 cycrow 99 
		m_iPackageType = rest;
1 cycrow 100 
	else if ( first == "Ware:" )
101 
		AddWare ( rest );
102 
	else if ( (first == "WareText:") && (m_pLastWare) )
103 
		AddWareText ( rest );
104 
	else if ( first == "Setting:" )
105 
	{
10 cycrow 106 
		SSettingType *t = AddSetting ( rest.token("|", 2), rest.token("|", 1) );
107 
		ConvertSetting ( t, rest.tokens("|", 3));
1 cycrow 108 
	}
109 
	else
110 
		return CBaseFile::ParseValueLine ( line );
111 
 
112 
	return true;
113 
}
114 
 
115 
/*
116 
	Func:   CreateValuesLine
117 
	Return: String - returns the full string for values
118 
	Desc:   Creates a single string for all values, this is used when compressing to write to the spk file
119 
*/
14 cycrow 120 
Utils::String CSpkFile::CreateValuesLine () const
1 cycrow 121 
{
14 cycrow 122 
	Utils::String values = CBaseFile::CreateValuesLine ();
1 cycrow 123 
	// combine all values together
10 cycrow 124 
	if ( (!m_sOtherAuthor.empty()) && (!m_sOtherName.empty()) )
14 cycrow 125 
		values += "AnotherMod: " + m_sOtherAuthor + "|" + m_sOtherName + "\n";
1 cycrow 126 
	if ( m_bForceProfile )
127 
		values += "ForceProfile\n";
10 cycrow 128 
	if ( !m_sScriptType.empty() )
14 cycrow 129 
		values += "ScriptType: " + m_sScriptType + "\n";
130 
	values += Utils::String("PackageType: ") + (long)m_iPackageType + "\n";
131 
	values += Utils::String("ScriptTypeNew: ") + (long)m_iScriptType + "\n";
1 cycrow 132 
 
14 cycrow 133 
	for ( CListNode<SSettingType> *node = m_lSettings.Front(); node; node = node->next() )
134 
		values += Utils::String("Setting: ") + (long)node->Data()->iType + "|" + node->Data()->sKey + "|" + GetSetting(node->Data()) + "\n";
1 cycrow 135 
 
14 cycrow 136 
	for ( CListNode<SWares> *wNode = m_lWares.Front(); wNode; wNode = wNode->next() ) {
137 
		SWares *ware = wNode->Data();
138 
		if ( wNode->Data()->iTextID > 0 )
139 
			values += Utils::String("Ware: ") + ware->cType + ":" + ware->iPrice + ":" + (long)ware->iSize + ":" + (long)ware->iVolumn + ":" + ware->sID + ":" + (long)ware->iNotority + ":" + (long)ware->iTextID + "," + (long)ware->iTextPage + "\n";
1 cycrow 140 
		else
14 cycrow 141 
			values += Utils::String("Ware: ") + ware->cType + ":" + ware->iPrice + ":" + (long)ware->iSize + ":" + (long)ware->iVolumn + ":" + ware->sID + ":" + (long)ware->iNotority + "\n";
142 
		for ( CListNode<SWaresText> *wtNode = ware->lText.Front(); wtNode; wtNode = wtNode->next() )
143 
			values += Utils::String("WareText: ") + (long)wtNode->Data()->iLang + " " + wtNode->Data()->sName + "|" + wtNode->Data()->sDesc + "\n";
1 cycrow 144 
	}
145 
 
146 
	return values;
147 
}
148 
 
13 cycrow 149 
Utils::String CSpkFile::GetCustomScriptType (int lang) const
1 cycrow 150 
{
10 cycrow 151 
	if ( !m_sScriptType.empty() )
1 cycrow 152 
	{
153 
		int max;
10 cycrow 154 
		Utils::String *split = m_sScriptType.tokenise("<br>", &max);
1 cycrow 155 
		if ( max && split )
156 
		{
157 
			for ( int i = 1; i < max; i++ )
158 
			{
10 cycrow 159 
				Utils::String str = split[i];
160 
				int num = str.token(":", 1);
161 
				Utils::String name = str.tokens(":", 2);
1 cycrow 162 
 
163 
				if ( num == lang )
164 
				{
165 
					CLEANSPLIT(split, max)
166 
					return name;
167 
				}
168 
			}
169 
 
10 cycrow 170 
			Utils::String ret = split[0];
1 cycrow 171 
			CLEANSPLIT(split, max)
172 
 
173 
			return ret;
174 
		}
175 
		CLEANSPLIT(split, max)
176 
	}
177 
	return m_sScriptType;
178 
}
179 
 
88 cycrow 180 
bool CSpkFile::readWares(int iLang, CLinkList<SWareEntry> &list, const Utils::String &empWares)
181 
{
182 
	if ( CBaseFile::readWares(iLang, list, empWares) ) {
183 
		for(CListNode<SWares> *node = m_lWares.Front(); node; node = node->next()) {
184 
 
185 
			SWareEntry *ware = new SWareEntry;
186 
 
187 
			for(CListNode<SWaresText> *textNode = node->Data()->lText.Front(); textNode; textNode = textNode->next()) {
188 
				ware->name = textNode->Data()->sName;
189 
				ware->description = textNode->Data()->sDesc;
190 
				if ( textNode->Data()->iLang == iLang )	{
191 
					break;
192 
				}
193 
			}
194 
 
195 
			if ( ware->name.empty() ) {
196 
				ware->name = _pTextDB->get(iLang, node->Data()->iTextPage, node->Data()->iTextID);
197 
			}
198 
			if ( ware->description.empty() ) {
199 
				ware->description = _pTextDB->get(iLang, node->Data()->iTextPage, node->Data()->iDescID);
200 
			}
201 
 
202 
			ware->id = node->Data()->sID;
203 
			ware->relval = node->Data()->iPrice;
204 
			ware->position = node->Data()->iPosID;
205 
			ware->type = Ware_Custom;
206 
			ware->notority = node->Data()->iNotority;
89 cycrow 207 
			ware->position = 0;
208 
			ware->package = this;
88 cycrow 209 
 
210 
			list.push_back(ware);
211 
		}
212 
 
213 
		return true;
214 
	}
215 
 
216 
	return false;
217 
}
218 
 
52 cycrow 219 
bool CSpkFile::WriteHeader(CFileIO &file, int valueheader, int valueComprLen)
1 cycrow 220 
{
52 cycrow 221 
	return file.write("SPKCycrow;%.2f;%d;%d\n", FILEVERSION, valueheader, valueComprLen);
1 cycrow 222 
}
223 
 
10 cycrow 224 
void CSpkFile::AddWareText(const Utils::String &sData)
1 cycrow 225 
{
226 
	if ( !m_pLastWare )
227 
		return;
228 
 
229 
	SWaresText *wt = new SWaresText;
10 cycrow 230 
	wt->iLang = sData.token(" ", 1);
231 
	wt->sName = sData.tokens(" ", 2).token("|", 1);
232 
	wt->sDesc = sData.tokens(" ", 2).tokens("|", 2);
1 cycrow 233 
	m_pLastWare->lText.push_back ( wt );
234 
 
50 cycrow 235 
	_changed();
1 cycrow 236 
}
237 
 
10 cycrow 238 
void CSpkFile::AddWare(const Utils::String &sData)
1 cycrow 239 
{
240 
	SWares *ware = new SWares;
241 
	ware->iTextID = -1;
242 
	ware->iTextPage = 0;
10 cycrow 243 
	ware->cType = sData.token(":", 1)[0];
244 
	ware->iPrice = sData.token(":", 2);
245 
	ware->iSize = sData.token(":", 3);
246 
	ware->iVolumn = sData.token(":", 4);
247 
	ware->sID = sData.token(":", 5);
248 
	ware->iNotority = sData.token(":", 6);
249 
	if ( !sData.token(":", 7).empty() )
1 cycrow 250 
	{
10 cycrow 251 
		Utils::String r = sData.token(":", 7);
252 
		ware->iTextID = r.token(",", 1);
253 
		ware->iTextPage = r.token(",", 2);
1 cycrow 254 
	}
255 
	m_lWares.push_back ( ware );
256 
	m_pLastWare = ware;
257 
 
50 cycrow 258 
	_changed();
1 cycrow 259 
}
260 
 
13 cycrow 261 
bool CSpkFile::CheckValidReadmes () const
1 cycrow 262 
{
263 
	for ( CListNode<C_File> *node = m_lFiles.Front(); node; node = node->next() )
264 
	{
265 
		C_File *file = node->Data();
266 
		if ( file->GetFileType() != FILETYPE_README )
267 
			continue;
268 
		if ( !file->CheckValidFilePointer() )
269 
			continue;
270 
		return true;
271 
	}
272 
 
273 
	return false;
274 
}
275 
 
276 
void CSpkFile::ClearWares()
277 
{
10 cycrow 278 
	for ( CListNode<SWares> *node = m_lWares.Front(); node; node = node->next() ) {
1 cycrow 279 
		node->Data()->lText.clear(true);
280 
		node->DeleteData();
281 
	}
50 cycrow 282 
	_changed();
1 cycrow 283 
	m_lWares.clear(true);
284 
}
285 
 
10 cycrow 286 
SWares *CSpkFile::FindWare(const Utils::String &id) const
1 cycrow 287 
{
10 cycrow 288 
	for ( CListNode<SWares> *node = m_lWares.Front(); node; node = node->next() ) {
289 
		SWares *w = node->Data();
290 
		if ( w->sID.Compare(id) ) {
1 cycrow 291 
			return w;
10 cycrow 292 
		}
1 cycrow 293 
	}
294 
	return NULL;
295 
}
296 
 
10 cycrow 297 
void CSpkFile::RemoveWare(const Utils::String &id )
1 cycrow 298 
{
10 cycrow 299 
	for ( CListNode<SWares> *node = m_lWares.Front(); node; node = node->next() ) {
300 
		SWares *w = node->Data();
301 
		if ( w->sID.Compare(id) ) {
1 cycrow 302 
			m_lWares.RemoveCurrent ();
303 
			delete w;
50 cycrow 304 
			_changed();
1 cycrow 305 
			return;
306 
		}
307 
	}
308 
}
309 
 
10 cycrow 310 
void CSpkFile::AddWare(SWares *ware)
1 cycrow 311 
{
10 cycrow 312 
	ware->sID.remove(' ');
1 cycrow 313 
 
10 cycrow 314 
	SWares *newware = this->FindWare(ware->sID);
315 
	if ( newware ) {
316 
		m_lWares.remove(newware);
317 
	}
1 cycrow 318 
 
10 cycrow 319 
	m_lWares.push_back(ware);
50 cycrow 320 
	_changed();
1 cycrow 321 
}
322 
 
10 cycrow 323 
void CSpkFile::AddWareText(SWares *pWare, int iLang, const Utils::String &sName, const Utils::String &sDesc)
1 cycrow 324 
{
325 
	SWaresText *wt;
10 cycrow 326 
	for ( CListNode<SWaresText> *node = pWare->lText.Front(); node; node = node->next() ) {
327 
		wt = node->Data();
328 
		if ( wt->iLang == iLang ) {
329 
			wt->sDesc = sDesc;
330 
			wt->sName = sName;
1 cycrow 331 
			return;
332 
		}
333 
	}
334 
 
335 
	wt = new SWaresText;
10 cycrow 336 
	wt->iLang = iLang;
337 
	wt->sName = sName;
338 
	wt->sDesc = sDesc;
1 cycrow 339 
 
10 cycrow 340 
	pWare->lText.push_back(wt);
50 cycrow 341 
	_changed();
1 cycrow 342 
}
343 
 
344 
 
10 cycrow 345 
void CSpkFile::ClearWareText(const Utils::String &id)
1 cycrow 346 
{
10 cycrow 347 
	SWares *w = FindWare(id);
348 
	ClearWareText(w);
1 cycrow 349 
}
350 
 
10 cycrow 351 
void CSpkFile::ClearWareText(SWares *w)
1 cycrow 352 
{
353 
	if ( !w ) return;
354 
 
355 
	w->lText.clear(true);
50 cycrow 356 
	_changed();
1 cycrow 357 
}
358 
 
10 cycrow 359 
void CSpkFile::RemoveWareText(const Utils::String &wid, int lang)
1 cycrow 360 
{
10 cycrow 361 
	SWares *w = FindWare(wid);
1 cycrow 362 
	if ( w )
363 
	{
10 cycrow 364 
		for ( CListNode<SWaresText> *node = w->lText.Front(); node; node = node->next() ) {
365 
			SWaresText *wt = node->Data();
366 
			if ( wt->iLang == lang ) {
1 cycrow 367 
				w->lText.RemoveCurrent();
50 cycrow 368 
				_changed();
1 cycrow 369 
				delete wt;
370 
				break;
371 
			}
372 
		}
373 
	}
374 
}
375 
 
13 cycrow 376 
int CSpkFile::CheckValidCustomStart () const
1 cycrow 377 
{
378 
	for ( CListNode<C_File> *node = m_lFiles.Front(); node; node = node->next() )
379 
	{
380 
		C_File *file = node->Data();
381 
		if ( file->GetFileType() != FILETYPE_SCRIPT )
382 
			continue;
383 
 
14 cycrow 384 
		Utils::String basename = file->GetName().GetToken ( 1, file->GetName().NumToken('.') - 1, '.' ).ToString();
385 
		if ( basename.right(15).Compare(".initplayership") )
1 cycrow 386 
			return 0;
387 
	}
388 
	if ( !IsAnotherMod() )
389 
		return 1;
390 
	else
391 
		return 2;
392 
}
393 
 
394 
bool CSpkFile::UpdateSigned (bool updateFiles)
395 
{
396 
	// check for any custom wares
397 
	// patch mods and custom starts are also not signed
398 
	if ( (!m_lWares.empty()) || (this->IsPatch()) || (this->IsCustomStart()) )
399 
	{
400 
		m_bSigned = false;
401 
		return false;
402 
	}
403 
 
404 
	return CBaseFile::UpdateSigned(updateFiles);
405 
}
406 
 
14 cycrow 407 
SSettingType *CSpkFile::AddSetting(const Utils::String &key, int type )
1 cycrow 408 
{
39 cycrow 409 
	Utils::String sKey = key.remove('|');
10 cycrow 410 
 
1 cycrow 411 
	SSettingType *t;
412 
	for ( t = m_lSettings.First(); t; t = m_lSettings.Next() )
413 
	{
10 cycrow 414 
		if ( t->sKey.Compare(sKey) )
1 cycrow 415 
			return NULL;
416 
	}
417 
 
418 
	switch ( type )
419 
	{
420 
		case SETTING_STRING:
421 
			t = new SSettingString;
422 
			break;
423 
		case SETTING_INTEGER:
424 
			t = new SSettingInteger;
425 
			break;
426 
		case SETTING_CHECK:
427 
			t = new SSettingCheck;
428 
			break;
429 
	}
430 
 
431 
	if ( !t )
432 
		return NULL;
433 
 
10 cycrow 434 
	t->sKey = sKey;
1 cycrow 435 
	t->iType = type;
436 
 
437 
	m_lSettings.push_back ( t );
50 cycrow 438 
	_changed();
1 cycrow 439 
 
440 
	return t;
441 
}
442 
 
10 cycrow 443 
void CSpkFile::ConvertSetting ( SSettingType *t, const Utils::String &set ) const
1 cycrow 444 
{
445 
	if ( !t )
446 
		return;
447 
 
448 
	switch ( t->iType )
449 
	{
450 
		case SETTING_STRING:
451 
			((SSettingString *)t)->sValue = set;
452 
			break;
453 
		case SETTING_INTEGER:
10 cycrow 454 
			((SSettingInteger *)t)->iValue = set;
1 cycrow 455 
			break;
456 
		case SETTING_CHECK:
10 cycrow 457 
			((SSettingCheck *)t)->bValue = set;
1 cycrow 458 
			break;
459 
	}
460 
}
10 cycrow 461 
Utils::String CSpkFile::GetSetting ( SSettingType *t ) const
1 cycrow 462 
{
463 
	if ( !t )
464 
		return "";
465 
 
466 
	switch ( t->iType )
467 
	{
468 
		case SETTING_STRING:
469 
			return ((SSettingString *)t)->sValue;
470 
		case SETTING_INTEGER:
50 cycrow 471 
			return Utils::String::Number(((SSettingInteger *)t)->iValue);
1 cycrow 472 
		case SETTING_CHECK:
473 
			return (((SSettingInteger *)t)->iValue) ? "1" : "0";
474 
	}
475 
 
476 
	return "";
477 
}
478 
 
479 
void CSpkFile::ClearSettings ()
480 
{
481 
	m_lSettings.clear(true);
50 cycrow 482 
	_changed();
1 cycrow 483 
}
484 
 
485 
 
13 cycrow 486 
bool CSpkFile::IsMatchingMod(const Utils::String &mod) const
1 cycrow 487 
{
488 
	for ( CListNode<C_File> *node = m_lFiles.Front(); node; node = node->next() )
489 
	{
490 
		C_File *file = node->Data();
491 
		if ( file->GetFileType() != FILETYPE_MOD )
492 
			continue;
493 
 
494 
		if ( file->IsFakePatch() )
495 
			continue;
496 
 
10 cycrow 497 
		Utils::String filename = file->GetBaseName().ToString();
498 
		if ( filename.Compare(mod) )
1 cycrow 499 
			return true;
500 
	}
501 
	return false;
502 
}
503 
 
13 cycrow 504 
Utils::String CSpkFile::GetScriptTypeString(int lang) const
1 cycrow 505 
{
506 
	int iType = m_iScriptType;
507 
 
508 
	if ( this->IsLibrary() )
509 
		return "Library";
510 
	else if ( this->IsPackageUpdate() )
511 
		return "Package Update";
512 
	else if ( this->IsCustomStart() )
513 
		return "Custom Start";
514 
	else if ( this->IsPatch() )
515 
		return "Patch";
516 
	else if ( m_iScriptType == SCRIPTTYPE_CUSTOM )
517 
	{
10 cycrow 518 
		Utils::String type = this->GetCustomScriptType(lang);
519 
		if ( !type.empty() )
1 cycrow 520 
			return type;
521 
		iType = -1;
522 
	}
523 
 
524 
	if (iType == -1)  // no script type
525 
	{
526 
		if ( this->IsFakePatch() )
527 
			return "Fake Patch";
528 
	}
529 
 
10 cycrow 530 
	Utils::String sType = CSpkFile::GetScriptTypeStringStatic(m_iScriptType);
1 cycrow 531 
 
10 cycrow 532 
	if ( sType.empty() )
1 cycrow 533 
		return "Other";
534 
 
535 
	return sType;
536 
}
537 
 
10 cycrow 538 
int CSpkFile::ConvertScriptType(const Utils::String &sType)
1 cycrow 539 
{
540 
	for ( int i = 0; i < SCRIPTTYPE_MAX; i++ )
541 
	{
542 
		if ( sType.Compare(CSpkFile::GetScriptTypeStringStatic(i)) )
543 
			return i;
544 
	}
545 
 
546 
	return -1;
547 
}
548 
 
10 cycrow 549 
Utils::String CSpkFile::GetScriptTypeStringStatic(int type)
1 cycrow 550 
{
551 
	switch ( type )
552 
	{
553 
		case SCRIPTTYPE_CUSTOM:
554 
			return "Custom";
555 
		case SCRIPTTYPE_NAVIGATION:
556 
			return "Navigation";
557 
		case SCRIPTTYPE_COMBAT:
558 
			return "Combat";
559 
		case SCRIPTTYPE_MISSION:
560 
			return "Mission";
561 
		case SCRIPTTYPE_ALPLUGIN:
562 
			return "AL Plugin";
563 
		case SCRIPTTYPE_HOTKEY:
564 
			return "Hotkey";
565 
		case SCRIPTTYPE_SHIPUPGRADE:
566 
			return "Ship Upgrade";
567 
		case SCRIPTTYPE_SHIPCOMMAND:
568 
			return "Ship Command";
569 
		case SCRIPTTYPE_STATIONCOMMAND:
570 
			return "Station Command";
571 
		case SCRIPTTYPE_FLEET:
572 
			return "Fleet Management";
573 
		case SCRIPTTYPE_TRADE:
574 
			return "Trade";
575 
		case SCRIPTTYPE_PIRACY:
576 
			return "Piracy";
577 
		case SCRIPTTYPE_CHEAT:
578 
			return "Cheat";
579 
		case SCRIPTTYPE_EXTENSION:
580 
			return "Extension Mods";
581 
		case SCRIPTTYPE_REBALANCE:
582 
			return "Rebalance";
583 
		case SCRIPTTYPE_FIX:
584 
			return "Vanilla Fix";
585 
		case SCRIPTTYPE_GENERALMOD:
586 
			return "General Mod";
587 
		case SCRIPTTYPE_TOTAL:
588 
			return "Totel Conversion";
589 
		case SCRIPTTYPE_WINGCOMMAND:
590 
			return "Wing Command";
591 
	}
592 
 
593 
	return "Other";
594 
}
595 
 
14 cycrow 596 
bool CSpkFile::LoadPackageData(const Utils::String &sFirst, const Utils::String &sRest)
1 cycrow 597 
{
14 cycrow 598 
	if ( sFirst.Compare("ScriptType") )
1 cycrow 599 
	{
14 cycrow 600 
		if ( sRest.Compare("Library") || sRest.Compare("Library Script") )
1 cycrow 601 
			this->SetLibrary();
14 cycrow 602 
		else if ( sRest.Compare("Update") || sRest.Compare("Package Update") || sRest.Compare("Mod Update") )
1 cycrow 603 
			this->SetPackageUpdate();
14 cycrow 604 
		else if ( sRest.Compare("Start") || sRest.Compare("Custom Start") )
1 cycrow 605 
			this->SetCustomStart();
14 cycrow 606 
		else if ( sRest.Compare("Patch") || sRest.Compare("Patch Mod") )
1 cycrow 607 
			this->SetPatch();
608 
		else
609 
		{
14 cycrow 610 
			int check = sRest;
611 
			if ( check || sRest == "0" )
1 cycrow 612 
				m_iScriptType = check;
613 
			else
614 
			{
14 cycrow 615 
				m_iScriptType = CSpkFile::ConvertScriptType(sRest);
1 cycrow 616 
				if ( m_iScriptType == -1 )
14 cycrow 617 
					m_sScriptType = sRest;
1 cycrow 618 
			}
619 
		}
620 
	}
14 cycrow 621 
	else if ( sFirst.Compare("AnotherMod") )
1 cycrow 622 
	{
14 cycrow 623 
		m_sOtherName = sRest.token("|", 1);
624 
		m_sOtherAuthor = sRest.tokens("|", 2);
1 cycrow 625 
	}
14 cycrow 626 
	else if ( sFirst.Compare("WareName") || sFirst.Compare("WareDesc") )
1 cycrow 627 
	{
628 
		// find the ware to use
629 
		SWares *useWare = m_pLastWare;
14 cycrow 630 
		Utils::String id = sRest.token(" ", 1);
1 cycrow 631 
		for ( CListNode<SWares> *wNode = m_lWares.Front(); wNode; wNode = wNode->next() )
632 
		{
10 cycrow 633 
			if ( wNode->Data()->sID.Compare(id.c_str()) )
1 cycrow 634 
			{
635 
				useWare = wNode->Data();
636 
				break;
637 
			}
638 
		}
639 
 
640 
		// check if we have the id already
641 
		if ( useWare )
642 
		{
14 cycrow 643 
			int lang = sRest.token(" ", 2);
1 cycrow 644 
			SWaresText *wt = NULL;
645 
			for ( CListNode<SWaresText> *tNode = useWare->lText.Front(); tNode; tNode = tNode->next() )
646 
			{
647 
				if ( tNode->Data()->iLang == lang )
648 
				{
649 
					wt = tNode->Data();
650 
					break;
651 
				}
652 
			}
653 
 
654 
			if ( !wt )
655 
			{
656 
				wt = new SWaresText;
657 
				wt->iLang = lang;
658 
				useWare->lText.push_back(wt);
659 
			}
660 
 
14 cycrow 661 
			if ( sFirst.Compare("WareName") )
662 
				wt->sName = sRest.tokens(" ", 3);
1 cycrow 663 
			else
14 cycrow 664 
				wt->sDesc = sRest.tokens(" ", 3);
1 cycrow 665 
		}
666 
	}
14 cycrow 667 
	else if ( sFirst.left(4).Compare("Ware") )
1 cycrow 668 
	{
669 
		SWares *ware = new SWares;
670 
		ware->iTextID = -1;
671 
		ware->iTextPage = 0;
14 cycrow 672 
		ware->cType = sFirst[4];
673 
		ware->iPrice = sRest.token(" ", 2);
674 
		ware->iSize = sRest.token(" ", 3);
675 
		ware->iVolumn = sRest.token(" ", 4);
676 
		ware->sID = sRest.token(" ", 1);
677 
		ware->iNotority = sRest.token(" ", 5);
678 
		if ( !sRest.token(" ", 6).empty() )
1 cycrow 679 
		{
14 cycrow 680 
			ware->iTextID = sRest.token(" ", 6).token(",", 2);
681 
			ware->iTextPage = sRest.token(" ", 6).token(",", 1);
1 cycrow 682 
		}
683 
		m_lWares.push_back ( ware );
684 
		m_pLastWare = ware;
685 
	}
686 
 
14 cycrow 687 
	else if ( CBaseFile::LoadPackageData(sFirst, sRest) )
1 cycrow 688 
		return true;
689 
	else
690 
		return false;
691 
 
692 
	return true;
693 
}
694 
 
695 
bool CSpkFile::GeneratePackagerScript(bool wildcard, CyStringList *list, bool datafile)
696 
{
697 
	if ( !CBaseFile::GeneratePackagerScript(wildcard, list, datafile) )
698 
		return false;
699 
 
700 
	list->PushBack("# Script Type, the type of package file, some are special types, others are just for show");
701 
	if ( this->IsLibrary() )
702 
		list->PushBack("ScriptType: Library");
703 
	else if ( this->IsPackageUpdate() )
704 
		list->PushBack("ScriptType: Package Update");
705 
	else if ( this->IsCustomStart() )
706 
		list->PushBack("ScriptType: Custom Start");
707 
	else if ( this->IsPatch() )
708 
		list->PushBack("ScriptType: Patch");
709 
	else
710 
		list->PushBack(CyString("ScriptType: ") + this->GetScriptTypeString(44));
711 
	list->PushBack("");
712 
 
713 
	if ( this->IsAnotherMod() )
714 
	{
715 
		list->PushBack("# For another mod/package, this is a child package");
716 
		list->PushBack(CyString("AnotherMod: ") + m_sOtherName + "|" + m_sOtherAuthor);
717 
		list->PushBack("");
718 
	}
719 
 
720 
	if ( !m_lWares.empty() )
721 
	{
722 
		list->PushBack("# Custom Wares, Ware<type>: <id> <price> <size> <volumn> <notority>");
723 
		for ( CListNode<SWares> *node = m_lWares.Front(); node; node = node->next() )
724 
		{
725 
			SWares *w = node->Data();
726 
			if ( w->iTextID > 0 )
727 
				list->PushBack(CyString("Ware") + (char)w->cType + ": " + w->sID + " " + (long)w->iPrice + " " + (long)w->iSize + " " + (long)w->iVolumn + " " + (long)w->iNotority + " " + (long)w->iTextPage + "," + (long)w->iTextID);
728 
			else
729 
				list->PushBack(CyString("Ware") + (char)w->cType + ": " + w->sID + " " + (long)w->iPrice + " " + (long)w->iSize + " " + (long)w->iVolumn + " " + (long)w->iNotority);
730 
			for ( CListNode<SWaresText> *wNode = w->lText.Front(); wNode; wNode = wNode->next() )
731 
			{
732 
				SWaresText *wt = wNode->Data();
10 cycrow 733 
				if ( !wt->sName.empty() )
1 cycrow 734 
					list->PushBack(CyString("WareName: ") + w->sID + " " + (long)wt->iLang + " " + wt->sName);
10 cycrow 735 
				if ( !wt->sDesc.empty() )
1 cycrow 736 
					list->PushBack(CyString("WareDesc: ") + w->sID + " " + (long)wt->iLang + " " + wt->sDesc);
737 
			}
738 
			list->PushBack("");
739 
		}
740 
	}
741 
 
742 
	if ( !datafile )
743 
	{
744 
		if ( !CBaseFile::GeneratePackagerScriptFile(wildcard, list) )
745 
			return false;
746 
	}
747 
 
748 
	return true;
749 
 
750 
}
751 
 
10 cycrow 752 
Utils::String CSpkFile::GetWareText(SWares *w, int lang)
1 cycrow 753 
{
754 
	// return the text page if being used
755 
	if ( w->iTextID > 0 && w->iTextPage > 0 )
10 cycrow 756 
		return Utils::String("{") + (long)w->iTextPage + "," + (long)w->iTextID + "}";
1 cycrow 757 
 
10 cycrow 758 
	Utils::String name;
1 cycrow 759 
	for ( CListNode<SWaresText> *wt = w->lText.Front(); wt; wt = wt->next() )
760 
	{
10 cycrow 761 
		if ( wt->Data()->sName.empty() )
1 cycrow 762 
			continue;
763 
		if ( wt->Data()->iLang == lang )
764 
			name = wt->Data()->sName;
10 cycrow 765 
		else if ( name.empty() && wt->Data()->iLang == 44 )
1 cycrow 766 
			name = wt->Data()->sName;
10 cycrow 767 
		else if ( name.empty() )
1 cycrow 768 
			name = wt->Data()->sName;
769 
	}
770 
 
771 
	return name;
772 
}
10 cycrow 773 
Utils::String CSpkFile::GetWareDesc(SWares *w, int lang)
1 cycrow 774 
{
775 
	// return the text page if being used
776 
	if ( w->iTextID > 0 && w->iTextPage > 0 )
10 cycrow 777 
		return Utils::String("{") + (long)w->iTextPage + "," + ((long)w->iTextID + 1) + "}";
1 cycrow 778 
 
10 cycrow 779 
	Utils::String name;
1 cycrow 780 
	for ( CListNode<SWaresText> *wt = w->lText.Front(); wt; wt = wt->next() )
781 
	{
10 cycrow 782 
		if ( wt->Data()->sDesc.empty() )
1 cycrow 783 
			continue;
784 
 
785 
		if ( wt->Data()->iLang == lang )
786 
			name = wt->Data()->sDesc;
10 cycrow 787 
		else if ( name.empty() && wt->Data()->iLang == 44 )
1 cycrow 788 
			name = wt->Data()->sDesc;
10 cycrow 789 
		else if ( name.empty() )
1 cycrow 790 
			name = wt->Data()->sDesc;
791 
	}
792 
 
793 
	return name;
794 
}
795 
 
13 cycrow 796 
Utils::String CSpkFile::GetCustomStartName() const
1 cycrow 797 
{
798 
	if ( !this->IsCustomStart() )
10 cycrow 799 
		return "";
1 cycrow 800 
 
801 
	// else find the custom start script
802 
	C_File *file = NULL;
803 
	for ( file = this->GetFirstFile(FILETYPE_SCRIPT); file; file = this->GetNextFile(file) )
804 
	{
805 
		if ( file->GetFilename().IsIn("initplayership")	&& file->GetFilename().GetToken(".", 1, 1).Compare("galaxy") )
806 
			break;
807 
	}
808 
 
809 
	if ( !file )
10 cycrow 810 
		return "";
1 cycrow 811 
 
10 cycrow 812 
	return file->GetFilename().GetToken(".", 2, 2).ToString();
1 cycrow 813 
}
814 
 
815 
void CSpkFile::MergePackage(CBaseFile *base)
816 
{
817 
	// update possible changes
818 
	if ( base->GetType() == TYPE_SPK )
819 
	{
820 
		CSpkFile *spk = (CSpkFile *)base;
821 
		m_bForceProfile = spk->IsForceProfile();
822 
 
823 
		// add any new wares
824 
		if ( spk->AnyWares() )
825 
		{
826 
			for ( CListNode<SWares> *node = spk->GetWaresList()->Front(); node; node = node->next() )
827 
				this->AddWare(node->Data());
828 
			spk->GetWaresList()->clear(); // remove wares so they aren't deleted
829 
		}
830 
 
831 
		// add any settings
832 
		if ( spk->AnySettings() )
833 
		{
834 
			for ( CListNode<SSettingType> *node = spk->GetSettingsList()->Front(); node; node = node->next() )
835 
				this->AddSetting(node->Data()->sKey, node->Data()->iType);
836 
		}
837 
 
10 cycrow 838 
		if ( !spk->GetOtherName().empty() )
1 cycrow 839 
		{
840 
			m_sOtherName = spk->GetOtherName();
841 
			m_sOtherAuthor = spk->GetOtherAuthor();
842 
		}
843 
	}
844 
 
845 
	// copy settings from base class
46 cycrow 846 
	_merge(base);
1 cycrow 847 
 
848 
	for ( CListNode<SGameCompat> *gNode = base->GetGameCompatabilityList()->Front(); gNode; gNode = gNode->next() ) {
46 cycrow 849 
		if ( !gNode->Data()->sVersion.empty() )
1 cycrow 850 
			this->AddGameCompatability(gNode->Data()->iGame, gNode->Data()->sVersion);
851 
		else
46 cycrow 852 
			this->AddGameCompatability(gNode->Data()->iGame, (long)gNode->Data()->iVersion);
1 cycrow 853 
	}
854 
 
855 
	// copy over needed librarys
856 
	for ( CListNode<SNeededLibrary> *lNode = base->GetNeededLibraries()->Front(); lNode; lNode = lNode->next() )
857 
		this->AddNeededLibrary(lNode->Data()->sName, lNode->Data()->sAuthor, lNode->Data()->sMinVersion);
858 
 
859 
	// web mirror address, add any new ones
860 
	for ( SStringList *str = base->GetWebMirrors()->Head(); str; str = str->next )
861 
		this->AddWebMirror(str->str);
862 
 
863 
	// copy over package names
864 
	for ( CListNode<SNames> *nNode = base->GetNamesList()->Front(); nNode; nNode = nNode->next() )
865 
		this->AddLanguageName(nNode->Data()->iLanguage, nNode->Data()->sName);
866 
 
867 
	// finally do all the files
868 
	for ( CListNode<C_File> *node = base->GetFileList()->Front(); node; node = node->next() )
869 
	{
870 
		C_File *f = node->Data();
871 
		// if it exists, remove the old
872 
		for ( CListNode<C_File> *thisNode = m_lFiles.Front(); thisNode; thisNode = thisNode->next() )
873 
		{
874 
			if ( thisNode->Data()->GetFileType() == f->GetFileType() && thisNode->Data()->GetFilename().Compare(f->GetFilename()) && thisNode->Data()->GetDir().Compare(f->GetDir()) )
875 
			{
876 
				m_lFiles.remove(thisNode);
877 
				break;
878 
			}
879 
		}
880 
 
881 
		m_lFiles.push_back(f);
882 
	}
883 
 
884 
	// clear the files so we dont delete them later
885 
	base->GetFileList()->clear();
886 
}
7 cycrow 887 
 
8 cycrow 888 
unsigned char *CSpkFile::_convert_uncompressFile(const Utils::String &sOldFilename, int *pLen)
7 cycrow 889 
{
10 cycrow 890 
	// firstcheck if the file exists
891 
	FILE *id = fopen(sOldFilename.c_str(), "rb" );
892 
	if ( !id ) {
50 cycrow 893 
		CLog::logf(CLog::Log_IO, 1, "Unable to open file: %s", sOldFilename.c_str());
10 cycrow 894 
		return false;
895 
	}
7 cycrow 896 
 
10 cycrow 897 
	// read the first 3 charaters to check if its using the original "HiP" compression
14 cycrow 898 
	Utils::String check((char)fgetc(id));
10 cycrow 899 
	check += (char)fgetc ( id );
900 
	check += (char)fgetc ( id );
7 cycrow 901 
 
14 cycrow 902 
	Utils::String removeFile;
7 cycrow 903 
 
10 cycrow 904 
	unsigned char *uncomprData = NULL;
905 
	unsigned char *data = NULL;
906 
	long len = 0, newlen = 0;
907 
 
908 
	if ( check == "HiP" ) {
909 
		fclose ( id );
910 
		bool opened = false;
911 
		if ( DecompressFile ( (char *)sOldFilename.c_str(), "uncompr.tmp" ) ) {
912 
			removeFile = "uncompr.tmp";
913 
			id = fopen ( "uncompr.tmp", "r" );
914 
			if ( id )
915 
				opened = true;
916 
		}
917 
 
918 
		if ( !opened ) {
50 cycrow 919 
			CLog::log(CLog::Log_IO, 1, "Unable to uncompress file, exiting...");
10 cycrow 920 
			return false;
921 
		}
922 
 
50 cycrow 923 
		CLog::log(CLog::Log_IO, 1, "* Reading file into memory...");
10 cycrow 924 
		// get file length
925 
		fseek ( id, 0, SEEK_END );
926 
		len = ftell ( id );
927 
 
928 
		// move back to beginning
929 
		fseek ( id, 0, SEEK_SET );
930 
 
931 
		// read the data from file into memory
932 
		uncomprData = new unsigned char[len + 1];
933 
		fread ( uncomprData, sizeof(unsigned char), len, id );
934 
 
935 
		newlen = len;
936 
	}
937 
	else
938 
	{
50 cycrow 939 
		CLog::log(CLog::Log_IO, 1, "* Reading file into memory...");
10 cycrow 940 
		// get file length
941 
		fseek ( id, 0, SEEK_END );
942 
		len = ftell ( id );
943 
 
944 
		// move back to beginning
945 
		fseek ( id, 0, SEEK_SET );
946 
 
947 
		// read the data from file into memory
948 
		data = new unsigned char[len + 1];
949 
		fread ( data, sizeof(unsigned char), len, id );
950 
 
951 
		// uncompress the file (currently only 7zip compression)
50 cycrow 952 
		CLog::log(CLog::Log_IO, 1, "* Uncompressing file...");
10 cycrow 953 
		newlen = len;
954 
	#ifdef _INCLUDE7ZIP
955 
		uncomprData = LZMADecodeData ( data, len, newlen, progress );
956 
	#else
957 
		uncomprData = LZMADecode_C ( (unsigned char *)data, len, (size_t*)&newlen, NULL );
958 
	#endif
959 
	}
960 
 
961 
	*pLen = newlen;
962 
 
14 cycrow 963 
	if ( !removeFile.empty() ) {
52 cycrow 964 
		CFileIO::Remove(removeFile);
10 cycrow 965 
	}
966 
 
7 cycrow 967 
	return uncomprData;
968 
}
969 
 
8 cycrow 970 
Utils::String CSpkFile::_convert_fileEndString(const Utils::String &sFile)
7 cycrow 971 
{
10 cycrow 972 
	if ( sFile.Compare("Text") )
973 
		return "-- End of Script --";
974 
	else if ( sFile.Compare("Uninstall") )
975 
		return "-- End of Uninstall --";
976 
	else if ( sFile.Compare("Readme") )
977 
		return "-- End of Readme --";
978 
	else if ( sFile.Compare("Map") )
979 
		return "-- End of Map --";
980 
	else if ( sFile.Compare("Mod") || sFile.Compare("Extra") || sFile.Compare("Screen") || sFile.Compare("Sound") )
981 
		return "";
982 
	return "-- End of Script --";
7 cycrow 983 
}
984 
 
8 cycrow 985 
int CSpkFile::_convert_fileType(const Utils::String &sFile)
7 cycrow 986 
{
10 cycrow 987 
	if ( sFile.Compare("Text") )
988 
		return FILETYPE_TEXT;
989 
	else if ( sFile.Compare("Uninstall") )
990 
		return FILETYPE_UNINSTALL;
991 
	else if ( sFile.Compare("Readme") )
992 
		return FILETYPE_README;
993 
	else if ( sFile.Compare("Map") )
994 
		return FILETYPE_MAP;
995 
	else if ( sFile.Compare("Mod") )
996 
		return FILETYPE_MOD;
997 
	else if ( sFile.Compare("Extra") )
998 
		return FILETYPE_EXTRA;
999 
	else if ( sFile.Compare("Screen") )
1000 
		return FILETYPE_SCREEN;
1001 
	else if ( sFile.Compare("Sound") )
1002 
		return FILETYPE_SOUND;
1003 
 
1004 
	return FILETYPE_SCRIPT;
7 cycrow 1005 
}
1006 
 
10 cycrow 1007 
void CSpkFile::_convert_parse(const Utils::String &sCmd, const Utils::String &sRest)
7 cycrow 1008 
{
10 cycrow 1009 
	if ( sCmd == "Name:" )
1010 
	{
50 cycrow 1011 
		this->setName ( sRest );
1012 
		CLog::logf(CLog::Log_EditPackage, 3, "\tScript Name: %s", sRest.c_str() );
10 cycrow 1013 
	}
1014 
	else if ( sCmd == "Author:" )
1015 
	{
50 cycrow 1016 
		this->setAuthor(sRest);
1017 
		CLog::logf(CLog::Log_EditPackage, 3, "\tScript Author: %s", sRest.c_str() );
10 cycrow 1018 
	}
1019 
	else if ( sCmd == "CustomStart" )
1020 
	{
1021 
		this->SetCustomStart();
50 cycrow 1022 
		CLog::logf(CLog::Log_EditPackage, 3, "\tPackage is a custom start!!" );
10 cycrow 1023 
	}
1024 
	else if ( sCmd == "AnotherMod:" )
1025 
	{
1026 
		this->SetAnotherMod(sRest.token("|", 1), sRest.tokens("|", 2));
50 cycrow 1027 
		CLog::logf(CLog::Log_EditPackage, 3, "\tFor another Mod, Name: %s, Author: %s", this->GetOtherName().c_str(), this->GetOtherAuthor().c_str() );
10 cycrow 1028 
	}
1029 
	else if ( sCmd == "PATCH" )
1030 
	{
1031 
		this->SetPatch();
50 cycrow 1032 
		CLog::logf(CLog::Log_EditPackage, 3, "\tPackage is a Patch Mod!!" );
10 cycrow 1033 
	}
1034 
	else if ( sCmd == "Version:" )
1035 
	{
50 cycrow 1036 
		this->setVersion(sRest);
1037 
		CLog::logf(CLog::Log_EditPackage, 3,"\tScript Version: %s", sRest.c_str() );
10 cycrow 1038 
	}
1039 
	else if ( sCmd == "Date:" )
1040 
	{
50 cycrow 1041 
		this->setCreationDate ( sRest );
1042 
		CLog::logf(CLog::Log_EditPackage, 3,"\tScript Creation Date: %s", sRest.c_str() );
10 cycrow 1043 
	}
48 cycrow 1044 
	else if ( sCmd == "Desc:" ) {
1045 
		this->setDescription(sRest.findReplace("<br>", "\n") );
50 cycrow 1046 
		CLog::logf(CLog::Log_EditPackage, 3,"\tScript Description: %s", this->description().c_str() );
10 cycrow 1047 
	}
49 cycrow 1048 
	else if ( sCmd == "WebAddress:" ) {
1049 
		this->setWebAddress(sRest);
50 cycrow 1050 
		CLog::logf(CLog::Log_EditPackage, 3, "\tWeb Address: %s", sRest.c_str() );
10 cycrow 1051 
	}
1052 
	else if ( sCmd == "WebMirror1:" )
1053 
	{
1054 
		this->AddWebMirror(sRest);
50 cycrow 1055 
		CLog::logf(CLog::Log_EditPackage, 3, "\tWeb Mirror Address: %s", sRest.c_str() );
10 cycrow 1056 
	}
1057 
	else if ( sCmd == "WebMirror2:" )
1058 
	{
1059 
		this->AddWebMirror(sRest);
50 cycrow 1060 
		CLog::logf(CLog::Log_EditPackage, 3, "\tWeb Mirror Address: %s", sRest.c_str() );
10 cycrow 1061 
	}
1062 
 
1063 
	else if ( sCmd == "ScriptType:" )
1064 
		this->SetScriptType (sRest);
49 cycrow 1065 
	else if ( sCmd == "WebSite:" ) {
1066 
		this->setWebSite ( sRest );
50 cycrow 1067 
		CLog::logf(CLog::Log_EditPackage, 3, "\tWeb Site: %s", sRest.c_str() );
10 cycrow 1068 
	}
49 cycrow 1069 
	else if ( sCmd == "Email:" ) {
1070 
		this->setEmail(sRest);
50 cycrow 1071 
		CLog::logf(CLog::Log_EditPackage, 3, "\tAuthor Email Address: %s", sRest.c_str() );
10 cycrow 1072 
	}
1073 
	else if ( sCmd == "GameVersion:" )
1074 
	{
1075 
		//TODO: fix this for new game version
1076 
		/*
1077 
		int version = sRest.ToInt();
1078 
		if ( version == 0 )
1079 
			this->SetGameVersion ( 1 );
1080 
		else if (version == 1 )
1081 
			this->SetGameVersion ( 0 );
1082 
		else
1083 
			this->SetGameVersion ( version );
1084 
		CLog::logf(CLog::Log_EditPackage, "\tGame Version: %d", this->GetGameVersion () );
1085 
		*/
1086 
	}
1087 
 
1088 
	else if ( sCmd == "Ware:" )
1089 
	{
1090 
		this->AddWare ( sRest );
50 cycrow 1091 
		CLog::logf(CLog::Log_EditPackage, 3, "\tAdding Custom Ware" );
10 cycrow 1092 
	}
1093 
	else if ( sCmd == "WareText:" )
1094 
		this->AddWareText ( sRest );
46 cycrow 1095 
	else if ( sCmd == "UninstallAfter:" )	this->addUninstallText(sRest.token(" ", 1).toLong(), false, sRest.tokens(" ", 2));
1096 
	else if ( sCmd == "UninstallBefore:" )	this->addUninstallText(sRest.token(" ", 1).toLong(), true, sRest.tokens(" ", 2));
1097 
	else if ( sCmd == "InstallAfter:" )		this->addInstallText(sRest.token(" ", 1).toLong(), false, sRest.tokens(" ", 2));
1098 
	else if ( sCmd == "InstallBefore:" )	this->addInstallText(sRest.token(" ", 1).toLong(), true, sRest.tokens(" ", 2));
10 cycrow 1099 
	else if ( sCmd == "ScriptName:" )
1100 
	{
1101 
		Utils::String lang = sRest.token(":", 1);
1102 
		Utils::String name = sRest.tokens(":", 2);
1103 
		this->AddLanguageName(lang.toLong(), name);
50 cycrow 1104 
		CLog::logf(CLog::Log_EditPackage, 3, "\tScript Name Language (%s) %s", lang.c_str(), name.c_str() );
10 cycrow 1105 
	}
7 cycrow 1106 
}
1107 
 
8 cycrow 1108 
Utils::String CSpkFile::_convert_parseFilename(const Utils::String &sRest, float fVersion, Utils::String *pDir)
7 cycrow 1109 
{
8 cycrow 1110 
	Utils::String sFilename;
7 cycrow 1111 
 
10 cycrow 1112 
	if ( fVersion >= 3.00f )
1113 
		sFilename = sRest.tokens(" ", 3);
1114 
	else if ( fVersion >= 2.00f )
1115 
		sFilename = sRest.tokens(" ", 2);
1116 
	else
1117 
		sFilename = sRest;
1118 
 
1119 
	if ( sFilename.isin("<br>") ) {
1120 
		sFilename = sFilename.findReplace("<br>", "|");
1121 
		if ( sFilename[0] == '|' ) {
1122 
			sFilename = sFilename.token("|", 1);
1123 
		}
1124 
		else {
1125 
			*pDir = sFilename.token("|", 1);
1126 
			sFilename = sFilename.tokens("|", 2);
1127 
		}
1128 
	}
1129 
 
1130 
	return sFilename;
7 cycrow 1131 
}
1132 
 
10 cycrow 1133 
unsigned char *CSpkFile::_convert_parseFile(const Utils::String &sCmd, const Utils::String &sRest, float fVersion, unsigned char *d)
7 cycrow 1134 
{
10 cycrow 1135 
	bool bShared = (sCmd.left(9) == "$$$Shared") ? true : false;
1136 
	Utils::String sFile = sCmd.right(-3).left(-1);
1137 
	Utils::String sEnd = this->_convert_fileEndString(sFile);
1138 
	int iType = this->_convert_fileType(sFile);
1139 
 
1140 
	// convert the filename and directory
1141 
	Utils::String dir, filename = _convert_parseFilename(sRest, fVersion, &dir);
1142 
 
1143 
	// get the size and time
1144 
	long time = 0, size = 0;
1145 
	if ( fVersion >= 2.00f ) time = sRest.token(" ", 1).toLong();
1146 
	if ( fVersion >= 3.00f ) size = sRest.token(" ", 2).toLong();
1147 
	bool binaryRead = (CFileIO(filename).CheckFileExtension("PCK")) ? true : false;
1148 
	if ( sEnd.empty() ) binaryRead = true;
1149 
 
1150 
	C_File *file = new C_File ();
1151 
 
50 cycrow 1152 
	if ( bShared )	CLog::logf(CLog::Log_File, 2, "\tFound %s File (Shared): %s, Reading...", sFile.c_str(), filename.c_str() );
1153 
	else			CLog::logf(CLog::Log_File, 2, "\tFound %s File: %s, Reading...", sFile.c_str(), filename.c_str() );
10 cycrow 1154 
 
1155 
	// read the data
1156 
	if ( binaryRead )
1157 
	{
1158 
		file->ReadFromData ( (char *)d, size );
1159 
		d += size;
1160 
	}
1161 
	else
1162 
	{
14 cycrow 1163 
		Utils::String readData;
10 cycrow 1164 
		d = LineByLineRead ( d, sEnd, &readData );
14 cycrow 1165 
		file->ReadFromData ( (char *)readData.c_str(), (long)readData.length() );
10 cycrow 1166 
	}
1167 
 
1168 
	// setup the file
1169 
	file->SetName ( filename );
1170 
	file->SetFileType ( iType );
1171 
	file->SetShared ( bShared );
1172 
	file->SetCreationTime ( time );
1173 
	if ( !dir.empty() )
1174 
		file->SetDir ( dir );
1175 
 
1176 
	this->AddFile ( file );
1177 
 
50 cycrow 1178 
	CLog::logf(CLog::Log_File, 3, "Size: %s", file->GetDataSizeString().c_str() );
10 cycrow 1179 
 
1180 
	return d;
7 cycrow 1181 
}
1182 
 
9 cycrow 1183 
CSpkFile *CSpkFile::convertFromOld(const Utils::String &sOldFilename)
1184 
{
1185 
	// check if the old file is actually in an old format
10 cycrow 1186 
	int ret = CBaseFile::CheckFile ( sOldFilename );
1187 
	if ( ret != SPKFILE_INVALID && ret != SPKFILE_OLD ) {
1188 
		return NULL;
1189 
 	}
1190 
 
1191 
	CSpkFile *pSpkFile = new CSpkFile();
1192 
	if ( !pSpkFile->convertOld(sOldFilename) ) {
1193 
		delete pSpkFile;
1194 
		return NULL;
1195 
	}
1196 
 
1197 
	return pSpkFile;
9 cycrow 1198 
}
1199 
 
8 cycrow 1200 
bool CSpkFile::convertOld(const Utils::String &sOldFilename)
7 cycrow 1201 
{
1202 
	// check if the old file is actually in an old format
10 cycrow 1203 
	int ret = CBaseFile::CheckFile ( sOldFilename );
1204 
	if ( ret != SPKFILE_INVALID && ret != SPKFILE_OLD ) {
1205 
		return false;
1206 
 	}
1207 
 
1208 
	//uncomress the data
1209 
	int len;
1210 
	unsigned char *uncomprData = this->_convert_uncompressFile(sOldFilename, &len);
1211 
 
1212 
	// uncomressed failed
1213 
	if ( !uncomprData ) {
50 cycrow 1214 
		CLog::log(CLog::Log_IO, 1, "Error: Unable to uncompress the file");
10 cycrow 1215 
		return false;
1216 
	}
1217 
 
1218 
	// now we can read the data
1219 
	unsigned char *d = uncomprData;
1220 
	Utils::String str;
1221 
 
1222 
//	CMultiSpkFile *mspk = NULL;
1223 
	//SMultiSpkFile *cur_mspk = NULL;
1224 
 
1225 
	int numscripts = 0, curscript = 0;
1226 
	float fVersion = 1;
1227 
 
50 cycrow 1228 
	CLog::log(CLog::Log_IO, 1, "* Reading spk data...");
10 cycrow 1229 
	while ( d )
1230 
	{
1231 
		// read the next line
1232 
		d = str.readToEndOfLine(d);
1233 
		if ( !d || d[0] == 0 ) {
1234 
			break;
1235 
		}
1236 
		if ( str.empty() ) {
1237 
			continue;
1238 
		}
1239 
 
1240 
		Utils::String sCmd = str.token(" ", 1);
1241 
 
1242 
		//TODO: split this into CMultiSpkFile
1243 
		/*
1244 
		if ( first == "MultiPackage:" )
1245 
			mspk = new CMultiSpkFile;
1246 
		else if ( (first == "SelectScript:") && (mspk) )
1247 
		{
1248 
			mspk->AddFileEntry ( rest.GetToken ( 2, -1, ' ' ) + ".spk" );
1249 
			++numscripts;
1250 
		}
1251 
		else if ( (str == "AllowSelection") && (mspk) )
1252 
			mspk->SetSelection ( true );
1253 
		else if ( str == "-- Start New Script --" )
1254 
		{
1255 
			if ( !mspk )
1256 
			{
1257 
				printf ( "Invalid file format, seems to be multi package file but isn't\n" );
1258 
				CLEANUP
1259 
				exit ( 0 );
1260 
			}
1261 
			cur_mspk = mspk->GetFileList()->Get ( curscript );
1262 
			++curscript;
1263 
			cur_mspk->pFile = new CSpkFile;
1264 
			spkfile = (CSpkFile *)cur_mspk->pFile;
1265 
		}
1266 
		*/
1267 
		Utils::String sRest = str.tokens(" ", 2);
1268 
		if ( sCmd == "Packager:" ) {
1269 
			fVersion = sRest;
50 cycrow 1270 
			CLog::logf(CLog::Log_Read, 3, "\tPackager Version: %.2f", fVersion );
10 cycrow 1271 
		}
1272 
		else if ( sCmd == "Icon:" )
1273 
		{
1274 
			long size = sRest.token(" ", 1);
1275 
			Utils::String ext = sRest.token(" ", 2);
1276 
 
1277 
			C_File *file = new C_File ();
1278 
			file->ReadFromData ( (char *)d, size );
1279 
 
1280 
			d += size;
1281 
 
1282 
			this->SetIcon(file, ext);
1283 
 
50 cycrow 1284 
			CLog::logf(CLog::Log_File, 3, "\tIcon (%s) Size: %s", ext.c_str(), file->GetDataSizeString ().c_str() );
10 cycrow 1285 
		}
1286 
		else if ( sCmd.left(3) == "$$$" )
1287 
			d = _convert_parseFile(sCmd, sRest, fVersion, d);
1288 
		else {
1289 
			this->_convert_parse(sCmd, sRest);
1290 
		}
1291 
	}
1292 
 
50 cycrow 1293 
	CLog::logf(CLog::Log_IO, 1, "* Reading spk data..." );
10 cycrow 1294 
 
7 cycrow 1295 
	return true;
1296 
}