goat3d

annotate src/goat3d.cc @ 66:3751aabbc5b3

igame animation api is weird...
author John Tsiombikas <nuclear@member.fsf.org>
date Sat, 19 Apr 2014 07:56:43 +0300
parents 76d0f55f9d5f
children 8970ca3d55e0
rev   line source
nuclear@16 1 #include <string.h>
nuclear@16 2 #include <errno.h>
nuclear@31 3 #include <ctype.h>
nuclear@31 4 #include <string>
nuclear@16 5 #include "goat3d.h"
nuclear@16 6 #include "goat3d_impl.h"
nuclear@16 7 #include "log.h"
nuclear@16 8
nuclear@31 9 #ifndef _MSC_VER
nuclear@31 10 #include <alloca.h>
nuclear@31 11 #else
nuclear@31 12 #include <malloc.h>
nuclear@31 13 #endif
nuclear@31 14
nuclear@47 15 using namespace g3dimpl;
nuclear@47 16
nuclear@16 17 struct goat3d {
nuclear@16 18 Scene *scn;
nuclear@16 19 unsigned int flags;
nuclear@32 20 char *search_path;
nuclear@16 21 };
nuclear@16 22
nuclear@16 23 struct goat3d_material : public Material {};
nuclear@16 24 struct goat3d_mesh : public Mesh {};
nuclear@16 25 struct goat3d_light : public Light {};
nuclear@16 26 struct goat3d_camera : public Camera {};
nuclear@16 27 struct goat3d_node : public Node {};
nuclear@16 28
nuclear@16 29
nuclear@16 30 static long read_file(void *buf, size_t bytes, void *uptr);
nuclear@16 31 static long write_file(const void *buf, size_t bytes, void *uptr);
nuclear@16 32 static long seek_file(long offs, int whence, void *uptr);
nuclear@16 33
nuclear@16 34 extern "C" {
nuclear@16 35
nuclear@41 36 GOAT3DAPI struct goat3d *goat3d_create(void)
nuclear@16 37 {
nuclear@16 38 goat3d *goat = new goat3d;
nuclear@27 39 goat->flags = 0;
nuclear@32 40 goat->search_path = 0;
nuclear@16 41 goat->scn = new Scene;
nuclear@29 42
nuclear@29 43 goat3d_setopt(goat, GOAT3D_OPT_SAVEXML, 1);
nuclear@16 44 return goat;
nuclear@16 45 }
nuclear@16 46
nuclear@41 47 GOAT3DAPI void goat3d_free(struct goat3d *g)
nuclear@16 48 {
nuclear@32 49 delete g->search_path;
nuclear@16 50 delete g->scn;
nuclear@16 51 delete g;
nuclear@16 52 }
nuclear@16 53
nuclear@41 54 GOAT3DAPI void goat3d_setopt(struct goat3d *g, enum goat3d_option opt, int val)
nuclear@16 55 {
nuclear@16 56 if(val) {
nuclear@16 57 g->flags |= (1 << (int)opt);
nuclear@16 58 } else {
nuclear@16 59 g->flags &= ~(1 << (int)opt);
nuclear@16 60 }
nuclear@16 61 }
nuclear@16 62
nuclear@41 63 GOAT3DAPI int goat3d_getopt(const struct goat3d *g, enum goat3d_option opt)
nuclear@16 64 {
nuclear@16 65 return (g->flags >> (int)opt) & 1;
nuclear@16 66 }
nuclear@16 67
nuclear@41 68 GOAT3DAPI int goat3d_load(struct goat3d *g, const char *fname)
nuclear@16 69 {
nuclear@16 70 FILE *fp = fopen(fname, "rb");
nuclear@16 71 if(!fp) {
nuclear@16 72 logmsg(LOG_ERROR, "failed to open file \"%s\" for reading: %s\n", fname, strerror(errno));
nuclear@16 73 return -1;
nuclear@16 74 }
nuclear@16 75
nuclear@32 76 /* if the filename contained any directory components, keep the prefix
nuclear@32 77 * to use it as a search path for external mesh file loading
nuclear@32 78 */
nuclear@32 79 g->search_path = new char[strlen(fname) + 1];
nuclear@32 80 strcpy(g->search_path, fname);
nuclear@32 81
nuclear@32 82 char *slash = strrchr(g->search_path, '/');
nuclear@32 83 if(slash) {
nuclear@32 84 *slash = 0;
nuclear@32 85 } else {
nuclear@32 86 if((slash = strrchr(g->search_path, '\\'))) {
nuclear@32 87 *slash = 0;
nuclear@32 88 } else {
nuclear@32 89 delete [] g->search_path;
nuclear@32 90 g->search_path = 0;
nuclear@32 91 }
nuclear@32 92 }
nuclear@32 93
nuclear@16 94 int res = goat3d_load_file(g, fp);
nuclear@16 95 fclose(fp);
nuclear@16 96 return res;
nuclear@16 97 }
nuclear@16 98
nuclear@41 99 GOAT3DAPI int goat3d_save(const struct goat3d *g, const char *fname)
nuclear@16 100 {
nuclear@16 101 FILE *fp = fopen(fname, "wb");
nuclear@16 102 if(!fp) {
nuclear@16 103 logmsg(LOG_ERROR, "failed to open file \"%s\" for writing: %s\n", fname, strerror(errno));
nuclear@16 104 return -1;
nuclear@16 105 }
nuclear@16 106
nuclear@16 107 int res = goat3d_save_file(g, fp);
nuclear@16 108 fclose(fp);
nuclear@16 109 return res;
nuclear@16 110 }
nuclear@16 111
nuclear@41 112 GOAT3DAPI int goat3d_load_file(struct goat3d *g, FILE *fp)
nuclear@16 113 {
nuclear@16 114 goat3d_io io;
nuclear@16 115 io.cls = fp;
nuclear@16 116 io.read = read_file;
nuclear@16 117 io.write = write_file;
nuclear@16 118 io.seek = seek_file;
nuclear@16 119
nuclear@16 120 return goat3d_load_io(g, &io);
nuclear@16 121 }
nuclear@16 122
nuclear@41 123 GOAT3DAPI int goat3d_save_file(const struct goat3d *g, FILE *fp)
nuclear@16 124 {
nuclear@16 125 goat3d_io io;
nuclear@16 126 io.cls = fp;
nuclear@16 127 io.read = read_file;
nuclear@16 128 io.write = write_file;
nuclear@16 129 io.seek = seek_file;
nuclear@16 130
nuclear@16 131 return goat3d_save_io(g, &io);
nuclear@16 132 }
nuclear@16 133
nuclear@41 134 GOAT3DAPI int goat3d_load_io(struct goat3d *g, struct goat3d_io *io)
nuclear@16 135 {
nuclear@16 136 if(!g->scn->load(io)) {
nuclear@45 137 if(!g->scn->loadxml(io)) {
nuclear@16 138 return -1;
nuclear@16 139 }
nuclear@16 140 }
nuclear@16 141 return 0;
nuclear@16 142 }
nuclear@16 143
nuclear@41 144 GOAT3DAPI int goat3d_save_io(const struct goat3d *g, struct goat3d_io *io)
nuclear@16 145 {
nuclear@16 146 if(goat3d_getopt(g, GOAT3D_OPT_SAVEXML)) {
nuclear@16 147 return g->scn->savexml(io) ? 0 : -1;
nuclear@16 148 }
nuclear@16 149 return g->scn->save(io) ? 0 : -1;
nuclear@16 150 }
nuclear@16 151
nuclear@47 152 /* save/load animations */
nuclear@47 153 GOAT3DAPI int goat3d_load_anim(struct goat3d *g, const char *fname)
nuclear@47 154 {
nuclear@47 155 FILE *fp = fopen(fname, "rb");
nuclear@47 156 if(!fp) {
nuclear@47 157 return -1;
nuclear@47 158 }
nuclear@47 159
nuclear@47 160 int res = goat3d_load_anim_file(g, fp);
nuclear@47 161 fclose(fp);
nuclear@47 162 return res;
nuclear@47 163 }
nuclear@47 164
nuclear@55 165 GOAT3DAPI int goat3d_save_anim(const struct goat3d *g, const char *fname)
nuclear@47 166 {
nuclear@47 167 FILE *fp = fopen(fname, "wb");
nuclear@47 168 if(!fp) {
nuclear@47 169 return -1;
nuclear@47 170 }
nuclear@47 171
nuclear@55 172 int res = goat3d_save_anim_file(g, fp);
nuclear@47 173 fclose(fp);
nuclear@47 174 return res;
nuclear@47 175 }
nuclear@47 176
nuclear@47 177 GOAT3DAPI int goat3d_load_anim_file(struct goat3d *g, FILE *fp)
nuclear@47 178 {
nuclear@47 179 goat3d_io io;
nuclear@47 180 io.cls = fp;
nuclear@47 181 io.read = read_file;
nuclear@47 182 io.write = write_file;
nuclear@47 183 io.seek = seek_file;
nuclear@47 184
nuclear@47 185 return goat3d_load_anim_io(g, &io);
nuclear@47 186 }
nuclear@47 187
nuclear@55 188 GOAT3DAPI int goat3d_save_anim_file(const struct goat3d *g, FILE *fp)
nuclear@47 189 {
nuclear@47 190 goat3d_io io;
nuclear@47 191 io.cls = fp;
nuclear@47 192 io.read = read_file;
nuclear@47 193 io.write = write_file;
nuclear@47 194 io.seek = seek_file;
nuclear@47 195
nuclear@55 196 return goat3d_save_anim_io(g, &io);
nuclear@47 197 }
nuclear@47 198
nuclear@47 199 GOAT3DAPI int goat3d_load_anim_io(struct goat3d *g, struct goat3d_io *io)
nuclear@47 200 {
nuclear@47 201 if(!g->scn->load_anim(io)) {
nuclear@47 202 if(!g->scn->load_anim_xml(io)) {
nuclear@47 203 return -1;
nuclear@47 204 }
nuclear@47 205 }
nuclear@47 206 return 0;
nuclear@47 207 }
nuclear@47 208
nuclear@55 209 GOAT3DAPI int goat3d_save_anim_io(const struct goat3d *g, struct goat3d_io *io)
nuclear@47 210 {
nuclear@47 211 if(goat3d_getopt(g, GOAT3D_OPT_SAVEXML)) {
nuclear@55 212 return g->scn->save_anim_xml(io) ? 0 : -1;
nuclear@47 213 }
nuclear@55 214 return g->scn->save_anim(io) ? 0 : -1;
nuclear@47 215 }
nuclear@47 216
nuclear@47 217
nuclear@41 218 GOAT3DAPI int goat3d_set_name(struct goat3d *g, const char *name)
nuclear@16 219 {
nuclear@16 220 g->scn->set_name(name);
nuclear@16 221 return 0;
nuclear@16 222 }
nuclear@16 223
nuclear@41 224 GOAT3DAPI const char *goat3d_get_name(const struct goat3d *g)
nuclear@16 225 {
nuclear@16 226 return g->scn->get_name();
nuclear@16 227 }
nuclear@16 228
nuclear@41 229 GOAT3DAPI void goat3d_set_ambient(struct goat3d *g, const float *amb)
nuclear@16 230 {
nuclear@16 231 g->scn->set_ambient(Vector3(amb[0], amb[1], amb[2]));
nuclear@16 232 }
nuclear@16 233
nuclear@41 234 GOAT3DAPI void goat3d_set_ambient3f(struct goat3d *g, float ar, float ag, float ab)
nuclear@16 235 {
nuclear@16 236 g->scn->set_ambient(Vector3(ar, ag, ab));
nuclear@16 237 }
nuclear@16 238
nuclear@41 239 GOAT3DAPI const float *goat3d_get_ambient(const struct goat3d *g)
nuclear@16 240 {
nuclear@16 241 return &g->scn->get_ambient().x;
nuclear@16 242 }
nuclear@16 243
nuclear@16 244 // ---- materials ----
nuclear@41 245 GOAT3DAPI void goat3d_add_mtl(struct goat3d *g, struct goat3d_material *mtl)
nuclear@27 246 {
nuclear@27 247 g->scn->add_material(mtl);
nuclear@27 248 }
nuclear@27 249
nuclear@57 250 GOAT3DAPI int goat3d_get_mtl_count(struct goat3d *g)
nuclear@57 251 {
nuclear@57 252 return g->scn->get_material_count();
nuclear@57 253 }
nuclear@57 254
nuclear@57 255 GOAT3DAPI struct goat3d_material *goat3d_get_mtl(struct goat3d *g, int idx)
nuclear@57 256 {
nuclear@57 257 return (goat3d_material*)g->scn->get_material(idx);
nuclear@57 258 }
nuclear@57 259
nuclear@57 260 GOAT3DAPI struct goat3d_material *goat3d_get_mtl_by_name(struct goat3d *g, const char *name)
nuclear@57 261 {
nuclear@57 262 return (goat3d_material*)g->scn->get_material(name);
nuclear@57 263 }
nuclear@57 264
nuclear@41 265 GOAT3DAPI struct goat3d_material *goat3d_create_mtl(void)
nuclear@16 266 {
nuclear@16 267 return new goat3d_material;
nuclear@16 268 }
nuclear@16 269
nuclear@41 270 GOAT3DAPI void goat3d_destroy_mtl(struct goat3d_material *mtl)
nuclear@16 271 {
nuclear@16 272 delete mtl;
nuclear@16 273 }
nuclear@16 274
nuclear@41 275 GOAT3DAPI void goat3d_set_mtl_name(struct goat3d_material *mtl, const char *name)
nuclear@16 276 {
nuclear@16 277 mtl->name = std::string(name);
nuclear@16 278 }
nuclear@16 279
nuclear@41 280 GOAT3DAPI const char *goat3d_get_mtl_name(const struct goat3d_material *mtl)
nuclear@16 281 {
nuclear@16 282 return mtl->name.c_str();
nuclear@16 283 }
nuclear@16 284
nuclear@41 285 GOAT3DAPI void goat3d_set_mtl_attrib(struct goat3d_material *mtl, const char *attrib, const float *val)
nuclear@16 286 {
nuclear@16 287 (*mtl)[attrib].value = Vector4(val[0], val[1], val[2], val[3]);
nuclear@16 288 }
nuclear@16 289
nuclear@41 290 GOAT3DAPI void goat3d_set_mtl_attrib1f(struct goat3d_material *mtl, const char *attrib, float val)
nuclear@16 291 {
nuclear@16 292 goat3d_set_mtl_attrib4f(mtl, attrib, val, 0, 0, 1);
nuclear@16 293 }
nuclear@16 294
nuclear@41 295 GOAT3DAPI void goat3d_set_mtl_attrib3f(struct goat3d_material *mtl, const char *attrib, float r, float g, float b)
nuclear@16 296 {
nuclear@16 297 goat3d_set_mtl_attrib4f(mtl, attrib, r, g, b, 1);
nuclear@16 298 }
nuclear@16 299
nuclear@41 300 GOAT3DAPI void goat3d_set_mtl_attrib4f(struct goat3d_material *mtl, const char *attrib, float r, float g, float b, float a)
nuclear@16 301 {
nuclear@16 302 (*mtl)[attrib].value = Vector4(r, g, b, a);
nuclear@16 303 }
nuclear@16 304
nuclear@41 305 GOAT3DAPI const float *goat3d_get_mtl_attrib(struct goat3d_material *mtl, const char *attrib)
nuclear@16 306 {
nuclear@16 307 return &(*mtl)[attrib].value.x;
nuclear@16 308 }
nuclear@16 309
nuclear@41 310 GOAT3DAPI void goat3d_set_mtl_attrib_map(struct goat3d_material *mtl, const char *attrib, const char *mapname)
nuclear@16 311 {
nuclear@51 312 (*mtl)[attrib].map = clean_filename(mapname);
nuclear@16 313 }
nuclear@16 314
nuclear@41 315 GOAT3DAPI const char *goat3d_get_mtl_attrib_map(struct goat3d_material *mtl, const char *attrib)
nuclear@16 316 {
nuclear@16 317 return (*mtl)[attrib].map.c_str();
nuclear@16 318 }
nuclear@16 319
nuclear@27 320 // ---- meshes ----
nuclear@41 321 GOAT3DAPI void goat3d_add_mesh(struct goat3d *g, struct goat3d_mesh *mesh)
nuclear@16 322 {
nuclear@27 323 g->scn->add_mesh(mesh);
nuclear@16 324 }
nuclear@16 325
nuclear@41 326 GOAT3DAPI int goat3d_get_mesh_count(struct goat3d *g)
nuclear@27 327 {
nuclear@27 328 return g->scn->get_mesh_count();
nuclear@27 329 }
nuclear@27 330
nuclear@41 331 GOAT3DAPI struct goat3d_mesh *goat3d_get_mesh(struct goat3d *g, int idx)
nuclear@27 332 {
nuclear@27 333 return (goat3d_mesh*)g->scn->get_mesh(idx);
nuclear@27 334 }
nuclear@27 335
nuclear@41 336 GOAT3DAPI struct goat3d_mesh *goat3d_get_mesh_by_name(struct goat3d *g, const char *name)
nuclear@27 337 {
nuclear@27 338 return (goat3d_mesh*)g->scn->get_mesh(name);
nuclear@27 339 }
nuclear@27 340
nuclear@41 341 GOAT3DAPI struct goat3d_mesh *goat3d_create_mesh(void)
nuclear@16 342 {
nuclear@16 343 return new goat3d_mesh;
nuclear@16 344 }
nuclear@16 345
nuclear@41 346 GOAT3DAPI void goat3d_destroy_mesh(struct goat3d_mesh *mesh)
nuclear@16 347 {
nuclear@16 348 delete mesh;
nuclear@16 349 }
nuclear@16 350
nuclear@41 351 GOAT3DAPI void goat3d_set_mesh_name(struct goat3d_mesh *mesh, const char *name)
nuclear@16 352 {
nuclear@16 353 mesh->name = std::string(name);
nuclear@16 354 }
nuclear@16 355
nuclear@41 356 GOAT3DAPI const char *goat3d_get_mesh_name(const struct goat3d_mesh *mesh)
nuclear@16 357 {
nuclear@16 358 return mesh->name.c_str();
nuclear@16 359 }
nuclear@16 360
nuclear@41 361 GOAT3DAPI void goat3d_set_mesh_mtl(struct goat3d_mesh *mesh, struct goat3d_material *mtl)
nuclear@16 362 {
nuclear@16 363 mesh->material = mtl;
nuclear@16 364 }
nuclear@16 365
nuclear@41 366 GOAT3DAPI struct goat3d_material *goat3d_get_mesh_mtl(struct goat3d_mesh *mesh)
nuclear@16 367 {
nuclear@16 368 return (goat3d_material*)mesh->material;
nuclear@16 369 }
nuclear@16 370
nuclear@41 371 GOAT3DAPI int goat3d_get_mesh_attrib_count(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib)
nuclear@16 372 {
nuclear@16 373 return (int)mesh->vertices.size();
nuclear@16 374 }
nuclear@16 375
nuclear@41 376 GOAT3DAPI int goat3d_get_mesh_face_count(struct goat3d_mesh *mesh)
nuclear@16 377 {
nuclear@16 378 return (int)mesh->faces.size();
nuclear@16 379 }
nuclear@16 380
nuclear@19 381 // VECDATA is in goat3d_impl.h
nuclear@41 382 GOAT3DAPI void goat3d_set_mesh_attribs(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib, const void *data, int vnum)
nuclear@16 383 {
nuclear@16 384 if(attrib == GOAT3D_MESH_ATTR_VERTEX) {
nuclear@16 385 mesh->vertices = VECDATA(Vector3, data, vnum);
nuclear@16 386 return;
nuclear@16 387 }
nuclear@16 388
nuclear@16 389 if(vnum != (int)mesh->vertices.size()) {
nuclear@16 390 logmsg(LOG_ERROR, "trying to set mesh attrib data with number of elements different than the vertex array\n");
nuclear@16 391 return;
nuclear@16 392 }
nuclear@16 393
nuclear@16 394 switch(attrib) {
nuclear@16 395 case GOAT3D_MESH_ATTR_NORMAL:
nuclear@16 396 mesh->normals = VECDATA(Vector3, data, vnum);
nuclear@16 397 break;
nuclear@16 398 case GOAT3D_MESH_ATTR_TANGENT:
nuclear@16 399 mesh->tangents = VECDATA(Vector3, data, vnum);
nuclear@16 400 break;
nuclear@16 401 case GOAT3D_MESH_ATTR_TEXCOORD:
nuclear@16 402 mesh->texcoords = VECDATA(Vector2, data, vnum);
nuclear@16 403 break;
nuclear@16 404 case GOAT3D_MESH_ATTR_SKIN_WEIGHT:
nuclear@16 405 mesh->skin_weights = VECDATA(Vector4, data, vnum);
nuclear@16 406 break;
nuclear@16 407 case GOAT3D_MESH_ATTR_SKIN_MATRIX:
nuclear@16 408 mesh->skin_matrices = VECDATA(Int4, data, vnum);
nuclear@16 409 break;
nuclear@16 410 case GOAT3D_MESH_ATTR_COLOR:
nuclear@16 411 mesh->colors = VECDATA(Vector4, data, vnum);
nuclear@16 412 default:
nuclear@16 413 break;
nuclear@16 414 }
nuclear@16 415 }
nuclear@16 416
nuclear@41 417 GOAT3DAPI void goat3d_add_mesh_attrib1f(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib,
nuclear@40 418 float val)
nuclear@40 419 {
nuclear@40 420 goat3d_add_mesh_attrib4f(mesh, attrib, val, 0, 0, 1);
nuclear@40 421 }
nuclear@40 422
nuclear@57 423 GOAT3DAPI void goat3d_add_mesh_attrib2f(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib,
nuclear@57 424 float x, float y)
nuclear@57 425 {
nuclear@57 426 goat3d_add_mesh_attrib4f(mesh, attrib, x, y, 0, 1);
nuclear@57 427 }
nuclear@57 428
nuclear@41 429 GOAT3DAPI void goat3d_add_mesh_attrib3f(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib,
nuclear@40 430 float x, float y, float z)
nuclear@40 431 {
nuclear@40 432 goat3d_add_mesh_attrib4f(mesh, attrib, x, y, z, 1);
nuclear@40 433 }
nuclear@40 434
nuclear@41 435 GOAT3DAPI void goat3d_add_mesh_attrib4f(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib,
nuclear@40 436 float x, float y, float z, float w)
nuclear@40 437 {
nuclear@40 438 switch(attrib) {
nuclear@40 439 case GOAT3D_MESH_ATTR_VERTEX:
nuclear@40 440 mesh->vertices.push_back(Vector3(x, y, z));
nuclear@40 441 break;
nuclear@40 442 case GOAT3D_MESH_ATTR_NORMAL:
nuclear@40 443 mesh->normals.push_back(Vector3(x, y, z));
nuclear@40 444 break;
nuclear@40 445 case GOAT3D_MESH_ATTR_TANGENT:
nuclear@40 446 mesh->tangents.push_back(Vector3(x, y, z));
nuclear@40 447 break;
nuclear@40 448 case GOAT3D_MESH_ATTR_TEXCOORD:
nuclear@40 449 mesh->texcoords.push_back(Vector2(x, y));
nuclear@40 450 break;
nuclear@40 451 case GOAT3D_MESH_ATTR_SKIN_WEIGHT:
nuclear@40 452 mesh->skin_weights.push_back(Vector4(x, y, z, w));
nuclear@40 453 break;
nuclear@40 454 case GOAT3D_MESH_ATTR_SKIN_MATRIX:
nuclear@40 455 mesh->skin_matrices.push_back(Int4(x, y, z, w));
nuclear@40 456 break;
nuclear@40 457 case GOAT3D_MESH_ATTR_COLOR:
nuclear@40 458 mesh->colors.push_back(Vector4(x, y, z, w));
nuclear@40 459 default:
nuclear@40 460 break;
nuclear@40 461 }
nuclear@40 462 }
nuclear@40 463
nuclear@41 464 GOAT3DAPI void *goat3d_get_mesh_attribs(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib)
nuclear@16 465 {
nuclear@16 466 return goat3d_get_mesh_attrib(mesh, attrib, 0);
nuclear@16 467 }
nuclear@16 468
nuclear@41 469 GOAT3DAPI void *goat3d_get_mesh_attrib(struct goat3d_mesh *mesh, enum goat3d_mesh_attrib attrib, int idx)
nuclear@16 470 {
nuclear@16 471 switch(attrib) {
nuclear@16 472 case GOAT3D_MESH_ATTR_VERTEX:
nuclear@16 473 return mesh->vertices.empty() ? 0 : (void*)&mesh->vertices[idx];
nuclear@16 474 case GOAT3D_MESH_ATTR_NORMAL:
nuclear@16 475 return mesh->normals.empty() ? 0 : (void*)&mesh->normals[idx];
nuclear@16 476 case GOAT3D_MESH_ATTR_TANGENT:
nuclear@16 477 return mesh->tangents.empty() ? 0 : (void*)&mesh->tangents[idx];
nuclear@16 478 case GOAT3D_MESH_ATTR_TEXCOORD:
nuclear@16 479 return mesh->texcoords.empty() ? 0 : (void*)&mesh->texcoords[idx];
nuclear@16 480 case GOAT3D_MESH_ATTR_SKIN_WEIGHT:
nuclear@16 481 return mesh->skin_weights.empty() ? 0 : (void*)&mesh->skin_weights[idx];
nuclear@16 482 case GOAT3D_MESH_ATTR_SKIN_MATRIX:
nuclear@16 483 return mesh->skin_matrices.empty() ? 0 : (void*)&mesh->skin_matrices[idx];
nuclear@16 484 case GOAT3D_MESH_ATTR_COLOR:
nuclear@16 485 return mesh->colors.empty() ? 0 : (void*)&mesh->colors[idx];
nuclear@16 486 default:
nuclear@16 487 break;
nuclear@16 488 }
nuclear@16 489 return 0;
nuclear@16 490 }
nuclear@16 491
nuclear@16 492
nuclear@41 493 GOAT3DAPI void goat3d_set_mesh_faces(struct goat3d_mesh *mesh, const int *data, int num)
nuclear@16 494 {
nuclear@16 495 mesh->faces = VECDATA(Face, data, num);
nuclear@16 496 }
nuclear@16 497
nuclear@41 498 GOAT3DAPI void goat3d_add_mesh_face(struct goat3d_mesh *mesh, int a, int b, int c)
nuclear@40 499 {
nuclear@40 500 Face face;
nuclear@40 501 face.v[0] = a;
nuclear@40 502 face.v[1] = b;
nuclear@40 503 face.v[2] = c;
nuclear@40 504 mesh->faces.push_back(face);
nuclear@40 505 }
nuclear@40 506
nuclear@41 507 GOAT3DAPI int *goat3d_get_mesh_faces(struct goat3d_mesh *mesh)
nuclear@16 508 {
nuclear@16 509 return goat3d_get_mesh_face(mesh, 0);
nuclear@16 510 }
nuclear@16 511
nuclear@41 512 GOAT3DAPI int *goat3d_get_mesh_face(struct goat3d_mesh *mesh, int idx)
nuclear@16 513 {
nuclear@16 514 return mesh->faces.empty() ? 0 : mesh->faces[idx].v;
nuclear@16 515 }
nuclear@16 516
nuclear@16 517 // immedate mode state
nuclear@16 518 static enum goat3d_im_primitive im_prim;
nuclear@16 519 static struct goat3d_mesh *im_mesh;
nuclear@16 520 static Vector3 im_norm, im_tang;
nuclear@16 521 static Vector2 im_texcoord;
nuclear@16 522 static Vector4 im_skinw, im_color = Vector4(1, 1, 1, 1);
nuclear@16 523 static Int4 im_skinmat;
nuclear@16 524 static bool im_use[NUM_GOAT3D_MESH_ATTRIBS];
nuclear@16 525
nuclear@16 526
nuclear@41 527 GOAT3DAPI void goat3d_begin(struct goat3d_mesh *mesh, enum goat3d_im_primitive prim)
nuclear@16 528 {
nuclear@16 529 mesh->vertices.clear();
nuclear@16 530 mesh->normals.clear();
nuclear@16 531 mesh->tangents.clear();
nuclear@16 532 mesh->texcoords.clear();
nuclear@16 533 mesh->skin_weights.clear();
nuclear@16 534 mesh->skin_matrices.clear();
nuclear@16 535 mesh->colors.clear();
nuclear@16 536 mesh->faces.clear();
nuclear@16 537
nuclear@16 538 im_mesh = mesh;
nuclear@16 539 memset(im_use, 0, sizeof im_use);
nuclear@16 540
nuclear@16 541 im_prim = prim;
nuclear@16 542 }
nuclear@16 543
nuclear@41 544 GOAT3DAPI void goat3d_end(void)
nuclear@16 545 {
nuclear@16 546 switch(im_prim) {
nuclear@16 547 case GOAT3D_TRIANGLES:
nuclear@17 548 {
nuclear@17 549 int num_faces = (int)im_mesh->vertices.size() / 3;
nuclear@17 550 im_mesh->faces.resize(num_faces);
nuclear@17 551
nuclear@17 552 int vidx = 0;
nuclear@17 553 for(int i=0; i<num_faces; i++) {
nuclear@17 554 im_mesh->faces[i].v[0] = vidx++;
nuclear@17 555 im_mesh->faces[i].v[1] = vidx++;
nuclear@17 556 im_mesh->faces[i].v[2] = vidx++;
nuclear@17 557 }
nuclear@17 558 }
nuclear@16 559 break;
nuclear@16 560
nuclear@16 561 case GOAT3D_QUADS:
nuclear@17 562 {
nuclear@17 563 int num_quads = (int)im_mesh->vertices.size() / 4;
nuclear@17 564 im_mesh->faces.resize(num_quads * 2);
nuclear@17 565
nuclear@17 566 int vidx = 0;
nuclear@17 567 for(int i=0; i<num_quads; i++) {
nuclear@17 568 im_mesh->faces[i * 2].v[0] = vidx;
nuclear@17 569 im_mesh->faces[i * 2].v[1] = vidx + 1;
nuclear@17 570 im_mesh->faces[i * 2].v[2] = vidx + 2;
nuclear@17 571
nuclear@17 572 im_mesh->faces[i * 2 + 1].v[0] = vidx;
nuclear@17 573 im_mesh->faces[i * 2 + 1].v[1] = vidx + 2;
nuclear@17 574 im_mesh->faces[i * 2 + 1].v[2] = vidx + 3;
nuclear@17 575
nuclear@17 576 vidx += 4;
nuclear@17 577 }
nuclear@17 578 }
nuclear@16 579 break;
nuclear@16 580
nuclear@16 581 default:
nuclear@16 582 return;
nuclear@16 583 };
nuclear@16 584 }
nuclear@16 585
nuclear@41 586 GOAT3DAPI void goat3d_vertex3f(float x, float y, float z)
nuclear@16 587 {
nuclear@16 588 im_mesh->vertices.push_back(Vector3(x, y, z));
nuclear@16 589 if(im_use[GOAT3D_MESH_ATTR_NORMAL]) {
nuclear@16 590 im_mesh->normals.push_back(im_norm);
nuclear@16 591 }
nuclear@16 592 if(im_use[GOAT3D_MESH_ATTR_TANGENT]) {
nuclear@16 593 im_mesh->tangents.push_back(im_tang);
nuclear@16 594 }
nuclear@16 595 if(im_use[GOAT3D_MESH_ATTR_TEXCOORD]) {
nuclear@16 596 im_mesh->texcoords.push_back(im_texcoord);
nuclear@16 597 }
nuclear@16 598 if(im_use[GOAT3D_MESH_ATTR_SKIN_WEIGHT]) {
nuclear@16 599 im_mesh->skin_weights.push_back(im_skinw);
nuclear@16 600 }
nuclear@16 601 if(im_use[GOAT3D_MESH_ATTR_SKIN_MATRIX]) {
nuclear@16 602 im_mesh->skin_matrices.push_back(im_skinmat);
nuclear@16 603 }
nuclear@16 604 if(im_use[GOAT3D_MESH_ATTR_COLOR]) {
nuclear@16 605 im_mesh->colors.push_back(im_color);
nuclear@16 606 }
nuclear@16 607 }
nuclear@16 608
nuclear@41 609 GOAT3DAPI void goat3d_normal3f(float x, float y, float z)
nuclear@16 610 {
nuclear@16 611 im_norm = Vector3(x, y, z);
nuclear@17 612 im_use[GOAT3D_MESH_ATTR_NORMAL] = true;
nuclear@16 613 }
nuclear@16 614
nuclear@41 615 GOAT3DAPI void goat3d_tangent3f(float x, float y, float z)
nuclear@16 616 {
nuclear@16 617 im_tang = Vector3(x, y, z);
nuclear@17 618 im_use[GOAT3D_MESH_ATTR_TANGENT] = true;
nuclear@16 619 }
nuclear@16 620
nuclear@41 621 GOAT3DAPI void goat3d_texcoord2f(float x, float y)
nuclear@16 622 {
nuclear@16 623 im_texcoord = Vector2(x, y);
nuclear@17 624 im_use[GOAT3D_MESH_ATTR_TEXCOORD] = true;
nuclear@16 625 }
nuclear@16 626
nuclear@41 627 GOAT3DAPI void goat3d_skin_weight4f(float x, float y, float z, float w)
nuclear@16 628 {
nuclear@16 629 im_skinw = Vector4(x, y, z, w);
nuclear@17 630 im_use[GOAT3D_MESH_ATTR_SKIN_WEIGHT] = true;
nuclear@16 631 }
nuclear@16 632
nuclear@41 633 GOAT3DAPI void goat3d_skin_matrix4i(int x, int y, int z, int w)
nuclear@16 634 {
nuclear@16 635 im_skinmat.x = x;
nuclear@16 636 im_skinmat.y = y;
nuclear@16 637 im_skinmat.z = z;
nuclear@16 638 im_skinmat.w = w;
nuclear@17 639 im_use[GOAT3D_MESH_ATTR_SKIN_MATRIX] = true;
nuclear@16 640 }
nuclear@16 641
nuclear@41 642 GOAT3DAPI void goat3d_color3f(float x, float y, float z)
nuclear@16 643 {
nuclear@17 644 goat3d_color4f(x, y, z, 1.0f);
nuclear@16 645 }
nuclear@16 646
nuclear@41 647 GOAT3DAPI void goat3d_color4f(float x, float y, float z, float w)
nuclear@16 648 {
nuclear@16 649 im_color = Vector4(x, y, z, w);
nuclear@17 650 im_use[GOAT3D_MESH_ATTR_COLOR] = true;
nuclear@16 651 }
nuclear@16 652
nuclear@27 653 /* lights */
nuclear@41 654 GOAT3DAPI void goat3d_add_light(struct goat3d *g, struct goat3d_light *lt)
nuclear@16 655 {
nuclear@27 656 g->scn->add_light(lt);
nuclear@16 657 }
nuclear@16 658
nuclear@41 659 GOAT3DAPI int goat3d_get_light_count(struct goat3d *g)
nuclear@19 660 {
nuclear@27 661 return g->scn->get_light_count();
nuclear@19 662 }
nuclear@19 663
nuclear@41 664 GOAT3DAPI struct goat3d_light *goat3d_get_light(struct goat3d *g, int idx)
nuclear@19 665 {
nuclear@27 666 return (goat3d_light*)g->scn->get_light(idx);
nuclear@19 667 }
nuclear@19 668
nuclear@41 669 GOAT3DAPI struct goat3d_light *goat3d_get_light_by_name(struct goat3d *g, const char *name)
nuclear@27 670 {
nuclear@27 671 return (goat3d_light*)g->scn->get_light(name);
nuclear@27 672 }
nuclear@27 673
nuclear@27 674
nuclear@41 675 GOAT3DAPI struct goat3d_light *goat3d_create_light(void)
nuclear@27 676 {
nuclear@27 677 return new goat3d_light;
nuclear@27 678 }
nuclear@27 679
nuclear@41 680 GOAT3DAPI void goat3d_destroy_light(struct goat3d_light *lt)
nuclear@27 681 {
nuclear@27 682 delete lt;
nuclear@27 683 }
nuclear@27 684
nuclear@27 685
nuclear@27 686 /* cameras */
nuclear@41 687 GOAT3DAPI void goat3d_add_camera(struct goat3d *g, struct goat3d_camera *cam)
nuclear@27 688 {
nuclear@27 689 g->scn->add_camera(cam);
nuclear@27 690 }
nuclear@27 691
nuclear@41 692 GOAT3DAPI int goat3d_get_camera_count(struct goat3d *g)
nuclear@27 693 {
nuclear@27 694 return g->scn->get_camera_count();
nuclear@27 695 }
nuclear@27 696
nuclear@41 697 GOAT3DAPI struct goat3d_camera *goat3d_get_camera(struct goat3d *g, int idx)
nuclear@27 698 {
nuclear@27 699 return (goat3d_camera*)g->scn->get_camera(idx);
nuclear@27 700 }
nuclear@27 701
nuclear@41 702 GOAT3DAPI struct goat3d_camera *goat3d_get_camera_by_name(struct goat3d *g, const char *name)
nuclear@27 703 {
nuclear@27 704 return (goat3d_camera*)g->scn->get_camera(name);
nuclear@27 705 }
nuclear@27 706
nuclear@41 707 GOAT3DAPI struct goat3d_camera *goat3d_create_camera(void)
nuclear@27 708 {
nuclear@27 709 return new goat3d_camera;
nuclear@27 710 }
nuclear@27 711
nuclear@41 712 GOAT3DAPI void goat3d_destroy_camera(struct goat3d_camera *cam)
nuclear@27 713 {
nuclear@27 714 delete cam;
nuclear@27 715 }
nuclear@27 716
nuclear@27 717
nuclear@16 718
nuclear@25 719 // node
nuclear@41 720 GOAT3DAPI void goat3d_add_node(struct goat3d *g, struct goat3d_node *node)
nuclear@27 721 {
nuclear@27 722 g->scn->add_node(node);
nuclear@27 723 }
nuclear@27 724
nuclear@41 725 GOAT3DAPI int goat3d_get_node_count(struct goat3d *g)
nuclear@27 726 {
nuclear@27 727 return g->scn->get_node_count();
nuclear@27 728 }
nuclear@27 729
nuclear@41 730 GOAT3DAPI struct goat3d_node *goat3d_get_node(struct goat3d *g, int idx)
nuclear@27 731 {
nuclear@27 732 return (goat3d_node*)g->scn->get_node(idx);
nuclear@27 733 }
nuclear@27 734
nuclear@41 735 GOAT3DAPI struct goat3d_node *goat3d_get_node_by_name(struct goat3d *g, const char *name)
nuclear@27 736 {
nuclear@27 737 return (goat3d_node*)g->scn->get_node(name);
nuclear@27 738 }
nuclear@25 739
nuclear@41 740 GOAT3DAPI struct goat3d_node *goat3d_create_node(void)
nuclear@25 741 {
nuclear@25 742 return new goat3d_node;
nuclear@25 743 }
nuclear@25 744
nuclear@41 745 GOAT3DAPI void goat3d_set_node_name(struct goat3d_node *node, const char *name)
nuclear@25 746 {
nuclear@25 747 node->set_name(name);
nuclear@25 748 }
nuclear@25 749
nuclear@41 750 GOAT3DAPI const char *goat3d_get_node_name(const struct goat3d_node *node)
nuclear@25 751 {
nuclear@25 752 return node->get_name();
nuclear@25 753 }
nuclear@25 754
nuclear@41 755 GOAT3DAPI void goat3d_set_node_object(struct goat3d_node *node, enum goat3d_node_type type, void *obj)
nuclear@25 756 {
nuclear@25 757 node->set_object((Object*)obj);
nuclear@25 758 }
nuclear@25 759
nuclear@41 760 GOAT3DAPI void *goat3d_get_node_object(const struct goat3d_node *node)
nuclear@25 761 {
nuclear@26 762 return (void*)node->get_object();
nuclear@25 763 }
nuclear@25 764
nuclear@41 765 GOAT3DAPI enum goat3d_node_type goat3d_get_node_type(const struct goat3d_node *node)
nuclear@25 766 {
nuclear@26 767 const Object *obj = node->get_object();
nuclear@26 768 if(dynamic_cast<const Mesh*>(obj)) {
nuclear@26 769 return GOAT3D_NODE_MESH;
nuclear@26 770 }
nuclear@26 771 if(dynamic_cast<const Light*>(obj)) {
nuclear@26 772 return GOAT3D_NODE_LIGHT;
nuclear@26 773 }
nuclear@26 774 if(dynamic_cast<const Camera*>(obj)) {
nuclear@26 775 return GOAT3D_NODE_CAMERA;
nuclear@26 776 }
nuclear@26 777
nuclear@26 778 return GOAT3D_NODE_NULL;
nuclear@25 779 }
nuclear@25 780
nuclear@41 781 GOAT3DAPI void goat3d_add_node_child(struct goat3d_node *node, struct goat3d_node *child)
nuclear@25 782 {
nuclear@66 783 node->add_child(child);
nuclear@25 784 }
nuclear@25 785
nuclear@41 786 GOAT3DAPI int goat3d_get_node_child_count(const struct goat3d_node *node)
nuclear@25 787 {
nuclear@26 788 return node->get_children_count();
nuclear@25 789 }
nuclear@25 790
nuclear@41 791 GOAT3DAPI struct goat3d_node *goat3d_get_node_child(const struct goat3d_node *node, int idx)
nuclear@25 792 {
nuclear@26 793 return (goat3d_node*)node->get_child(idx);
nuclear@25 794 }
nuclear@25 795
nuclear@47 796 GOAT3DAPI struct goat3d_node *goat3d_get_node_parent(const struct goat3d_node *node)
nuclear@47 797 {
nuclear@47 798 return (goat3d_node*)node->get_parent();
nuclear@47 799 }
nuclear@47 800
nuclear@47 801 GOAT3DAPI void goat3d_use_anim(struct goat3d_node *node, int idx)
nuclear@47 802 {
nuclear@47 803 node->use_animation(idx);
nuclear@47 804 }
nuclear@47 805
nuclear@47 806 GOAT3DAPI void goat3d_use_anims(struct goat3d_node *node, int aidx, int bidx, float t)
nuclear@47 807 {
nuclear@47 808 node->use_animation(aidx, bidx, t);
nuclear@47 809 }
nuclear@47 810
nuclear@47 811 GOAT3DAPI void goat3d_use_anim_by_name(struct goat3d_node *node, const char *name)
nuclear@47 812 {
nuclear@47 813 node->use_animation(name);
nuclear@47 814 }
nuclear@47 815
nuclear@47 816 GOAT3DAPI void goat3d_use_anims_by_name(struct goat3d_node *node, const char *aname, const char *bname, float t)
nuclear@47 817 {
nuclear@47 818 node->use_animation(aname, bname, t);
nuclear@47 819 }
nuclear@47 820
nuclear@47 821 GOAT3DAPI int goat3d_get_active_anim(struct goat3d_node *node, int which)
nuclear@47 822 {
nuclear@47 823 return node->get_active_animation_index(which);
nuclear@47 824 }
nuclear@47 825
nuclear@47 826 GOAT3DAPI float goat3d_get_active_anim_mix(struct goat3d_node *node)
nuclear@47 827 {
nuclear@47 828 return node->get_active_animation_mix();
nuclear@47 829 }
nuclear@47 830
nuclear@47 831 GOAT3DAPI int goat3d_get_anim_count(struct goat3d_node *node)
nuclear@47 832 {
nuclear@47 833 return node->get_animation_count();
nuclear@47 834 }
nuclear@47 835
nuclear@47 836 GOAT3DAPI void goat3d_add_anim(struct goat3d_node *root)
nuclear@47 837 {
nuclear@47 838 root->add_animation();
nuclear@47 839 }
nuclear@47 840
nuclear@47 841 GOAT3DAPI void goat3d_set_anim_name(struct goat3d_node *root, const char *name)
nuclear@47 842 {
nuclear@47 843 root->set_animation_name(name);
nuclear@47 844 }
nuclear@47 845
nuclear@47 846 GOAT3DAPI const char *goat3d_get_anim_name(struct goat3d_node *node)
nuclear@47 847 {
nuclear@47 848 return node->get_animation_name();
nuclear@47 849 }
nuclear@47 850
nuclear@41 851 GOAT3DAPI void goat3d_set_node_position(struct goat3d_node *node, float x, float y, float z, long tmsec)
nuclear@25 852 {
nuclear@26 853 node->set_position(Vector3(x, y, z), tmsec);
nuclear@25 854 }
nuclear@25 855
nuclear@41 856 GOAT3DAPI void goat3d_set_node_rotation(struct goat3d_node *node, float qx, float qy, float qz, float qw, long tmsec)
nuclear@25 857 {
nuclear@26 858 node->set_rotation(Quaternion(qw, qx, qy, qz), tmsec);
nuclear@25 859 }
nuclear@25 860
nuclear@41 861 GOAT3DAPI void goat3d_set_node_scaling(struct goat3d_node *node, float sx, float sy, float sz, long tmsec)
nuclear@25 862 {
nuclear@26 863 node->set_scaling(Vector3(sx, sy, sz), tmsec);
nuclear@25 864 }
nuclear@25 865
nuclear@41 866 GOAT3DAPI void goat3d_set_node_pivot(struct goat3d_node *node, float px, float py, float pz)
nuclear@25 867 {
nuclear@26 868 node->set_pivot(Vector3(px, py, pz));
nuclear@25 869 }
nuclear@25 870
nuclear@25 871
nuclear@41 872 GOAT3DAPI void goat3d_get_node_position(const struct goat3d_node *node, float *xptr, float *yptr, float *zptr, long tmsec)
nuclear@25 873 {
nuclear@26 874 Vector3 pos = node->get_position(tmsec);
nuclear@26 875 *xptr = pos.x;
nuclear@26 876 *yptr = pos.y;
nuclear@26 877 *zptr = pos.z;
nuclear@25 878 }
nuclear@25 879
nuclear@41 880 GOAT3DAPI void goat3d_get_node_rotation(const struct goat3d_node *node, float *xptr, float *yptr, float *zptr, float *wptr, long tmsec)
nuclear@25 881 {
nuclear@26 882 Quaternion q = node->get_rotation(tmsec);
nuclear@26 883 *xptr = q.v.x;
nuclear@26 884 *yptr = q.v.y;
nuclear@26 885 *zptr = q.v.z;
nuclear@26 886 *wptr = q.s;
nuclear@25 887 }
nuclear@25 888
nuclear@41 889 GOAT3DAPI void goat3d_get_node_scaling(const struct goat3d_node *node, float *xptr, float *yptr, float *zptr, long tmsec)
nuclear@25 890 {
nuclear@26 891 Vector3 scale = node->get_scaling(tmsec);
nuclear@26 892 *xptr = scale.x;
nuclear@26 893 *yptr = scale.y;
nuclear@26 894 *zptr = scale.z;
nuclear@25 895 }
nuclear@25 896
nuclear@41 897 GOAT3DAPI void goat3d_get_node_pivot(const struct goat3d_node *node, float *xptr, float *yptr, float *zptr)
nuclear@25 898 {
nuclear@26 899 Vector3 pivot = node->get_pivot();
nuclear@26 900 *xptr = pivot.x;
nuclear@26 901 *yptr = pivot.y;
nuclear@26 902 *zptr = pivot.z;
nuclear@25 903 }
nuclear@25 904
nuclear@25 905
nuclear@41 906 GOAT3DAPI void goat3d_get_node_matrix(const struct goat3d_node *node, float *matrix, long tmsec)
nuclear@25 907 {
nuclear@26 908 node->get_xform(tmsec, (Matrix4x4*)matrix);
nuclear@25 909 }
nuclear@25 910
nuclear@25 911
nuclear@16 912 } // extern "C"
nuclear@16 913
nuclear@16 914
nuclear@16 915 static long read_file(void *buf, size_t bytes, void *uptr)
nuclear@16 916 {
nuclear@16 917 return (long)fread(buf, 1, bytes, (FILE*)uptr);
nuclear@16 918 }
nuclear@16 919
nuclear@16 920 static long write_file(const void *buf, size_t bytes, void *uptr)
nuclear@16 921 {
nuclear@16 922 return (long)fwrite(buf, 1, bytes, (FILE*)uptr);
nuclear@16 923 }
nuclear@16 924
nuclear@16 925 static long seek_file(long offs, int whence, void *uptr)
nuclear@16 926 {
nuclear@16 927 if(fseek((FILE*)uptr, offs, whence) == -1) {
nuclear@16 928 return -1;
nuclear@16 929 }
nuclear@16 930 return ftell((FILE*)uptr);
nuclear@16 931 }
nuclear@31 932
nuclear@51 933 std::string g3dimpl::clean_filename(const char *str)
nuclear@31 934 {
nuclear@31 935 const char *last_slash = strrchr(str, '/');
nuclear@31 936 if(!last_slash) {
nuclear@31 937 last_slash = strrchr(str, '\\');
nuclear@31 938 }
nuclear@31 939
nuclear@31 940 if(last_slash) {
nuclear@31 941 str = last_slash + 1;
nuclear@31 942 }
nuclear@31 943
nuclear@31 944 char *buf = (char*)alloca(strlen(str) + 1);
nuclear@31 945 char *dest = buf;
nuclear@31 946 while(*str) {
nuclear@31 947 char c = *str++;
nuclear@31 948 *dest++ = tolower(c);
nuclear@31 949 }
nuclear@40 950 *dest = 0;
nuclear@31 951 return buf;
nuclear@31 952 }