1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
#include <OpenGl_tgl_all.hxx>
#include <stddef.h>
#include <stdio.h>
#include <GL/gl.h>
#include <GL/glu.h>
#include <OpenGl_cmn_varargs.hxx>
#include <OpenGl_telem_attri.hxx>
#include <OpenGl_tsm.hxx>
#include <OpenGl_telem.hxx>
#include <OpenGl_telem_inquire.hxx>
#include <OpenGl_Memory.hxx>
static TStatus SurfaceAreaPropertiesDisplay( TSM_ELEM_DATA, Tint, cmn_key* );
static TStatus SurfaceAreaPropertiesAdd( TSM_ELEM_DATA, Tint, cmn_key* );
static TStatus SurfaceAreaPropertiesDelete( TSM_ELEM_DATA, Tint, cmn_key* );
static TStatus SurfaceAreaPropertiesPrint( TSM_ELEM_DATA, Tint, cmn_key* );
static TStatus SurfaceAreaPropertiesInquire( TSM_ELEM_DATA, Tint, cmn_key* );
static TStatus (*MtdTbl[])( TSM_ELEM_DATA, Tint, cmn_key* ) =
{
0, /* PickTraverse */
SurfaceAreaPropertiesDisplay,
SurfaceAreaPropertiesAdd,
SurfaceAreaPropertiesDelete,
SurfaceAreaPropertiesPrint,
SurfaceAreaPropertiesInquire
};
MtblPtr
TelSurfaceAreaPropertiesInitClass( TelType *el )
{
*el = TelSurfaceAreaProperties;
return MtdTbl;
}
static TStatus
SurfaceAreaPropertiesAdd( TSM_ELEM_DATA d, Tint n, cmn_key *k )
{
tel_surf_prop data = new TEL_SURF_PROP();;
//cmn_memreserve( data, 1, 0 );
if( !data )
return TFailure;
*data = *(tel_surf_prop)(k[0]->data.pdata);
((tsm_elem_data)(d.pdata))->pdata = data;
return TSuccess;
}
static TStatus
SurfaceAreaPropertiesDisplay( TSM_ELEM_DATA data, Tint n, cmn_key *k )
{
CMN_KEY key;
key.id = TelSurfaceAreaProperties;
key.data.pdata = data.pdata;
TsmSetAttri( 1, &key );
return TSuccess;
}
static TStatus
SurfaceAreaPropertiesDelete( TSM_ELEM_DATA data, Tint n, cmn_key *k )
{
//cmn_freemem( data.pdata );
if (data.pdata)
free(data.pdata);
return TSuccess;
}
static TStatus
SurfaceAreaPropertiesPrint( TSM_ELEM_DATA data, Tint n, cmn_key *k )
{
tel_surf_prop p;
p = (tel_surf_prop)data.pdata;
fprintf( stdout, "TelSurfaceAreaProperties\n" );
fprintf( stdout, "\tAmbient Coeff: %f\n", p->amb );
fprintf( stdout, "\tDiffuse Coeff: %f\n", p->diff );
fprintf( stdout, "\tSpecular Coeff: %f\n", p->spec );
fprintf( stdout, "\tTransparency Coeff: %f\n", p->trans );
fprintf( stdout, "\tShininess: %f\n", p->shine );
fprintf( stdout, "\tSpecular colour: R = %f, G = %f, B = %f\n",
p->speccol.rgb[0], p->speccol.rgb[1], p->speccol.rgb[2] );
fprintf( stdout, "\n" );
return TSuccess;
}
static TStatus
SurfaceAreaPropertiesInquire( TSM_ELEM_DATA data, Tint n, cmn_key *k )
{
Tint i;
tel_surf_prop p;
p = (tel_surf_prop)data.pdata;
for( i = 0; i < n; i++ )
{
switch( k[i]->id )
{
case INQ_GET_SIZE_ID:
{
k[i]->data.ldata = sizeof( Tint );
break;
}
case INQ_GET_CONTENT_ID:
{
TEL_INQ_CONTENT *c;
Teldata *w;
c = (tel_inq_content)k[i]->data.pdata;
w = c->data;
c->act_size = 0;
w->surf_prop = *p;
break;
}
}
}
return TSuccess;
}
|
