--- /dev/null
+/***************************************************************************
+ * *
+ * This program is free software; you can redistribute it and/or modify *
+ * it under the terms of the GNU General Public License as published by *
+ * the Free Software Foundation; either version 2 of the License, or *
+ * (at your option) any later version. *
+ * *
+ * This program is distributed in the hope that it will be useful, *
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of *
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
+ * GNU General Public License for more details. *
+ * *
+ * You should have received a copy of the GNU General Public License *
+ * along with this program; if not, write to the *
+ * Free Software Foundation, Inc., *
+ * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. *
+ ***************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include <helper/time_support.h>
+#include <jtag/jtag.h>
+#include "target/target.h"
+#include "target/target_type.h"
+#include "rtos.h"
+#include "helper/log.h"
+#include "rtos_ecos_stackings.h"
+
+static int eCos_detect_rtos( struct target* target );
+static int eCos_create( struct target* target );
+static int eCos_update_threads( struct rtos* rtos);
+static int eCos_get_thread_reg_list(struct rtos *rtos, int64_t thread_id, char ** hex_reg_list );
+static int eCos_get_symbol_list_to_lookup(symbol_table_elem_t * symbol_list[]);
+
+struct eCos_thread_state
+{
+ int value;
+ char * desc;
+};
+
+
+struct eCos_thread_state eCos_thread_states[] =
+{
+ { 0, "Ready" },
+ { 1, "Sleeping" },
+ { 2, "Countsleep" },
+ { 4, "Suspended" },
+ { 8, "Creating" },
+ { 16, "Exited" }
+};
+
+#define ECOS_NUM_STATES (sizeof(eCos_thread_states)/sizeof(struct eCos_thread_state))
+
+struct eCos_params
+{
+ char * target_name;
+ unsigned char pointer_width;
+ unsigned char thread_stack_offset;
+ unsigned char thread_name_offset;
+ unsigned char thread_state_offset;
+ unsigned char thread_next_offset;
+ unsigned char thread_uniqueid_offset;
+ const struct rtos_register_stacking* stacking_info;
+};
+
+const struct eCos_params eCos_params_list[] =
+{
+ { "cortex_m3", // target_name
+ 4, // pointer_width;
+ 0x0c, // thread_stack_offset;
+ 0x9c, // thread_name_offset;
+ 0x3c, // thread_state_offset;
+ 0xa0, // thread_next_offset
+ 0x4c, // thread_uniqueid_offset
+ &rtos_eCos_Cortex_M3_stacking // stacking_info
+ }
+
+};
+
+#define ECOS_NUM_PARAMS ((int)(sizeof(eCos_params_list)/sizeof(struct eCos_params)))
+
+enum eCos_symbol_values
+{
+ eCos_VAL_thread_list = 0,
+ eCos_VAL_current_thread_ptr = 1
+};
+
+static char* eCos_symbol_list[] =
+{
+ "Cyg_Thread::thread_list",
+ "Cyg_Scheduler_Base::current_thread",
+ NULL
+};
+
+
+
+#define ECOS_NUM_SYMBOLS (sizeof(eCos_symbol_list)/sizeof(char*))
+
+
+const struct rtos_type eCos_rtos =
+{
+ .name = "eCos",
+
+ .detect_rtos = eCos_detect_rtos,
+ .create = eCos_create,
+ .update_threads = eCos_update_threads,
+ .get_thread_reg_list = eCos_get_thread_reg_list,
+ .get_symbol_list_to_lookup = eCos_get_symbol_list_to_lookup,
+
+};
+
+static int eCos_update_threads( struct rtos* rtos)
+{
+ int retval;
+ int tasks_found = 0;
+ int thread_list_size = 0;
+ const struct eCos_params* param;
+
+ if ( rtos == NULL )
+ {
+ return -1;
+ }
+
+ if (rtos->rtos_specific_params == NULL )
+ {
+ return -3;
+ }
+
+ param = (const struct eCos_params*) rtos->rtos_specific_params;
+
+ if ( rtos->symbols == NULL )
+ {
+ LOG_OUTPUT("No symbols for eCos\r\n");
+ return -4;
+ }
+
+ if ( rtos->symbols[eCos_VAL_thread_list].address == 0 )
+ {
+ LOG_OUTPUT("Don't have the thread list head\r\n");
+ return -2;
+ }
+
+
+ // wipe out previous thread details if any
+ if ( rtos->thread_details != NULL )
+ {
+ int j;
+ for( j = 0; j < rtos->thread_count; j++ )
+ {
+ if ( rtos->thread_details[j].display_str != NULL )
+ {
+ free( rtos->thread_details[j].display_str );
+ rtos->thread_details[j].display_str = NULL;
+ }
+ if ( rtos->thread_details[j].thread_name_str != NULL )
+ {
+ free( rtos->thread_details[j].thread_name_str );
+ rtos->thread_details[j].thread_name_str = NULL;
+ }
+ if ( rtos->thread_details[j].extra_info_str != NULL )
+ {
+ free( rtos->thread_details[j].extra_info_str );
+ rtos->thread_details[j].extra_info_str = NULL;
+ }
+ }
+ free( rtos->thread_details );
+ rtos->thread_details = NULL;
+ }
+
+
+ // determine the number of current threads
+ uint32_t thread_list_head = rtos->symbols[eCos_VAL_thread_list].address;
+ uint32_t thread_index;
+ target_read_buffer( rtos->target, thread_list_head, param->pointer_width, (uint8_t *) &thread_index );
+ uint32_t first_thread = thread_index;
+ do
+ {
+ thread_list_size++;
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_next_offset, param->pointer_width, (uint8_t *) &thread_index );
+ } while( thread_index!=first_thread );
+
+ // read the current thread id
+ uint32_t current_thread_addr;
+ retval = target_read_buffer( rtos->target, rtos->symbols[eCos_VAL_current_thread_ptr].address, 4, (uint8_t *)¤t_thread_addr);
+ rtos->current_thread = 0;
+ retval = target_read_buffer( rtos->target, current_thread_addr + param->thread_uniqueid_offset, 2, (uint8_t *)&rtos->current_thread);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Could not read eCos current thread from target\r\n");
+ return retval;
+ }
+
+ if ( ( thread_list_size == 0 ) || ( rtos->current_thread == 0 ) )
+ {
+ // Either : No RTOS threads - there is always at least the current execution though
+ // OR : No current thread - all threads suspended - show the current execution of idling
+ char tmp_str[] = "Current Execution";
+ thread_list_size++;
+ tasks_found++;
+ rtos->thread_details = (struct thread_detail*) malloc( sizeof( struct thread_detail ) * thread_list_size );
+ rtos->thread_details->threadid = 1;
+ rtos->thread_details->exists = true;
+ rtos->thread_details->display_str = NULL;
+ rtos->thread_details->extra_info_str = NULL;
+ rtos->thread_details->thread_name_str = (char*) malloc( sizeof(tmp_str) );
+ strcpy( rtos->thread_details->thread_name_str, tmp_str );
+
+
+ if ( thread_list_size == 0 )
+ {
+ rtos->thread_count = 1;
+ return ERROR_OK;
+ }
+ }
+ else
+ {
+ // create space for new thread details
+ rtos->thread_details = (struct thread_detail*) malloc( sizeof( struct thread_detail ) * thread_list_size );
+ }
+
+ // loop over all threads
+ thread_index = first_thread;
+ do
+ {
+
+ #define ECOS_THREAD_NAME_STR_SIZE (200)
+ char tmp_str[ECOS_THREAD_NAME_STR_SIZE];
+ unsigned int i = 0;
+ uint32_t name_ptr = 0;
+ uint32_t prev_thread_ptr;
+
+ // Save the thread pointer
+ uint16_t thread_id;
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_uniqueid_offset, 2, (uint8_t *)&thread_id);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Could not read eCos thread id from target\r\n");
+ return retval;
+ }
+ rtos->thread_details[tasks_found].threadid = thread_id;
+
+ // read the name pointer
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_name_offset, param->pointer_width, (uint8_t *)&name_ptr);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Could not read eCos thread name pointer from target\r\n");
+ return retval;
+ }
+
+ // Read the thread name
+ retval = target_read_buffer( rtos->target, name_ptr, ECOS_THREAD_NAME_STR_SIZE, (uint8_t *)&tmp_str);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Error reading thread name from eCos target\r\n");
+ return retval;
+ }
+ tmp_str[ECOS_THREAD_NAME_STR_SIZE-1] = '\x00';
+
+ if ( tmp_str[0] == '\x00' )
+ {
+ strcpy(tmp_str,"No Name");
+ }
+
+ rtos->thread_details[tasks_found].thread_name_str = (char*)malloc( strlen(tmp_str)+1 );
+ strcpy( rtos->thread_details[tasks_found].thread_name_str, tmp_str );
+
+ // Read the thread status
+ int64_t thread_status = 0;
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_state_offset, 4, (uint8_t *)&thread_status);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Error reading thread state from eCos target\r\n");
+ return retval;
+ }
+
+ for( i = 0; (i < ECOS_NUM_STATES) && (eCos_thread_states[i].value!=thread_status); i++ )
+ {
+ }
+
+ char * state_desc;
+ if (i < ECOS_NUM_STATES)
+ {
+ state_desc = eCos_thread_states[i].desc;
+ }
+ else
+ {
+ state_desc = "Unknown state";
+ }
+
+ rtos->thread_details[tasks_found].extra_info_str = (char*)malloc( strlen(state_desc)+1 );
+ strcpy( rtos->thread_details[tasks_found].extra_info_str, state_desc );
+
+ rtos->thread_details[tasks_found].exists = true;
+
+ rtos->thread_details[tasks_found].display_str = NULL;
+
+
+ tasks_found++;
+ prev_thread_ptr = thread_index;
+
+ // Get the location of the next thread structure.
+ thread_index = rtos->symbols[eCos_VAL_thread_list].address;
+ retval = target_read_buffer( rtos->target, prev_thread_ptr + param->thread_next_offset, param->pointer_width, (uint8_t *) &thread_index );
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Error reading next thread pointer in eCos thread list\r\n");
+ return retval;
+ }
+ }
+ while( thread_index!=first_thread );
+
+ rtos->thread_count = tasks_found;
+ return 0;
+}
+
+static int eCos_get_thread_reg_list(struct rtos *rtos, int64_t thread_id, char ** hex_reg_list )
+{
+
+ int retval;
+ const struct eCos_params* param;
+
+ *hex_reg_list = NULL;
+
+ if ( rtos == NULL )
+ {
+ return -1;
+ }
+
+ if ( thread_id == 0 )
+ {
+ return -2;
+ }
+
+ if (rtos->rtos_specific_params == NULL )
+ {
+ return -3;
+ }
+
+ param = (const struct eCos_params*) rtos->rtos_specific_params;
+
+
+ // Find the thread with that thread id
+ uint16_t id=0;
+ uint32_t thread_list_head = rtos->symbols[eCos_VAL_thread_list].address;
+ uint32_t thread_index;
+ target_read_buffer( rtos->target, thread_list_head, param->pointer_width, (uint8_t *) &thread_index );
+ bool done=false;
+ while(!done)
+ {
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_uniqueid_offset, 2, (uint8_t*)&id);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Error reading unique id from eCos thread\r\n");
+ return retval;
+ }
+
+ if( id==thread_id )
+ {
+ done=true;
+ break;
+ }
+ target_read_buffer( rtos->target, thread_index + param->thread_next_offset, param->pointer_width, (uint8_t *) &thread_index );
+ }
+
+ if(done)
+ {
+ // Read the stack pointer
+ int64_t stack_ptr = 0;
+ retval = target_read_buffer( rtos->target, thread_index + param->thread_stack_offset, param->pointer_width, (uint8_t*)&stack_ptr);
+ if ( retval != ERROR_OK )
+ {
+ LOG_OUTPUT("Error reading stack frame from eCos thread\r\n");
+ return retval;
+ }
+
+ return rtos_generic_stack_read( rtos->target, param->stacking_info, stack_ptr, hex_reg_list );
+ }
+
+ return -1;
+}
+
+
+
+static int eCos_get_symbol_list_to_lookup(symbol_table_elem_t * symbol_list[])
+{
+ unsigned int i;
+ *symbol_list = (symbol_table_elem_t *) malloc( sizeof( symbol_table_elem_t ) * ECOS_NUM_SYMBOLS );
+
+ for( i = 0; i < ECOS_NUM_SYMBOLS; i++ )
+ {
+ (*symbol_list)[i].symbol_name = eCos_symbol_list[i];
+ }
+
+ return 0;
+}
+
+static int eCos_detect_rtos( struct target* target )
+{
+ if ( ( target->rtos->symbols != NULL ) &&
+ ( target->rtos->symbols[eCos_VAL_thread_list].address != 0 ) )
+ {
+ // looks like eCos
+ return 1;
+ }
+ return 0;
+}
+
+static int eCos_create( struct target* target )
+{
+ int i = 0;
+ while ( ( i < ECOS_NUM_PARAMS ) && ( 0 != strcmp( eCos_params_list[i].target_name, target->type->name ) ) )
+ {
+ i++;
+ }
+ if ( i >= ECOS_NUM_PARAMS )
+ {
+ LOG_OUTPUT("Could not find target in eCos compatability list\r\n");
+ return -1;
+ }
+
+ target->rtos->rtos_specific_params = (void*) &eCos_params_list[i];
+ target->rtos->current_thread = 0;
+ target->rtos->thread_details = NULL;
+ return 0;
+}