| Line 17... |
Line 17... |
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with this program; if not, write to the Free Software
|
along with this program; if not, write to the Free Software
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
*/
|
*/
|
|
|
|
|
#include "support.h"
|
#include "support.h"
|
#include "common.h"
|
#include "common.h"
|
#include "dos.h"
|
#include "dos.h"
|
#include "hdbug.h"
|
#include "hdbug.h"
|
#include <ctype.h>
|
#include <ctype.h>
|
|
|
|
|
static int hdbug_num_commands;
|
static int hdbug_num_commands;
|
static command_struct hdbug_command[MAX_HDBUG_COMMANDS];
|
static command_struct hdbug_command[MAX_HDBUG_COMMANDS];
|
|
|
static struct dosparam _dos_params;
|
static struct dosparam _dos_params;
|
static struct dosparam *dos_params = &_dos_params;
|
static struct dosparam *dos_params = &_dos_params;
|
|
|
|
|
/**********************************************************************/
|
/**********************************************************************/
|
/* */
|
/* */
|
/* H D B U G */
|
/* H D B U G */
|
/* */
|
/* */
|
/**********************************************************************/
|
/**********************************************************************/
|
| Line 47... |
Line 44... |
*/
|
*/
|
void module_hdbug_init (void)
|
void module_hdbug_init (void)
|
{
|
{
|
hdbug_num_commands = 0;
|
hdbug_num_commands = 0;
|
|
|
register_command ("hdbug", "<device> [<mode>]", "Opens ata device <device> & mounts DOS filesystem", hdbug_mount_cmd);
|
register_command("hdbug", "<device> [<mode>]",
|
register_hdbug_command ("umount", "", "Unmounts DOS filesystem & Closes device", hdbug_umount_cmd);
|
"Opens ata device <device> & mounts DOS filesystem",
|
|
hdbug_mount_cmd);
|
|
register_hdbug_command("umount", "",
|
|
"Unmounts DOS filesystem & Closes device",
|
|
hdbug_umount_cmd);
|
|
|
register_hdbug_command ("dir", "", "dos 'dir' command.", hdbug_dir_cmd);
|
register_hdbug_command ("dir", "", "dos 'dir' command.", hdbug_dir_cmd);
|
register_hdbug_command ("cd", "", "dos 'cd' command.", hdbug_cd_cmd);
|
register_hdbug_command ("cd", "", "dos 'cd' command.", hdbug_cd_cmd);
|
register_hdbug_command ("help", "", "Display this help message", hdbug_help);
|
register_hdbug_command("help", "", "Display this help message",
|
register_hdbug_command ("exit", "", "Exit hdbug and return to ORPmon", hdbug_umount_cmd);
|
hdbug_help);
|
|
register_hdbug_command("exit", "", "Exit hdbug and return to ORPmon",
|
|
hdbug_umount_cmd);
|
}
|
}
|
|
|
|
|
/*
|
/*
|
The next code is graceously taken from the "common.c" file
|
The next code is graceously taken from the "common.c" file
|
and slightly modified.
|
and slightly modified.
|
|
|
Better would be if we could access the routines in 'common.c'
|
Better would be if we could access the routines in 'common.c'
|
| Line 75... |
Line 77... |
char *pstr = str;
|
char *pstr = str;
|
char *command_str;
|
char *command_str;
|
char *argv[20];
|
char *argv[20];
|
int argc = 0;
|
int argc = 0;
|
|
|
|
|
/* Show prompt */
|
/* Show prompt */
|
printf ("\nhdbug> ");
|
printf ("\nhdbug> ");
|
|
|
|
|
/* Get characters from UART */
|
/* Get characters from UART */
|
c = getc();
|
c = getc();
|
while (c != '\r' && c != '\f' && c != '\n')
|
while (c != '\r' && c != '\f' && c != '\n') {
|
{
|
|
if (c == '\b')
|
if (c == '\b')
|
pstr--;
|
pstr--;
|
else
|
else
|
*pstr++ = c;
|
*pstr++ = c;
|
putc(c);
|
putc(c);
|
| Line 96... |
Line 95... |
*pstr = '\0';
|
*pstr = '\0';
|
printf ("\n");
|
printf ("\n");
|
|
|
/* Skip leading blanks */
|
/* Skip leading blanks */
|
pstr = str;
|
pstr = str;
|
while ( isspace(*pstr) ) pstr++;
|
while (isspace(*pstr))
|
|
pstr++;
|
|
|
/* Get command from the string */
|
/* Get command from the string */
|
command_str = pstr;
|
command_str = pstr;
|
|
|
while (1) {
|
while (1) {
|
/* Go to next argument */
|
/* Go to next argument */
|
while ( isgraph(*pstr) ) pstr++;
|
while (isgraph(*pstr))
|
|
pstr++;
|
if (*pstr) {
|
if (*pstr) {
|
*pstr++ = '\0';
|
*pstr++ = '\0';
|
while ( isspace(*pstr) ) pstr++;
|
while (isspace(*pstr))
|
|
pstr++;
|
argv[argc++] = pstr;
|
argv[argc++] = pstr;
|
}
|
} else
|
else
|
|
break;
|
break;
|
}
|
}
|
|
|
return execute_hdbug_command(command_str, argc, argv);
|
return execute_hdbug_command(command_str, argc, argv);
|
}
|
}
|
|
|
|
|
int execute_hdbug_command(char *command_str, int argc, char **argv)
|
int execute_hdbug_command(char *command_str, int argc, char **argv)
|
{
|
{
|
int i, found = 0;
|
int i, found = 0;
|
|
|
for (i = 0; i < hdbug_num_commands; i++)
|
for (i = 0; i < hdbug_num_commands; i++)
|
if ( !strcmp(command_str, hdbug_command[i].name) )
|
if (!strcmp(command_str, hdbug_command[i].name)) {
|
{
|
switch (hdbug_command[i].func(argc, argv)) {
|
switch ( hdbug_command[i].func(argc, argv) )
|
|
{
|
|
case -1:
|
case -1:
|
printf ("Missing/wrong parameters, usage: %s %s\n", hdbug_command[i].name, hdbug_command[i].params);
|
printf
|
|
("Missing/wrong parameters, usage: %s %s\n",
|
|
hdbug_command[i].name,
|
|
hdbug_command[i].params);
|
break;
|
break;
|
|
|
case -2:
|
case -2:
|
return -1;
|
return -1;
|
}
|
}
|
| Line 144... |
Line 145... |
printf ("Unknown command. Type 'hdbug help' for help.\n");
|
printf ("Unknown command. Type 'hdbug help' for help.\n");
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
void register_hdbug_command(const char *name, const char *params,
|
void register_hdbug_command (const char *name, const char *params, const char *help, int (*func)(int argc, char *argv[]) )
|
const char *help, int (*func) (int argc,
|
{
|
char *argv[]))
|
if (hdbug_num_commands < MAX_HDBUG_COMMANDS)
|
|
{
|
{
|
|
if (hdbug_num_commands < MAX_HDBUG_COMMANDS) {
|
hdbug_command[hdbug_num_commands].name = name;
|
hdbug_command[hdbug_num_commands].name = name;
|
hdbug_command[hdbug_num_commands].params = params;
|
hdbug_command[hdbug_num_commands].params = params;
|
hdbug_command[hdbug_num_commands].help = help;
|
hdbug_command[hdbug_num_commands].help = help;
|
hdbug_command[hdbug_num_commands].func = func;
|
hdbug_command[hdbug_num_commands].func = func;
|
hdbug_num_commands++;
|
hdbug_num_commands++;
|
}
|
} else
|
else
|
printf
|
printf ("hdbug-command '%s' ignored; MAX_COMMANDS limit reached\n", name);
|
("hdbug-command '%s' ignored; MAX_COMMANDS limit reached\n",
|
|
name);
|
}
|
}
|
|
|
int hdbug_help(int argc, char **argv)
|
int hdbug_help(int argc, char **argv)
|
{
|
{
|
int i;
|
int i;
|
|
|
for (i = 0; i < hdbug_num_commands; i++)
|
for (i = 0; i < hdbug_num_commands; i++)
|
printf ("%-15s %-17s -%s\n", hdbug_command[i].name, hdbug_command[i].params, hdbug_command[i].help);
|
printf("%-15s %-17s -%s\n", hdbug_command[i].name,
|
|
hdbug_command[i].params, hdbug_command[i].help);
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
|
|
|
|
/**********************************************************************/
|
/**********************************************************************/
|
/* */
|
/* */
|
/* H D B U G C O M M A N D S E T */
|
/* H D B U G C O M M A N D S E T */
|
/* */
|
/* */
|
/**********************************************************************/
|
/**********************************************************************/
|
| Line 190... |
Line 190... |
int error;
|
int error;
|
|
|
if (argc != 2)
|
if (argc != 2)
|
return -1;
|
return -1;
|
|
|
|
|
/* try to open the requested device (read-only) */
|
/* try to open the requested device (read-only) */
|
dos_params->inode.i_rdev = (ATA_BASE_ADDR >> 16) | (**argv - '0');
|
dos_params->inode.i_rdev = (ATA_BASE_ADDR >> 16) | (**argv - '0');
|
dos_params->filp.f_mode = FMODE_READ;
|
dos_params->filp.f_mode = FMODE_READ;
|
|
|
/* open device */
|
/* open device */
|
if ( (error = dos_open(dos_params)) )
|
if ((error = dos_open(dos_params))) {
|
{
|
|
switch (error) {
|
switch (error) {
|
case EINVAL:
|
case EINVAL:
|
printf( "Error, device busy.\n" ); /* standard response to EINVAL */
|
printf( "Error, device busy.\n" ); /* standard response to EINVAL */
|
break;
|
break;
|
|
|
| Line 223... |
Line 221... |
|
|
default:
|
default:
|
printf( "Unkown error.\n" );
|
printf( "Unkown error.\n" );
|
break;
|
break;
|
}
|
}
|
}
|
} else {
|
else
|
|
{
|
|
printf( "directory startsector: 0x%08lX\n", dos_params->ssector );
|
printf( "directory startsector: 0x%08lX\n", dos_params->ssector );
|
printf( "cluster startsector : 0x%08lX\n", dos_params->csector );
|
printf( "cluster startsector : 0x%08lX\n", dos_params->csector );
|
printf( "cluster startentry : 0x%08lX\n", dos_params->sentry );
|
printf( "cluster startentry : 0x%08lX\n", dos_params->sentry );
|
|
|
/* device is opened, filesystem is mounted, start command prompt */
|
/* device is opened, filesystem is mounted, start command prompt */
|
| Line 237... |
Line 233... |
}
|
}
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
/*
|
/*
|
H D B U G _ U M O U N T
|
H D B U G _ U M O U N T
|
|
|
unmounts the dos filesystem and closes the ata-device
|
unmounts the dos filesystem and closes the ata-device
|
*/
|
*/
|
| Line 250... |
Line 245... |
dos_release(dos_params);
|
dos_release(dos_params);
|
|
|
return -2;
|
return -2;
|
}
|
}
|
|
|
|
|
/*
|
/*
|
H D B U G _ C D
|
H D B U G _ C D
|
*/
|
*/
|
int hdbug_cd_cmd(int argc, char **argv)
|
int hdbug_cd_cmd(int argc, char **argv)
|
{
|
{
|
| Line 273... |
Line 267... |
printf( "Too many arguments.\n" );
|
printf( "Too many arguments.\n" );
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* search for the requested directory */
|
/* search for the requested directory */
|
if ( !(entry = dos_dir_find_entry(dos_params, *argv)) )
|
if (!(entry = dos_dir_find_entry(dos_params, *argv))) {
|
{
|
|
printf( "The system cannot find the specified path.\n" );
|
printf( "The system cannot find the specified path.\n" );
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
/*
|
/*
|
H D B U G _ D I R
|
H D B U G _ D I R
|
*/
|
*/
|
int hdbug_dir_cmd(int argc, char **argv)
|
int hdbug_dir_cmd(int argc, char **argv)
|
{
|
{
|
| Line 305... |
Line 296... |
hdbug_dir_print( dos_dir_get_entry(dos_params, i) );
|
hdbug_dir_print( dos_dir_get_entry(dos_params, i) );
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
int hdbug_dir_print(struct dos_dir_entry *entry)
|
int hdbug_dir_print(struct dos_dir_entry *entry)
|
{
|
{
|
unsigned long ltmp;
|
unsigned long ltmp;
|
unsigned short stmp;
|
unsigned short stmp;
|
|
|
| Line 324... |
Line 314... |
/* deleted/removed entry */
|
/* deleted/removed entry */
|
break;
|
break;
|
|
|
default:
|
default:
|
/* check if entry is a label */
|
/* check if entry is a label */
|
if (entry->attribute & ATT_LAB)
|
if (entry->attribute & ATT_LAB) {
|
{
|
|
printf( "LABEL: " );
|
printf( "LABEL: " );
|
memcpy(txt, entry->name, 8);
|
memcpy(txt, entry->name, 8);
|
txt[8] = '\0';
|
txt[8] = '\0';
|
printf( "%s", txt);
|
printf( "%s", txt);
|
memcpy(txt, entry->ext, 3);
|
memcpy(txt, entry->ext, 3);
|
txt[3] = '\0';
|
txt[3] = '\0';
|
printf( "%s\n", txt);
|
printf( "%s\n", txt);
|
}
|
} else {
|
else
|
|
{
|
|
/* display date & time */
|
/* display date & time */
|
stmp = entry->date;
|
stmp = entry->date;
|
swap(&stmp, sizeof(short) );
|
swap(&stmp, sizeof(short) );
|
printf( "%02d-%02d-%4d ",stmp & 0x1f, (stmp >> 5) & 0xf, ((stmp >> 9) & 0xffff) +1980);
|
printf("%02d-%02d-%4d ", stmp & 0x1f,
|
|
(stmp >> 5) & 0xf,
|
|
((stmp >> 9) & 0xffff) + 1980);
|
|
|
stmp = entry->time;
|
stmp = entry->time;
|
swap(&stmp, sizeof(short) );
|
swap(&stmp, sizeof(short) );
|
printf( "%02d:%02d ", (stmp >> 11) & 0x1f, (stmp >> 5) & 0x3f );
|
printf("%02d:%02d ", (stmp >> 11) & 0x1f,
|
|
(stmp >> 5) & 0x3f);
|
|
|
/* display directory bit */
|
/* display directory bit */
|
printf( "%s ", entry->attribute & ATT_DIR ? "<DIR>" : " " );
|
printf("%s ",
|
|
entry->attribute & ATT_DIR ? "<DIR>" : " ");
|
|
|
/* display filesize */
|
/* display filesize */
|
ltmp = entry->size;
|
ltmp = entry->size;
|
swap(<mp, sizeof(unsigned long) );
|
swap(<mp, sizeof(unsigned long) );
|
printf( "%12ld ", ltmp );
|
printf( "%12ld ", ltmp );
|
| Line 358... |
Line 349... |
/* replace the first 'space' in the name by an null char */
|
/* replace the first 'space' in the name by an null char */
|
*(char*)memchr(entry->name, 0x20, 8) = '\0';
|
*(char*)memchr(entry->name, 0x20, 8) = '\0';
|
printf( "%s", entry->name);
|
printf( "%s", entry->name);
|
|
|
/* add extension */
|
/* add extension */
|
if (entry->ext[0] != 0x20)
|
if (entry->ext[0] != 0x20) {
|
{
|
|
printf( ".%3s", entry->ext);
|
printf( ".%3s", entry->ext);
|
}
|
}
|
|
|
printf("\n");
|
printf("\n");
|
break;
|
break;
|
| Line 371... |
Line 361... |
}
|
}
|
|
|
return 0;
|
return 0;
|
}
|
}
|
|
|
|
|
/*
|
/*
|
H D B U G T O O L S
|
H D B U G T O O L S
|
*/
|
*/
|
inline void *swap(void *var, size_t size)
|
inline void *swap(void *var, size_t size)
|
{
|
{
|
| Line 391... |
Line 380... |
}
|
}
|
|
|
case 4:
|
case 4:
|
{
|
{
|
unsigned long *p = (unsigned long*)var;
|
unsigned long *p = (unsigned long*)var;
|
*p = (*p << 24) | ( (*p & 0x0000ff00) << 8) | ( (*p & 0x00ff0000) >> 8) | (*p >> 24);
|
*p = (*p << 24) | ((*p & 0x0000ff00) << 8) |
|
|
((*p & 0x00ff0000) >> 8) | (*p >> 24);
|
return var;
|
return var;
|
}
|
}
|
|
|
default:
|
default:
|
return NULL;
|
return NULL;
|
