void BTSerializedEditor::edit(BTDisplay &d, ObjectSerializer &serial)
{
BTDisplayConfig *oldConfig = d.getConfig();
BTDisplayConfig config;
XMLSerializer parser;
config.serialize(&parser);
parser.parse(BTDisplay::applyDisplayDir("data/specialedit.xml").c_str(), true);
d.setConfig(&config);
int start(0);
int current(0);
BitField active;
std::vector<BTDisplay::selectItem> list(entries);
initActive(serial, active);
int len = setup(serial, active, list);
d.addSelection(list.data(), len, start, current);
int key;
char extra[2] = {BTKEY_DEL, 0};
while (27 != (key = d.process(extra)))
{
d.clearText();
XMLAction *curField = NULL;
if (list[current].value < entries)
curField = serial.find(field[list[current].value], NULL);
if (key == BTKEY_DEL)
{
if (curField)
{
int where = 0;
if (curField->getType() == XMLTYPE_CREATE)
{
XMLArray *obj = reinterpret_cast<XMLArray*>(curField->object);
int where = 0;
for (int i = current - 1; (i >= 0) && (list[i].value == list[current].value); --i)
{
++where;
}
if (where < obj->size())
{
obj->erase(where);
for (int i = current; i < len - 1; ++i)
{
list[i].name = list[i + 1].name;
list[i].value = list[i + 1].value;
}
--len;
}
}
else if (curField->getType() == XMLTYPE_VECTORSTRING)
{
std::vector<std::string> *obj = reinterpret_cast<std::vector<std::string>*>(curField->object);
int where = 0;
for (int i = current - 1; (i >= 0) && (list[i].value == list[current].value); --i)
{
++where;
}
if (where < obj->size())
{
obj->erase(obj->begin() + where);
for (int i = current; i < len - 1; ++i)
{
list[i].name = list[i + 1].name;
list[i].value = list[i + 1].value;
}
--len;
}
}
}
else
{
delSpecialField(d, serial, list[current].value);
}
}
else
{
if (curField)
{
int where = 0;
if (curField->getType() == XMLTYPE_CREATE)
{
XMLArray *obj = reinterpret_cast<XMLArray*>(curField->object);
for (int i = current - 1; (i >= 0) && (list[i].value == list[current].value); --i)
{
++where;
}
if (where >= obj->size())
{
obj->push_back((*reinterpret_cast<XMLObject::create>(curField->data))(field[list[current].value], NULL));
list.push_back(BTDisplay::selectItem());
for (int i = list.size() - 1; i > current; --i)
{
list[i].name = list[i - 1].name;
list[i].value = list[i - 1].value;
}
len++;
}
}
else if (curField->getType() == XMLTYPE_VECTORSTRING)
{
std::vector<std::string> *obj = reinterpret_cast<std::vector<std::string>*>(curField->object);
for (int i = current - 1; (i >= 0) && (list[i].value == list[current].value); --i)
{
++where;
}
if (where >= obj->size())
{
obj->push_back(std::string());
list.push_back(BTDisplay::selectItem());
for (int i = list.size() - 1; i > current; --i)
{
list[i].name = list[i - 1].name;
list[i].value = list[i - 1].value;
}
len++;
}
}
editField(d, serial, description[list[current].value], curField, list[current].value, where);
if (curField->getType() == XMLTYPE_OBJECT)
{
XMLObject *obj = reinterpret_cast<XMLObject*>(curField->object);
BTDice *dice = dynamic_cast<BTDice*>(obj);
if (dice)
list[current].name = std::string(description[list[current].value]) + ": " + dice->createString();
}
else if (curField->getType() == XMLTYPE_VECTORSTRING)
{
std::vector<std::string> *obj = reinterpret_cast<std::vector<std::string>*>(curField->object);
list[current].name = std::string(description[list[current].value]) + ": " + (*obj)[where];
}
else if (curField->getType() != XMLTYPE_CREATE)
{
list[current].name = std::string(description[list[current].value]) + ": " + curField->createString();
}
else
{
XMLArray *obj = reinterpret_cast<XMLArray*>(curField->object);
list[current].name = std::string(description[list[current].value]) + ": " + obj->get(where)->createString();
}
}
else
{
handleSpecialField(d, serial, list[current].value);
}
}
if (updateActive(serial, active, list[current].value))
len = setup(serial, active, list);
d.addSelection(list.data(), len, start, current);
}
complete(serial);
d.clearText();
d.setConfig(oldConfig);
}
void BTEditor::editSpecial(BTDisplay &d, BTSpecial *special)
{
if (NULL == special)
{
special = new BTSpecial;
levelMap->addSpecial(special);
}
BTDisplayConfig *oldConfig = d.getConfig();
BTDisplayConfig config;
XMLSerializer parser;
config.serialize(&parser);
parser.parse(BTDisplay::applyDisplayDir("data/specialedit.xml").c_str(), true);
d.setConfig(&config);
int start(0);
int current(0);
BTSpecialBody *body = special->getBody();
std::vector<operationList> ops;
std::vector<BTDisplay::selectItem> list(2);
list[0].name = std::string("Name: ") + special->getName();
list[1].name = "Flags: " + special->printFlags(false);
buildOperationList(d, body, list, ops);
d.addSelection(list.data(), list.size(), start, current);
int key;
char extra[6] = {BTKEY_INS, BTKEY_DEL, BTKEY_CTRL_C, BTKEY_CTRL_V, BTKEY_CTRL_X, 0};
while (27 != (key = d.process(extra)))
{
d.clearText();
if (current == 0)
{
std::string name = special->getName();
d.addReadString("Name: ", 25, name);
key = d.process();
if ('\r' == key)
special->setName(name);
d.clearText();
list[0].name = std::string("Name: ") + special->getName();
}
else if (current == 1)
{
BTSpecialFlagList &lookup = getSpecialFlagList();
BitField bits = special->getFlag();
BTDisplay::selectItem lookupItem[lookup.size()];
for (size_t i = 0; i < lookup.size(); ++i)
{
lookupItem[i].name = lookup.getName(i);
if (bits.isSet(i))
lookupItem[i].first = '*';
}
int lookupStart(0);
int lookupCurrent(0);
d.addSelection(lookupItem, lookup.size(), lookupStart, lookupCurrent);
int key;
while (27 != (key = d.process()))
{
if (bits.toggle(lookupCurrent))
lookupItem[lookupCurrent].first = '*';
else
lookupItem[lookupCurrent].first = 0;
}
special->setFlag(bits);
d.clearText();
list[1].name = "Flags: " + special->printFlags(false);
}
else
{
if (BTKEY_INS == key)
{
if ((ops[list[current].value].op != NULL) && (ops[list[current].value].parent != NULL))
{
ops[list[current].value].parent->insertOperation(ops[list[current].value].op, new BTSpecialCommand(BTSPECIALCOMMAND_NOTHING));
}
}
else if (BTKEY_DEL == key)
{
if ((ops[list[current].value].op != NULL) && (ops[list[current].value].parent != NULL))
{
ops[list[current].value].parent->eraseOperation(ops[list[current].value].op);
}
}
else if (BTKEY_CTRL_X == key)
{
if ((ops[list[current].value].op != NULL) && (ops[list[current].value].parent != NULL))
{
if (clipboard)
delete clipboard;
clipboard = ops[list[current].value].op->clone();
ops[list[current].value].parent->eraseOperation(ops[list[current].value].op);
}
}
else if (BTKEY_CTRL_C == key)
{
if ((ops[list[current].value].op != NULL) && (ops[list[current].value].parent != NULL))
{
if (clipboard)
delete clipboard;
clipboard = ops[list[current].value].op->clone();
}
}
else if (BTKEY_CTRL_V == key)
{
if ((ops[list[current].value].parent != NULL) && (clipboard))
{
if (ops[list[current].value].op)
ops[list[current].value].parent->insertOperation(ops[list[current].value].op, clipboard->clone());
else
ops[list[current].value].parent->addOperation(clipboard->clone());
}
}
else if ('\r' == key)
{
BTSpecialOperation *op = editSpecialOperation(d, ops[list[current].value].op);
if (op)
{
if (ops[list[current].value].op)
ops[list[current].value].parent->replaceOperation(ops[list[current].value].op, op);
else
ops[list[current].value].parent->addOperation(op);
}
}
}
ops.clear();
list.resize(2);
buildOperationList(d, body, list, ops);
d.addSelection(list.data(), list.size(), start, current);
}
d.clearText();
d.setConfig(oldConfig);
}
void BTSerializedEditor::editField(BTDisplay &d, ObjectSerializer &serial, const char *text, XMLAction *curField, int modField, int where)
{
int key;
switch (curField->getType())
{
case XMLTYPE_STDSTRING:
{
std::string val = curField->createString();
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
*(reinterpret_cast<std::string*>(curField->object)) = val;
break;
}
case XMLTYPE_STRING:
{
std::string val = curField->createString();
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
{
char *str = *(reinterpret_cast<char**>(curField->object));
if (str)
{
delete [] str;
}
int len = val.length();
str = new char[len + 1];
strncpy(str, val.c_str(), len);
str[len] = 0;
*(reinterpret_cast<char**>(curField->object)) = str;
}
break;
}
case XMLTYPE_BOOL:
{
BTDisplay::selectItem vals[2];
vals[0].name = "false";
vals[1].name = "true";
int lookupStart(0);
int lookupCurrent((*(reinterpret_cast<bool*>(curField->object)) ? 1 : 0));
d.addSelection(vals, 2, lookupStart, lookupCurrent);
if (27 != d.process())
{
*(reinterpret_cast<bool*>(curField->object)) = lookupCurrent;
}
break;
}
case XMLTYPE_BITFIELD:
{
ValueLookup *lookup = reinterpret_cast<ValueLookup*>(curField->data);
BitField *bits = reinterpret_cast<BitField*>(curField->object);
BTDisplay::selectItem lookupItem[lookup->size()];
for (int i = 0; i < lookup->size(); ++i)
{
lookupItem[i].name = lookup->getName(i);
if (bits->isSet(i))
lookupItem[i].first = '*';
}
int lookupStart(0);
int lookupCurrent(0);
d.addSelection(lookupItem, lookup->size(), lookupStart, lookupCurrent);
int key;
while (27 != (key = d.process()))
{
if (bits->toggle(lookupCurrent))
lookupItem[lookupCurrent].first = '*';
else
lookupItem[lookupCurrent].first = 0;
}
break;
}
case XMLTYPE_INT:
{
if (curField->data)
{
ValueLookup *lookup = reinterpret_cast<ValueLookup*>(curField->data);
bool extra = ((curField->extra == EXTRA_NONE) ? false : true);
BTDisplay::selectItem lookupItem[lookup->size() + (extra ? 1 : 0)];
int i = 0;
if (extra)
{
lookupItem[0].name = curField->extraText;
lookupItem[0].value = -1;
++i;
}
int endIndex = lookup->getEndIndex();
int lookupCurrent(0);
int valIndex((*(reinterpret_cast<int*>(curField->object))) + (extra ? 1 : 0));
for (int curIndex = lookup->getFirstIndex(); curIndex != endIndex; curIndex = lookup->getNextIndex(curIndex))
{
lookupItem[i].name = lookup->getName(curIndex);
lookupItem[i].value = curIndex;
if (curIndex == valIndex)
lookupCurrent = i;
++i;
}
int lookupStart(0);
d.addSelection(lookupItem, lookup->size() + (extra ? 1 : 0), lookupStart, lookupCurrent);
if (27 != d.process())
{
*(reinterpret_cast<int*>(curField->object)) = lookupItem[lookupCurrent].value;
}
}
else
{
std::string val = curField->createString();
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
*(reinterpret_cast<int*>(curField->object)) = atol(val.c_str());
}
break;
}
case XMLTYPE_UINT:
{
std::string val = curField->createString();
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
*(reinterpret_cast<unsigned int*>(curField->object)) = atol(val.c_str());
break;
}
case XMLTYPE_INT16:
{
std::string val = curField->createString();
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
*(reinterpret_cast<int16_t*>(curField->object)) = atol(val.c_str());
break;
}
case XMLTYPE_VECTORUINT:
{
std::vector<unsigned int> *vec = reinterpret_cast<std::vector<unsigned int> *>(curField->object);
std::string val;
for (size_t i = 0; i < vec->size(); ++i)
{
if (i != 0)
val += ",";
char convert[30];
sprintf(convert, "%u", (*vec)[i]);
val += convert;
}
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
{
size_t i = 0;
const char *start = val.c_str();
for (const char *comma = strchr(val.c_str(), ','); (start) && (*start); ++i)
{
if (i < vec->size())
(*vec)[i] = atol(start);
else
vec->push_back(atol(start));
start = comma;
if (start)
{
if ((*start) == ',')
++start;
comma = strchr(start, ',');
}
}
if (i < vec->size())
vec->resize(i);
}
break;
}
case XMLTYPE_OBJECT:
{
XMLObject *obj = reinterpret_cast<XMLObject*>(curField->object);
BTDice *dice = dynamic_cast<BTDice*>(obj);
if (dice)
{
std::ostringstream stream;
stream << dice->getNumber();
std::string val = stream.str();
d.addReadString(std::string(text) + "- Number of Dice: ", 100, val);
key = d.process();
if ('\r' == key)
dice->setNumber(atol(val.c_str()));
d.clearText();
stream.str("");
stream << dice->getType();
val = stream.str();
d.addReadString(std::string(text) + "- Type of Dice: ", 100, val);
key = d.process();
if ('\r' == key)
dice->setType(atol(val.c_str()));
d.clearText();
stream.str("");
stream << dice->getModifier();
val = stream.str();
d.addReadString(std::string(text) + "- Modifier to Roll: ", 100, val);
key = d.process();
if ('\r' == key)
dice->setModifier(atol(val.c_str()));
}
else
printf("Unsuppported type: %d\n", curField->getType());
break;
}
case XMLTYPE_CREATE:
{
XMLArray *obj = reinterpret_cast<XMLArray*>(curField->object);
handleObject(d, obj->get(where), modField);
break;
}
case XMLTYPE_PICTURE:
{
BTDisplayConfig *oldConfig = d.getConfig();
BTDisplayConfig config;
XMLSerializer parser;
config.serialize(&parser);
parser.parse(BTDisplay::applyDisplayDir("data/pictureselect.xml").c_str(), true);
d.setConfig(&config);
d.clearText();
d.addText(text);
int val(reinterpret_cast<PictureIndex*>(curField->object)->value);
d.addSelectImage(val);
key = d.process();
if ('\r' == key)
reinterpret_cast<PictureIndex*>(curField->object)->value = val;
d.clearImage();
d.setConfig(oldConfig);
break;
}
case XMLTYPE_VECTORSTRING:
{
std::vector<std::string> *obj = reinterpret_cast<std::vector<std::string>*>(curField->object);
std::string val = (*obj)[where];
d.addReadString(std::string(text) + ": ", 100, val);
key = d.process();
if ('\r' == key)
(*obj)[where] = val;
break;
}
default:
printf("Unsuppported type: %d\n", curField->getType());
break;
}
d.clearText();
}
void BTEditor::editMap(BTDisplay &d, const char *filename)
{
BTDisplayConfig *oldConfig = d.getConfig();
BTDisplayConfig config;
XMLSerializer parser;
config.serialize(&parser);
parser.parse(BTDisplay::applyDisplayDir("data/mapedit.xml").c_str(), true);
d.setConfig(&config);
loadMap(filename);
xPos = 0; yPos = 0; facing = 0;
p3dConfig = d.setWallGraphics(levelMap->getType());
unsigned char key = ' ';
if (currentWall < p3dConfig->mapType.size())
d.drawLabel("wall", p3dConfig->mapType[currentWall]->name.c_str());
else
d.drawLabel("wall", "Clear");
while (key != 'q')
{
if (levelMap->getSquare(yPos, xPos).getSpecial() > -1)
d.drawLabel("main", levelMap->getSpecial(levelMap->getSquare(yPos, xPos).getSpecial())->getName());
else
d.drawLabel("main", "");
if (levelMap->getSquare(yPos, xPos).getStreet() > -1)
d.drawLabel("street", levelMap->getStreetName(levelMap->getSquare(yPos, xPos).getStreet()).c_str());
else
d.drawLabel("street", "");
d.drawView();
key = d.readChar();
switch (key)
{
case BTKEY_UP:
if (yPos > 0)
yPos--;
else
yPos = getYSize() - 1;
break;
case BTKEY_LEFT:
if (xPos > 0)
xPos--;
else
xPos = getXSize() - 1;
break;
case BTKEY_DOWN:
if (yPos < getYSize() - 1)
yPos++;
else
yPos = 0;
break;
case BTKEY_RIGHT:
if (xPos < getXSize() - 1)
xPos++;
else
xPos = 0;
break;
case BTKEY_PGDN:
case '2':
if (facing < 3)
facing++;
else
facing = 0;
break;
case BTKEY_END:
case '1':
if (facing > 0)
facing--;
else
facing = 3;
break;
case 13:
{
int wall = 0;
if (currentWall < p3dConfig->mapType.size())
wall = p3dConfig->mapType[currentWall]->type;
levelMap->getSquare(yPos, xPos).setWall(facing, wall);
int xOpposite = xPos + Psuedo3D::changeXY[facing][0] + levelMap->getXSize();
xOpposite = xOpposite % levelMap->getXSize();
int yOpposite = yPos + Psuedo3D::changeXY[facing][1] + levelMap->getYSize();
yOpposite = yOpposite % levelMap->getYSize();
levelMap->getSquare(yOpposite, xOpposite).setWall((facing + 2) % 4, wall);
break;
}
case ' ':
if (currentWall < p3dConfig->mapType.size())
{
currentWall++;
}
else
{
currentWall = 0;
}
if (currentWall < p3dConfig->mapType.size())
d.drawLabel("wall", p3dConfig->mapType[currentWall]->name.c_str());
else
d.drawLabel("wall", "Clear");
break;
case 'r':
{
if (d.getScreen(1))
d.getScreen(1)->setVisibility(true);
std::string tmp = d.readString("X Size?", 3, "");
int newXSize = atol(tmp.c_str());
if (newXSize < 1)
{
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(false);
break;
}
tmp = d.readString("Y Size?", 3, "");
int newYSize = atol(tmp.c_str());
if (newYSize < 1)
{
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(false);
break;
}
levelMap->resize(newXSize, newYSize);
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(false);
break;
}
case 'c':
levelMap->getSquare(yPos, xPos).setSpecial(-1);
break;
case 's':
{
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(true);
int len = levelMap->getNumOfSpecials();
BTDisplay::selectItem list[len + 1];
for (int i = 0; i < len; ++i)
{
list[i].name = levelMap->getSpecial(i)->getName();
}
list[len].name = "<New Special>";
d.addSelection(list, len + 1, startSpecial, currentSpecial);
int key = d.process("ce");
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(false);
if ((key == 'e') || ((currentSpecial == len) && ((key == '\r') || (key == 'c'))))
{
editSpecial(d, levelMap->getSpecial(currentSpecial));
levelMap->getSquare(yPos, xPos).setSpecial(currentSpecial);
}
else if (key == 'c')
{
BTSpecial *s = new BTSpecial(*levelMap->getSpecial(currentSpecial));
levelMap->addSpecial(s);
currentSpecial = len;
editSpecial(d, s);
levelMap->getSquare(yPos, xPos).setSpecial(currentSpecial);
}
else if (key == '\r')
{
levelMap->getSquare(yPos, xPos).setSpecial(currentSpecial);
}
if (currentWall < p3dConfig->mapType.size())
d.drawLabel("wall", p3dConfig->mapType[currentWall]->name.c_str());
else
d.drawLabel("wall", "Clear");
break;
}
case 'l':
levelMap->getSquare(yPos, xPos).setSpecial(currentSpecial);
break;
case 'b':
levelMap->getSquare(yPos, xPos).setStreet(-1);
break;
case 'n':
{
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(true);
int len = levelMap->getNumOfStreets();
BTDisplay::selectItem list[len + 1];
for (int i = 0; i < len; ++i)
{
list[i].name = levelMap->getStreetName(i);
}
list[len].name = "<New Street>";
d.addSelection(list, len + 1, startStreet, currentStreet);
int key = d.process("e");
d.clearText();
if ((key == 'e') || ((currentStreet == len) && (key == '\r')))
{
std::string name;
if (currentStreet != len)
name = list[currentStreet].name;
d.addReadString("Name: ", 25, name);
key = d.process();
if (key == '\r')
{
if (currentStreet == len)
levelMap->addStreetName(name);
else
levelMap->setStreetName(currentStreet, name);
levelMap->getSquare(yPos, xPos).setStreet(currentStreet);
}
}
else if (key == '\r')
{
levelMap->getSquare(yPos, xPos).setStreet(currentStreet);
}
d.clearText();
if (d.getScreen(1))
d.getScreen(1)->setVisibility(false);
if (currentWall < p3dConfig->mapType.size())
d.drawLabel("wall", p3dConfig->mapType[currentWall]->name.c_str());
else
d.drawLabel("wall", "Clear");
break;
}
case 'm':
levelMap->getSquare(yPos, xPos).setStreet(currentStreet);
break;
case 'p':
{
ObjectSerializer serial;
levelMap->serialize(&serial);
BTMapPropertiesEditor mapPropEditor;
int type = levelMap->getType();
mapPropEditor.edit(d, serial);
if (levelMap->getType() != type)
{
p3dConfig = d.setWallGraphics(levelMap->getType());
currentWall = 0;
}
if (currentWall < p3dConfig->mapType.size())
d.drawLabel("wall", p3dConfig->mapType[currentWall]->name.c_str());
else
d.drawLabel("wall", "Clear");
break;
}
default:
break;
}
}
if (d.getScreen(1))
d.getScreen(1)->setVisibility(true);
d.drawText("Save?");
while ((key != 'y') && (key != 'n'))
{
key = d.readChar();
}
if (key == 'y')
{
bool wrote = false;
int len = strlen(levelMap->getFilename());
if ((len > 4) && (strcmp(".MAP", levelMap->getFilename() + (len - 4)) == 0))
{
try
{
BinaryWriteFile f(levelMap->getFilename());
levelMap->write(f);
wrote = true;
}
catch (const FileException &e)
{
PHYSFS_delete(levelMap->getFilename());
printf("Failed to write old map file: %s\n", e.what());
char tmp[len + 1];
strcpy(tmp, levelMap->getFilename());
strcpy(tmp + len - 3, "xml");
levelMap->setFilename(tmp);
}
}
if (!wrote)
{
XMLSerializer parser;
parser.add("map", levelMap);
parser.write(levelMap->getFilename(), true);
}
}
d.setConfig(oldConfig);
}