Subversion Repositories spk

Rev

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