src/OpenGl/OpenGl_edgeflag.cxx

   1
   2 #include <OpenGl_tgl_all.hxx>
   3
   4 #include <stddef.h>
   5 #include <stdio.h>
   6
   7 #include <OpenGl_cmn_varargs.hxx>
   8 #include <OpenGl_telem_attri.hxx>
   9 #include <OpenGl_tsm.hxx>
  10 #include <OpenGl_telem.hxx>
  11 #include <OpenGl_telem_inquire.hxx>
  12
  13 static  TStatus  EdgeFlagAdd( TSM_ELEM_DATA, Tint, cmn_key* );
  14 static  TStatus  EdgeFlagDisplay( TSM_ELEM_DATA, Tint, cmn_key* );
  15 static  TStatus  EdgeFlagPrint( TSM_ELEM_DATA, Tint, cmn_key* );
  16 static  TStatus  EdgeFlagInquire( TSM_ELEM_DATA, Tint, cmn_key* );
  17
  18 static  TStatus  (*MtdTbl[])( TSM_ELEM_DATA, Tint, cmn_key* ) =
  19 {
  20   0,             /* PickTraverse */
  21   EdgeFlagDisplay,
  22   EdgeFlagAdd,
  23   0,             /* Delete */
  24   EdgeFlagPrint,
  25   EdgeFlagInquire
  26 };
  27
  28
  29 MtblPtr
  30 TelEdgeFlagInitClass( TelType *el )
  31 {
  32   *el = TelEdgeFlag;
  33   return MtdTbl;
  34 }
  35
  36 static  TStatus
  37 EdgeFlagAdd( TSM_ELEM_DATA d, Tint n, cmn_key *k )
  38 {
  39   ((tsm_elem_data)(d.pdata))->ldata = k[0]->data.ldata;
  40
  41   return TSuccess;
  42 }
  43
  44
  45 static  TStatus
  46 EdgeFlagDisplay( TSM_ELEM_DATA d, Tint n, cmn_key *k )
  47 {
  48   CMN_KEY  key;
  49
  50   key.id = TelEdgeFlag;
  51   key.data.ldata = d.ldata;
  52   TsmSetAttri( 1, &key );
  53   return TSuccess;
  54 }
  55
  56
  57 static  TStatus
  58 EdgeFlagPrint( TSM_ELEM_DATA data, Tint n, cmn_key *k )
  59 {
  60   data.ldata == TOn ? fprintf( stdout, "TelEdgeFlag. Value = ON\n" ) :
  61 fprintf( stdout, "TelEdgeFlag. Value = OFF\n" );
  62 fprintf( stdout, "\n" );
  63
  64 return TSuccess;
  65 }
  66
  67
  68 static TStatus
  69 EdgeFlagInquire( TSM_ELEM_DATA data, Tint n, cmn_key *k )
  70 {
  71   Tint i;
  72
  73   for( i = 0; i < n; i++ )
  74   {
  75     switch( k[i]->id )
  76     {
  77     case INQ_GET_SIZE_ID:
  78       {
  79         k[i]->data.ldata = sizeof( Tint );
  80         break;
  81       }
  82     case INQ_GET_CONTENT_ID:
  83       {
  84         TEL_INQ_CONTENT *c;
  85         Teldata         *w;
  86
  87         c = (tel_inq_content)k[i]->data.pdata;
  88         w = c->data;
  89         c->act_size = 0;
  90         w->idata = data.ldata;
  91         break;
  92       }
  93     }
  94   }
  95
  96   return TSuccess;
  97 }