void cmd_dir(struct CONSOLE *cons) { struct FILEINFO *finfo = (struct FILEINFO *) (ADR_DISKIMG + 0x002600); int i, j; char s[30]; for (i = 0; i < 224; i++) { if (finfo[i].name[0] == 0x00) { break; } if (finfo[i].name[0] != 0xe5) { if ((finfo[i].type & 0x18) == 0) { sprintf(s, "filename.ext %7d", finfo[i].size); for (j = 0; j < 8; j++) { s[j] = finfo[i].name[j]; } s[ 9] = finfo[i].ext[0]; s[10] = finfo[i].ext[1]; s[11] = finfo[i].ext[2]; putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 30); cons_newline(cons); } } } cons_newline(cons); return; }
void cons_putchar(struct CONSOLE *cons, int chr, char move) { char s[2]; s[0] = chr; s[1] = 0; if (s[0] == 0x09) { /* タブ */ for (;;) { putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, " ", 1); cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } if (((cons->cur_x - 8) & 0x1f) == 0) { break; /* 32で割り切れたらbreak */ } } } else if (s[0] == 0x0a) { /* 改行 */ cons_newline(cons); } else if (s[0] == 0x0d) { /* 復帰 */ /* とりあえずなにもしない */ } else { /* 普通の文字 */ putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 1); if (move != 0) { /* moveが0のときはカーソルを進めない */ cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } } } return; }
void cons_putchar (struct CONSOLE *cons, int chr, char move) { char s[2]; s[0] = chr; s[1] = 0; if (s[0] == 0x09) { // tab for (;;) { putfonts8_asc_sht (cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, " ", 1); cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } if (((cons->cur_x - 8) & 0x1f) == 0) { break; } } } else if (s[0] == 0x0a) { // enter cons_newline(cons); } else if (s[0] == 0x0d) { // enter // Do nothing } else { putfonts8_asc_sht (cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 1); if (move != 0) { cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline (cons); } } } return; }
void cons_putchar(struct CONSOLE *cons, char chr, int move) { /* 逐字输出 */ char s[2]; s[0] = chr; s[1] = 0; if (s[0] == 0x09) { /* 制表符 */ for (;;) { putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, " ", 1); cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } if (((cons->cur_x - 8) & 0x1f) == 0) { break; /* 被32整除则break */ } } } else if (s[0] == 0x0a) { /* 换行 */ cons_newline(cons); } else if (s[0] == 0x0d) { /* 回车 */ /* 这里暂且不进行任何操作 */ } else { /* 一般字符 */ putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 1); if (move != 0) { /* move为0时光标不后移 */ cons->cur_x += 8; // 后移一位 if (cons->cur_x == 8 + 240) { // 到达最右端后换行 cons_newline(cons); } } } return; }
void cmd_mem(struct CONSOLE *cons, unsigned int memtotal) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; char s[30]; sprintf(s, "total %dMB", memtotal / (1024 * 1024)); putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 30); cons_newline(cons); sprintf(s, "free %dKB", memman_total(memman) / 1024); putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 30); cons_newline(cons); cons_newline(cons); return; }
void cmd_dir(struct CONSOLE *cons) { /* dir命令 */ struct FILEINFO *finfo = (struct FILEINFO *) (ADR_DISKIMG + 0x002600); int i, j; char s[30]; for (i = 0; i < 224; i++) { if (finfo[i].name[0] == 0x00) { // 不包含任何文件名信息 break; } if (finfo[i].name[0] != 0xe5) { // 没有被删除 if ((finfo[i].type & 0x18) == 0) { sprintf(s, "filename.ext %7d\n", finfo[i].size); for (j = 0; j < 8; j++) { s[j] = finfo[i].name[j]; } s[ 9] = finfo[i].ext[0]; s[10] = finfo[i].ext[1]; s[11] = finfo[i].ext[2]; cons_putstr0(cons, s); } } } cons_newline(cons); return; }
void cmd_dir(struct CONSOLE *cons, char *cmdline) { struct FILEINFO *finfo = (struct FILEINFO *) (ADR_DISKIMG + 0x002600); int i, j; char s[30]; for (i = 0; i < 224; i++) { if (finfo[i].name[0] == 0x00) { break; } if (finfo[i].name[0] != 0xe5) { if ((finfo[i].type & 0x18) == 0) { sprintf(s, "filename.ext %7d\n", finfo[i].size); for (j = 0; j < 8; j++) { s[j] = finfo[i].name[j]; } s[ 9] = finfo[i].ext[0]; s[10] = finfo[i].ext[1]; s[11] = finfo[i].ext[2]; cons_putstr0(cons, s); //s[22] = ' '; dbg_putstr0(s,COL8_FFFFFF); } } } cons_newline(cons); return; }
int cmd_app(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo; struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char name[13], *p, *q; struct TASK *task = task_now(); int i, segsiz, datsiz, esp, dathrb; /* コマンドラインからファイル名を生成 */ for (i = 0; i < 8; i++) { if (cmdline[i] <= ' ') { break; } name[i] = cmdline[i]; } name[i] = 0; /* とりあえずファイル名の後ろを0にする */ /* ファイルを探す */ finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo == 0) { /* 見つからなかったので後ろに".HRB"をつけてもう一度探してみる */ name[i ] = '.'; name[i + 1] = 'H'; name[i + 2] = 'R'; name[i + 3] = 'B'; name[i + 4] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { /* ファイルが見つかった場合 */ p = (char *) memman_alloc_4k(memman, finfo->size); file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); if (finfo->size >= 36 && strncmp(p + 4, "Hari", 4) == 0 && *p == 0x00) { segsiz = *((int *) (p + 0x0000)); esp = *((int *) (p + 0x000c)); datsiz = *((int *) (p + 0x0010)); dathrb = *((int *) (p + 0x0014)); q = (char *) memman_alloc_4k(memman, segsiz); *((int *) 0xfe8) = (int) q; set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER + 0x60); set_segmdesc(gdt + 1004, segsiz - 1, (int) q, AR_DATA32_RW + 0x60); for (i = 0; i < datsiz; i++) { q[esp + i] = p[dathrb + i]; } start_app(0x1b, 1003 * 8, esp, 1004 * 8, &(task->tss.esp0)); memman_free_4k(memman, (int) q, segsiz); } else { cons_putstr0(cons, ".hrb file format error.\n"); } memman_free_4k(memman, (int) p, finfo->size); cons_newline(cons); return 1; } /* ファイルが見つからなかった場合 */ return 0; }
void cmd_type(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo = file_search(cmdline + 5, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); char *p; if (finfo != 0) { /* ファイルが見つかった場合 */ p = (char *) memman_alloc_4k(memman, finfo->size); file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); cons_putstr1(cons, p, finfo->size); memman_free_4k(memman, (int) p, finfo->size); } else { /* ファイルが見つからなかった場合 */ cons_putstr0(cons, "File not found."); cons_newline(cons); } cons_newline(cons); return; }
void cons_runcmd (char *cmdline, struct CONSOLE *cons, int *fat, unsigned int memtotal) { if (strcmp(cmdline, "mem") == 0) { cmd_mem (cons, memtotal); } else if (strcmp(cmdline, "cls") == 0) { cmd_cls (cons); } else if (strcmp (cmdline, "dir") == 0) { cmd_dir (cons); } else if (cmdline[0]=='t' && cmdline[1]=='y' && cmdline[2]=='p' && cmdline[3]=='e' && cmdline[4]==' ') { cmd_type (cons, fat, cmdline); } else if (strcmp (cmdline, "hlt") == 0) { cmd_hlt (cons, fat); } else if (cmdline[0] != 0) { // Not Command Line and Empty putfonts8_asc_sht (cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, "Bad command.", 12); cons_newline (cons); cons_newline (cons); } }
void cons_runcmd(char *cmdline, struct CONSOLE *cons, int *fat, unsigned int memtotal) { if (strcmp(cmdline, "mem") == 0) { cmd_mem(cons, memtotal); } else if (strcmp(cmdline, "cls") == 0) { cmd_cls(cons); } else if (strcmp(cmdline, "dir") == 0) { cmd_dir(cons); } else if (strncmp(cmdline, "type ", 5) == 0) { cmd_type(cons, fat, cmdline); } else if (strcmp(cmdline, "hlt") == 0) { cmd_hlt(cons, fat); } else if (cmdline[0] != 0) { /* コマンドではなく、さらに空行でもない */ putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, "Bad command.", 12); cons_newline(cons); cons_newline(cons); } return; }
void cmd_hlt(struct CONSOLE *cons, int *fat) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo = file_search("HLT.HRB", (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char *p; if (finfo != 0) { /* ファイルが見つかった場合 */ p = (char *) memman_alloc_4k(memman, finfo->size); file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER); farjmp(0, 1003 * 8); memman_free_4k(memman, (int) p, finfo->size); } else { /* ファイルが見つからなかった場合 */ putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, "File not found.", 15); cons_newline(cons); } cons_newline(cons); return; }
void cmd_langmode(struct CONSOLE *cons, char *cmdline) { struct TASK *task = task_now(); unsigned char mode = cmdline[9] - '0'; if (mode <= 2) { task->langmode = mode; } else { cons_putstr0(cons, "mode number error.\n"); } cons_newline(cons); return; }
void cmd_type(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo = file_search(cmdline + 5, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); char *p; int i; if (finfo != 0) { /* ファイルが見つかった場合 */ p = (char *) memman_alloc_4k(memman, finfo->size); file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); for (i = 0; i < finfo->size; i++) { cons_putchar(cons, p[i], 1); } memman_free_4k(memman, (int) p, finfo->size); } else { /* ファイルが見つからなかった場合 */ putfonts8_asc_sht(cons->sht, 8, cons->cur_y, COL8_FFFFFF, COL8_000000, "File not found.", 15); cons_newline(cons); } cons_newline(cons); return; }
void cmd_ncst(struct CONSOLE *cons, char *cmdline, int memtotal) { struct TASK *task = open_constask(0, memtotal); struct FIFO32 *fifo = &task->fifo; int i; /* Ŀ�ǵ� ���ο� �Էµ� ���ڿ���, �� ���ھ� ���ο� �ֿܼ� �Է� */ for (i = 5; cmdline[i] != 0; i++) { fifo32_put(fifo, cmdline[i] + 256); } fifo32_put(fifo, 10 + 256); /* Enter */ cons_newline(cons); return; }
void cmd_ncst(struct CONSOLE *cons, char *cmdline, int memtotal) { struct TASK *task = open_constask(0, memtotal); struct FIFO32 *fifo = &task->fifo; int i; /* コマンドラインに入力された文字列を、一文字ずつ新しいコンソールに入力 */ for (i = 5; cmdline[i] != 0; i++) { fifo32_put(fifo, cmdline[i] + 256); } fifo32_put(fifo, 10 + 256); /* Enter */ cons_newline(cons); return; }
void cons_runcmd(char *cmdline, struct CONSOLE *cons, int *fat, unsigned int memtotal) { if (strcmp(cmdline, "mem") == 0) { cmd_mem(cons, memtotal); } else if (strcmp(cmdline, "clear") == 0) { cmd_cls(cons); } else if (strcmp(cmdline, "ls") == 0) { cmd_dir(cons); } else if (strncmp(cmdline, "cat ", 4) == 0) { cmd_type(cons, fat, cmdline); //} else if (strcmp(cmdline, "hlt") == 0) { // cmd_hlt(cons, fat); } else if (cmdline[0] != 0) { if(cmd_app(cons,fat,cmdline) == 0) { bps(cons->sht, 8, cons->cur_y, COL8_000084,COL8_FFFFFF, "Bad command.", 12); cons_newline(cons); cons_newline(cons); } } return; }
int cmd_app(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo; struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char name[18], *p; int i; /* 根据命令行生成文件名 */ for (i = 0; i < 13; i++) { if (cmdline[i] <= ' ') { break; } name[i] = cmdline[i]; } name[i] = 0; /* 暂且将文件名的后面置位0 */ /* 寻找文件 */ finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo == 0 && name[i - 1] != '.') { /* 由于找不到文件,故在文件名后面加上“.hrb”后重新寻找 */ name[i ] = '.'; name[i + 1] = 'F'; name[i + 2] = 'E'; name[i + 3] = 'X'; name[i + 4] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { /* 找到文件的情况 */ p = (char *) memman_alloc_4k(memman, finfo->size); *((int *) 0xfe8) = (int) p; file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER); // *.fex成功读入内存之后,将其注册为GDT的1003号。1-2号有dsctbl.c使用,3-1002号由mtask.c使用。 if (finfo->size >= 8 && strncmp(p + 4, "Hari", 4) == 0) { p[0] = 0xe8; p[1] = 0x16; p[2] = 0x00; p[3] = 0x00; p[4] = 0x00; p[5] = 0xcb; } farcall(0, 1003 * 8); memman_free_4k(memman, (int) p, finfo->size); cons_newline(cons); return 1; } /* 没有找到文件的情况 */ return 0; }
int cmd_app(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo; struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char name[18], *p, *q; struct TASK *task = task_now(); int i; /* コマンドラインからファイル名を生成 */ for (i = 0; i < 13; i++) { if (cmdline[i] <= ' ') { break; } name[i] = cmdline[i]; } name[i] = 0; /* とりあえずファイル名の後ろを0にする */ /* ファイルを探す */ finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo == 0 && name[i - 1] != '.') { /* 見つからなかったので後ろに".HRB"をつけてもう一度探してみる */ name[i ] = '.'; name[i + 1] = 'H'; name[i + 2] = 'R'; name[i + 3] = 'B'; name[i + 4] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { /* ファイルが見つかった場合 */ p = (char *) memman_alloc_4k(memman, finfo->size); q = (char *) memman_alloc_4k(memman, 64 * 1024); *((int *) 0xfe8) = (int) p; file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER + 0x60); set_segmdesc(gdt + 1004, 64 * 1024 - 1, (int) q, AR_DATA32_RW + 0x60); if (finfo->size >= 8 && strncmp(p + 4, "Hari", 4) == 0) { start_app(0x1b, 1003 * 8, 64 * 1024, 1004 * 8, &(task->tss.esp0)); } else { start_app(0, 1003 * 8, 64 * 1024, 1004 * 8, &(task->tss.esp0)); } memman_free_4k(memman, (int) p, finfo->size); memman_free_4k(memman, (int) q, 64 * 1024); cons_newline(cons); return 1; } /* ファイルが見つからなかった場合 */ return 0; }
int cmd_app (struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *)MEMMAN_ADDR; struct FILEINFO *finfo; struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *)ADR_GDT; char name [18]; int i; struct TASK *task = task_now (); for (i = 0; i < 13; i++) { if (cmdline[i] <= ' ') { break; } name[i] = cmdline[i]; } name[i] = 0; finfo = file_search (name, (struct FILEINFO *)(ADR_DISKIMG + 0x002600), 224); if (finfo == 0 && name[i-1] != '.') { name [i+0] = '.'; name [i+1] = 'H'; name [i+2] = 'R'; name [i+3] = 'B'; name [i+4] = 0; finfo = file_search (name, (struct FILEINFO *)(ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { char *p = (char *)memman_alloc_4k (memman, finfo->size); char *q = (char *)memman_alloc_4k (memman, 64 * 1024); *((int *) 0xfe8) = (int) p; file_loadfile (finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); set_segmdesc (gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER + 0x60); set_segmdesc (gdt + 1004, 64 * 1024 - 1, (int) q, AR_DATA32_RW + 0x60); if (finfo->size >= 8 && strncmp (p + 4, "Hari", 4) == 0) { p[0] = 0xe8; p[1] = 0x16; p[2] = 0x00; p[3] = 0x00; p[4] = 0x00; p[5] = 0xcb; } start_app (0, 1003 * 8, 64 * 1024, 1004 * 8, &(task->tss.esp0)); memman_free_4k (memman, (int) p, finfo->size); memman_free_4k (memman, (int) q, 64 * 1024); cons_newline (cons); return 1; } return 0; }
void cons_putchar(struct CONSOLE *cons, int chr, char move) { char s[2]; s[0] = chr; s[1] = 0; if (s[0] == 0x09) { // tab for (;;) { bps(cons->sht, cons->cur_x, cons->cur_y, COL8_000084, COL8_FFFFFF," ", 1); cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } if (((cons->cur_x - 8) & 0x1f) == 0) { break; // 32n } } } else if (s[0] == 0x0a) { // enter cons_newline(cons); } else if (s[0] == 0x0d) { } else { bps(cons->sht, cons->cur_x, cons->cur_y, COL8_000084,COL8_FFFFFF, s, 1); if (move != 0) { cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } } } return; }
void cons_putchar(struct CONSOLE *cons, int chr, char move) { char s[2]; s[0] = chr; s[1] = 0; if (s[0] == 0x09) { /* �� */ for (;;) { if (cons->sht != 0) { putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, " ", 1); } cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } if (((cons->cur_x - 8) & 0x1f) == 0) { break; /* 32�� ������ �������� break */ } } } else if (s[0] == 0x0a) { /* ���� */ cons_newline(cons); } else if (s[0] == 0x0d) { /* ���� */ /* �켱 �ƹ��͵� ���� �ʴ´� */ } else { /* ���� ���� */ if (cons->sht != 0) { putfonts8_asc_sht(cons->sht, cons->cur_x, cons->cur_y, COL8_FFFFFF, COL8_000000, s, 1); } if (move != 0) { /* move�� 0�� ���� Ŀ���� �����Ű�� �ʴ´� */ cons->cur_x += 8; if (cons->cur_x == 8 + 240) { cons_newline(cons); } } } return; }
void cmd_start(struct CONSOLE *cons, char *cmdline, int memtotal) { struct SHTCTL *shtctl = (struct SHTCTL *) *((int *) 0x0fe4); struct SHEET *sht = open_console(shtctl, memtotal); struct FIFO32 *fifo = &sht->task->fifo; int i; sheet_slide(sht, 32, 4); sheet_updown(sht, shtctl->top); /* コマンドラインに入力された文字列を、一文字ずつ新しいコンソールに入力 */ for (i = 6; cmdline[i] != 0; i++) { fifo32_put(fifo, cmdline[i] + 256); } fifo32_put(fifo, 10 + 256); /* Enter */ cons_newline(cons); return; }
void cmd_type (struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *)MEMMAN_ADDR; struct FILEINFO *finfo = file_search (cmdline + 5, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo != 0) { // Find file char *p = (char *)memman_alloc_4k (memman, finfo->size); file_loadfile (finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); cons->cur_x = 8; // output char cons_putstr1 (cons, p, finfo->size); memman_free_4k (memman, (int) p, finfo->size); } else { // When no file found cons_putstr0 (cons, "File not found.\n"); } cons_newline (cons); return; }
int cmd_app(struct CONSOLE *cons, int *fat, char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo; struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char name[18], *p; int i; for (i = 0; i < 13; i++) { if (cmdline[i] <= ' ') { break; } name[i] = cmdline[i]; } name[i] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo == 0 && name[i-1] != '.') { /* * If the file cannot be found * Search <filename>.hrb instead */ name[i] = '.'; name[i + 1] = 'H'; name[i + 2] = 'R'; name[i + 3] = 'B'; name[i + 4] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { /* File is found */ p = (char *) memman_alloc_4k(memman, finfo->size); file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); /* Assign 1003 Segment */ set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER); farcall(0, 1003 * 8); memman_free_4k(memman, (int) p, finfo->size); cons_newline(cons); return 1; } return 0; }
int cmd_app(struct CONSOLE *cons, int *fat,char *cmdline) { struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; struct FILEINFO *finfo = file_search("HLT.HRB", (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; char *p,name[18]; int i; for(i=0;i <13; i++) { if(cmdline[i] <= ' ') break; name[i] = cmdline[i]; } name[i] = 0; finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); if (finfo == 0 && name[i - 1] != '.') { name[i] = '.'; name[i+1] = 'H'; name[i+2] = 'R'; name[i+3] = 'B'; name[i+4] = 0; // search the file again finfo = file_search(name, (struct FILEINFO *) (ADR_DISKIMG + 0x002600), 224); } if (finfo != 0) { // found file p = (char *) memman_alloc_4k(memman, finfo->size); *((int *) 0xfe8) = (int) p; file_loadfile(finfo->clustno, finfo->size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); set_segmdesc(gdt + 1003, finfo->size - 1, (int) p, AR_CODE32_ER); farcall(0, 1003 * 8); // call memman_free_4k(memman, (int) p, finfo->size); cons_newline(cons); return 1; } return 0; }
void console_task(struct SHEET *sheet, unsigned int memtotal) { struct TIMER *timer; struct TASK *task = task_now(); int i, fifobuf[128], cursor_x = 16, cursor_y = 28, cursor_c = -1; char s[30], cmdline[30]; struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; int x, y; fifo32_init(&task->fifo, 128, fifobuf, task); timer = timer_alloc(); timer_init(timer, &task->fifo, 1); timer_settime(timer, 50); /* プロンプト表示 */ putfonts8_asc_sht(sheet, 8, 28, COL8_FFFFFF, COL8_000000, ">", 1); for (;;) { io_cli(); if (fifo32_status(&task->fifo) == 0) { task_sleep(task); io_sti(); } else { i = fifo32_get(&task->fifo); io_sti(); if (i <= 1) { /* カーソル用タイマ */ if (i != 0) { timer_init(timer, &task->fifo, 0); /* 次は0を */ if (cursor_c >= 0) { cursor_c = COL8_FFFFFF; } } else { timer_init(timer, &task->fifo, 1); /* 次は1を */ if (cursor_c >= 0) { cursor_c = COL8_000000; } } timer_settime(timer, 50); } if (i == 2) { /* カーソルON */ cursor_c = COL8_FFFFFF; } if (i == 3) { /* カーソルOFF */ boxfill8(sheet->buf, sheet->bxsize, COL8_000000, cursor_x, cursor_y, cursor_x + 7, cursor_y + 15); cursor_c = -1; } if (256 <= i && i <= 511) { /* キーボードデータ(タスクA経由) */ if (i == 8 + 256) { /* バックスペース */ if (cursor_x > 16) { /* カーソルをスペースで消してから、カーソルを1つ戻す */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, " ", 1); cursor_x -= 8; } } else if (i == 10 + 256) { /* Enter */ /* カーソルをスペースで消してから改行する */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, " ", 1); cmdline[cursor_x / 8 - 2] = 0; cursor_y = cons_newline(cursor_y, sheet); /* コマンド実行 */ if (strcmp(cmdline, "mem") == 0) { /* memコマンド */ sprintf(s, "total %dMB", memtotal / (1024 * 1024)); putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, s, 30); cursor_y = cons_newline(cursor_y, sheet); sprintf(s, "free %dKB", memman_total(memman) / 1024); putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, s, 30); cursor_y = cons_newline(cursor_y, sheet); cursor_y = cons_newline(cursor_y, sheet); } else if (strcmp(cmdline, "cls") == 0) { /* clsコマンド */ for (y = 28; y < 28 + 128; y++) { for (x = 8; x < 8 + 240; x++) { sheet->buf[x + y * sheet->bxsize] = COL8_000000; } } sheet_refresh(sheet, 8, 28, 8 + 240, 28 + 128); cursor_y = 28; } else if (cmdline[0] != 0) { /* コマンドではなく、さらに空行でもない */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, "Bad command.", 12); cursor_y = cons_newline(cursor_y, sheet); cursor_y = cons_newline(cursor_y, sheet); } /* プロンプト表示 */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, ">", 1); cursor_x = 16; } else { /* 一般文字 */ if (cursor_x < 240) { /* 一文字表示してから、カーソルを1つ進める */ s[0] = i - 256; s[1] = 0; cmdline[cursor_x / 8 - 2] = i - 256; putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, s, 1); cursor_x += 8; } } } /* カーソル再表示 */ if (cursor_c >= 0) { boxfill8(sheet->buf, sheet->bxsize, cursor_c, cursor_x, cursor_y, cursor_x + 7, cursor_y + 15); } sheet_refresh(sheet, cursor_x, cursor_y, cursor_x + 8, cursor_y + 16); } } }
void console_task(struct SHEET *sheet, unsigned int memtotal) { int fifobuf[128]; struct TASK *task = task_now(); struct TIMER *timer; struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; int *fat = (int *) memman_alloc_4k(memman, 4 * 2880); struct CONSOLE cons = {sheet, 8, 28, -1}; int i; char cmdline[30]; *((int *) 0x0fec) = (int) &cons; fifo32_init(&task->fifo, 128, fifobuf, task); timer = timer_alloc(); timer_init(timer, &task->fifo, 1); timer_settime(timer, 50); file_readfat(fat, (unsigned char *) (ADR_DISKIMG + 0x000200)); // 将FAT展开到fat中 /* 显示提示符 */ cons_putchar(&cons, '>', 1); for (;;) { io_cli(); if (fifo32_status(&task->fifo) == 0) { task_sleep(task); io_sti(); } else { i = fifo32_get(&task->fifo); io_sti(); if (i <= 1) { /* 光标用定时器 */ if (i != 0) { timer_init(timer, &task->fifo, 0); /* 下次置0 */ if (cons.cur_c >= 0) { cons.cur_c = COL8_FFFFFF; } } else { timer_init(timer, &task->fifo, 1); /* 下次置1 */ if (cons.cur_c >= 0) { cons.cur_c = COL8_000000; } } timer_settime(timer, 50); } // 光标ON、OFF功能用于窗口切换时 if (i == 2) { /* 光标ON */ cons.cur_c = COL8_FFFFFF; } if (i == 3) { /* 光标OFF */ boxfill8(sheet->buf, sheet->bxsize, COL8_000000, cons.cur_x, cons.cur_y, cons.cur_x + 7, cons.cur_y + 15); cons.cur_c = -1; } if (256 <= i && i <= 511) { /* 键盘数据(通过任务A) */ if (i == 8 + 256) { /* 退格键 */ if (cons.cur_x > 16) { /* 用空白擦除光标后将光标前移一位 */ cons_putchar(&cons, ' ', 0); cons.cur_x -= 8; } } else if (i == 10 + 256) { /* 回车键 */ /* 将光标用空格擦除后换行 */ cons_putchar(&cons, ' ', 0); cmdline[cons.cur_x / 8 - 2] = 0; cons_newline(&cons); cons_runcmd(cmdline, &cons, fat, memtotal); /* 运行命令 */ /* 显示提示符 */ cons_putchar(&cons, '>', 1); } else { /* 一般字符 */ if (cons.cur_x < 240) { /* 显示一个字符之后将光标后移一位 */ cmdline[cons.cur_x / 8 - 2] = i - 256; cons_putchar(&cons, i - 256, 1); } } } /* 重新显示光标 */ if (cons.cur_c >= 0) { boxfill8(sheet->buf, sheet->bxsize, cons.cur_c, cons.cur_x, cons.cur_y, cons.cur_x + 7, cons.cur_y + 15); } sheet_refresh(sheet, cons.cur_x, cons.cur_y, cons.cur_x + 8, cons.cur_y + 16); } } }
/* 控制台任务 */ void console_task(struct SHEET *sheet, unsigned int memtotal) { struct TIMER *timer; struct TASK *task = task_now(); int i, fifobuf[128], cursor_x = 16, cursor_y = 28, cursor_c = -1; char s[30], cmdline[30], *p; struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; int x, y; struct FILEINFO *finfo = (struct FILEINFO *) (ADR_DISKIMG + 0x002600); int *fat = (int *) memman_alloc_4k(memman, 4 * 2880); struct SEGMENT_DESCRIPTOR *gdt = (struct SEGMENT_DESCRIPTOR *) ADR_GDT; fifo32_init(&task->fifo, 128, fifobuf, task); timer = timer_alloc(); timer_init(timer, &task->fifo, 1); timer_settime(timer, 50); file_readfat(fat, (unsigned char *) (ADR_DISKIMG + 0x000200)); /* 输出一个">" */ putfonts8_asc_sht(sheet, 8, 28, COL8_FFFFFF, COL8_000000, ">", 1); for (;;) { io_cli(); if (fifo32_status(&task->fifo) == 0) { /* 控制台任务自己的缓冲区中没有数据 */ task_sleep(task); /* 睡眠自己 */ io_sti(); } else { i = fifo32_get(&task->fifo); /* 读出数据 */ io_sti(); if (i <= 1) { /* 光标用定时器 */ if (i != 0) { timer_init(timer, &task->fifo, 0); /* 下面是设定0 */ if (cursor_c >= 0) { /* 如果需要显示光标 */ cursor_c = COL8_FFFFFF; } } else { timer_init(timer, &task->fifo, 1); /* 下面是设定1 */ if (cursor_c >= 0) { /* 如果需要显示光标 */ cursor_c = COL8_000000; } } timer_settime(timer, 50); /* 设置半秒 */ } if (i == 2) { /* 光标ON */ cursor_c = COL8_FFFFFF; } if (i == 3) { /* 光标OFF */ /* 直接用黑色将原来光标的位置消去 */ boxfill8(sheet->buf, sheet->bxsize, COL8_000000, cursor_x, cursor_y, cursor_x + 7, cursor_y + 15); cursor_c = -1; } if (256 <= i && i <= 511) { /* 任务A传送过来的键盘的数据 */ if (i == 8 + 256) { /* 注意!在任务A中已经将键值转换成字符的ASCII码了 */ /* 退格键 */ if (cursor_x > 16) { /* 用空格把光标消去之后 光标向左移8个像素点 */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, " ", 1); cursor_x -= 8; } } else if (i == 10 + 256) { /* 如果是回车 (10是换行符的ASCII码) */ /* Enter */ /* 用空格将光标擦除 */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, " ", 1); cmdline[cursor_x / 8 - 2] = 0; /* 计算前面有几个字符 在字符的后面加上'\0' */ /* 加'\0'是因为C语言中字符串都是以它结尾的 */ /* 减2是减去'\0'的位置还有一个回车的位置 所*/ /* 以最后'\0'是刚好在最后一个字符后面 */ cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ /* 执行命令 */ if (strcmp(cmdline, "mem") == 0) { /* mem命令 */ /* 输出内存总大小和空闲内存大小 */ sprintf(s, "total %dMB", memtotal / (1024 * 1024)); putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, s, 30); cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ sprintf(s, "free %dKB", memman_total(memman) / 1024); putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, s, 30); cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ } else if (strcmp(cmdline, "cls") == 0) { /* cls命令 */ /* 最简单。。每个像素都设为黑色..... */ for (y = 28; y < 28 + 128; y++) { for (x = 8; x < 8 + 240; x++) { sheet->buf[x + y * sheet->bxsize] = COL8_000000; } } sheet_refresh(sheet, 8, 28, 8 + 240, 28 + 128); cursor_y = 28; } else if (strcmp(cmdline, "dir") == 0) { /* dir命令 */ for (x = 0; x < 224; x++) { /* 遍历所有的根目录条目 */ /* 这个224是在ipl10中定义的 */ if (finfo[x].name[0] == 0x00) { /* 该条目不包含任何文件信息 */ break; } if (finfo[x].name[0] != 0xe5) { /* 该条目包含文件信息 */ if ((finfo[x].type & 0x18) == 0) { /* 该条目记录的不是目录 也不是非文件信息 */ sprintf(s, "filename.ext %7d", finfo[x].size); for (y = 0; y < 8; y++) { /* 设置文件名 */ s[y] = finfo[x].name[y]; } s[ 9] = finfo[x].ext[0]; /* 设置扩展名 */ s[10] = finfo[x].ext[1]; s[11] = finfo[x].ext[2]; putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, s, 30); cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ } } } cursor_y = cons_newline(cursor_y, sheet); /* 换行 */ } else if (strncmp(cmdline, "type ", 5) == 0) { /* type命令 */ /* 准备文件名 */ for (y = 0; y < 11; y++) { s[y] = ' '; } y = 0; for (x = 5; y < 11 && cmdline[x] != 0; x++) { if (cmdline[x] == '.' && y <= 8) { y = 8; } else { s[y] = cmdline[x]; if ('a' <= s[y] && s[y] <= 'z') { /* 将小写字母转换成大写字母 */ s[y] -= 0x20; } y++; } } /* 寻找文件 */ for (x = 0; x < 224; ) { if (finfo[x].name[0] == 0x00) { /* 该条目不包含任何文件信息 */ break; } if ((finfo[x].type & 0x18) == 0) { /* 该条目记录的不是目录 也不是非文件信息 */ for (y = 0; y < 11; y++) { if (finfo[x].name[y] != s[y]) { goto type_next_file; } } break; /* 找到文件就退出循环 */ } type_next_file: x++; } if (x < 224 && finfo[x].name[0] != 0x00) { /* 找到文件的情况 */ /* 分配内存 这块内存用于存放文件的内容 */ p = (char *) memman_alloc_4k(memman, finfo[x].size); /* 将软盘中该文件的内容复制到p指向的内存中 */ file_loadfile(finfo[x].clustno, finfo[x].size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); cursor_x = 8; for (y = 0; y < finfo[x].size; y++) { /* 逐个输出文件中的内容 */ s[0] = p[y]; s[1] = 0; if (s[0] == 0x09) { /* 制表符 */ for (;;) { /* 这一小段就不注释了,偷下懒 书中解释的很详细 */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, " ", 1); cursor_x += 8; if (cursor_x == 8 + 240) { cursor_x = 8; cursor_y = cons_newline(cursor_y, sheet); } if (((cursor_x - 8) & 0x1f) == 0) { break; /* 被32整除则break */ } } } else if (s[0] == 0x0a) { /* 换行 */ cursor_x = 8; cursor_y = cons_newline(cursor_y, sheet); } else if (s[0] == 0x0d) { /* 回车 */ /* 忽略 */ } else { /* 一般字符 */ putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, s, 1); cursor_x += 8; if (cursor_x == 8 + 240) { cursor_x = 8; cursor_y = cons_newline(cursor_y, sheet); } } } /* 输出完毕 将刚申请的内存空间释放掉 */ memman_free_4k(memman, (int) p, finfo[x].size); } else { /* 文件没有找到 */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, "File not found.", 15); cursor_y = cons_newline(cursor_y, sheet); } cursor_y = cons_newline(cursor_y, sheet); } else if (strcmp(cmdline, "hlt") == 0) { /* 调用应用程序 */ for (y = 0; y < 11; y++) { s[y] = ' '; } /* 设置文件名 */ s[0] = 'H'; s[1] = 'L'; s[2] = 'T'; s[8] = 'H'; s[9] = 'R'; s[10] = 'B'; /* 查找文件 */ for (x = 0; x < 224; ) { if (finfo[x].name[0] == 0x00) { break; } if ((finfo[x].type & 0x18) == 0) { for (y = 0; y < 11; y++) { if (finfo[x].name[y] != s[y]) { goto hlt_next_file; } } break; /* 找到文件 */ } hlt_next_file: x++; } if (x < 224 && finfo[x].name[0] != 0x00) { /* 找到文件的情况 */ /* 分配一块内存 文件将被加载到这个并执行 */ p = (char *) memman_alloc_4k(memman, finfo[x].size); /* 将文件的内容复制到p指向的缓冲区 */ file_loadfile(finfo[x].clustno, finfo[x].size, p, fat, (char *) (ADR_DISKIMG + 0x003e00)); /* 为我们的应用程序创建一个描述符 */ set_segmdesc(gdt + 1003, finfo[x].size - 1, (int) p, AR_CODE32_ER); /* 跳转到应用程序执行 */ farjmp(0, 1003 * 8); /* 释放内存 */ memman_free_4k(memman, (int) p, finfo[x].size); } else { /* 文件没有找到 */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, "File not found.", 15); cursor_y = cons_newline(cursor_y, sheet); } cursor_y = cons_newline(cursor_y, sheet); } else if (cmdline[0] != 0) { /* 控制台有输入但不是上面的命令 */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, "Bad command.", 12); cursor_y = cons_newline(cursor_y, sheet); cursor_y = cons_newline(cursor_y, sheet); } /* 输出一个'>' */ putfonts8_asc_sht(sheet, 8, cursor_y, COL8_FFFFFF, COL8_000000, ">", 1); cursor_x = 16; } else { /* 一般字符 */ if (cursor_x < 240) { /* 显示一个字符后光标向右移8个像素点 */ s[0] = i - 256; s[1] = 0; cmdline[cursor_x / 8 - 2] = i - 256; putfonts8_asc_sht(sheet, cursor_x, cursor_y, COL8_FFFFFF, COL8_000000, s, 1); cursor_x += 8; } } } /* 如果需要显示光标 */ if (cursor_c >= 0) { boxfill8(sheet->buf, sheet->bxsize, cursor_c, cursor_x, cursor_y, cursor_x + 7, cursor_y + 15); } sheet_refresh(sheet, cursor_x, cursor_y, cursor_x + 8, cursor_y + 16); } } }
void console_task(struct SHEET *sheet, unsigned int memtotal) { struct TIMER *timer; struct TASK *task = task_now(); struct MEMMAN *memman = (struct MEMMAN *) MEMMAN_ADDR; int i, fifobuf[128], *fat = (int *) memman_alloc_4k(memman, 4 * 2880); struct CONSOLE cons; char cmdline[30]; cons.sht = sheet; cons.cur_x = 8; cons.cur_y = 28; cons.cur_c = -1; *((int *) 0x0fec) = (int) &cons; fifo32_init(&task->fifo, 128, fifobuf, task); timer = timer_alloc(); timer_init(timer, &task->fifo, 1); timer_settime(timer, 50); file_readfat(fat, (unsigned char *) (ADR_DISKIMG + 0x000200)); /* プロンプト表示 */ cons_putchar(&cons, '>', 1); for (;;) { io_cli(); if (fifo32_status(&task->fifo) == 0) { task_sleep(task); io_sti(); } else { i = fifo32_get(&task->fifo); io_sti(); if (i <= 1) { /* カーソル用タイマ */ if (i != 0) { timer_init(timer, &task->fifo, 0); /* 次は0を */ if (cons.cur_c >= 0) { cons.cur_c = COL8_FFFFFF; } } else { timer_init(timer, &task->fifo, 1); /* 次は1を */ if (cons.cur_c >= 0) { cons.cur_c = COL8_000000; } } timer_settime(timer, 50); } if (i == 2) { /* カーソルON */ cons.cur_c = COL8_FFFFFF; } if (i == 3) { /* カーソルOFF */ boxfill8(sheet->buf, sheet->bxsize, COL8_000000, cons.cur_x, cons.cur_y, cons.cur_x + 7, cons.cur_y + 15); cons.cur_c = -1; } if (256 <= i && i <= 511) { /* キーボードデータ(タスクA経由) */ if (i == 8 + 256) { /* バックスペース */ if (cons.cur_x > 16) { /* カーソルをスペースで消してから、カーソルを1つ戻す */ cons_putchar(&cons, ' ', 0); cons.cur_x -= 8; } } else if (i == 10 + 256) { /* Enter */ /* カーソルをスペースで消してから改行する */ cons_putchar(&cons, ' ', 0); cmdline[cons.cur_x / 8 - 2] = 0; cons_newline(&cons); cons_runcmd(cmdline, &cons, fat, memtotal); /* コマンド実行 */ /* プロンプト表示 */ cons_putchar(&cons, '>', 1); } else { /* 一般文字 */ if (cons.cur_x < 240) { /* 一文字表示してから、カーソルを1つ進める */ cmdline[cons.cur_x / 8 - 2] = i - 256; cons_putchar(&cons, i - 256, 1); } } } /* カーソル再表示 */ if (cons.cur_c >= 0) { boxfill8(sheet->buf, sheet->bxsize, cons.cur_c, cons.cur_x, cons.cur_y, cons.cur_x + 7, cons.cur_y + 15); } sheet_refresh(sheet, cons.cur_x, cons.cur_y, cons.cur_x + 8, cons.cur_y + 16); } } }