Subversion Repositories openrisc

//==========================================================================

//

//      dump.c

//

//      RedBoot dump support

//

//==========================================================================

// ####ECOSGPLCOPYRIGHTBEGIN####                                            

// -------------------------------------------                              

// This file is part of eCos, the Embedded Configurable Operating System.   

// Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.

//

// eCos 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 or (at your option) any later      

// version.                                                                 

//

// eCos 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 eCos; if not, write to the Free Software Foundation, Inc.,    

// 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.            

//

// As a special exception, if other files instantiate templates or use      

// macros or inline functions from this file, or you compile this file      

// and link it with other works to produce a work based on this file,       

// this file does not by itself cause the resulting work to be covered by   

// the GNU General Public License. However the source code for this file    

// must still be made available in accordance with section (3) of the GNU   

// General Public License v2.                                               

//

// This exception does not invalidate any other reasons why a work based    

// on this file might be covered by the GNU General Public License.         

// -------------------------------------------                              

// ####ECOSGPLCOPYRIGHTEND####                                              

//==========================================================================

//#####DESCRIPTIONBEGIN####

//

// Author(s):    gthomas

// Contributors: gthomas

// Date:         2002-08-06

// Purpose:      

// Description:  

//              

// This code is part of RedBoot (tm).

//

//####DESCRIPTIONEND####

//

//==========================================================================

#include <redboot.h>

RedBoot_cmd("dump",

            "Display (hex dump) a range of memory",

            "-b <location> [-l <length>] [-s] [-1|-2|-4]",

            do_dump

    );

RedBoot_cmd("x",

            "Display (hex dump) a range of memory",

            "-b <location> [-l <length>] [-s] [-1|-2|-4]",

            do_x

    );

void

do_dump(int argc, char *argv[])

{

    struct option_info opts[6];

    unsigned long base, len;

    bool base_set, len_set;

    static unsigned long _base, _len;

    static char _size = 1;

    bool srec_dump, set_32bit, set_16bit, set_8bit;

    int i, n, off, cksum;

    cyg_uint8 ch;

    init_opts(&opts[0], 'b', true, OPTION_ARG_TYPE_NUM,

              (void *)&base, (bool *)&base_set, "base address");

    init_opts(&opts[1], 'l', true, OPTION_ARG_TYPE_NUM,

              (void *)&len, (bool *)&len_set, "length");

    init_opts(&opts[2], 's', false, OPTION_ARG_TYPE_FLG,

              (void *)&srec_dump, 0, "dump data using Morotola S-records");

    init_opts(&opts[3], '4', false, OPTION_ARG_TYPE_FLG,

              (void *)&set_32bit, (bool *)0, "dump 32 bit units");

    init_opts(&opts[4], '2', false, OPTION_ARG_TYPE_FLG,

              (void *)&set_16bit, (bool *)0, "dump 16 bit units");

    init_opts(&opts[5], '1', false, OPTION_ARG_TYPE_FLG,

              (void *)&set_8bit, (bool *)0, "dump 8 bit units");

    if (!scan_opts(argc, argv, 1, opts, 6, 0, 0, "")) {

        return;

    }

    if (!base_set) {

        if (_base == 0) {

            diag_printf("Dump what [location]?\n");

            return;

        }

        base = _base;

        if (!len_set) {

            len = _len;

            len_set = true;

        }

    }

    if (set_32bit) {

      _size = 4;

    } else if (set_16bit) {

      _size = 2;

    } else if (set_8bit) {

      _size = 1;

    }

    if (!len_set) {

        len = 32;

    }

    if (srec_dump) {

        off = 0;

        while (off < len) {

            n = (len > 16) ? 16 : len;

            cksum = n+5;

            diag_printf("S3%02X%08lX", n+5, off+base);

            for (i = 0;  i < 4;  i++) {

                cksum += (((base+off)>>(i*8)) & 0xFF);

            }

            for (i = 0;  i < n;  i++) {

                ch = *(cyg_uint8 *)(base+off+i);

                diag_printf("%02X", ch);

                cksum += ch;

            }

            diag_printf("%02X\n", ~cksum & 0xFF);

            off += n;

        }

    } else {

        switch( _size ) {

        case 1:

            diag_dump_buf((void *)base, len);

            break;

        case 2:

            diag_dump_buf_16bit((void *)base, len);

            break;

        case 4:

            diag_dump_buf_32bit((void *)base, len);

            break;

        }

    }

    _base = base + len;

    _len = len;

}

// Simple alias for the dump command

void

do_x(int argc, char *argv[])

{

    do_dump(argc, argv);

}