+
+
+struct SceneData {
+ std::string walkmesh_regexp;
+ std::vector<MaterialEdit> mtledit;
+};
+
+static bool proc_scenefile(MetaScene *mscn, struct ts_node *node)
+{
+ const char *fname = ts_get_attr_str(node, "file");
+ if(fname) {
+ SceneData *sdat = new SceneData;
+
+ // datapath
+ struct ts_attr *adpath = attr_inscope(node, "datapath");
+ if(adpath && adpath->val.type == TS_STRING) {
+ info_log("adding data path: %s\n", adpath->val.str);
+ datamap_set_path(adpath->val.str);
+ }
+
+ // walkmesh
+ struct ts_attr *awmesh = attr_inscope(node, "walkmesh");
+ if(awmesh && awmesh->val.type == TS_STRING) {
+ sdat->walkmesh_regexp = std::string(awmesh->val.str);
+ }
+
+ int namesz = datamap_lookup(fname, 0, 0);
+ char *namebuf = (char*)alloca(namesz + 1);
+ if(datamap_lookup(fname, namebuf, namesz + 1)) {
+ fname = namebuf;
+ }
+
+ // material edits
+ struct ts_node *child = node->child_list;
+ while(child) {
+ MaterialEdit medit;
+ if(proc_mtledit(&medit, child, mscn->texman)) {
+ sdat->mtledit.push_back(medit);
+ }
+ child = child->next;
+ }
+
+ Scene *newscn = mscn->sceneman->get(fname);
+ /* NOTE: setting this after get() is not a race condition, because
+ * scene_loaded() which uses this, will only run in our main loop during
+ * SceneSet::update() on the main thread.
+ */
+ newscn->metascn = mscn;
+ mscn->scndata[newscn] = sdat;
+ }
+ return true;
+}
+
+bool MetaScene::scene_loaded(Scene *newscn)
+{
+ SceneData *sdat = (SceneData*)scndata[newscn];
+ if(!sdat) {
+ error_log("MetaScene::scene_loaded called, but corresponding SceneData not found\n");
+ return false;
+ }
+
+ // extract the walk mesh if necessary
+ Scene *wscn;
+ if(!sdat->walkmesh_regexp.empty() && (wscn = newscn->extract_nodes(sdat->walkmesh_regexp.c_str()))) {
+ // apply all transformations to the meshes
+ wscn->apply_xform();
+
+ int nmeshes = wscn->meshes.size();
+ for(int i=0; i<nmeshes; i++) {
+ Mesh *m = wscn->meshes[i];
+
+ if(walk_mesh) {
+ walk_mesh->append(*m);
+ } else {
+ walk_mesh = m;
+ wscn->remove_mesh(m); // to save it from destruction
+ }
+ }
+
+ delete wscn;
+ }
+
+ int num_medits = sdat->mtledit.size();
+ for(int i=0; i<num_medits; i++) {
+ // perform material edits
+ apply_mtledit(newscn, sdat->mtledit[i]);
+ }
+
+ scenes.push_back(newscn);
+ return true;
+}
+
+static bool proc_mtledit(MaterialEdit *med, struct ts_node *node, TextureSet *texset)
+{
+ if(strcmp(node->name, "mtledit") != 0) {
+ return false;
+ }
+
+ const char *restr = ".*";
+ struct ts_attr *amtl = ts_get_attr(node, "material");
+ if(amtl && amtl->val.type == TS_STRING) {
+ restr = amtl->val.str;
+ }
+
+ med->name_re = std::regex(restr);
+
+ node = node->child_list;
+ while(node) {
+ struct ts_node *cn = node;
+ node = node->next;
+
+ if(strcmp(cn->name, "texture") == 0) {
+ // add/change/remove a texture
+ struct ts_attr *atype = ts_get_attr(cn, "type");
+ struct ts_attr *afile = ts_get_attr(cn, "file");
+
+ int textype = MTL_TEX_DIFFUSE;
+ if(atype) {
+ if(atype->val.type == TS_STRING) {
+ textype = mtl_parse_type(atype->val.str);
+ } else if(atype->val.type == TS_NUMBER) {
+ textype = atype->val.inum;
+ if(textype < 0 || textype >= NUM_MTL_TEXTURES) {
+ error_log("invalid texture in mtledit: %d\n", textype);
+ continue;
+ }
+ } else {
+ error_log("unexpected texture type in mtledit: %s\n", atype->val.str);
+ continue;
+ }
+ }
+
+ med->attr = textype;
+
+ if(!afile || !afile->val.str || !*afile->val.str) {
+ // remove
+ med->tex = 0;
+ } else {
+ med->tex = texset->get_texture(afile->val.str, TEX_2D);
+ }
+ }
+ // TODO add more edit modes
+ }
+
+ return true;
+}
+
+static void apply_mtledit(Scene *scn, const MaterialEdit &med)
+{
+ // search all the objects to find matching material names
+ int nobj = scn->objects.size();
+ for(int i=0; i<nobj; i++) {
+ Object *obj = scn->objects[i];
+ if(std::regex_match(obj->get_name(), med.name_re)) {
+ apply_mtledit(&obj->mtl, med);
+ }
+ }
+}
+
+static void apply_mtledit(Material *mtl, const MaterialEdit &med)
+{
+ // TODO more edit modes...
+ if(med.tex) {
+ mtl->add_texture(med.tex, med.attr);
+ } else {
+ Texture *tex = mtl->stdtex[med.attr];
+ if(tex) {
+ mtl->remove_texture(tex);
+ }
+ }
+}
+