FreeCalypso > hg > fc-tourmaline
annotate src/cs/riviera/rvt/rvt_env.c @ 55:eca2202f630f
src/ui/bmi/mmiIdle.[ch]: 4-character bogotab cleanup
| author | Mychaela Falconia <falcon@freecalypso.org> | 
|---|---|
| date | Tue, 20 Oct 2020 20:52:17 +0000 | 
| parents | 4e78acac3d88 | 
| children | 
| rev | line source | 
|---|---|
| 0 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 1 /******************************************************************************** | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 2 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 3 * rvt_env.c | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 4 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 5 * This module interfaces the environment and contains all start/init/stop... | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 6 * functions of the trace module. | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 7 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 8 * (C) Texas Instruments, all rights reserved | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 9 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 10 * Version number : 0.1 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 11 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 12 * History : 0.1 (7/4/2000) - Created | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 13 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 14 * Date : 7/4/2000 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 15 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 16 * Author : Cristian Livadiotti, c-livadiotti@ti.com | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 17 * | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 18 ********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 19 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 20 #include "nucleus.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 21 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 22 #include <string.h> | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 23 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 24 #include "rvf/rvf_api.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 25 #include "rv/rv_general.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 26 #include "rvm/rvm_gen.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 27 #include "rvm/rvm_priorities.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 28 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 29 #include "rvt/rvt_gen.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 30 #include "rvt/rvt_def_i.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 31 #include "rvt/rvt_env.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 32 #include "rvt/rvt_env_i.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 33 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 34 #include "rvm/rvm_use_id_list.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 35 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 36 #include "uart/serialswitch.h" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 37 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 38 #ifndef _WINDOWS | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 39 #include "config/swconfig.cfg" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 40 #include "config/debug.cfg" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 41 #endif | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 42 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 43 #define TI_RX_HISR_STACK_SIZE (1024) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 44 static UINT8 TI_RX_HISR_stack[TI_RX_HISR_STACK_SIZE]; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 45 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 46 char *p_rvt_lost_msg = NULL; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 47 char *p_rvt_sys_time = NULL; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 48 NU_HISR TI_rcv_HISR; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 49 T_RVF_MB_ID rvt_mb_id = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 50 T_RVT_STATE rvt_module_state = RVT_NOT_STARTED; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 51 T_RVF_ADDR_ID rvt_addr_id = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 52 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 53 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 54 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 55 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 56 /* Function Name: rvt_get_info */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 57 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 58 /* Purpose: This function is used to notify the RVM */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 59 /* of the Trace's Memory Banks requirements. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 60 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 61 /* Input Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 62 /* &p_info_swe (refer to rvm_gen.h). */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 63 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 64 /* Output Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 65 /* p_info_swe (refer to rvm_gen.h). */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 66 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 67 /* Global Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 68 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 69 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 70 /* Note: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 71 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 72 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 73 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 74 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 75 T_RVM_RETURN | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 76 rvt_get_info (T_RVM_INFO_SWE *p_info_swe) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 77 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 78 if (!p_info_swe) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 79 return RVM_INVALID_PARAMETER; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 80 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 81 p_info_swe->swe_type = RVM_SWE_TYPE_4; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 82 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 83 p_info_swe->type_info.type4.swe_use_id = RVT_USE_ID; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 84 p_info_swe->type_info.type4.version = 1; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 85 memcpy (p_info_swe->type_info.type4.swe_name, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 86 "TRACE", | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 87 sizeof ("TRACE")); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 88 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 89 p_info_swe->type_info.type4.stack_size = TRACE_TASK_STACK_SIZE; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 90 p_info_swe->type_info.type4.priority = RVM_TRACE_TASK_PRIORITY; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 91 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 92 p_info_swe->type_info.type4.return_path.addr_id = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 93 p_info_swe->type_info.type4.return_path.callback_func = NULL; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 94 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 95 // Memory banks definitions. For now, one memory bank is needed | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 96 p_info_swe->type_info.type4.nb_mem_bank = 1; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 97 memcpy (p_info_swe->type_info.type4.mem_bank[0].bank_name, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 98 "RV_TRACE", | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 99 RVM_NAME_MAX_LEN); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 100 p_info_swe->type_info.type4.mem_bank[0].initial_params.size = TRACE_MB_SIZE; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 101 p_info_swe->type_info.type4.mem_bank[0].initial_params.watermark = TRACE_MB_WATERMARK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 102 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 103 // Generic functions | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 104 p_info_swe->type_info.type4.init = rvt_init; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 105 p_info_swe->type_info.type4.core = (T_RVM_SWE_CORE_FUNC)rvt_task_core; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 106 p_info_swe->type_info.type4.stop = rvt_stop; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 107 p_info_swe->type_info.type4.kill = rvt_kill; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 108 p_info_swe->type_info.type4.set_info = rvt_set_info; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 109 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 110 // Linked SW entities: none, except if Profiler or Nucleus Monitor are defined | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 111 #if (TI_PROFILER == 1) || (TI_NUC_MONITOR == 1) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 112 p_info_swe->type_info.type4.nb_linked_swe = 1; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 113 p_info_swe->type_info.type4.linked_swe_id[0] = TI_PRF_USE_ID; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 114 #else | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 115 p_info_swe->type_info.type4.nb_linked_swe = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 116 #endif | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 117 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 118 return RVM_OK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 119 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 120 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 121 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 122 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 123 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 124 /* Function Name: rvt_set_info */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 125 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 126 /* Purpose: This function is used to notify the Trace module */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 127 /* about mb ids and task id. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 128 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 129 /* Input Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 130 /* bk_id[]: array of memory bank IDs. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 131 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 132 /* Output Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 133 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 134 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 135 /* Global Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 136 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 137 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 138 /* Note: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 139 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 140 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 141 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 142 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 143 T_RVM_RETURN | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 144 rvt_set_info (T_RVF_ADDR_ID addr_id, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 145 T_RV_RETURN_PATH return_path[], | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 146 T_RVF_MB_ID bk_id[], | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 147 T_RVM_CB_FUNC rvm_error_ft) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 148 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 149 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 150 // Save parameters given by the environment (Addr ID and MB ID respectively) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 151 rvt_addr_id = addr_id; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 152 rvt_mb_id = bk_id [0]; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 153 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 154 return RVM_OK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 155 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 156 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 157 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 158 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 159 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 160 /* Function Name: rvt_init */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 161 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 162 /* Purpose: This is the initialization function. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 163 /* It is called by the RVM. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 164 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 165 /* Input Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 166 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 167 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 168 /* Output Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 169 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 170 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 171 /* Global Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 172 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 173 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 174 /* Note: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 175 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 176 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 177 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 178 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 179 T_RVM_RETURN | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 180 rvt_init (void) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 181 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 182 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 183 if (rvt_module_state != RVT_NOT_STARTED) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 184 return RVM_NOT_READY; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 185 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 186 // The stack is entirely filled with the pattern 0xFE | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 187 memset (TI_RX_HISR_stack, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 188 0xFE, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 189 TI_RX_HISR_STACK_SIZE); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 190 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 191 // Create the RX HISR | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 192 if (NU_Create_HISR (&TI_rcv_HISR, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 193 "TI_RCV_HISR", \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 194 rvt_RX_process, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 195 2, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 196 TI_RX_HISR_stack, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 197 TI_RX_HISR_STACK_SIZE) != NU_SUCCESS) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 198 return RVM_INTERNAL_ERR; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 199 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 200 // Initialize the baud rate and the callback function for the RX HISR | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 201 SER_tr_Init (SER_LAYER_1, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 202 TR_BAUD_CONFIG, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 203 rvt_activate_RX_HISR); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 204 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 205 #ifdef FRAMING_PROTOCOL | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 206 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 207 // Allocate a buffer that reports the system time (refer to rvf_trace_adapt.c): | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 208 // - 'User ID' (1 byte), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 209 // - 'Trace Type' (4 bytes), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 210 // - 'Trace Level' (1 byte), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 211 // - 'System Time' (RVT_SYS_TIME_LENGTH bytes), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 212 // - Hexadecimal value (RVT_HEX_VALUE_LENGTH bytes). | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 213 if (rvf_get_buf (rvt_mb_id, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 214 (RVT_HDR_LENGTH + RVT_SYS_TIME_LENGTH + RVT_HEX_VALUE_LENGTH), \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 215 (T_RVF_BUFFER**)&p_rvt_sys_time) != RVF_RED) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 216 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 217 UINT8 *header_p = NULL; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 218 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 219 header_p = (UINT8*)p_rvt_sys_time; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 220 *header_p++ = (UINT8)rv_trace_user_id; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 221 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 222 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 223 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 224 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 225 *header_p++ = RV_TRACE_LEVEL_ERROR; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 226 memcpy (header_p, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 227 RVT_SYS_TIME, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 228 RVT_SYS_TIME_LENGTH); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 229 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 230 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 231 // Allocate a buffer that reports a lack of memory (refer to rvf_trace_adapt.c): | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 232 // - 'User ID' (1 byte), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 233 // - 'Trace Type' (4 bytes), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 234 // - 'Trace Level' (1 byte), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 235 // - 'Lost Message' (RVT_LOST_MSG_LENGTH bytes), | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 236 // - Hexadecimal value (RVT_HEX_VALUE_LENGTH bytes). | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 237 if (rvf_get_buf (rvt_mb_id, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 238 (RVT_HDR_LENGTH + RVT_LOST_MSG_LENGTH + RVT_HEX_VALUE_LENGTH), \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 239 (T_RVF_BUFFER**)&p_rvt_lost_msg) != RVF_RED) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 240 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 241 UINT8 *header_p = NULL; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 242 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 243 header_p = (UINT8*)p_rvt_lost_msg; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 244 *header_p++ = (UINT8)rv_trace_user_id; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 245 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 246 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 247 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 248 *header_p++ = 0; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 249 *header_p++ = RV_TRACE_LEVEL_ERROR; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 250 memcpy (header_p, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 251 RVT_LOST_MSG, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 252 RVT_LOST_MSG_LENGTH); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 253 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 254 #else | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 255 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 256 // Allocate a buffer that reports the system time | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 257 if (rvf_get_buf (rvt_mb_id, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 258 (RVT_SYS_TIME_LENGTH + RVT_HEX_VALUE_LENGTH + RVT_HYPERTERM_LENGTH), \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 259 (T_RVF_BUFFER**)&p_rvt_sys_time) != RVF_RED) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 260 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 261 memcpy (p_rvt_sys_time, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 262 RVT_SYS_TIME, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 263 RVT_SYS_TIME_LENGTH); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 264 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 265 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 266 // Allocate a buffer that reports a lack of memory | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 267 if (rvf_get_buf (rvt_mb_id, \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 268 (RVT_LOST_MSG_LENGTH + RVT_HEX_VALUE_LENGTH + RVT_HYPERTERM_LENGTH), \ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 269 (T_RVF_BUFFER**)&p_rvt_lost_msg) != RVF_RED) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 270 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 271 memcpy (p_rvt_lost_msg, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 272 RVT_LOST_MSG, | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 273 RVT_LOST_MSG_LENGTH); | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 274 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 275 #endif | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 276 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 277 // State RVT as "STARTED" | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 278 rvt_module_state = RVT_STARTED; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 279 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 280 return RVM_OK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 281 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 282 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 283 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 284 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 285 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 286 /* Function Name: rvt_stop */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 287 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 288 /* Purpose: This function is defined for compilation only. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 289 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 290 /* Input Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 291 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 292 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 293 /* Output Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 294 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 295 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 296 /* Global Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 297 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 298 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 299 /* Note: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 300 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 301 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 302 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 303 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 304 T_RVM_RETURN | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 305 rvt_stop (void) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 306 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 307 return RVM_OK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 308 } | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 309 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 310 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 311 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 312 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 313 /* Function Name: rvt_kill */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 314 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 315 /* Purpose: This function is defined for compilation only. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 316 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 317 /* Input Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 318 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 319 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 320 /* Output Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 321 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 322 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 323 /* Global Parameters: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 324 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 325 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 326 /* Note: */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 327 /* None. */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 328 /* */ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 329 /********************************************************************************/ | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 330 | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 331 T_RVM_RETURN | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 332 rvt_kill (void) | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 333 { | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 334 return RVM_OK; | 
| 
4e78acac3d88
src/{condat,cs,gpf,nucleus}: import from Selenite
 Mychaela Falconia <falcon@freecalypso.org> parents: diff
changeset | 335 } | 
