Add eCos/Cortex RTOS support
authorAlan Bowman <alan.michael.bowman@gmail.com>
Mon, 23 May 2011 19:32:00 +0000 (20:32 +0100)
committerØyvind Harboe <oyvind.harboe@zylin.com>
Wed, 25 May 2011 20:05:23 +0000 (22:05 +0200)
src/rtos/Makefile.am
src/rtos/eCos.c [new file with mode: 0644]
src/rtos/rtos.c
src/rtos/rtos_ecos_stackings.c [new file with mode: 0644]
src/rtos/rtos_ecos_stackings.h [new file with mode: 0644]

index 12368d2..fba9d47 100644 (file)
@@ -23,7 +23,7 @@ include $(top_srcdir)/common.mk
 METASOURCES = AUTO
 noinst_LTLIBRARIES = librtos.la
 noinst_HEADERS = rtos.h
-librtos_la_SOURCES = rtos.c rtos_standard_stackings.c FreeRTOS.c ThreadX.c
+librtos_la_SOURCES = rtos.c rtos_standard_stackings.c rtos_ecos_stackings.c FreeRTOS.c ThreadX.c eCos.c
 
 
 librtos_la_CFLAGS =
diff --git a/src/rtos/eCos.c b/src/rtos/eCos.c
new file mode 100644 (file)
index 0000000..c26b66a
--- /dev/null
@@ -0,0 +1,427 @@
+/***************************************************************************
+ *                                                                         *
+ *   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 *)&current_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;
+}
index 3cdd912..9eed08e 100644 (file)
@@ -38,11 +38,13 @@ static int str_to_hex( char* hex_dst, char* src );
 /* RTOSs */
 extern struct rtos_type FreeRTOS_rtos;
 extern struct rtos_type ThreadX_rtos;
+extern struct rtos_type eCos_rtos;
 
 static struct rtos_type *rtos_types[] =
 {
        &ThreadX_rtos,
        &FreeRTOS_rtos,
+       &eCos_rtos,
        NULL
 };
 
diff --git a/src/rtos/rtos_ecos_stackings.c b/src/rtos/rtos_ecos_stackings.c
new file mode 100644 (file)
index 0000000..a81b477
--- /dev/null
@@ -0,0 +1,63 @@
+/***************************************************************************
+ *                                                                         *
+ *   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 "rtos.h"
+
+static const struct stack_register_offset rtos_eCos_Cortex_M3_stack_offsets [] =
+{ { 0x0c, 32 },       // r0
+  { 0x10, 32 },       // r1
+  { 0x14, 32 },       // r2
+  { 0x18, 32 },       // r3
+  { 0x1c, 32 },       // r4
+  { 0x20, 32 },       // r5
+  { 0x24, 32 },       // r6
+  { 0x28, 32 },       // r7
+  { 0x2c, 32 },       // r8
+  { 0x30, 32 },       // r9
+  { 0x34, 32 },       // r10
+  { 0x38, 32 },       // r11
+  { 0x3c, 32 },       // r12
+  { -2,   32 },       // sp
+  { -1,   32 },       // lr
+  { 0x40, 32 },       // pc
+  { -1,   96 },       // FPA1
+  { -1,   96 },       // FPA2
+  { -1,   96 },       // FPA3
+  { -1,   96 },       // FPA4
+  { -1,   96 },       // FPA5
+  { -1,   96 },       // FPA6
+  { -1,   96 },       // FPA7
+  { -1,   96 },       // FPA8
+  { -1,   32 },       // FPS
+  { -1,   32 },       // xPSR
+};
+
+
+const struct rtos_register_stacking rtos_eCos_Cortex_M3_stacking =
+{
+          0x44,                                 // stack_registers_size
+          -1,                                   // stack_growth_direction
+          26,                                   // num_output_registers
+          rtos_eCos_Cortex_M3_stack_offsets     // register_offsets
+};
+
+
diff --git a/src/rtos/rtos_ecos_stackings.h b/src/rtos/rtos_ecos_stackings.h
new file mode 100644 (file)
index 0000000..82f0855
--- /dev/null
@@ -0,0 +1,30 @@
+/***************************************************************************
+ *                                                                         *
+ *   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.             *
+ ***************************************************************************/
+
+#ifndef INCLUDED_RTOS_STANDARD_STACKINGS_H_
+#define INCLUDED_RTOS_STANDARD_STACKINGS_H_
+
+#ifdef HAVE_CONFIG_H
+#include "config.h"
+#endif
+
+#include "rtos.h"
+
+extern const struct rtos_register_stacking rtos_eCos_Cortex_M3_stacking;
+
+#endif //ifndef INCLUDED_RTOS_STANDARD_STACKINGS_H_