/*!
* \ingroup matrix
*/
void
lib3ds_matrix_camera(Lib3dsMatrix matrix, Lib3dsVector pos,
Lib3dsVector tgt, Lib3dsFloat roll)
{
Lib3dsMatrix M,R;
Lib3dsVector x, y, z;
lib3ds_vector_sub(y, tgt, pos);
lib3ds_vector_normalize(y);
z[0] = 0;
z[1] = 0;
z[2] = 1.0;
lib3ds_vector_cross(x, y, z);
lib3ds_vector_cross(z, x, y);
lib3ds_vector_normalize(x);
lib3ds_vector_normalize(y);
lib3ds_matrix_identity(M);
M[0][0] = x[0];
M[1][0] = x[1];
M[2][0] = x[2];
M[0][1] = y[0];
M[1][1] = y[1];
M[2][1] = y[2];
M[0][2] = z[0];
M[1][2] = z[1];
M[2][2] = z[2];
lib3ds_matrix_identity(R);
lib3ds_matrix_rotate_y(R, roll);
lib3ds_matrix_mul(matrix, R,M);
lib3ds_matrix_translate_xyz(matrix, -pos[0],-pos[1],-pos[2]);
}
/*!
* Compute a camera matrix based on position, target and roll.
*
* Generates a translate/rotate matrix that maps world coordinates
* to camera coordinates. Resulting matrix does not include perspective
* transform.
*
* \param matrix Destination matrix.
* \param pos Camera position
* \param tgt Camera target
* \param roll Roll angle
*
* \ingroup matrix
*/
void
lib3ds_matrix_camera(Lib3dsMatrix matrix, Lib3dsVector pos,
Lib3dsVector tgt, Lib3dsFloat roll)
{
Lib3dsMatrix M;
Lib3dsVector x, y, z;
lib3ds_vector_sub(y, tgt, pos);
lib3ds_vector_normalize(y);
if (y[0] != 0. || y[1] != 0) {
z[0] = 0;
z[1] = 0;
z[2] = 1.0;
}
else { /* Special case: looking straight up or down z axis */
z[0] = -1.0;
z[1] = 0;
z[2] = 0;
}
lib3ds_vector_cross(x, y, z);
lib3ds_vector_cross(z, x, y);
lib3ds_vector_normalize(x);
lib3ds_vector_normalize(z);
lib3ds_matrix_identity(M);
M[0][0] = x[0];
M[1][0] = x[1];
M[2][0] = x[2];
M[0][1] = y[0];
M[1][1] = y[1];
M[2][1] = y[2];
M[0][2] = z[0];
M[1][2] = z[1];
M[2][2] = z[2];
lib3ds_matrix_identity(matrix);
lib3ds_matrix_rotate_y(matrix, roll);
lib3ds_matrix_mult(matrix, M);
lib3ds_matrix_translate_xyz(matrix, -pos[0],-pos[1],-pos[2]);
}
static void
create_node(Lib3dsFile *f, Lib3dsNode *node, FILE *o)
{
Lib3dsMesh *mesh;
if ((node->type==LIB3DS_OBJECT_NODE) && (strcmp(node->name,"$$$DUMMY")!=0)) {
mesh=lib3ds_file_mesh_by_name(f, node->name);
ASSERT(mesh);
if (mesh) {
Lib3dsObjectData *d=&node->data.object;
fprintf(o, "\n\n##\n## Object: %s\n##\n", node->name);
fprintf(o, "AttributeBegin\n");
{
Lib3dsMatrix N,M,X;
lib3ds_matrix_copy(N, node->matrix);
lib3ds_matrix_translate_xyz(N, -d->pivot[0], -d->pivot[1], -d->pivot[2]);
lib3ds_matrix_copy(M, mesh->matrix);
lib3ds_matrix_inv(M);
lib3ds_matrix_mul(X,N,M);
rib_concat_transform(o, X);
}
{
unsigned p;
int i, j;
Lib3dsVector *normalL=malloc(3*sizeof(Lib3dsVector)*mesh->faces);
lib3ds_mesh_calculate_normals(mesh, normalL);
Lib3dsMaterial *lastmat = NULL;
int nalloc = 256, nfaces = 0;
float *P = (float *)malloc(nalloc*9*sizeof(float));
float *N = (float *)malloc(nalloc*9*sizeof(float));
float *uv = (float *)malloc(nalloc*6*sizeof(float));
for (p=0; p<mesh->faces; ++p) {
Lib3dsFace *face=&mesh->faceL[p];
Lib3dsMaterial *mat=lib3ds_file_material_by_name(f, face->material);
if (mat && mat != lastmat) {
char *Kdmap = NULL, *Omap = NULL;
flushpp(o, P, N, uv, nfaces);
nfaces = 0;
lastmat = mat;
if (mat->texture1_map.name[0]) {
Kdmap = GetTexture(o, mat->texture1_map.name, mat->texture1_mask.name, 0);
char *scale = malloc(strlen(Kdmap)+20);
strcpy(scale, Kdmap);
strcat(scale, "-scale");
fprintf(o, "Texture \"%s\" \"color\" \"scale\" \"texture tex1\" \"%s\" "
"\"color tex2\" [.8 .8 .8]\n", scale, Kdmap);
Kdmap = scale;
}
if (mat->opacity_map.name[0])
Omap = GetTexture(o, mat->opacity_map.name, mat->opacity_mask.name, 0);
char *bumpScale = NULL;
if (mat->bump_map.name[0]) {
char *Bmap = GetTexture(o, mat->bump_map.name, mat->bump_mask.name, 1);
bumpScale = malloc(strlen(Bmap)+20);
strcpy(bumpScale, Bmap);
strcat(bumpScale, "-scale");
fprintf(o, "Texture \"%s\" \"float\" \"scale\" \"texture tex1\" \"%s\" "
"\"float tex2\" [.05]\n", bumpScale, Bmap);
}
fprintf(o, "Material \"uber\" ");
if (Kdmap) fprintf(o, "\"texture Kd\" \"%s\" ", Kdmap);
else fprintf(o, "\"color Kd\" [%f %f %f] ",
mat->diffuse[0], mat->diffuse[1], mat->diffuse[2]);
if (Omap) fprintf(o, "\"texture opacity\" \"%s\" ", Omap);
else fprintf(o, "\"color opacity\" [%f %f %f] ",
1.f - mat->transparency,
1.f - mat->transparency,
1.f - mat->transparency);
fprintf(o, "\"color Ks\" [%f %f %f] "
"\"float roughness\" [%f] ",
mat->specular[0]*mat->shin_strength,
mat->specular[1]*mat->shin_strength,
mat->specular[2]*mat->shin_strength,
mat->shininess
);
//CO dumptex(o, "tex2", &mat->texture2_map);
//CO dumptex(o, "tex2mask", &mat->texture2_mask);
//CO dumptex(o, "specular", &mat->specular_map);
//CO dumptex(o, "specularmask", &mat->specular_mask);
//CO dumptex(o, "shininess", &mat->shininess_map);
//CO dumptex(o, "shininessmask", &mat->shininess_mask);
//CO dumptex(o, "reflection", &mat->reflection_map);
//CO dumptex(o, "reflectionmask", &mat->reflection_mask);
fprintf(o, "\n");
if (bumpScale)
fprintf(o, "\"float bumpmap\" \"%s\"\n", bumpScale);
}
if (nfaces+1 == nalloc) {
nalloc *= 2;
P = (float *)realloc(P, nalloc*9*sizeof(float));
N = (float *)realloc(N, nalloc*9*sizeof(float));
uv = (float *)realloc(uv, nalloc*6*sizeof(float));
}
for (i = 0; i < 3; ++i) {
for (j = 0; j < 3; ++j) {
P[9*nfaces+3*i+j] = mesh->pointL[face->points[i]].pos[j];
N[9*nfaces+3*i+j] = normalL[3*p+i][j];
if (j != 2 && mesh->texelL)
uv[6*nfaces+2*i+j] = mesh->texelL[face->points[i]][j];
}
if (!mesh->texelL) {
uv[6*nfaces+0] = 0;
uv[6*nfaces+1] = 0;
uv[6*nfaces+2] = 0;
uv[6*nfaces+3] = 1;
uv[6*nfaces+4] = 1;
uv[6*nfaces+5] = 0;
}
}
++nfaces;
}
flushpp(o, P, N, uv, nfaces);
free(P);
free(N);
free(uv);
free(normalL);
}
nTextures = 0;
fprintf(o, "AttributeEnd\n");
}
}
{
Lib3dsNode *n;
for (n=node->childs; n; n=n->next) {
create_node(f,n,o);
}
}
}
static void
file_bounding_box_of_nodes_impl(Lib3dsNode *node, Lib3dsFile *file, Lib3dsBool include_meshes,
Lib3dsBool include_cameras, Lib3dsBool include_lights,
Lib3dsVector bmin, Lib3dsVector bmax)
{
switch (node->type)
{
case LIB3DS_OBJECT_NODE:
if (include_meshes) {
Lib3dsMesh *mesh;
mesh = lib3ds_file_mesh_by_name(file, node->data.object.instance);
if (!mesh)
mesh = lib3ds_file_mesh_by_name(file, node->name);
if (mesh) {
Lib3dsMatrix inv_matrix, M;
Lib3dsVector v;
unsigned i;
lib3ds_matrix_copy(inv_matrix, mesh->matrix);
lib3ds_matrix_inv(inv_matrix);
lib3ds_matrix_copy(M, node->matrix);
lib3ds_matrix_translate_xyz(M, -node->data.object.pivot[0], -node->data.object.pivot[1], -node->data.object.pivot[2]);
lib3ds_matrix_mult(M, inv_matrix);
for (i=0; i<mesh->points; ++i) {
lib3ds_vector_transform(v, M, mesh->pointL[i].pos);
lib3ds_vector_min(bmin, v);
lib3ds_vector_max(bmax, v);
}
}
}
break;
/*
case LIB3DS_CAMERA_NODE:
case LIB3DS_TARGET_NODE:
if (include_cameras) {
Lib3dsVector z,v;
lib3ds_vector_zero(z);
lib3ds_vector_transform(v, node->matrix, z);
lib3ds_vector_min(bmin, v);
lib3ds_vector_max(bmax, v);
}
break;
case LIB3DS_LIGHT_NODE:
case LIB3DS_SPOT_NODE:
if (include_lights) {
Lib3dsVector z,v;
lib3ds_vector_zero(z);
lib3ds_vector_transform(v, node->matrix, z);
lib3ds_vector_min(bmin, v);
lib3ds_vector_max(bmax, v);
}
break;
*/
}
{
Lib3dsNode *p=node->childs;
while (p) {
file_bounding_box_of_nodes_impl(p, file, include_meshes, include_cameras, include_lights, bmin, bmax);
p=p->next;
}
}
}
static void
create_node(Lib3dsFile *f, Lib3dsNode *node, FILE *o)
{
Lib3dsMesh *mesh;
if ((node->type==LIB3DS_OBJECT_NODE) && (strcmp(node->name,"$$$DUMMY")!=0)) {
mesh=lib3ds_file_mesh_by_name(f, node->name);
ASSERT(mesh);
if (mesh) {
Lib3dsObjectData *d=&node->data.object;
fprintf(o, "AttributeBegin\n");
fprintf(o, "Surface \"matte\" \"Kd\" [0.75]\n");
fprintf(o, "Color 1 1 1\n");
{
Lib3dsMatrix N,M,X;
lib3ds_matrix_copy(N, node->matrix);
lib3ds_matrix_translate_xyz(N, -d->pivot[0], -d->pivot[1], -d->pivot[2]);
lib3ds_matrix_copy(M, mesh->matrix);
lib3ds_matrix_inv(M);
lib3ds_matrix_mul(X,N,M);
rib_concat_transform(o, X);
}
{
unsigned p;
Lib3dsVector *normalL=malloc(3*sizeof(Lib3dsVector)*mesh->faces);
lib3ds_mesh_calculate_normals(mesh, normalL);
for (p=0; p<mesh->faces; ++p) {
Lib3dsFace *face=&mesh->faceL[p];
Lib3dsMaterial *mat=lib3ds_file_material_by_name(f, face->material);
if (mat) {
fprintf(o, "Color [%f %f %f]\n",
mat->diffuse[0],
mat->diffuse[1],
mat->diffuse[2]
);
fprintf(o,
"Surface "
"\"lib3dsmaterial\" "
"\"color specularcolor\" [%f %f %f] "
"\"float shininess \" [%f] "
"\"float shin_stength \" [%f] "
"\n",
mat->specular[0],
mat->specular[1],
mat->specular[2],
mat->shininess,
mat->shin_strength
);
}
fprintf(o, "Polygon \"P\" [%f %f %f %f %f %f %f %f %f] ",
mesh->pointL[face->points[0]].pos[0],
mesh->pointL[face->points[0]].pos[1],
mesh->pointL[face->points[0]].pos[2],
mesh->pointL[face->points[1]].pos[0],
mesh->pointL[face->points[1]].pos[1],
mesh->pointL[face->points[1]].pos[2],
mesh->pointL[face->points[2]].pos[0],
mesh->pointL[face->points[2]].pos[1],
mesh->pointL[face->points[2]].pos[2]
);
fprintf(o, "\"N\" [%f %f %f %f %f %f %f %f %f] ",
normalL[3*p+0][0],
normalL[3*p+0][1],
normalL[3*p+0][2],
normalL[3*p+1][0],
normalL[3*p+1][1],
normalL[3*p+1][2],
normalL[3*p+2][0],
normalL[3*p+2][1],
normalL[3*p+2][2]
);
}
free(normalL);
}
fprintf(o, "AttributeEnd\n");
}
}
{
Lib3dsNode *n;
for (n=node->childs; n; n=n->next) {
create_node(f,n,o);
}
}
}
