src/INFN/LU_LogUtility_INFN.c

/****************************************************************************
 *  F i l e   D a t a                                                        
 *  $Id: LU_LogUtility_INFN.c,v 1.24 2005/03/20 18:21:00 sebastiani Exp $
 *  $Revision: 1.24 $ 
 *  $Date: 2005/03/20 18:21:00 $
 *  $RCSfile: LU_LogUtility_INFN.c,v $
 *                                                                           
 ****************************************************************************
 *  S W   D e v e l o p m e n t   E n v i r o n m e n t                      
 *                                                                           
 *  $Author: sebastiani $                                                                   
 *               :                                                           
 ****************************************************************************
 *  U p d a t i n g                                                          
 *                                                                           
 *  $Log: LU_LogUtility_INFN.c,v $
 *  Revision 1.24  2005/03/20 18:21:00  sebastiani
 *  *** empty log message ***
 *
 *  Revision 1.23  2005/03/06 14:54:46  sebastiani
 *  version running on 06 03 2005
 *
 *  Revision 1.22  2005/02/19 10:19:38  sebastiani
 *  ALM_S4_CALIB_00_HARD,ALM_S4_CALIB_00_SOFT,ALM_S4_128TRIGGER_0 added
 *
 *  Revision 1.21  2004/11/25 09:20:17  sebastiani
 *  *** empty log message ***
 *
 *  Revision 1.20  2004/11/19 15:14:52  sebastiani
 *  PRH_EXTERN_{VAR,ARR,TABLE} removed and put them on the autogenerated parameter heeader file
 *
 *  Revision 1.19  2004/10/22 16:05:06  sebastiani
 *  *** empty log message ***
 *
 *  Revision 1.18  2004/09/17 15:01:00  faber
 *  LU_INFN_LOG flags fixing
 *
 *  Revision 1.17  2004/09/14 15:07:08  faber
 *  New development for TimeSync, managed by interrupt. coding completed but never tested.
 *
 *  Revision 1.16  2004/08/31 09:08:35  sebastiani
 *  fix warning
 *
 *  Revision 1.15  2004/08/26 16:54:34  sebastiani
 *  version work fine
 *
 *  Revision 1.14  2004/07/27 17:30:17  faber
 *  OBT can be now in second or milliseconds, depending of the situazion.
 *  OBT_s is used for FM compatibility, OBT_ms basically for MM infos
 *
 *  Revision 1.13  2004/07/27 10:13:48  faber
 *  LU_ALARM macro introduced,
 *  LU_XXXX bit field "logtype" redefined.
 *  HistoryArea 5 now log a 32 bit word as "info1"
 *  and logging is reformatted.
 *
 *  Revision 1.12  2004/06/23 13:53:16  alfarano
 *  static declaration for fileid
 *
 *  Revision 1.11  2004/05/13 10:47:17  faber
 *  hid the HB_Store funcion in favour of wrapped funcions
 *
 *  Revision 1.10  2004/03/09 09:39:27  faber
 *  LU_TRACE system introduced
 *
 *  Revision 1.9  2003/11/27 17:53:23  faber
 *  -Power management poweron procedure done and some tested in the simulator
 *  -history entry 5 now takes OBT
 *
 *  Revision 1.8  2003/11/06 10:27:12  faber
 *  HB_HKBuffer now implemented as multibuffer (as specified in the
 *  mass memory format). Only compilation, not tested
 *
 *  Revision 1.7  2003/10/21 16:09:12  alfarano
 *  LU_LOG_INFN replacement for all remaining original log functions
 *
 *  Revision 1.6  2003/10/17 09:25:10  sebastiani
 *  __FILEID__ mechanism is now provied by global variables
 *  instead of macro definitions in order to make such simbols
 *  to be resolved at link time instead of compilation time.
 *
 *  Revision 1.5  2003/09/19 15:57:35  faber
 *  Large development update INFN software
 *
 *  Revision 1.4  2003/09/16 08:42:05  faber
 *  StoreOrb/Incl done / new LOG initialization
 *
 *  Revision 1.3  2003/09/15 17:46:27  faber
 *  HB_HKBuffer_INFN module introduced.
 *
 *  Revision 1.2  2003/08/22 07:55:43  sebastiani
 *  conform source to the new loganalizer.c philosophy
 *
 *  Revision 1.1.1.1  2003/08/04 09:40:22  sebastiani
 *  Imported sources laben rel. 19.06.2003 integrated with pam2
 *
 *  Revision 1.2  2003/07/17 11:15:04  sebastiani
 *  *** empty log message ***
 *
 *  Revision 1.1  2003/06/12 14:49:19  sebastiani
 *  first versione of Log Module source
 *
 *                                                                           
 *****************************************************************************/


/*============================= Include File ================================*/

#include <src/INFN/LU_SourceFileID_INFN.h>
#define __FILEID__ _LU_LogUtility_INFN__c
#include <src/INFN/PRH_ParamHandler_INFN.h>
#include <src/INFN/LU_LogUtility_INFN.h>
#include <src/INFN/PRH_ParamHandler_INFN_auto.h>
LU_DECL_MASK();

#include <src/INFN/PRH_ParamHandler_INFN_auto.h>
#include <src/INFN/HB_HKBuffer_INFN.h>
#include <src/INFN/LU_LogUtility_INFN.h>
#include <src/HKManager/HistoryArea/HA_HistoryArea_p.h>
#include <src/HKManager/HistoryArea/HA_HistoryArea_int.h>
#include <src/INFN/CM_Common_INFN.h>
/*============================ Global define ================================*/


/*============================== global types  ==============================*/


/*****************************************************************************/
/*=========================== Structure define ==============================*/


/*****************************************************************************/
/*============================ Enumerate define =============================*/

/*****************************************************************************/

/*=== LogUtility  O P E R A T I O N   E N V I R O N M  ==*/

/*****************************************************************************/


static BOOL LU_StoreInHB_Flag;
#include <src/INFN/LU_COMPILE_STAMP.include>

// variables for TRACE() macros, trace fileid/line of the calling task
UINT16 LU_task_info_line [LU_TOTAL_TASKS];
BYTE LU_task_info_fileid [LU_TOTAL_TASKS];
UINT16 LU_task_info_humanid[LU_TOTAL_TASKS];
UINT16 LU_first_task_index=0;

/* the initialization that have to be done before the Laben initialization exept the OS module */
status_code LU_PreInit() 
{
  LU_InitNames();
  LU_StoreInHB_Flag = FALSE;
  LU_SetLogMaskAll(LU_DEFAULT_MASK);
  return SUCCESSFUL;
}

UINT32 LU_GetCompilationTimeStamp() {
  return LU_COMPILE_STAMP;
}

status_code LU_SetLogMaskAll(UINT16 v)
{
  int i;
  for(i=0;i<PRH_ARR_N_LOG_MASK;i++)
    PRH_ARR_LOG_MASK[i]=v;
}

#ifndef LOGANALIZER
void LU_StoreInHB(BOOL storeflag) {
  LU_StoreInHB_Flag = storeflag;
}
#endif

status_code LU_Init() {
  int i;
#ifdef SIMULATOR
  /* write the magic number for the analizer: */
  static char seq[4] = {0xFA , 0xFE ,0xDE, 0xFA };
  for (i=0;i<4;i++) {
    console_outbyte_polled(0,seq[i]);
    console_outbyte_polled(1,seq[i]);
  }
#endif
  return SUCCESSFUL;
}

void LU_WriteOnUART(unsigned char *string)
{
  unsigned char *s;
  if(PRH_VAR_LU_WRITE_ON_UART) {
    for ( s = string ; *s ; s++ ) 
      console_outbyte_polled( 0, *s );
    console_outbyte_polled( 0, '\r' );
    console_outbyte_polled( 0, '\n' );    
  }
}


#define UWORD unsigned short int
#define UBYTE unsigned char
status_code LU_PutLog (MsgTsk* msg) {
  unsigned char          EntryType;
  static unsigned char  buf[100],str[100],str2[100];
  unsigned int   entry;
  unsigned char  code;
  unsigned int   time;
  unsigned int   rep1,rep2,rep3,line,fileid;

#if 0
  // console_outbyte_polled(0,msg->LlInfo*sizeof(UWORD));
  //console_outbyte_polled(1,msg->LlInfo*sizeof(UWORD));
  for(entry=0;entry<msg->LlInfo*sizeof(UWORD);entry++) {
    console_outbyte_polled(0,msg->Info[entry]);
    //console_outbyte_polled(1,msg->Info[entry]);
  }
#endif
  
  /* ignore all the rest: */
  //return SUCCESSFUL;

  EntryType = msg->Info[0] >> 4;
  
  entry  =EntryType;
  code   =msg->Info[1];
  time   =(((UWORD*)(msg->Info))[1] << 16) + ((UWORD*)(msg->Info))[2];
  rep1   =0;
  rep2   =0;
  rep3   =0;
  
  switch( EntryType ) {
  case HA_EVENT_04:
    sprintf(str,"");
    break;
  case HA_EVENT_00:
  case HA_EVENT_01:
  case HA_EVENT_02:
  case HA_EVENT_03:
  case HA_EVENT_06:
    rep1 = ((UWORD*)(msg->Info))[3];
    sprintf(str,"R1: %10d 0x%X",rep1,rep1);
    break;
    
  case HA_EVENT_10:
    rep1 = ((UWORD*)(msg->Info))[3];
    rep2 = ((UWORD*)(msg->Info))[4];
    sprintf(str,"R1: %10d %X - R2: %10d 0x%X ",rep1,rep1,rep2,rep2);
    break;
    
  case HA_EVENT_05:
    line  = ((UWORD*)(msg->Info))[3];
    rep2  = ((UWORD*)(msg->Info))[4];
    rep1  = ((UWORD*)(msg->Info))[5];
    rep3  = rep1 | (rep2<<16);
    LU_GetSourceInfo(str2,code,line);
    sprintf(str,"INFN: Info1: %9u 0x%08x [%s]",rep3,rep3,str2);
    break;
  case HA_EVENT_07:
  case HA_EVENT_11:
    rep1 = ((UWORD*)(msg->Info))[3];
    rep2 = ((UWORD*)(msg->Info))[4];
    rep3 = ((UWORD*)(msg->Info))[5];
    sprintf(str,"R1: %10d 0x%X - R2: %10d 0x%X  - R3: %10d %X ",rep1,rep1,rep2,rep2,rep3,rep3);
    break;
  default:
    break;
  }
  
  sprintf(buf,"%2d OBT: %5ld Code: %3d - %s",entry,time,code,str);
  
  // TS_piWriteOnUART(buf);
  LU_WriteOnUART(buf);
  return (SUCCESSFUL);
  
}


status_code LU_trace_load_task_info(UINT32 human_id, rtems_id taskid) {
  UINT16 index=(UINT16)(taskid);
  
  /* we assume here that rtems assing an incrementing index field in the object id of every task */
  if(LU_first_task_index==0)
    LU_first_task_index=index;
  /* check if all is OK */
  if(index-LU_first_task_index >= LU_TOTAL_TASKS) /* internal error */
    LU_INFN_LOG(LU_INTERNAL|LU_HA,LU_ALLLOG,__FILEID__,__LINE__,index);
  else
    LU_task_info_humanid[index-LU_first_task_index]=human_id;
}


status_code LU_INFN_LOG(unsigned int thistype,unsigned int localmask,
                        unsigned int fileid,unsigned int line,unsigned int info1) {
  BYTE b[8];
  BYTE *pb=b;
  TI_TIME obt_ms,obt_s;
  TI_piGetTimeInfo_ms(&obt_ms);
  if(thistype & localmask) {
    if(LU_StoreInHB_Flag) {
      CM_WRITE_BE_UINT8(pb,thistype);
      CM_WRITE_BE_UINT8(pb,fileid);
      CM_WRITE_BE_UINT16(pb,line);
      CM_WRITE_BE_UINT32(pb,info1);
      HB_StoreLog(sizeof(b),b,obt_ms);
    }

#if 0    
#warning "make all LU_DEBUG_TRACE to go in HA too. this check is only for ground: remove in flight!"
    if( (thistype & LU_DEBUG_TRACE) || (thistype & LU_NORMAL_TRACE) )
      thistype|=LU_HA;
#endif

    /*
#ifndef DEBUG
    if (thistype & LU_HA & localmask)
#endif
    */

#warning do we want OBT in s or in ms ? if ms, russian must be warned ? TM was in s

      HA_piLogHistoryEntry5(fileid,line,info1,obt_ms / 1000);
  }
  return SUCCESSFUL;

}


1	kusanagi	1.1	/****************************************************************************
2			* F i l e D a t a
3			* $Id: LU_LogUtility_INFN.c,v 1.24 2005/03/20 18:21:00 sebastiani Exp $
4			* $Revision: 1.24 $
5			* $Date: 2005/03/20 18:21:00 $
6			* $RCSfile: LU_LogUtility_INFN.c,v $
7			*
8			****************************************************************************
9			* S W D e v e l o p m e n t E n v i r o n m e n t
10			*
11			* $Author: sebastiani $
12			* :
13			****************************************************************************
14			* U p d a t i n g
15			*
16			* $Log: LU_LogUtility_INFN.c,v $
17			* Revision 1.24 2005/03/20 18:21:00 sebastiani
18			* * empty log message *
19			*
20			* Revision 1.23 2005/03/06 14:54:46 sebastiani
21			* version running on 06 03 2005
22			*
23			* Revision 1.22 2005/02/19 10:19:38 sebastiani
24			* ALM_S4_CALIB_00_HARD,ALM_S4_CALIB_00_SOFT,ALM_S4_128TRIGGER_0 added
25			*
26			* Revision 1.21 2004/11/25 09:20:17 sebastiani
27			* * empty log message *
28			*
29			* Revision 1.20 2004/11/19 15:14:52 sebastiani
30			* PRH_EXTERN_{VAR,ARR,TABLE} removed and put them on the autogenerated parameter heeader file
31			*
32			* Revision 1.19 2004/10/22 16:05:06 sebastiani
33			* * empty log message *
34			*
35			* Revision 1.18 2004/09/17 15:01:00 faber
36			* LU_INFN_LOG flags fixing
37			*
38			* Revision 1.17 2004/09/14 15:07:08 faber
39			* New development for TimeSync, managed by interrupt. coding completed but never tested.
40			*
41			* Revision 1.16 2004/08/31 09:08:35 sebastiani
42			* fix warning
43			*
44			* Revision 1.15 2004/08/26 16:54:34 sebastiani
45			* version work fine
46			*
47			* Revision 1.14 2004/07/27 17:30:17 faber
48			* OBT can be now in second or milliseconds, depending of the situazion.
49			* OBT_s is used for FM compatibility, OBT_ms basically for MM infos
50			*
51			* Revision 1.13 2004/07/27 10:13:48 faber
52			* LU_ALARM macro introduced,
53			* LU_XXXX bit field "logtype" redefined.
54			* HistoryArea 5 now log a 32 bit word as "info1"
55			* and logging is reformatted.
56			*
57			* Revision 1.12 2004/06/23 13:53:16 alfarano
58			* static declaration for fileid
59			*
60			* Revision 1.11 2004/05/13 10:47:17 faber
61			* hid the HB_Store funcion in favour of wrapped funcions
62			*
63			* Revision 1.10 2004/03/09 09:39:27 faber
64			* LU_TRACE system introduced
65			*
66			* Revision 1.9 2003/11/27 17:53:23 faber
67			* -Power management poweron procedure done and some tested in the simulator
68			* -history entry 5 now takes OBT
69			*
70			* Revision 1.8 2003/11/06 10:27:12 faber
71			* HB_HKBuffer now implemented as multibuffer (as specified in the
72			* mass memory format). Only compilation, not tested
73			*
74			* Revision 1.7 2003/10/21 16:09:12 alfarano
75			* LU_LOG_INFN replacement for all remaining original log functions
76			*
77			* Revision 1.6 2003/10/17 09:25:10 sebastiani
78			* __FILEID__ mechanism is now provied by global variables
79			* instead of macro definitions in order to make such simbols
80			* to be resolved at link time instead of compilation time.
81			*
82			* Revision 1.5 2003/09/19 15:57:35 faber
83			* Large development update INFN software
84			*
85			* Revision 1.4 2003/09/16 08:42:05 faber
86			* StoreOrb/Incl done / new LOG initialization
87			*
88			* Revision 1.3 2003/09/15 17:46:27 faber
89			* HB_HKBuffer_INFN module introduced.
90			*
91			* Revision 1.2 2003/08/22 07:55:43 sebastiani
92			* conform source to the new loganalizer.c philosophy
93			*
94			* Revision 1.1.1.1 2003/08/04 09:40:22 sebastiani
95			* Imported sources laben rel. 19.06.2003 integrated with pam2
96			*
97			* Revision 1.2 2003/07/17 11:15:04 sebastiani
98			* * empty log message *
99			*
100			* Revision 1.1 2003/06/12 14:49:19 sebastiani
101			* first versione of Log Module source
102			*
103			*
104			*****************************************************************************/
105
106
107			/============================= Include File ================================/
108
109			#include <src/INFN/LU_SourceFileID_INFN.h>
110			#define __FILEID__ _LU_LogUtility_INFN__c
111			#include <src/INFN/PRH_ParamHandler_INFN.h>
112			#include <src/INFN/LU_LogUtility_INFN.h>
113			#include <src/INFN/PRH_ParamHandler_INFN_auto.h>
114			LU_DECL_MASK();
115
116			#include <src/INFN/PRH_ParamHandler_INFN_auto.h>
117			#include <src/INFN/HB_HKBuffer_INFN.h>
118			#include <src/INFN/LU_LogUtility_INFN.h>
119			#include <src/HKManager/HistoryArea/HA_HistoryArea_p.h>
120			#include <src/HKManager/HistoryArea/HA_HistoryArea_int.h>
121			#include <src/INFN/CM_Common_INFN.h>
122			/============================ Global define ================================/
123
124
125			/============================== global types ==============================/
126
127
128
129			/*****************************************************************************/
130			/=========================== Structure define ==============================/
131
132
133			/*****************************************************************************/
134			/============================ Enumerate define =============================/
135
136			/*****************************************************************************/
137
138			/=== LogUtility O P E R A T I O N E N V I R O N M ==/
139
140			/*****************************************************************************/
141
142
143			static BOOL LU_StoreInHB_Flag;
144			#include <src/INFN/LU_COMPILE_STAMP.include>
145
146			// variables for TRACE() macros, trace fileid/line of the calling task
147			UINT16 LU_task_info_line [LU_TOTAL_TASKS];
148			BYTE LU_task_info_fileid [LU_TOTAL_TASKS];
149			UINT16 LU_task_info_humanid[LU_TOTAL_TASKS];
150			UINT16 LU_first_task_index=0;
151
152			/* the initialization that have to be done before the Laben initialization exept the OS module */
153			status_code LU_PreInit()
154			{
155			LU_InitNames();
156			LU_StoreInHB_Flag = FALSE;
157			LU_SetLogMaskAll(LU_DEFAULT_MASK);
158			return SUCCESSFUL;
159			}
160
161			UINT32 LU_GetCompilationTimeStamp() {
162			return LU_COMPILE_STAMP;
163			}
164
165			status_code LU_SetLogMaskAll(UINT16 v)
166			{
167			int i;
168			for(i=0;i<PRH_ARR_N_LOG_MASK;i++)
169			PRH_ARR_LOG_MASK[i]=v;
170			}
171
172			#ifndef LOGANALIZER
173			void LU_StoreInHB(BOOL storeflag) {
174			LU_StoreInHB_Flag = storeflag;
175			}
176			#endif
177
178			status_code LU_Init() {
179			int i;
180			#ifdef SIMULATOR
181			/* write the magic number for the analizer: */
182			static char seq[4] = {0xFA , 0xFE ,0xDE, 0xFA };
183			for (i=0;i<4;i++) {
184			console_outbyte_polled(0,seq[i]);
185			console_outbyte_polled(1,seq[i]);
186			}
187			#endif
188			return SUCCESSFUL;
189			}
190
191			void LU_WriteOnUART(unsigned char *string)
192			{
193			unsigned char *s;
194			if(PRH_VAR_LU_WRITE_ON_UART) {
195			for ( s = string ; *s ; s++ )
196			console_outbyte_polled( 0, *s );
197			console_outbyte_polled( 0, '\r' );
198			console_outbyte_polled( 0, '\n' );
199			}
200			}
201
202
203			#define UWORD unsigned short int
204			#define UBYTE unsigned char
205			status_code LU_PutLog (MsgTsk* msg) {
206			unsigned char EntryType;
207			static unsigned char buf[100],str[100],str2[100];
208			unsigned int entry;
209			unsigned char code;
210			unsigned int time;
211			unsigned int rep1,rep2,rep3,line,fileid;
212
213			#if 0
214			// console_outbyte_polled(0,msg->LlInfo*sizeof(UWORD));
215			//console_outbyte_polled(1,msg->LlInfo*sizeof(UWORD));
216			for(entry=0;entry<msg->LlInfo*sizeof(UWORD);entry++) {
217			console_outbyte_polled(0,msg->Info[entry]);
218			//console_outbyte_polled(1,msg->Info[entry]);
219			}
220			#endif
221
222			/* ignore all the rest: */
223			//return SUCCESSFUL;
224
225			EntryType = msg->Info[0] >> 4;
226
227			entry =EntryType;
228			code =msg->Info[1];
229			time =(((UWORD)(msg->Info))[1] << 16) + ((UWORD)(msg->Info))[2];
230			rep1 =0;
231			rep2 =0;
232			rep3 =0;
233
234			switch( EntryType ) {
235			case HA_EVENT_04:
236			sprintf(str,"");
237			break;
238			case HA_EVENT_00:
239			case HA_EVENT_01:
240			case HA_EVENT_02:
241			case HA_EVENT_03:
242			case HA_EVENT_06:
243			rep1 = ((UWORD*)(msg->Info))[3];
244			sprintf(str,"R1: %10d 0x%X",rep1,rep1);
245			break;
246
247			case HA_EVENT_10:
248			rep1 = ((UWORD*)(msg->Info))[3];
249			rep2 = ((UWORD*)(msg->Info))[4];
250			sprintf(str,"R1: %10d %X - R2: %10d 0x%X ",rep1,rep1,rep2,rep2);
251			break;
252
253			case HA_EVENT_05:
254			line = ((UWORD*)(msg->Info))[3];
255			rep2 = ((UWORD*)(msg->Info))[4];
256			rep1 = ((UWORD*)(msg->Info))[5];
257			rep3 = rep1 \| (rep2<<16);
258			LU_GetSourceInfo(str2,code,line);
259			sprintf(str,"INFN: Info1: %9u 0x%08x [%s]",rep3,rep3,str2);
260			break;
261			case HA_EVENT_07:
262			case HA_EVENT_11:
263			rep1 = ((UWORD*)(msg->Info))[3];
264			rep2 = ((UWORD*)(msg->Info))[4];
265			rep3 = ((UWORD*)(msg->Info))[5];
266			sprintf(str,"R1: %10d 0x%X - R2: %10d 0x%X - R3: %10d %X ",rep1,rep1,rep2,rep2,rep3,rep3);
267			break;
268			default:
269			break;
270			}
271
272			sprintf(buf,"%2d OBT: %5ld Code: %3d - %s",entry,time,code,str);
273
274			// TS_piWriteOnUART(buf);
275			LU_WriteOnUART(buf);
276			return (SUCCESSFUL);
277
278			}
279
280
281
282			status_code LU_trace_load_task_info(UINT32 human_id, rtems_id taskid) {
283			UINT16 index=(UINT16)(taskid);
284
285			/* we assume here that rtems assing an incrementing index field in the object id of every task */
286			if(LU_first_task_index==0)
287			LU_first_task_index=index;
288			/* check if all is OK */
289			if(index-LU_first_task_index >= LU_TOTAL_TASKS) /* internal error */
290			LU_INFN_LOG(LU_INTERNAL\|LU_HA,LU_ALLLOG,__FILEID__,__LINE__,index);
291			else
292			LU_task_info_humanid[index-LU_first_task_index]=human_id;
293			}
294
295
296			status_code LU_INFN_LOG(unsigned int thistype,unsigned int localmask,
297			unsigned int fileid,unsigned int line,unsigned int info1) {
298			BYTE b[8];
299			BYTE *pb=b;
300			TI_TIME obt_ms,obt_s;
301			TI_piGetTimeInfo_ms(&obt_ms);
302			if(thistype & localmask) {
303			if(LU_StoreInHB_Flag) {
304			CM_WRITE_BE_UINT8(pb,thistype);
305			CM_WRITE_BE_UINT8(pb,fileid);
306			CM_WRITE_BE_UINT16(pb,line);
307			CM_WRITE_BE_UINT32(pb,info1);
308			HB_StoreLog(sizeof(b),b,obt_ms);
309			}
310
311			#if 0
312			#warning "make all LU_DEBUG_TRACE to go in HA too. this check is only for ground: remove in flight!"
313			if( (thistype & LU_DEBUG_TRACE) \|\| (thistype & LU_NORMAL_TRACE) )
314			thistype\|=LU_HA;
315			#endif
316
317			/*
318			#ifndef DEBUG
319			if (thistype & LU_HA & localmask)
320			#endif
321			*/
322
323			#warning do we want OBT in s or in ms ? if ms, russian must be warned ? TM was in s
324
325			HA_piLogHistoryEntry5(fileid,line,info1,obt_ms / 1000);
326			}
327			return SUCCESSFUL;
328
329			}
330
331
332
333
334
335
336
337