30天自制操作系统（第23天）
23.1 编写malloc
参考第22天的内容，在绘制窗口前先分配了150*50个字节大小的内存，所以导致该文件经编译后有7.6k左右，能否在其中使用指针呢？当需要开辟空间时，移动指针即可。在之前的章节中也有函数memman_alloc函数可分配内存空间，所以在该节中将都用到这个函数。
按照下表对api的设计，编写a_nask.nas中的相关函数，以及增加console.c文件中对edx的判断。
| memman 初始化 | malloc | free |
| EDX=8 EBX=memman 的地址 EAX=memman 所管理的内存空间的起始地址 ECX=memman 所管理的内存空间的字节数 | EDX=9 EBX=memman 的地址 ECX= 需要请求的字节数 EAX= 分配到的内存空间地址 | EDX=10 EBX=memman 的地址 EAX= 需要释放的内存空间地址 ECX= 需要释放的字节数 |
_api_initmalloc: ; void api_initmalloc(void);PUSH EBXMOV EDX,8MOV EBX,[CS:0x0020] ; 初始化地址 P494页 0x0020 (DWORD) ……malloc空间的起始地址MOV EAX,EBX ADD EAX,32*1024 ;分配了32k内存MOV ECX,[CS:0x0000]SUB ECX,EAX ;包括前32位数据（文件信息）以及32k内存INT 0x40POP EBXRET_api_malloc: ;char *api_malloc(int size)PUSH EBXMOV EDX,9MOV EBX,[CS:0x0020]MOV ECX,[ESP+8] ;sizeINT 0x40POP EBXRET_api_free: ;void api_free(char *addr, int size)PUSH EBXMOV EDX,10MOV EBX,[CS:0x0020]MOV EAX,[ESP+8] ;addrMOV ECX,[ESP+12] ;sizeINT 0x40POP EBXRET23.2 画点
该节实现绘制一个点的功能，下面先介绍一下API的设计：
EDX =11
EBX = 窗口句柄
ESI = 显示位置的 x 坐标
EDI = 显示位置的 y 坐标
EAX = 色号
/* a_nask.nas */
_api_point: ;void api_point(int win, int x, int y, int col);PUSH EDIPUSH ESIPUSH EBXMOV EDX,11MOV EBX,[ESP+16] ;winMOV ESI,[ESP+20] ;xMOV EDI,[ESP+24] ;yMOV EAX,[ESP+28] ;colINT 0X40POP EBXPOP ESIPOP EDIRET/* console.c */
if(edx == 11){//api_pointsht = (struct SHEET *) ebx;sht->buf[sht->bxsize * edi + esi] = eax;//修改某个点的颜色sheet_refresh(sht, esi, edi, esi + 1, edi + 1);
}23.3 刷新窗口
考虑到每次绘制一个点都需要进行一次刷新，不如将所有点画好后刷新一次画面来的快，所以该节实现 刷新窗口的功能，下面先介绍一下API的设计：
EDX = 12
EBX = 窗口句柄
EAX = x0
ECX = y0
ESI = x1
EDI = y1
如下操作：sht = (struct SHEET *) (ebx&0xfffffffe);的目的为，窗口句柄归根到底是struct SHEET的地址，这一定是一个偶数，所以使ebx为字符串的地址进行运算。ebx&1 == 0是判断ebx作为字符串的地址，是否为空，如果为空则刷新图层。
/* a_nask.nas */
_api_refreshwin: ;void api_refreshwin(int win, int x0, int y0, int x1, int y1);PUSH EDIPUSH ESIPUSH EBXMOV EDX,12MOV EBX,[ESP+16] ;winMOV EAX,[ESP+20] ;x0MOV ECX,[ESP+24] ;y0MOV ESI,[ESP+28] ;x1MOV EDI,[ESP+32] ;y1INT 0X40POP EBXPOP ESIPOP EDIRET/* console.c */
int *hrb_api(int edi, int esi, int ebp, int esp, int ebx, int edx, int ecx, int eax){(中略)if(edx == 1)cons_putchar(cons, eax&0xff, 1);else if(edx == 2)cons_putstr0(cons, (char*)ebx+ds_base);else if(edx == 3)cons_putstr1(cons, (char*)ebx+ds_base, ecx);else if(edx == 4) return &(task->tss.esp0); else if(edx == 5){(中略)}else if(edx == 6){
/*这里*/sht = (struct SHEET *) (ebx&0xfffffffe);(中略)
/*这里*/if(ebx&1 == 0)
/*这里*/ sheet_refresh(sht, eax, ecx, esi + 1, edi + 1);}else if(edx == 8){//memman初始化(中略)}else if(edx == 9){//malloc(中略)}else if(edx == 10){//freeecx = (ecx+0x0f)&0xfffffff0;//所释放的内存空间的字节数memman_free((struct MEMMAN *) (ebx + ds_base), eax, ecx);}else if(edx == 11){//api_point
/*这里*/ sht = (struct SHEET *) (ebx&0xfffffffe);sht->buf[sht->bxsize * edi + esi] = eax;
/*这里*/ if(ebx&1 == 0)//当ebx的最低位为0，也就是没有字符串需要打印时，刷新图层
/*这里*/ sheet_refresh(sht, esi, edi, esi + 1, edi + 1);}else if(edx == 12){
/*这里*/ sht = (struct SHEET *) ebx;
/*这里*/ sheet_refresh(sht, eax, ecx, esi, edi);}return 0;
}23.4 画直线
在窗口上画直线： EDX = 13 EBX = 窗口句柄 EAX = x0 ECX = y0 ESI = x1 EDI = y1 EBP = 色号。考虑画的是直线，如果点间隙较大则会变成虚线，较小则会可能出现在一个坐标上多次花点浪费时间，所以选择将坐标跨度较大的间隙分为1024，直接看代码。
/* a_nash.nas */
_api_linewin: ;void api_linewin(int win, int x0, int y0, int x1, int y1, int col);PUSH EDIPUSH ESIPUSH EBPPUSH EBXMOV EDX,13MOV EBX,[ESP+20] ;winMOV EAX,[ESP+24] ;x0MOV ECX,[ESP+28] ;y0MOV ESI,[ESP+32] ;x1MOV EDI,[ESP+36] ;y1MOV EBP,[ESP+40] ;colINT 0X40POP EBXPOP EBPPOP ESIPOP EDIRET/* console.c */
if(edx == 13){sht = (struct SHEET *) (ebx&0xfffffffe);hrb_api_linewin(sht, eax, ecx, esi, edi, ebp);if(ebx&1 == 0)//当ebx的最低位为0，也就是没有字符串需要打印时，刷新图层sheet_refresh(sht, eax, ecx, esi, edi);
}void hrb_api_linewin(struct SHEET *sht, int x0, int y0, int x1, int y1,int col){int i, x, y, len, dx, dy;dx = x1-x0;dy = y1-y0;x = x0<<10;y = y0<<10;if(dx < 0)dx = -dx;if(dy < 0)dy = -dy;if(dx >= dy){len = dx+1;if(x0 > x1)dx = -1024;else dx = 1024;if(y0 <= y1)dy = ((y1-y0+1)<<10)/len;else dy = ((y1-y0-1)<<10)/len;//-(y0-y1+1) = y1-y0-1}else{len = dy+1;if(y0 > y1)dy = -1024;else dy = 1024;if(x0 <= x1)dx = ((x1-x0+1)<<10)/len;else dx = ((x1-x0-1)<<10)/len;}for(i = 0; i < len; i++){sht->buf[(y>>10)*sht->bxsize+(x>>10)] = col;x += dx;y += dy;}return;
}
23.5 关闭窗口
关闭窗口：EDX=14 EBX= 窗口句柄。sheet_free()函数是释放已使用的图层。
/* a_nask.nas */
_api_closewin: ;void api_closewin(int win);PUSH EBXMOV EDX,14MOV EBX,[ESP+8] ;winINT 0X40POP EBXRET/* console.c */
if(edx == 14){//关闭窗口sheet_free((struct SHEET *) ebx);
}23.6 键盘输入API
该节主要实现的功能为：当按下回车键时关闭lines窗口。
键盘输入：EDX = 15 EAX = 0…… 没有键盘输入时返回 -1 ，不休眠
= 1……休眠直到发生键盘输入
EAX = 输入的字符编码
参照console_task()函数编写函数，当eax！=0时则进入休眠状态，否则没有键盘输入返回值eax为-1（reg[7]存放的是寄存器eax）。当输入键盘数据时，则更新eax寄存器中的值。
为了设置定时器我们需要 timer的地址，不过这是 console_task 中的变量，hrb_api是无法获取的，所以在CONSOLE结构体中增加元素struct TIMER *timer; 因此还修改了 console_task ，去掉 timer 变量，以 cons.timer 取而代之。
/* a_nask.nas */
_api_getkey: ;int api_getkey(int mode);MOV EDX,15MOV EAX,[ESP+4]INT 0X40RET/* console.c */
if(edx == 15){for(;;){io_cli();if(fifo32_status(&task->fifo) == 0){if(eax != 0)task_sleep(task);//休眠else{//没有键盘输入时返回-1，不休眠io_sti();reg[7] = -1;return 0;}}i = fifo32_get(&task->fifo);if(i <= 1){//光标/*应用程序运行时不需要显示光标，因此总是将下次显示用的值置为1*/timer_init(cons->timer, &task->fifo, 1);timer_settime(cons->timer, 50);}if(i == 2)cons->cur_c = COL8_FFFFFF;/*光标ON */if(i == 3)cons->cur_c = -1;/*光标OFF */if(256 <= i && i <= 511){reg[7] = i-256;return 0;}}
}23.7 强制结束并关闭窗口
在运行 walk.hrb 和 lines.hrb 时，如果不按回车键结束，而是按Shift+F1强制结束程序的话，窗口就会残留在画面上。
首先，在 struct SHEET 中添加一个用来存放 task的成员，当应用程序结束时，查询所有的图层，如果图层的 task为将要结束的应用程序任务，则关闭该图层。
int cmd_app(struct CONSOLE *cons, int *fat, char *cmdline){int segsiz, datsiz, esp, dathrb;
/*这里*/struct SHEET *sht;
/*这里*/struct SHTCTL *shtctl;(中略)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){(中略)start_app(0x1b, 1003 * 8, esp, 1004*8, &(task->tss.esp0));
/*从这里开始*/shtctl = (struct SHTCTL *) *((int *) 0x0fe4);/*从这里开始*/for(i = 0; i < MAX_SHEETS; i++){sht = &(shtctl->sheets0[i]);if(sht->flags != 0 && sht->task == task)sheet_free(sht);
/*到这里结束*/}memman_free_4k(memman, (int) q, segsiz);}elsecons_putstr0(cons, ".hrb file format error.\n");memman_free_4k(memman, (int) p, finfo->size);cons_newline(cons);return 1;}return 0;
}