You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
425 lines
8.7 KiB
425 lines
8.7 KiB
#include "LevelCollection.h"
|
|
|
|
#include "Map.h"
|
|
|
|
#include <tqfile.h>
|
|
#include <stdio.h>
|
|
|
|
#include <assert.h>
|
|
#include <unistd.h>
|
|
#include <string.h>
|
|
#include <kconfig.h>
|
|
#include <kapplication.h>
|
|
|
|
static inline unsigned long
|
|
forward(unsigned long a, unsigned long b, unsigned long c, unsigned long d)
|
|
{
|
|
unsigned long x=(a^b)&0xfffffffful;
|
|
return (((x<<c)|(x>>((32ul-c)&31ul)))*d)&0xfffffffful;
|
|
}
|
|
|
|
static inline unsigned long
|
|
backward(unsigned long a, unsigned long b, unsigned long c, unsigned long d)
|
|
{
|
|
unsigned long x=(a*b)&0xfffffffful;
|
|
return (((x<<c)|(x>>((32ul-c)&31ul)))^d)&0xfffffffful;
|
|
}
|
|
|
|
|
|
void
|
|
LevelCollection::indexTextCollection() {
|
|
enum states {
|
|
BEFORE_NONE, BEFORE_VALID, BEFORE_INVALID,
|
|
DURING_NONE, DURING_VALID, DURING_INVALID
|
|
} state = BEFORE_NONE;
|
|
|
|
int levelstart=0, levelend=0;
|
|
for (unsigned pos=0; pos<(data_.size()-1); pos++) {
|
|
switch (state) {
|
|
case BEFORE_NONE:
|
|
switch (data_[pos]) {
|
|
case '#': case '.': case '$': case '+': case '*': case '@':
|
|
state = BEFORE_VALID;
|
|
break;
|
|
|
|
case ' ': case '\t': case '\r':
|
|
break;
|
|
|
|
case '\n':
|
|
levelstart = pos + 1;
|
|
break;
|
|
|
|
default:
|
|
state = BEFORE_INVALID;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case BEFORE_VALID:
|
|
switch (data_[pos]) {
|
|
case '#': case '.': case '$': case '+': case '*': case '@':
|
|
case ' ': case '\t': case '\r':
|
|
break;
|
|
|
|
case '\n':
|
|
addLevel(&data_[levelstart]);
|
|
levelend = levelstart;
|
|
state = DURING_NONE;
|
|
break;
|
|
|
|
default:
|
|
state = BEFORE_INVALID;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case BEFORE_INVALID:
|
|
switch (data_[pos]) {
|
|
case '\n':
|
|
levelstart = pos + 1;
|
|
state = BEFORE_NONE;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case DURING_NONE:
|
|
switch (data_[pos]) {
|
|
case '#': case '.': case '$': case '+': case '*': case '@':
|
|
state = DURING_VALID;
|
|
break;
|
|
|
|
case ' ': case '\t': case '\r':
|
|
break;
|
|
|
|
case '\n':
|
|
data_[levelend] = '\0';
|
|
levelstart = pos + 1;
|
|
state = BEFORE_NONE;
|
|
break;
|
|
|
|
default:
|
|
state = DURING_INVALID;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case DURING_VALID:
|
|
switch (data_[pos]) {
|
|
case '#': case '.': case '$': case '+': case '*': case '@':
|
|
case ' ': case '\t': case '\r':
|
|
break;
|
|
|
|
case '\n':
|
|
levelend = pos;
|
|
state = DURING_NONE;
|
|
break;
|
|
|
|
default:
|
|
state = DURING_INVALID;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
case DURING_INVALID:
|
|
switch (data_[pos]) {
|
|
case '\n':
|
|
data_[levelend] = '\0';
|
|
levelstart = pos + 1;
|
|
state = BEFORE_NONE;
|
|
break;
|
|
}
|
|
break;
|
|
|
|
default:
|
|
assert(0);
|
|
}
|
|
}
|
|
|
|
if (state==DURING_NONE || state==DURING_INVALID) {
|
|
data_[levelend] = '\0';
|
|
}
|
|
}
|
|
|
|
void
|
|
LevelCollection::loadPrefs() {
|
|
if (id_ >= 0) {
|
|
KConfig *cfg=(KApplication::kApplication())->config();
|
|
cfg->setGroup("settings");
|
|
|
|
TQString key;
|
|
key.sprintf("level%d", id_);
|
|
level_ = cfg->readNumEntry(key, 0);
|
|
|
|
key.sprintf("status%d", id_);
|
|
unsigned long x = cfg->readUnsignedLongNumEntry(key, 0);
|
|
|
|
x = backward(x, 0xc1136a15ul, 0x12ul, 0x80ff0b94ul);
|
|
x = backward(x, 0xd38fd2ddul, 0x01ul, 0xd4d657b4ul);
|
|
x = backward(x, 0x59004eeful, 0x1eul, 0xf6c75e2cul);
|
|
x = backward(x, 0x366c3e25ul, 0x0aul, 0x61ebc208ul);
|
|
x = backward(x, 0x20a784c9ul, 0x15ul, 0x207d488bul);
|
|
x = backward(x, 0xc02864abul, 0x09ul, 0x709e62a3ul);
|
|
x = backward(x, 0xe2a60f19ul, 0x0eul, 0x8bb02c07ul);
|
|
x = backward(x, 0x3b0e11f3ul, 0x13ul, 0x608aef3ful);
|
|
|
|
completedLevels_ = x>>16 & 0x3ff;
|
|
if (!cfg->hasKey(key)) completedLevels_ = 0;
|
|
if (((x>>26) & 0x3ful) != (unsigned long) id_) completedLevels_ = 0;
|
|
if ((x & 0xfffful) != (unsigned long) getuid()) completedLevels_ = 0;
|
|
if (completedLevels_ > noOfLevels_) completedLevels_ = 0;
|
|
|
|
if (level_ > completedLevels_) level_ = completedLevels_;
|
|
if (level_ >= noOfLevels_) level_ = noOfLevels_-1;
|
|
if (level_ < 0) level_ = 0;
|
|
} else {
|
|
level_ = 0;
|
|
completedLevels_ = noOfLevels_;
|
|
}
|
|
}
|
|
|
|
void
|
|
LevelCollection::addLevel(const char* _level) {
|
|
unsigned s = index_.size();
|
|
index_.resize(s + 1);
|
|
index_.insert(s, _level);
|
|
}
|
|
|
|
void
|
|
LevelCollection::addData(const char* _data, unsigned _len) {
|
|
unsigned pos = data_.size();
|
|
data_.resize(pos + _len);
|
|
memcpy(data_.data() + pos, _data, _len);
|
|
}
|
|
|
|
void
|
|
LevelCollection::addSeparator() {
|
|
unsigned pos = data_.size();
|
|
data_.resize(pos + 1);
|
|
data_[pos] = '\0';
|
|
}
|
|
|
|
LevelCollection::LevelCollection(const char *_def, int _len,
|
|
const TQString &_name, int _id) :
|
|
level_(0), completedLevels_(0), noOfLevels_(0),
|
|
name_(_name), id_(_id) {
|
|
|
|
addData(_def, _len);
|
|
addSeparator();
|
|
|
|
indexTextCollection();
|
|
|
|
noOfLevels_ = index_.size();
|
|
|
|
loadPrefs();
|
|
}
|
|
|
|
LevelCollection::LevelCollection(const TQString &_path, const TQString &_name,
|
|
int _id) :
|
|
level_(0), completedLevels_(0), noOfLevels_(0),
|
|
name_(_name), path_(_path), id_(_id) {
|
|
|
|
char buf[1024];
|
|
int len;
|
|
|
|
TQFile file(path_);
|
|
if (file.open(IO_Raw | IO_ReadOnly)) {
|
|
while ((len = file.readBlock(buf, 1024)) > 0) {
|
|
addData((const char *) buf, len);
|
|
}
|
|
file.close();
|
|
addSeparator();
|
|
}
|
|
|
|
indexTextCollection();
|
|
|
|
noOfLevels_ = index_.size();
|
|
|
|
loadPrefs();
|
|
|
|
}
|
|
|
|
LevelCollection::~LevelCollection() {
|
|
if (id_ >= 0) {
|
|
KConfig *cfg=(KApplication::kApplication())->config();
|
|
cfg->setGroup ("settings");
|
|
|
|
TQString key;
|
|
key.sprintf("level%d", id_);
|
|
cfg->writeEntry(key, level_, true, false, false);
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
LevelCollection::levelCompleted() {
|
|
if (completedLevels_ < (level_+1)) completedLevels_ = level_+1;
|
|
|
|
if (id_ >= 0) {
|
|
unsigned long x=(((unsigned long) getuid()) & 0xfffful);
|
|
x |= ((unsigned long) id_)<<26;
|
|
x |= ((unsigned long) completedLevels_)<<16;
|
|
|
|
x = forward(x, 0x608aef3ful, 0x0dul, 0xfb00ef3bul);
|
|
x = forward(x, 0x8bb02c07ul, 0x12ul, 0x2a37dd29ul);
|
|
x = forward(x, 0x709e62a3ul, 0x17ul, 0x23607603ul);
|
|
x = forward(x, 0x207d488bul, 0x0bul, 0xc31fd579ul);
|
|
x = forward(x, 0x61ebc208ul, 0x16ul, 0xbcffadadul);
|
|
x = forward(x, 0xf6c75e2cul, 0x02ul, 0xa2baa00ful);
|
|
x = forward(x, 0xd4d657b4ul, 0x1ful, 0x7e129575ul);
|
|
x = forward(x, 0x80ff0b94ul, 0x0eul, 0x92fc153dul);
|
|
|
|
TQString key;
|
|
key.sprintf("status%d", id_);
|
|
|
|
KConfig *cfg=(KApplication::kApplication())->config();
|
|
cfg->setGroup("settings");
|
|
cfg->writeEntry(key, x, true, false, false);
|
|
cfg->sync();
|
|
}
|
|
}
|
|
|
|
|
|
void
|
|
LevelCollection::level(int _level) {
|
|
assert(_level >= 0 && _level < noOfLevels_);
|
|
|
|
level_ = _level;
|
|
if (level_ > completedLevels_) level_ = completedLevels_;
|
|
if (level_ >= noOfLevels_) level_ = noOfLevels_ - 1;
|
|
if (level_ < 0) level_ = 0;
|
|
}
|
|
|
|
static int
|
|
minX(const char *def) {
|
|
int min_x = 10000;
|
|
|
|
int x=0;
|
|
for (int pos=0; def[pos]; pos++) {
|
|
switch(def[pos]) {
|
|
case '\n':
|
|
x = 0;
|
|
break;
|
|
|
|
case ' ':
|
|
x++;
|
|
break;
|
|
|
|
case '\t':
|
|
x = (x+8) & ~7;
|
|
break;
|
|
|
|
case '\r':
|
|
break;
|
|
|
|
default:
|
|
if (x < min_x) min_x = x;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return min_x == 10000 ? -1 : min_x;
|
|
}
|
|
|
|
|
|
bool
|
|
LevelCollection::loadLevel(Map *_map) {
|
|
_map->clearMap();
|
|
|
|
const char *def = index_[level_];
|
|
bool goodMap = true;
|
|
int x=0, y=0, goalsLeft=0;
|
|
|
|
int min_x = minX(def);
|
|
if (min_x < 0) {
|
|
min_x = 0;
|
|
goodMap = false;
|
|
}
|
|
|
|
|
|
_map->xpos_ = -1;
|
|
_map->ypos_ = -1;
|
|
|
|
for (int pos=0; def[pos]; pos++) {
|
|
switch(def[pos]) {
|
|
case '\n':
|
|
y++;
|
|
x = 0;
|
|
break;
|
|
|
|
case ' ':
|
|
x++;
|
|
break;
|
|
|
|
case '\t':
|
|
x = (x+8) & ~7;
|
|
break;
|
|
|
|
case '@':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else {
|
|
_map->xpos_ = x-min_x;
|
|
_map->ypos_ = y;
|
|
}
|
|
x++;
|
|
break;
|
|
|
|
case '$':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else _map->map(x-min_x, y, OBJECT);
|
|
x++;
|
|
break;
|
|
|
|
case '.':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else {
|
|
_map->map(x-min_x, y, GOAL);
|
|
goalsLeft++;
|
|
}
|
|
x++;
|
|
break;
|
|
|
|
case '#':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else _map->map(x-min_x, y, WALL);
|
|
x++;
|
|
break;
|
|
|
|
case '+':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else {
|
|
_map->xpos_ = x-min_x;
|
|
_map->ypos_ = y;
|
|
_map->map(x-min_x, y, GOAL);
|
|
goalsLeft++;
|
|
}
|
|
x++;
|
|
break;
|
|
|
|
case '*':
|
|
if (x-min_x > MAX_X || y > MAX_Y) goodMap = false;
|
|
else _map->map(x-min_x, y, OBJECT|GOAL);
|
|
x++;
|
|
break;
|
|
|
|
case '\r':
|
|
break;
|
|
|
|
default:
|
|
goodMap = false;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (_map->objectsLeft() != goalsLeft) goodMap = false;
|
|
if (_map->completed()) goodMap = false;
|
|
|
|
if (_map->badCoords(_map->xpos_, _map->ypos_)) goodMap = false;
|
|
else {
|
|
if (!_map->empty(_map->xpos_, _map->ypos_)) goodMap = false;
|
|
else if (!_map->fillFloor(_map->xpos_, _map->ypos_)) goodMap = false;
|
|
}
|
|
|
|
return goodMap;
|
|
}
|
|
|