nuclear@14: #include <stdarg.h>
nuclear@14: #include "goat3d_impl.h"
nuclear@17: #include "log.h"
nuclear@14: 
nuclear@14: static bool write_material(const Scene *scn, goat3d_io *io, const Material *mat, int level);
nuclear@14: static bool write_mesh(const Scene *scn, goat3d_io *io, const Mesh *mesh, int idx, int level);
nuclear@14: static bool write_light(const Scene *scn, goat3d_io *io, const Light *light, int level);
nuclear@14: static bool write_camera(const Scene *scn, goat3d_io *io, const Camera *cam, int level);
nuclear@14: static bool write_node(const Scene *scn, goat3d_io *io, const Node *node, int level);
nuclear@14: static void xmlout(goat3d_io *io, int level, const char *fmt, ...);
nuclear@14: 
nuclear@14: bool Scene::savexml(goat3d_io *io) const
nuclear@14: {
nuclear@14: 	xmlout(io, 0, "<scene>\n");
nuclear@14: 
nuclear@14: 	// write environment stuff
nuclear@14: 	xmlout(io, 1, "<env>\n");
nuclear@18: 	xmlout(io, 2, "<ambient float3=\"%g %g %g\"/>\n", ambient.x, ambient.y, ambient.z);
nuclear@18: 	xmlout(io, 1, "</env>\n\n");
nuclear@14: 
nuclear@14: 	for(size_t i=0; i<materials.size(); i++) {
nuclear@14: 		write_material(this, io, materials[i], 1);
nuclear@14: 	}
nuclear@14: 	for(size_t i=0; i<meshes.size(); i++) {
nuclear@14: 		write_mesh(this, io, meshes[i], i, 1);
nuclear@14: 	}
nuclear@14: 	for(size_t i=0; i<lights.size(); i++) {
nuclear@14: 		write_light(this, io, lights[i], 1);
nuclear@14: 	}
nuclear@14: 	for(size_t i=0; i<cameras.size(); i++) {
nuclear@14: 		write_camera(this, io, cameras[i], 1);
nuclear@14: 	}
nuclear@14: 	for(size_t i=0; i<nodes.size(); i++) {
nuclear@14: 		write_node(this, io, nodes[i], 1);
nuclear@14: 	}
nuclear@14: 
nuclear@14: 	xmlout(io, 0, "</scene>\n");
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: static bool write_material(const Scene *scn, goat3d_io *io, const Material *mat, int level)
nuclear@14: {
nuclear@14: 	xmlout(io, level, "<mtl>\n");
nuclear@14: 	xmlout(io, level + 1, "<name string=\"%s\"/>\n", mat->name.c_str());
nuclear@14: 
nuclear@14: 	for(int i=0; i<mat->get_attrib_count(); i++) {
nuclear@14: 		xmlout(io, level + 1, "<attr>\n");
nuclear@14: 		xmlout(io, level + 2, "<name string=\"%s\"/>\n", mat->get_attrib_name(i));
nuclear@14: 
nuclear@14: 		const MaterialAttrib &attr = (*mat)[i];
nuclear@18: 		xmlout(io, level + 2, "<val float4=\"%g %g %g %g\"/>\n", attr.value.x,
nuclear@14: 				attr.value.y, attr.value.z, attr.value.w);
nuclear@14: 		if(!attr.map.empty()) {
nuclear@14: 			xmlout(io, level + 2, "<map string=\"%s\"/>\n", attr.map.c_str());
nuclear@14: 		}
nuclear@14: 		xmlout(io, level + 1, "</attr>\n");
nuclear@14: 	}
nuclear@18: 	xmlout(io, level, "</mtl>\n\n");
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: static bool write_mesh(const Scene *scn, goat3d_io *io, const Mesh *mesh, int idx, int level)
nuclear@14: {
nuclear@14: 	// first write the external (openctm) mesh file
nuclear@14: 	const char *prefix = scn->get_name();
nuclear@14: 	if(!prefix) {
nuclear@14: 		prefix = "goat";
nuclear@14: 	}
nuclear@14: 
nuclear@14: 	char *mesh_filename = (char*)alloca(strlen(prefix) + 32);
nuclear@14: 	sprintf(mesh_filename, "%s-mesh%04d.ctm", prefix, idx);
nuclear@14: 
nuclear@19: 	if(!mesh->save(mesh_filename)) {
nuclear@19: 		return false;
nuclear@19: 	}
nuclear@14: 
nuclear@14: 	// then refer to that filename in the XML tags
nuclear@14: 	xmlout(io, level, "<mesh>\n");
nuclear@14: 	xmlout(io, level + 1, "<name string=\"%s\"/>\n", mesh->name.c_str());
nuclear@17: 	if(mesh->material) {
nuclear@17: 		xmlout(io, level + 1, "<material string=\"%s\"/>\n", mesh->material->name.c_str());
nuclear@17: 	}
nuclear@40: 	xmlout(io, level + 1, "<file string=\"%s\"/>\n", goat3d_clean_filename(mesh_filename).c_str());
nuclear@18: 	xmlout(io, level, "</mesh>\n\n");
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: static bool write_light(const Scene *scn, goat3d_io *io, const Light *light, int level)
nuclear@14: {
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: static bool write_camera(const Scene *scn, goat3d_io *io, const Camera *cam, int level)
nuclear@14: {
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: static bool write_node(const Scene *scn, goat3d_io *io, const Node *node, int level)
nuclear@14: {
nuclear@30: 	xmlout(io, level, "<node>\n");
nuclear@30: 	xmlout(io, level + 1, "<name string=\"%s\"/>\n", node->get_name());
nuclear@30: 
nuclear@30: 	XFormNode *parent = node->get_parent();
nuclear@30: 	if(parent) {
nuclear@30: 		xmlout(io, level + 1, "<parent string=\"%s\"/>\n", parent->get_name());
nuclear@30: 	}
nuclear@30: 
nuclear@30: 	const char *type = 0;
nuclear@30: 	const Object *obj = node->get_object();
nuclear@30: 	if(dynamic_cast<const Mesh*>(obj)) {
nuclear@30: 		type = "mesh";
nuclear@30: 	} else if(dynamic_cast<const Light*>(obj)) {
nuclear@30: 		type = "light";
nuclear@30: 	} else if(dynamic_cast<const Camera*>(obj)) {
nuclear@30: 		type = "camera";
nuclear@30: 	}
nuclear@30: 
nuclear@30: 	if(type) {
nuclear@30: 		xmlout(io, level + 1, "<%s string=\"%s\"/>\n", type, obj->name.c_str());
nuclear@30: 	}
nuclear@30: 
nuclear@30: 	Vector3 pos = node->get_node_position();
nuclear@30: 	Quaternion rot = node->get_node_rotation();
nuclear@30: 	Vector3 scale = node->get_node_scaling();
nuclear@30: 	Vector3 pivot = node->get_pivot();
nuclear@30: 
nuclear@30: 	Matrix4x4 xform;
nuclear@30: 	node->get_node_xform(0, &xform);
nuclear@30: 
nuclear@30: 	xmlout(io, level + 1, "<pos float3=\"%g %g %g\"/>\n", pos.x, pos.y, pos.z);
nuclear@30: 	xmlout(io, level + 1, "<rot float4=\"%g %g %g %g\"/>\n", rot.v.x, rot.v.y, rot.v.z, rot.s);
nuclear@30: 	xmlout(io, level + 1, "<scale float3=\"%g %g %g\"/>\n", scale.x, scale.y, scale.z);
nuclear@30: 	xmlout(io, level + 1, "<pivot float3=\"%g %g %g\"/>\n", pivot.x, pivot.y, pivot.z);
nuclear@30: 
nuclear@30: 	xmlout(io, level + 1, "<matrix0 float4=\"%g %g %g %g\"/>\n", xform[0][0], xform[0][1], xform[0][2], xform[0][3]);
nuclear@30: 	xmlout(io, level + 1, "<matrix1 float4=\"%g %g %g %g\"/>\n", xform[1][0], xform[1][1], xform[1][2], xform[1][3]);
nuclear@30: 	xmlout(io, level + 1, "<matrix2 float4=\"%g %g %g %g\"/>\n", xform[2][0], xform[2][1], xform[2][2], xform[2][3]);
nuclear@30: 
nuclear@30: 	xmlout(io, level, "</node>\n");
nuclear@14: 	return true;
nuclear@14: }
nuclear@14: 
nuclear@14: 
nuclear@14: static void xmlout(goat3d_io *io, int level, const char *fmt, ...)
nuclear@14: {
nuclear@14: 	for(int i=0; i<level; i++) {
nuclear@14: 		io_fprintf(io, "  ");
nuclear@14: 	}
nuclear@14: 
nuclear@14: 	va_list ap;
nuclear@14: 	va_start(ap, fmt);
nuclear@14: 	io_vfprintf(io, fmt, ap);
nuclear@14: 	va_end(ap);
nuclear@14: }