Changeset 8389628 in rtems for c/src/lib/libmisc


Ignore:
Timestamp:
04/22/96 16:53:46 (28 years ago)
Author:
Joel Sherrill <joel.sherrill@…>
Branches:
4.10, 4.11, 4.8, 4.9, 5, master
Children:
d2d6467
Parents:
5a36154a
Message:

updates from Tony Bennett

Location:
c/src/lib/libmisc
Files:
22 edited

Legend:

Unmodified
Added
Removed

  • c/src/lib/libmisc/assoc/assoc.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)assoc.c     1.6 - 95/10/25
    3  *
    4  *
    52 * assoc.c
    63 *      rtems assoc routines

  • c/src/lib/libmisc/assoc/assoc.h

    r5a36154a r8389628  
    11/*
    2  *      @(#)assoc.h     1.4 - 95/10/25
    3  *     
    42 *
    53 *  Rtems associativity routines.  Mainly used to convert a value from

  • c/src/lib/libmisc/error/error.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)error.c     1.6 - 95/12/12
    3  *     
    4  *
    52 *  report errors and panics to RTEMS' stderr.
    63 *  Currently just used by RTEMS monitor.

  • c/src/lib/libmisc/error/error.h

    r5a36154a r8389628  
    1 
    21/*
    3  *      @(#)error.h     1.3 - 95/10/25
    4  *     
    5  *
    62 *  Defines and externs for rtems error reporting
    73 *
    … …  
    2521const char *rtems_status_text(rtems_status_code);
    2622int   rtems_error(int error_code, const char *printf_format, ...);
     23#ifdef __GNUC__
     24void  rtems_panic(const char *printf_format, ...)
     25                                         __attribute__ ((__noreturn__));
     26#else
    2727void  rtems_panic(const char *printf_format, ...);
     28#endif
    2829
    2930extern int rtems_panic_in_progress;

  • c/src/lib/libmisc/monitor/mon-command.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)command.c   1.5 - 95/08/02
    3  *     
    4  *
    52 * Command parsing routines for RTEMS monitor
    63 *

  • c/src/lib/libmisc/monitor/mon-config.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)config.c    1.5 - 95/08/02
    3  *     
    4  *
    52 * RTEMS Config display support
    63 *

  • c/src/lib/libmisc/monitor/mon-dname.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)dname.c     1.5 - 96/01/03
    3  *     
    4  *
    52 * RTEMS monitor driver names support.
    63 *

  • c/src/lib/libmisc/monitor/mon-driver.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)driver.c    1.4 - 95/08/02
    3  *     
    4  *
    52 * RTEMS monitor IO (device drivers) support
    63 *

  • c/src/lib/libmisc/monitor/mon-extension.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)extension.c 1.6 - 95/09/25
    3  *     
    4  *
    52 * RTEMS Monitor extension support
    63 *

  • c/src/lib/libmisc/monitor/mon-itask.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)itask.c     1.6 - 96/01/03
    3  *     
    4  *
    5  *  RTEMS Monitor init task support
     2 * RTEMS Monitor init task support
    63 *
    74 *  $Id$

  • c/src/lib/libmisc/monitor/mon-manager.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)manager.c   1.4 - 96/01/03
    3  *     
    4  *
    5  *  RTEMS Monitor "manager" support.
    6  *  Used to traverse object (chain) lists and print them out.
     2 * RTEMS Monitor "manager" support.
     3 * Used to traverse object (chain) lists and print them out.
    74 *
    85 *  $Id$

  • c/src/lib/libmisc/monitor/mon-monitor.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)monitor.c   1.23 - 96/01/03
    3  *     
    4  *
    5  *
    62 * RTEMS monitor main body
    73 *     
    … …  
    1915 *      remote request/response stuff should be cleaned up
    2016 *         maybe we can use real rpc??
    21  *      'info' commadn to print out:
     17 *      'info' command to print out:
    2218 *           interrupt stack location, direction and size
    2319 *           floating point config stuff
    … …  
    263259}
    264260
     261void
     262rtems_monitor_debugger_cmd(
     263    int        argc,
     264    char     **argv,
     265    unsigned32 command_arg,
     266    boolean    verbose
     267)
     268{
     269#ifdef CPU_INVOKE_DEBUGGER
     270    CPU_INVOKE_DEBUGGER;
     271#endif
     272}
    265273
    266274void
    … …  
    304312
    305313void
    306 rtems_monitor_debugger_cmd(
    307     int        argc,
    308     char     **argv,
    309     unsigned32 command_arg,
    310     boolean    verbose
    311 )
    312 {
    313 #ifdef CPU_INVOKE_DEBUGGER
    314     CPU_INVOKE_DEBUGGER;
    315 #endif
    316 }
    317 
    318 void
    319314rtems_monitor_node_cmd(
    320315    int     argc,
    … …  
    341336    }
    342337
    343     if ((new_node >= 1) && (new_node <= _Configuration_MP_table->maximum_nodes))
    344         rtems_monitor_default_node = new_node;
     338    if ((new_node >= 1) &&
     339        _Configuration_MP_table &&
     340        (new_node <= _Configuration_MP_table->maximum_nodes))
     341            rtems_monitor_default_node = new_node;
    345342}
    346343
    … …  
    384381        return;
    385382
    386 #ifdef SIMHPPA
    387     fp = fdopen(8, "r");                /* don't ask; don't tell */
    388 #else
    389383    fp = fopen("symbols", "r");
    390 #endif
    391384   
    392385    if (fp == 0)

  • c/src/lib/libmisc/monitor/mon-mpci.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)mpci.c      1.6 - 95/08/02
    3  *     
    4  *
    52 * RTEMS MPCI Config display support
    63 *

  • c/src/lib/libmisc/monitor/mon-object.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)object.c    1.9 - 96/01/03
    3  *     
    4  *
    52 * RTEMS Monitor "object" support.
    63 *
    … …  
    342339        for (arg=1; argv[arg]; arg++)
    343340        {
    344             id = (rtems_id) strtoul(argv[arg], 0, 0);
     341            id = (rtems_id) strtoul(argv[arg], 0, 16);
    345342            id = rtems_monitor_id_fixup(id, default_node, type);
    346343            type = (rtems_monitor_object_type_t) rtems_get_class(id);

  • c/src/lib/libmisc/monitor/mon-prmisc.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)prmisc.c    1.9 - 95/08/02
    3  *     
    4  *
    52 * Print misc stuff for the monitor dump routines
    63 * Each routine returns the number of characters it output.

  • c/src/lib/libmisc/monitor/mon-queue.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)queue.c     1.5 - 95/07/31
    3  *     
    42 *  $Id$
    53 */

  • c/src/lib/libmisc/monitor/mon-server.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)server.c    1.5 - 96/01/03
    3  *     
    4  *
    5  *  RTEMS monitor server (handles requests for info from RTEMS monitors
     2 * RTEMS monitor server (handles requests for info from RTEMS monitors
    63 *             running on other nodes)
    74 *

  • c/src/lib/libmisc/monitor/mon-symbols.c

    r5a36154a r8389628  
    1 /*
    2  *      @(#)symbols.c   1.10 - 95/08/02
    3  *     
    4  *  $Id$
    5  */
    6 
    7 /* #define qsort _quicksort */
    8 
    91/*
    102 *  File:       symbols.c
    … …  
    168 *
    179 *  TODO:
     10 *
     11 *  $Id$
    1812 */
    1913
    … …  
    5145            (void) free(table->addresses);
    5246        table->addresses = 0;
    53 
    54         if (table->symbols)
    55             (void) free(table->symbols);
    56         table->symbols = 0;
    57 
    5847        p = table->string_buffer_head;
    5948        while (p)
    … …  
    9483        if (table->addresses == 0)        /* blew it; lost orig */
    9584            goto failed;
    96 
    97         table->symbols = (rtems_symbol_t *) realloc((void *) table->symbols, newsize * sizeof(rtems_symbol_t));
    98         if (table->symbols == 0)        /* blew it; lost orig */
    99             goto failed;
    100 
    10185        table->size = newsize;
    10286    }
    … …  
    130114
    131115    table->strings_next += symbol_length;
    132 
    133     table->symbols[table->next] = *sp;
    134 
    135116    table->sorted = 0;
    136117    table->next++;
    … …  
    148129 */
    149130
    150 int
     131static int
    151132rtems_symbol_compare(const void *e1,
    152133                     const void *e2)
    … …  
    163144}
    164145
    165 /*
    166  * Qsort entry point for compare by string name (case independent)
    167  */
    168 
    169 int
    170 rtems_symbol_string_compare(const void *e1,
    171                             const void *e2)
    172 {
    173     rtems_symbol_t *s1, *s2;
    174     s1 = (rtems_symbol_t *) e1;
    175     s2 = (rtems_symbol_t *) e2;
    176 
    177     return strcasecmp(s1->name, s2->name);
    178 }
    179 
    180146
    181147/*
    … …  
    183149 */
    184150
    185 void
     151static void
    186152rtems_symbol_sort(rtems_symbol_table_t *table)
    187153{
    188 #ifdef RTEMS_ON_SIMULATOR
    189     printf("Sorting symbols ... ");         /* so slow we need a msg */
    190     fflush(stdout);
    191 #endif
    192 
    193154    qsort((void *) table->addresses, (size_t) table->next,
    194155          sizeof(rtems_symbol_t), rtems_symbol_compare);
    195 
    196     qsort((void *) table->symbols, (size_t) table->next,
    197           sizeof(rtems_symbol_t), rtems_symbol_string_compare);
    198 
    199 #ifdef RTEMS_ON_SIMULATOR
    200     /* so slow we need a msg */
    201     printf("done\n");
    202 #endif
    203 
    204156    table->sorted = 1;
    205157}
     158
    206159
    207160/*
    … …  
    263216
    264217/*
     218 * Search the symbol table for the exact matching address.
     219 * If the symbol table has already been sorted, then
     220 * call the regular symbol value lookup, however, it it
     221 * has not yet been sorted, search it sequentially.
     222 * This routine is primarily used for low level symbol
     223 * lookups (eg. from exception handler and interrupt routines)
     224 * where the penality of sorted is not wanted and where
     225 * an exact match is needed such that symbol table order
     226 * is not important.
     227 */
     228const rtems_symbol_t *
     229rtems_symbol_value_lookup_exact(
     230    rtems_symbol_table_t *table,
     231    rtems_unsigned32      value
     232  )
     233{
     234    int s;
     235    rtems_symbol_t *sp;
     236
     237    if (table == 0)
     238    {
     239        table = rtems_monitor_symbols;
     240        if (table == 0)
     241            return NULL;
     242    }
     243   
     244    if (table->sorted)
     245    {
     246        sp = rtems_symbol_value_lookup(table, value);
     247        if ( rtems_symbol_value(sp) == value )
     248            return sp;
     249        else
     250            return NULL;  /* not an exact match */
     251    }
     252 
     253    for (s = 0, sp = table->addresses; s < table->next; s++, sp++)
     254    {
     255        if ( sp->value == value )
     256            return sp;
     257    }
     258
     259    return NULL;
     260
     261}
     262
     263
     264/*
    265265 * Search the symbol table by string name (case independent)
    266266 */
    … …  
    272272  )
    273273{
    274     rtems_symbol_t *sp = 0;
    275     rtems_symbol_t  key;
    276 
    277     if (table == 0)
     274    int s;
     275    rtems_symbol_t *sp;
     276
     277    if (table == 0)
     278    {
    278279        table = rtems_monitor_symbols;
    279 
    280     if ((table == 0) || (name == 0))
    281         goto done;
    282 
    283     if (table->sorted == 0)
    284         rtems_symbol_sort(table);
    285 
    286     /*
    287      * dummy up one for bsearch()
    288      */
    289 
    290     key.name = name;
    291     key.value = 0;
    292 
    293     sp = (rtems_symbol_t *) bsearch((const void *) &key,
    294                                     (const void *) table->symbols,
    295                                     (size_t) table->next,
    296                                     sizeof(rtems_symbol_t),
    297                                     rtems_symbol_string_compare);
    298 
    299 done:
    300     return sp;
     280        if (table == 0)
     281            return NULL;
     282    }
     283   
     284    for (s = 0, sp = table->addresses; s < table->next; s++, sp++)
     285    {
     286        if ( strcasecmp(sp->name, name) == 0 )
     287            return sp;
     288    }
     289
     290    return NULL;
    301291}
    302292
    … …  
    326316
    327317    *next_id += 1;
    328     return (void *) (table->symbols + n);
     318    return (void *) (table->addresses + n);
    329319
    330320failed:
    … …  
    439429        rtems_symbol_sort(table);
    440430
    441     for (s = 0, sp = table->symbols; s < table->next; s++, sp++)
     431    for (s = 0, sp = table->addresses; s < table->next; s++, sp++)
    442432    {
    443433        rtems_monitor_symbol_t canonical_symbol;

  • c/src/lib/libmisc/monitor/mon-task.c

    r5a36154a r8389628  
    11/*
    2  *      @(#)task.c      1.9 - 95/08/01
    3  *     
    4  *
    52 * RTEMS Monitor task support
    63 *

  • c/src/lib/libmisc/monitor/monitor.h

    r5a36154a r8389628  
    1 /*
    2  *      @(#)monitor.h   1.21 - 96/01/03
    3  *     
    4  *
    5  *  monitor.h,v 1.3 1995/09/29 17:19:02 joel Exp
    6  */
    7 
    81/*
    92 *  File:       monitor.h
    … …  
    136 *
    147 *  TODO:
     8 *
     9 *  $Id$
    1510 */
    1611
    … …  
    2621
    2722/*
    28  * XXX this should be in rtems proper when type becomes part of id
     23 * Monitor types are derived from rtems object classes
    2924 */
    3025
    … …  
    307302
    308303typedef struct {
    309     rtems_monitor_object_type_t                 type;
     304    rtems_monitor_object_type_t         type;
    310305    void                               *object_information;
    311306    int                                 size;   /* of canonical object */
    … …  
    420415rtems_symbol_t *rtems_symbol_create(rtems_symbol_table_t *, char *, unsigned32);
    421416rtems_symbol_t *rtems_symbol_value_lookup(rtems_symbol_table_t *, unsigned32);
     417const rtems_symbol_t *rtems_symbol_value_lookup_exact(rtems_symbol_table_t *, unsigned32);
    422418rtems_symbol_t *rtems_symbol_name_lookup(rtems_symbol_table_t *, char *);
    423419void   *rtems_monitor_symbol_next(void *object_info, rtems_monitor_symbol_t *, rtems_id *);

  • c/src/lib/libmisc/monitor/symbols.h

    r5a36154a r8389628  
    11/*
    2  *      @(#)symbols.h   1.3 - 95/06/09
    3  *     
    4  *
    52 *  RTEMS monitor symbol table functions
    63 *
    … …  
    4946
    5047    /*
    51      * String list -- sorted by name (when we do a lookup)
    52      * This is a duplicate of the info in table->addresses, but it's
    53      * pretty small, so I don't worry about it.
    54      */
    55 
    56     rtems_symbol_t  *symbols;           /* symbol array */
    57 
    58     /*
    5948     * String pool, unsorted, a list of blocks of string data
    6049     */

  • c/src/lib/libmisc/stackchk/check.c

    r5a36154a r8389628  
    2020
    2121#include <rtems.h>
     22
     23/*
     24 * HACK
     25 * the stack dump information should be printed by a "fatal" extension.
     26 * Fatal extensions only get called via rtems_fatal_error_occurred()
     27 * and not when rtems_shutdown_executive() is called.
     28 * I hope/think this is changing so that fatal extensions are renamed
     29 * to "shutdown" extensions.
     30 * When that happens, this #define should be deleted and all the code
     31 * it marks.
     32 */
     33#define DONT_USE_FATAL_EXTENSION
     34
    2235
    2336extern rtems_configuration_table BSP_Configuration;
    … …  
    5063  Stack_check_Begin_extension,      /* task_begin   */
    5164  0,                                /* task_exitted */
     65#ifdef DONT_USE_FATAL_EXTENSION
     66  0,                                /* fatal        */
     67#else
    5268  Stack_check_Fatal_extension,      /* fatal        */
     69#endif
    5370};
    5471
    … …  
    167184
    168185  Stack_check_Blown_task = 0;
    169 
    170 #ifdef STACK_CHECKER_REPORT_USAGE
    171   atexit( Stack_check_Dump_usage );
    172 #endif
    173186
    174187  /*
    … …  
    218231  }
    219232
     233#ifdef DONT_USE_FATAL_EXTENSION
     234#ifdef RTEMS_DEBUG
     235    /*
     236     * this would normally be called by a fatal extension
     237     * handler, but we don't run fatal extensions unless
     238     * we fatal error.
     239     */
     240  atexit(Stack_check_Dump_usage);
     241#endif
     242#endif
     243
    220244  stack_check_initialized = 1;
    221245}
    … …  
    432456 */
    433457
    434 void Stack_check_Fatal_extension( 
     458void Stack_check_Fatal_extension(
    435459    Internal_errors_Source  source,
    436460    boolean                 is_internal,
    … …  
    438462)
    439463{
     464#ifndef DONT_USE_FATAL_EXTENSION
    440465    if (status == 0)
    441466        Stack_check_Dump_usage();
     467#endif
    442468}
    443469
Note: See TracChangeset for help on using the changeset viewer.