/*
* Merging works as follows:
* - fields present only in source are copied over to dest
* - multi-fields (email, groups) are checked for dupes ad merged
* */
void
item_merge(list_item dest, list_item src)
{
int i, found = 0;
abook_list *dfield, *sfield, *ed, *es;
for(i = 0; i < fields_count; i++)
if (src[i]) {
if (!dest[i])
dest[i] = xstrdup(src[i]);
else if((i == field_id(EMAIL)) || (i == field_id(GROUPS))) {
dfield = csv_to_abook_list(dest[i]);
sfield = csv_to_abook_list(src[i]);
for(es = sfield; es; es = es->next) {
for(found=0, ed = dfield; (!found) && ed; ed = ed->next)
found = (0 == strcmp(es->data,ed->data));
if (!found)
abook_list_append(&dfield, es->data);
}
xfree(dest[i]);
dest[i] = abook_list_to_csv(dfield);
abook_list_free(&dfield);
abook_list_free(&sfield);
}
}
item_empty(src);
}
int
parse_database(FILE *in)
{
char *line = NULL;
char *tmp;
int sec=0, field;
list_item item;
item = item_create();
for(;;) {
line = getaline(in);
if(feof(in)) {
if(item[field_id(NAME)] && sec) {
add_item2database(item);
} else {
item_empty(item);
}
break;
}
if(!*line || *line == '\n' || *line == '#') {
goto next;
} else if(*line == '[') {
if(item[field_id(NAME)] && sec ) {
add_item2database(item);
} else {
item_empty(item);
}
sec = 1;
memset(item, 0, ITEM_SIZE);
if(!(tmp = strchr(line, ']')))
sec = 0; /*incorrect section lines are skipped*/
} else if((tmp = strchr(line, '=') ) && sec) {
*tmp++ = '\0';
find_field_number(line, &field);
if(field != -1) {
item[field] = xstrdup(tmp);
goto next;
} else if(!strcasecmp(opt_get_str(STR_PRESERVE_FIELDS),
"all")){
declare_unknown_field(line);
item = xrealloc(item, ITEM_SIZE);
item[fields_count - 1] = xstrdup(tmp);
goto next;
}
}
next:
xfree(line);
}
xfree(line);
item_free(&item);
return 0;
}
char *
item_fget(list_item item, int i)
{
int id = field_id(i);
if(id != -1)
return item[id];
else
return NULL;
}
int
item_fput(list_item item, int i, char *val)
{
int id = field_id(i);
if(id != -1) {
item[id] = val;
return 1;
}
return 0;
}
int
add_item2database(list_item item)
{
/* 'name' field is mandatory */
if((item[field_id(NAME)] == NULL) || ! *item[field_id(NAME)]) {
item_empty(item);
return 1;
}
if(++items > list_capacity)
adjust_list_capacity();
validate_item(item);
selected[LAST_ITEM] = 0;
database[LAST_ITEM] = item_create();
item_copy(database[LAST_ITEM], item);
return 0;
}
char *
real_db_field_get(int item, int i, int std)
{
int id;
assert(database[item]);
id = std ? field_id(i) : i;
if(id != -1)
return database[item][id];
else
return NULL;
}
int
real_db_field_put(int item, int i, int std, char *val)
{
int id;
assert(database[item]);
id = std ? field_id(i) : i;
if(id != -1) {
database[item][id] = val;
return 1;
}
return 0;
}
static int
surnamecmp(const void *i1, const void *i2)
{
int ret, idx = field_id(NAME);
char *n1, *n2, *s1, *s2;
n1 = (*(list_item *)i1)[idx];
n2 = (*(list_item *)i2)[idx];
s1 = get_surname(n1);
s2 = get_surname(n2);
if( !(ret = safe_strcoll(s1, s2)) )
ret = safe_strcoll(n1, n2);
free(s1);
free(s2);
return ret;
}
bool cProject::load_infoFile()
{
QFile infoFile(m_infoFile);
if(!infoFile.open(QIODevice::ReadOnly)) return false;
QFileInfo finfo(infoFile);
m_rootDir = finfo.absoluteDir();
QString raw_data(infoFile.readAll());
QStringList data_lines(raw_data.split("\n"));
if(data_lines.count() < 3) return false;
QStringList field_id(data_lines[0].split(":"));
QStringList field_name(data_lines[1].split(":"));
QStringList field_maintainer(data_lines[2].split(":"));
if((field_id.count() != 2) ||
(field_name.count()!= 2) ||
(field_maintainer.count() != 2) ) return false;
if(field_id[0]!="PROJECT-ID") return false;
m_id = field_id[1];
m_name = field_name[1];
m_maintainer = field_maintainer[1];
return true;
}
/* TODO implement a search based on more sophisticated patterns */
int
find_item(char *str, int start, int search_fields[])
{
int i, id;
char *findstr = NULL;
char *tmp = NULL;
int ret = -1; /* not found */
struct db_enumerator e = init_db_enumerator(ENUM_ALL);
if(list_is_empty() || !is_valid_item(start))
return -2; /* error */
findstr = xstrdup(str);
findstr = strlower(findstr);
e.item = start - 1; /* must be "real start" - 1 */
db_enumerate_items(e) {
for(i = 0; search_fields[i] >= 0; i++) {
if((id = field_id(search_fields[i])) == -1)
continue;
if(database[e.item][id] == NULL)
continue;
tmp = xstrdup(database[e.item][id]);
if( tmp && strstr(strlower(tmp), findstr) ) {
ret = e.item;
goto out;
}
xfree(tmp);
}
}
out:
free(findstr);
free(tmp);
return ret;
}
// We're reading in way too many entities here to mess around with creating sub-objects and
// seeking around in them, so we're using the json streaming API.
submap *mapbuffer::unserialize_submaps( const tripoint &p )
{
// Map the tripoint to the submap quad that stores it.
const tripoint om_addr = overmapbuffer::sm_to_omt_copy( p );
const tripoint segment_addr = overmapbuffer::omt_to_seg_copy( om_addr );
std::stringstream quad_path;
quad_path << world_generator->active_world->world_path << "/maps/" <<
segment_addr.x << "." << segment_addr.y << "." << segment_addr.z << "/" <<
om_addr.x << "." << om_addr.y << "." << om_addr.z << ".map";
std::ifstream fin( quad_path.str().c_str() );
if( !fin.is_open() ) {
// If it doesn't exist, trigger generating it.
return NULL;
}
JsonIn jsin( fin );
jsin.start_array();
while( !jsin.end_array() ) {
std::unique_ptr<submap> sm(new submap());
tripoint submap_coordinates;
jsin.start_object();
while( !jsin.end_object() ) {
std::string submap_member_name = jsin.get_member_name();
if( submap_member_name == "version" ) {
// We aren't using the version number for anything at the moment.
jsin.skip_value();
} else if( submap_member_name == "coordinates" ) {
jsin.start_array();
int locx = jsin.get_int();
int locy = jsin.get_int();
int locz = jsin.get_int();
jsin.end_array();
submap_coordinates = tripoint( locx, locy, locz );
} else if( submap_member_name == "turn_last_touched" ) {
sm->turn_last_touched = jsin.get_int();
} else if( submap_member_name == "temperature" ) {
sm->temperature = jsin.get_int();
} else if( submap_member_name == "terrain" ) {
// TODO: try block around this to error out if we come up short?
jsin.start_array();
for( int j = 0; j < SEEY; j++ ) {
for( int i = 0; i < SEEX; i++ ) {
sm->ter[i][j] = termap[ jsin.get_string() ].loadid;
}
}
jsin.end_array();
} else if( submap_member_name == "radiation" ) {
int rad_cell = 0;
jsin.start_array();
while( !jsin.end_array() ) {
int rad_strength = jsin.get_int();
int rad_num = jsin.get_int();
for( int i = 0; i < rad_num; ++i ) {
// A little array trick here, assign to it as a 1D array.
// If it's not in bounds we're kinda hosed anyway.
sm->set_radiation(0, rad_cell, rad_strength);
rad_cell++;
}
}
} else if( submap_member_name == "furniture" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
sm->frn[i][j] = furnmap[ jsin.get_string() ].loadid;
jsin.end_array();
}
} else if( submap_member_name == "items" ) {
jsin.start_array();
while( !jsin.end_array() ) {
int i = jsin.get_int();
int j = jsin.get_int();
jsin.start_array();
while( !jsin.end_array() ) {
item tmp;
jsin.read( tmp );
sm->itm[i][j].push_back( tmp );
}
}
} else if( submap_member_name == "traps" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
sm->trp[i][j] = trapmap[ jsin.get_string() ];
jsin.end_array();
}
} else if( submap_member_name == "fields" ) {
jsin.start_array();
while( !jsin.end_array() ) {
// Coordinates loop
int i = jsin.get_int();
int j = jsin.get_int();
jsin.start_array();
while( !jsin.end_array() ) {
int type = jsin.get_int();
int density = jsin.get_int();
int age = jsin.get_int();
if (sm->fld[i][j].findField(field_id(type)) == NULL) {
sm->field_count++;
}
sm->fld[i][j].addField(field_id(type), density, age);
}
}
} else if( submap_member_name == "griffiti" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
sm->set_graffiti(i, j, graffiti( jsin.get_string() ));
jsin.end_array();
}
} else if(submap_member_name == "cosmetics") {
jsin.start_array();
while (!jsin.end_array()) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
jsin.read(sm->cosmetics[i][j]);
jsin.end_array();
}
} else if( submap_member_name == "spawns" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
std::string type = jsin.get_string();
int count = jsin.get_int();
int i = jsin.get_int();
int j = jsin.get_int();
int faction_id = jsin.get_int();
int mission_id = jsin.get_int();
bool friendly = jsin.get_bool();
std::string name = jsin.get_string();
jsin.end_array();
spawn_point tmp( type, count, i, j, faction_id, mission_id, friendly, name );
sm->spawns.push_back( tmp );
}
} else if( submap_member_name == "vehicles" ) {
jsin.start_array();
while( !jsin.end_array() ) {
vehicle *tmp = new vehicle();
jsin.read( *tmp );
sm->vehicles.push_back( tmp );
}
} else if( submap_member_name == "computers" ) {
std::string computer_data = jsin.get_string();
sm->comp.load_data( computer_data );
} else if( submap_member_name == "camp" ) {
std::string camp_data = jsin.get_string();
sm->camp.load_data( camp_data );
} else {
jsin.skip_value();
}
}
if( !add_submap( submap_coordinates, sm ) ) {
debugmsg( "submap %d,%d,%d was alread loaded", submap_coordinates.x, submap_coordinates.y, submap_coordinates.z );
}
}
if( submaps.count( p ) == 0 ) {
debugmsg("file %s did not contain the expected submap %d,%d,%d", quad_path.str().c_str(), p.x, p.y, p.z);
return NULL;
}
return submaps[ p ];
}
// We're reading in way too many entities here to mess around with creating sub-objects and
// seeking around in them, so we're using the json streaming API.
submap *mapbuffer::unserialize_submaps( const tripoint &p )
{
// Map the tripoint to the submap quad that stores it.
const tripoint om_addr = overmapbuffer::sm_to_omt_copy( p );
const tripoint segment_addr = overmapbuffer::omt_to_seg_copy( om_addr );
std::stringstream quad_path;
quad_path << world_generator->active_world->world_path << "/maps/" <<
segment_addr.x << "." << segment_addr.y << "." << segment_addr.z << "/" <<
om_addr.x << "." << om_addr.y << "." << om_addr.z << ".map";
std::ifstream fin( quad_path.str().c_str() );
if( !fin.is_open() ) {
// If it doesn't exist, trigger generating it.
return NULL;
}
JsonIn jsin( fin );
jsin.start_array();
while( !jsin.end_array() ) {
std::unique_ptr<submap> sm(new submap());
tripoint submap_coordinates;
jsin.start_object();
bool rubpow_update = false;
while( !jsin.end_object() ) {
std::string submap_member_name = jsin.get_member_name();
if( submap_member_name == "version" ) {
if (jsin.get_int() < 22) {
rubpow_update = true;
}
} else if( submap_member_name == "coordinates" ) {
jsin.start_array();
int locx = jsin.get_int();
int locy = jsin.get_int();
int locz = jsin.get_int();
jsin.end_array();
submap_coordinates = tripoint( locx, locy, locz );
} else if( submap_member_name == "turn_last_touched" ) {
sm->turn_last_touched = jsin.get_int();
} else if( submap_member_name == "temperature" ) {
sm->temperature = jsin.get_int();
} else if( submap_member_name == "terrain" ) {
// TODO: try block around this to error out if we come up short?
jsin.start_array();
// Small duplication here so that the update check is only performed once
if (rubpow_update) {
std::string ter_string;
item rock = item("rock", 0);
item chunk = item("steel_chunk", 0);
for( int j = 0; j < SEEY; j++ ) {
for( int i = 0; i < SEEX; i++ ) {
ter_string = jsin.get_string();
if (ter_string == "t_rubble") {
sm->ter[i][j] = termap[ "t_dirt" ].loadid;
sm->frn[i][j] = furnmap[ "f_rubble" ].loadid;
sm->itm[i][j].push_back( rock );
sm->itm[i][j].push_back( rock );
} else if (ter_string == "t_wreckage"){
sm->ter[i][j] = termap[ "t_dirt" ].loadid;
sm->frn[i][j] = furnmap[ "f_wreckage" ].loadid;
sm->itm[i][j].push_back( chunk );
sm->itm[i][j].push_back( chunk );
} else if (ter_string == "t_ash"){
sm->ter[i][j] = termap[ "t_dirt" ].loadid;
sm->frn[i][j] = furnmap[ "f_ash" ].loadid;
} else if (ter_string == "t_pwr_sb_support_l"){
sm->ter[i][j] = termap[ "t_support_l" ].loadid;
} else if (ter_string == "t_pwr_sb_switchgear_l"){
sm->ter[i][j] = termap[ "t_switchgear_l" ].loadid;
} else if (ter_string == "t_pwr_sb_switchgear_s"){
sm->ter[i][j] = termap[ "t_switchgear_s" ].loadid;
} else {
sm->ter[i][j] = terfind( ter_string );
}
}
}
} else {
for( int j = 0; j < SEEY; j++ ) {
for( int i = 0; i < SEEX; i++ ) {
sm->ter[i][j] = terfind( jsin.get_string() );
}
}
}
jsin.end_array();
} else if( submap_member_name == "radiation" ) {
int rad_cell = 0;
jsin.start_array();
while( !jsin.end_array() ) {
int rad_strength = jsin.get_int();
int rad_num = jsin.get_int();
for( int i = 0; i < rad_num; ++i ) {
// A little array trick here, assign to it as a 1D array.
// If it's not in bounds we're kinda hosed anyway.
sm->set_radiation(0, rad_cell, rad_strength);
rad_cell++;
}
}
} else if( submap_member_name == "furniture" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
sm->frn[i][j] = furnmap[ jsin.get_string() ].loadid;
jsin.end_array();
}
} else if( submap_member_name == "items" ) {
jsin.start_array();
while( !jsin.end_array() ) {
int i = jsin.get_int();
int j = jsin.get_int();
jsin.start_array();
while( !jsin.end_array() ) {
item tmp;
jsin.read( tmp );
if( tmp.is_emissive() ) {
sm->update_lum_add(tmp, i, j);
}
tmp.visit_items([&sm,i,j]( item *it ) {
for( auto& e: it->magazine_convert() ) {
sm->itm[i][j].push_back( e );
}
return VisitResponse::NEXT;
} );
sm->itm[i][j].push_back( tmp );
if( tmp.needs_processing() ) {
sm->active_items.add( std::prev(sm->itm[i][j].end()), point( i, j ) );
}
}
}
} else if( submap_member_name == "traps" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
// TODO: jsin should support returning an id like jsin.get_id<trap>()
sm->trp[i][j] = trap_str_id( jsin.get_string() );
jsin.end_array();
}
} else if( submap_member_name == "fields" ) {
jsin.start_array();
while( !jsin.end_array() ) {
// Coordinates loop
int i = jsin.get_int();
int j = jsin.get_int();
jsin.start_array();
while( !jsin.end_array() ) {
int type = jsin.get_int();
int density = jsin.get_int();
int age = jsin.get_int();
if (sm->fld[i][j].findField(field_id(type)) == NULL) {
sm->field_count++;
}
sm->fld[i][j].addField(field_id(type), density, age);
}
}
} else if( submap_member_name == "graffiti" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
sm->set_graffiti( i, j, jsin.get_string() );
jsin.end_array();
}
} else if(submap_member_name == "cosmetics") {
jsin.start_array();
while (!jsin.end_array()) {
jsin.start_array();
int i = jsin.get_int();
int j = jsin.get_int();
jsin.read(sm->cosmetics[i][j]);
jsin.end_array();
}
} else if( submap_member_name == "spawns" ) {
jsin.start_array();
while( !jsin.end_array() ) {
jsin.start_array();
const mtype_id type = mtype_id( jsin.get_string() ); // TODO: json should know how to read an string_id
int count = jsin.get_int();
int i = jsin.get_int();
int j = jsin.get_int();
int faction_id = jsin.get_int();
int mission_id = jsin.get_int();
bool friendly = jsin.get_bool();
std::string name = jsin.get_string();
jsin.end_array();
spawn_point tmp( type, count, i, j, faction_id, mission_id, friendly, name );
sm->spawns.push_back( tmp );
}
} else if( submap_member_name == "vehicles" ) {
jsin.start_array();
while( !jsin.end_array() ) {
vehicle *tmp = new vehicle();
jsin.read( *tmp );
sm->vehicles.push_back( tmp );
}
} else if( submap_member_name == "computers" ) {
std::string computer_data = jsin.get_string();
sm->comp.load_data( computer_data );
} else if( submap_member_name == "camp" ) {
std::string camp_data = jsin.get_string();
sm->camp.load_data( camp_data );
} else {
jsin.skip_value();
}
}
if( !add_submap( submap_coordinates, sm ) ) {
debugmsg( "submap %d,%d,%d was already loaded", submap_coordinates.x, submap_coordinates.y,
submap_coordinates.z );
}
}
if( submaps.count( p ) == 0 ) {
debugmsg("file %s did not contain the expected submap %d,%d,%d", quad_path.str().c_str(), p.x, p.y,
p.z);
return NULL;
}
return submaps[ p ];
}
sm->active_item_count++;
} else if (string_identifier == "C") {
getline(fin, databuff); // Clear out the endline
getline(fin, databuff);
int index = sm->itm[itx][ity].size() - 1;
it_tmp.load_info(databuff, master_game);
sm->itm[itx][ity][index].put_in(it_tmp);
if (it_tmp.active)
sm->active_item_count++;
} else if (string_identifier == "T") {
fin >> itx >> ity >> t;
sm->trp[itx][ity] = trap_id(t);
} else if (string_identifier == "F") {
fields_here = true;
fin >> itx >> ity >> t >> d >> a;
sm->fld[itx][ity] = field(field_id(t), d, a);
sm->field_count++;
} else if (string_identifier == "S") {
char tmpfriend;
int tmpfac = -1, tmpmis = -1;
std::string spawnname;
fin >> t >> a >> itx >> ity >> tmpfac >> tmpmis >> tmpfriend >> spawnname;
spawn_point tmp(mon_id(t), a, itx, ity, tmpfac, tmpmis, (tmpfriend == '1'),
spawnname);
sm->spawns.push_back(tmp);
} else if (string_identifier == "V") {
vehicle * veh = new vehicle(master_game);
veh->load (fin);
//veh.smx = gridx;
//veh.smy = gridy;
master_game->m.vehicle_list.insert(veh);
