/* gui.c This file is part of the "First" CPU simulator project. Copyright (c) 2024 Efthymios Kritikos This program 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 3 of the License, or (at your option) any later version. This program 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 this program. If not, see . */ #include #include #include "simdata.h" #include "assembly.h" #include #include "cpu.h" #define GENERAL_STACK_MAX_WIDTH 16 #define GENERAL_DISAS_WIDTH 41 int terminal_width; int terminal_height; WINDOW *tabs; WINDOW *general_memdump; WINDOW *general_stack; WINDOW *general_disas; WINDOW *general_registers; int monochrome; int get_terminal_size(){ int new_height,new_width; getmaxyx(stdscr,new_height,new_width); int changed=(new_width!=terminal_width)||(new_height!=terminal_height); terminal_width=new_width; terminal_height=new_height; return changed; } int gui_ncurses_refresh(){ if(refresh()==ERR) return 1; if(wrefresh(tabs)==ERR) return 1; if(wrefresh(general_memdump)==ERR) return 1; if(wrefresh(general_stack)==ERR) return 1; if(wrefresh(general_disas)==ERR) return 1; if(wrefresh(general_registers)==ERR) return 1; return 0; } char *tab_name[]={"Overview","Memory","Internal"}; unsigned int CURRENT_TAB=0; enum CPU_STATE_t CPU_STATE=SINGLE_STEPPING; void update_tabs(){ wattron(tabs,A_BOLD); wattron(tabs,COLOR_PAIR(2)); for(int i=0;iGENERAL_DISAS_WIDTH?GENERAL_DISAS_WIDTH:(terminal_width/6); general_disas=newwin(y1_divider,len,4,x); x+=len; x+=3; len=(terminal_width/6)>GENERAL_STACK_MAX_WIDTH?GENERAL_STACK_MAX_WIDTH:(terminal_width/6); general_stack=newwin(y1_divider,len,4,x); x+=len; general_registers=newwin(terminal_height-y1_divider-border-1,terminal_width/2,y1_divider+border+1,border); x+=terminal_width/2; x++; if(gui_ncurses_refresh()) return 1; return 0; } int gui_error(char *str){ WINDOW *error_win = newwin(3,40,terminal_height/2-1,terminal_width/2-20); box(error_win, 0 , 0); if(!monochrome) wattron(error_win,COLOR_PAIR(1)); mvwprintw(error_win,1,1,"%s",str); if(wrefresh(error_win)==ERR) return 1; getch(); delwin(error_win); return 0; if(!monochrome) wattroff(error_win,COLOR_PAIR(1)); } int update_general_disas(struct simdata_t *simdata){ werase(general_disas); int width,height; getmaxyx(general_disas,height,width); box(general_disas, 0 , 0); int offset_arrow; if(width<41) offset_arrow=2; else offset_arrow=3; mvwprintw(general_disas,0,width/2-7,"[ DISASSEMBLY ]"); if(width<18){ mvwprintw(general_disas,1,1,"too small window"); }else{ uint32_t ADDRESS=(simdata->PC-(height/2-2)*4)&0x00FFFFFF; for (int i=2;iPC) wattron(general_disas,A_BOLD); mvwprintw(general_disas,i,4+overall_offset,"%06X",ADDRESS); char* disas=disassemble(*(uint32_t*)(simdata->RAM+ADDRESS)); int space_left=width-14-2+(overall_offset?0:1); if(space_left<25) disas[space_left+1]=0; mvwprintw(general_disas,i,13+overall_offset,"%s",disas); if(ADDRESS==simdata->PC) wattroff(general_disas,A_BOLD); ADDRESS=(ADDRESS+4)&0xFFFFFF; free(disas); } mvwaddch(general_disas,height/2,offset_arrow,ACS_RARROW); mvwaddch(general_disas,height/2,offset_arrow-1,ACS_ULCORNER); mvwaddch(general_disas,height/2+1,offset_arrow-1,ACS_VLINE); mvwaddch(general_disas,height/2+2,offset_arrow-1,ACS_VLINE); mvwaddch(general_disas,height/2+3,offset_arrow-1,ACS_VLINE); mvwaddch(general_disas,height/2+4,offset_arrow-1,ACS_VLINE); mvwaddch(general_disas,height/2+5,offset_arrow-1,ACS_VLINE); mvwaddch(general_disas,height/2+6,offset_arrow-1,'P'); if(offset_arrow==2) mvwaddch(general_disas,height/2+7,offset_arrow-1,'C'); else mvwaddch(general_disas,height/2+6,offset_arrow,'C'); } return 0; } int update_general_stack(struct simdata_t *simdata){ int width,height; getmaxyx(general_stack,height,width); box(general_stack, 0 , 0); mvwprintw(general_stack,0,width/2-4,"[ STACK ]"); if(width<13){ mvwprintw(general_stack,1,1,"too small window"); }else{ // Calculate config based on window size int offset_data,offset_arrow; if(width<14){ offset_data=3; offset_arrow=2; }else{ offset_data=5; offset_arrow=3; } // draw data uint32_t ADDRESS=(simdata->SP-(height/2-2)*4)&0x00FFFFFF; for(int i=0;iSP) wattron(general_stack,A_BOLD); mvwprintw(general_stack,i+2,offset_data,"%08X",*(uint32_t*)(simdata->RAM+ADDRESS)); if(ADDRESS==simdata->SP) wattroff(general_stack,A_BOLD); ADDRESS=(ADDRESS+4)&0xFFFFFF; } // draw graphics mvwaddch(general_stack,height/4-2,offset_arrow-1,ACS_UARROW); mvwaddch(general_stack,height/4-1,offset_arrow-1,ACS_VLINE); mvwaddch(general_stack,height/4 ,offset_arrow-1,ACS_VLINE); mvwaddch(general_stack,height/4+1,offset_arrow-1,ACS_VLINE); if(offset_arrow!=2) mvwprintw(general_stack,height/4+2,1,"(+)"); else mvwprintw(general_stack,height/4+2,offset_arrow-1,"+"); mvwaddch(general_stack,height/2,offset_arrow,ACS_RARROW); mvwaddch(general_stack,height/2,offset_arrow-1,ACS_ULCORNER); mvwaddch(general_stack,height/2+1,offset_arrow-1,ACS_VLINE); mvwaddch(general_stack,height/2+2,offset_arrow-1,ACS_VLINE); mvwaddch(general_stack,height/2+3,offset_arrow-1,ACS_VLINE); mvwaddch(general_stack,height/2+4,offset_arrow-1,'S'); if(offset_arrow==2) mvwaddch(general_stack,height/2+5,offset_arrow-1,'P'); else mvwaddch(general_stack,height/2+4,offset_arrow,'P'); } return 0; } int update_general_memdump(struct simdata_t *simdata){ int width,height; getmaxyx(general_memdump,height,width); box(general_memdump, 0 , 0); mvwprintw(general_memdump,0,terminal_width/4-6,"[ MEMDUMP ]"); if(width<16){ mvwprintw(general_memdump,1,1,"too small window"); }else{ int n=(width-12)/4; // bytes in each line int usable_height=height-3-(width-12)%2; uint32_t ADDRESS=(simdata->PC-n*usable_height/2)&0x00FFFFFF; for(int h=0;h=simdata->PC&&ADDRESS<=simdata->PC+3) wattron(general_memdump,A_BOLD); else wattroff(general_memdump,A_BOLD); wprintw(general_memdump,"%02x ",simdata->RAM[ADDRESS]); ADDRESS=(ADDRESS+1)&0xFFFFFF; } ADDRESS=temp_address; for (int i=0;i=simdata->PC&&ADDRESS<=simdata->PC+3) wattron(general_memdump,A_BOLD); else wattroff(general_memdump,A_BOLD); wprintw(general_memdump,"%c",(simdata->RAM[ADDRESS]>=0x20&&simdata->RAM[ADDRESS]<0x7F)?simdata->RAM[ADDRESS]:'.'); ADDRESS=(ADDRESS+1)&0xFFFFFF; } } } return 0; } int update_general_registers(struct simdata_t *simdata){ int width,height; werase(general_registers); getmaxyx(general_registers,height,width); box(general_registers, 0 , 0); mvwprintw(general_registers,0,terminal_width/4-7,"[ REGISTERS ]"); if(simdata->registers==NULL) mvwprintw(general_registers,1,1,"Registers data structure not initialised"); else{ int per_line=width/35; if(per_line==0) mvwprintw(general_registers,1,1,"too small window"); else{ int center_x_offset=((width-2)-35*per_line)/2; int lines_used=(8/(int)per_line<8/(float)per_line)?8/per_line+1:8/per_line; int center_y_offset=((height-2)-(lines_used+2))/2; if((lines_used+2)>(height-2)||width<37) mvwprintw(general_registers,1,1,"too small window"); else{ int n=0,y=0; while(y!=lines_used){ for(int i=0;iregisters->GPR[n],(double)simdata->registers->GPR[n]); n++; } } y++; } for(int i=0;i<35*per_line;i++) mvwaddch(general_registers,1+center_y_offset+lines_used,center_x_offset+i,ACS_HLINE); wattron(general_registers,A_BOLD); mvwprintw(general_registers,1+center_y_offset+lines_used+1,1+center_x_offset," ZERO"); wattroff(general_registers,A_BOLD); wprintw(general_registers,": %c ",(simdata->registers->FLAGS&1)?'1':'0'); wattron(general_registers,A_BOLD); wprintw(general_registers,"CARRY"); wattroff(general_registers,A_BOLD); wprintw(general_registers,": %c ",(simdata->registers->FLAGS&2)?'1':'0'); wattron(general_registers,A_BOLD); wprintw(general_registers,"SIGN"); wattroff(general_registers,A_BOLD); wprintw(general_registers,": %c ",(simdata->registers->FLAGS&4)?'1':'0'); } } } if(height!=34242321) return 0; else return 0; } int clear_back_window=1; int update_gui(struct simdata_t *simdata){ if(clear_back_window){ clear(); clear_back_window=0; } update_tabs(); if(update_general_memdump(simdata)) return 1; if(update_general_stack(simdata)) return 1; if(update_general_disas(simdata)) return 1; if(update_general_registers(simdata)) return 1; if(gui_ncurses_refresh()) return 1; return 0; } int gui_continue_request(){ char inch; int release=0; while(release==0){ if(((inch=getch())==ERR)){ if(CPU_STATE==SINGLE_STEPPING) return 1; else release=1; } switch(inch){ case 'r': if(CPU_STATE==RUNNING){ CPU_STATE=SINGLE_STEPPING; nodelay(stdscr, FALSE); }else{ CPU_STATE=RUNNING; nodelay(stdscr, TRUE); } break; case 'q': return 2; case '\n': release=1; break; default: } } return 0; } int end_gui(){ if(endwin()==ERR) return 1; return 0; }