| 1 | gwlarson | 3.1 | /* Copyright (c) 1998 Silicon Graphics, Inc. */ | 
| 2 |  |  |  | 
| 3 |  |  | #ifndef lint | 
| 4 |  |  | static char SCCSid[] = "$SunId$ SGI"; | 
| 5 |  |  | #endif | 
| 6 |  |  |  | 
| 7 |  |  | /* | 
| 8 |  |  | * Invocation routines for Radiance -> OpenGL materials. | 
| 9 |  |  | */ | 
| 10 |  |  |  | 
| 11 |  |  | #include "radogl.h" | 
| 12 |  |  |  | 
| 13 |  |  |  | 
| 14 |  |  | domatobj(mp, cent)              /* generate OpenGL material for object */ | 
| 15 |  |  | register MATREC *mp; | 
| 16 |  |  | FVECT   cent; | 
| 17 |  |  | { | 
| 18 |  |  | GLfloat vec[4]; | 
| 19 |  |  |  | 
| 20 |  |  | if (mp == NULL | !domats) | 
| 21 |  |  | return; | 
| 22 |  |  | if (islight(mp->type)) { | 
| 23 |  |  | vec[0] = colval(mp->u.l.emission,RED); | 
| 24 |  |  | vec[1] = colval(mp->u.l.emission,GRN); | 
| 25 |  |  | vec[2] = colval(mp->u.l.emission,BLU); | 
| 26 |  |  | vec[3] = 1.; | 
| 27 |  |  | glMaterialfv(GL_FRONT, GL_EMISSION, vec); | 
| 28 |  |  | vec[0] = vec[1] = vec[2] = 0.; vec[3] = 1.; | 
| 29 |  |  | glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, vec); | 
| 30 |  |  | glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, vec); | 
| 31 |  |  | } else { | 
| 32 |  |  | vec[0] = colval(mp->u.m.ambdiff,RED); | 
| 33 |  |  | vec[1] = colval(mp->u.m.ambdiff,GRN); | 
| 34 |  |  | vec[2] = colval(mp->u.m.ambdiff,BLU); | 
| 35 |  |  | vec[3] = 1.; | 
| 36 |  |  | glMaterialfv(GL_FRONT_AND_BACK, GL_AMBIENT_AND_DIFFUSE, vec); | 
| 37 |  |  | vec[0] = colval(mp->u.m.specular,RED); | 
| 38 |  |  | vec[1] = colval(mp->u.m.specular,GRN); | 
| 39 |  |  | vec[2] = colval(mp->u.m.specular,BLU); | 
| 40 |  |  | vec[3] = 1.; | 
| 41 |  |  | glMaterialfv(GL_FRONT_AND_BACK, GL_SPECULAR, vec); | 
| 42 |  |  | glMaterialf(GL_FRONT_AND_BACK, GL_SHININESS, mp->u.m.specexp); | 
| 43 |  |  | vec[0] = vec[1] = vec[2] = 0.; vec[3] = 1.; | 
| 44 |  |  | glMaterialfv(GL_FRONT_AND_BACK, GL_EMISSION, vec); | 
| 45 |  |  | } | 
| 46 |  |  | rgl_checkerr("in domatobj"); | 
| 47 |  |  | } | 
| 48 |  |  |  | 
| 49 |  |  |  | 
| 50 |  |  | domatvert(mp, v, n)             /* generate OpenGL material for vertex */ | 
| 51 |  |  | MATREC  *mp; | 
| 52 |  |  | FVECT   v, n; | 
| 53 |  |  | { | 
| 54 |  |  | } |