1 /***********************************************************************
5 File OpenGl_texture.c :
12 HISTORIQUE DES MODIFICATIONS :
13 --------------------------------
14 05-08-97 : PCT ; Support texture mapping
16 ************************************************************************/
18 /*----------------------------------------------------------------------*/
23 #include <OpenGl_tgl_all.hxx>
30 #include <OpenGl_cmn_varargs.hxx>
31 #include <OpenGl_telem_attri.hxx>
32 #include <OpenGl_tsm.hxx>
33 #include <OpenGl_telem.hxx>
34 #include <OpenGl_telem_inquire.hxx>
35 #include <OpenGl_Memory.hxx>
37 static TStatus TextureIdMethodAdd( TSM_ELEM_DATA, Tint, cmn_key* );
38 static TStatus TextureIdMethodDisplay( TSM_ELEM_DATA, Tint, cmn_key* );
39 static TStatus TextureIdMethodPrint( TSM_ELEM_DATA, Tint, cmn_key* );
40 static TStatus TextureIdMethodInquire( TSM_ELEM_DATA, Tint, cmn_key* );
42 static TStatus (*MtdTbl[])( TSM_ELEM_DATA, Tint, cmn_key* ) =
45 TextureIdMethodDisplay,
49 TextureIdMethodInquire
54 TelTextureIdInitClass( TelType *el )
61 TextureIdMethodAdd( TSM_ELEM_DATA d, Tint n, cmn_key *k )
63 ((tsm_elem_data)(d.pdata))->ldata = k[0]->data.ldata;
70 TextureIdMethodDisplay( TSM_ELEM_DATA d, Tint n, cmn_key *k )
74 key.id = TelTextureId;
75 key.data.ldata = d.ldata;
76 TsmSetAttri( 1, &key );
82 TextureIdMethodPrint( TSM_ELEM_DATA data, Tint n, cmn_key *k )
90 TextureIdMethodInquire( TSM_ELEM_DATA data, Tint n, cmn_key *k )
94 for( i = 0; i < n; i++ )
100 k[i]->data.ldata = sizeof( Tint );
103 case INQ_GET_CONTENT_ID:
108 c = (TEL_INQ_CONTENT*)k[i]->data.pdata;
111 w->idata = data.ldata;