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		EBXRET

23.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;
}