ireorganise code and new file - gramscii - A simple editor for ASCII box-and-arrow charts Err bitreich.org 70
1Log /scm/gramscii/log.gph bitreich.org 70
1Files /scm/gramscii/files.gph bitreich.org 70
1Refs /scm/gramscii/refs.gph bitreich.org 70
1Tags /scm/gramscii/tag bitreich.org 70
1README /scm/gramscii/file/README.md.gph bitreich.org 70
1LICENSE /scm/gramscii/file/COPYING.gph bitreich.org 70
i--- Err bitreich.org 70
1commit 2f5d0a4be8c029c5a4d1279be8823604db2c0fc2 /scm/gramscii/commit/2f5d0a4be8c029c5a4d1279be8823604db2c0fc2.gph bitreich.org 70
1parent a4c6053e9df10cc4060696d6c29e84fa3105ad0e /scm/gramscii/commit/a4c6053e9df10cc4060696d6c29e84fa3105ad0e.gph bitreich.org 70
hAuthor: KatolaZ <katolaz@freaknet.org> URL:mailto:katolaz@freaknet.org bitreich.org 70
iDate: Sat, 20 Jul 2019 10:39:38 +0100 Err bitreich.org 70
i Err bitreich.org 70
ireorganise code and new file Err bitreich.org 70
i Err bitreich.org 70
iDiffstat: Err bitreich.org 70
i M TODO | 2 +- Err bitreich.org 70
i M gramscii.c | 461 +++++++++++++++++-------------- Err bitreich.org 70
i Err bitreich.org 70
i2 files changed, 249 insertions(+), 214 deletions(-) Err bitreich.org 70
i--- Err bitreich.org 70
1diff --git a/TODO b/TODO /scm/gramscii/file/TODO.gph bitreich.org 70
i@@ -1,7 +1,6 @@ Err bitreich.org 70
i + optimize redraws (i.e., avoid to redraw if possible) Err bitreich.org 70
i - (?) change cursor shape according to action Err bitreich.org 70
i - auto-arrow 'A' (automatic end-char) Err bitreich.org 70
i-- load from file Err bitreich.org 70
i - read file at point Err bitreich.org 70
i - visual selection Err bitreich.org 70
i - crop Err bitreich.org 70
i@@ -13,6 +12,7 @@ Err bitreich.org 70
i (also do not print unmanaged chars!) Err bitreich.org 70
i - get screen geometry Err bitreich.org 70
i - allow scrolling (both vertical and horizontal) Err bitreich.org 70
i+* load from file Err bitreich.org 70
i * check if modified on exit Err bitreich.org 70
i * write to new file / default file Err bitreich.org 70
i * delete -- 'x' Err bitreich.org 70
1diff --git a/gramscii.c b/gramscii.c /scm/gramscii/file/gramscii.c.gph bitreich.org 70
i@@ -89,6 +89,70 @@ void cleanup(int s){ Err bitreich.org 70
i exit(0); Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i+/*** Status bar ***/ Err bitreich.org 70
i+ Err bitreich.org 70
i+char* state_str(){ Err bitreich.org 70
i+ switch(state){ Err bitreich.org 70
i+ case MOVE: Err bitreich.org 70
i+ return "mov"; Err bitreich.org 70
i+ case TEXT: Err bitreich.org 70
i+ return "txt"; Err bitreich.org 70
i+ case BOX: Err bitreich.org 70
i+ return "box"; Err bitreich.org 70
i+ case ARROW: Err bitreich.org 70
i+ return "arr"; Err bitreich.org 70
i+ case DEL: Err bitreich.org 70
i+ return "del"; Err bitreich.org 70
i+ default: Err bitreich.org 70
i+ return "ERR"; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ return "ERR"; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+ Err bitreich.org 70
i+void status_bar(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ printf("%100s", " "); Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ printf(" x: %3d y: %3d -- mode: %4s hl: %c vl: %c cn: %c <: %c >: %c %10s", Err bitreich.org 70
i+ x, y, state_str(), line_h, line_v, corner, mark_st, mark_end, ""); Err bitreich.org 70
i+ printf(" [%s]", fname ); Err bitreich.org 70
i+ printf("\033[0m"); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+char get_key(char *s){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ printf("%100s", " "); Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ printf("%s ", s); Err bitreich.org 70
i+ printf("\033[0m"); Err bitreich.org 70
i+ return getchar(); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void get_string(char *msg, char *s, int sz){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ printf("%100s", " "); Err bitreich.org 70
i+ printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i+ /* We must activate echo now */ Err bitreich.org 70
i+ t3 = t2; Err bitreich.org 70
i+ t3.c_lflag |= (ECHO | ICANON); Err bitreich.org 70
i+ tcsetattr(0, TCSANOW, &t3); Err bitreich.org 70
i+ printf("%s", msg); Err bitreich.org 70
i+ printf("\033[0m"); Err bitreich.org 70
i+ fgets(s, sz, stdin); Err bitreich.org 70
i+ s[strlen(s)-1] = '\0'; Err bitreich.org 70
i+ tcsetattr(0, TCSANOW, &t2); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+int is_yes(char c){ Err bitreich.org 70
i+ return c=='y' ? 1 : c == 'Y'? 1 : 0; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+/*** Screen management ***/ Err bitreich.org 70
i+ Err bitreich.org 70
i void show_cursor(){ Err bitreich.org 70
i printf("\033[%d;%df", y+1, x+1); Err bitreich.org 70
i } Err bitreich.org 70
i@@ -108,6 +172,31 @@ void draw_xy(int x, int y, char c){ Err bitreich.org 70
i putchar(c); Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i+void update_current(){ Err bitreich.org 70
i+ printf("\033[%d'%df",y+1,x+1); Err bitreich.org 70
i+ putchar(screen[y][x]); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void erase_line(char *s){ Err bitreich.org 70
i+ while(*s){ Err bitreich.org 70
i+ *s++ = BG; Err bitreich.org 70
i+ } Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void erase_screen(){ Err bitreich.org 70
i+ int i; Err bitreich.org 70
i+ for(i=0;i<HEIGHT; i++) Err bitreich.org 70
i+ erase_line(screen[i]); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+ Err bitreich.org 70
i+void check_bound(){ Err bitreich.org 70
i+ if (x<0) x=0; Err bitreich.org 70
i+ else if (x>=WIDTH) x = WIDTH-1; Err bitreich.org 70
i+ if (y<0) y=0; Err bitreich.org 70
i+ else if (y>=HEIGHT) y = HEIGHT -1; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i void init_screen(){ Err bitreich.org 70
i int i; Err bitreich.org 70
i for(i=0; i<HEIGHT; i++){ Err bitreich.org 70
i@@ -124,36 +213,6 @@ void init_screen(){ Err bitreich.org 70
i mark_end = end_marks[cur_end]; Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i-char* state_str(){ Err bitreich.org 70
i- switch(state){ Err bitreich.org 70
i- case MOVE: Err bitreich.org 70
i- return "mov"; Err bitreich.org 70
i- case TEXT: Err bitreich.org 70
i- return "txt"; Err bitreich.org 70
i- case BOX: Err bitreich.org 70
i- return "box"; Err bitreich.org 70
i- case ARROW: Err bitreich.org 70
i- return "arr"; Err bitreich.org 70
i- case DEL: Err bitreich.org 70
i- return "del"; Err bitreich.org 70
i- default: Err bitreich.org 70
i- return "ERR"; Err bitreich.org 70
i- } Err bitreich.org 70
i- return "ERR"; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i- Err bitreich.org 70
i-void status_bar(){ Err bitreich.org 70
i- Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- printf("%100s", " "); Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- printf(" x: %3d y: %3d -- mode: %4s hl: %c vl: %c cn: %c <: %c >: %c %10s", Err bitreich.org 70
i- x, y, state_str(), line_h, line_v, corner, mark_st, mark_end, ""); Err bitreich.org 70
i- printf(" [%s]", fname ); Err bitreich.org 70
i- printf("\033[0m"); Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i void redraw(){ Err bitreich.org 70
i int i; Err bitreich.org 70
i Err bitreich.org 70
i@@ -165,12 +224,99 @@ void redraw(){ Err bitreich.org 70
i show_cursor(); Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i-void update_current(){ Err bitreich.org 70
i- printf("\033[%d'%df",y+1,x+1); Err bitreich.org 70
i- putchar(screen[y][x]); Err bitreich.org 70
i+int move_around(char c){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ switch(c){ Err bitreich.org 70
i+ case 'H': step = 5; Err bitreich.org 70
i+ case 'h': Err bitreich.org 70
i+ dir = DIR_L; Err bitreich.org 70
i+ x -= step; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case 'J': step = 5; Err bitreich.org 70
i+ case 'j': Err bitreich.org 70
i+ dir = DIR_D; Err bitreich.org 70
i+ y += step; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case 'K': step = 5; Err bitreich.org 70
i+ case 'k': Err bitreich.org 70
i+ dir = DIR_U; Err bitreich.org 70
i+ y -= step; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case 'L': step = 5; Err bitreich.org 70
i+ case 'l': Err bitreich.org 70
i+ dir = DIR_R; Err bitreich.org 70
i+ x += step; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ default: Err bitreich.org 70
i+ return 0; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ return 1; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void go_to(int where){ Err bitreich.org 70
i+ switch(where){ Err bitreich.org 70
i+ case HOME: Err bitreich.org 70
i+ x = y = 0; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case END: Err bitreich.org 70
i+ x = WIDTH-1; Err bitreich.org 70
i+ y = HEIGHT-1; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case MIDDLE: Err bitreich.org 70
i+ x = WIDTH/2; Err bitreich.org 70
i+ y = HEIGHT/2; Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ check_bound(); Err bitreich.org 70
i+ show_cursor(); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+int progr_x(int dir){ Err bitreich.org 70
i+ return dir == DIR_L ? -1 : dir == DIR_R ? 1: 0; Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i Err bitreich.org 70
i+int progr_y(int dir){ Err bitreich.org 70
i+ return dir == DIR_U ? -1 : dir == DIR_D ? 1: 0; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+/*** Lines and markers ***/ Err bitreich.org 70
i+ Err bitreich.org 70
i+void toggle_hline(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ cur_hl = (cur_hl + 1) % hlines_sz; Err bitreich.org 70
i+ line_h = hlines[cur_hl]; Err bitreich.org 70
i+ Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void toggle_corner(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ cur_corn = (cur_corn + 1 ) % corners_sz; Err bitreich.org 70
i+ corner = corners[cur_corn]; Err bitreich.org 70
i+ Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void toggle_vline(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ cur_vl = (cur_vl + 1) % vlines_sz; Err bitreich.org 70
i+ line_v = vlines[cur_vl]; Err bitreich.org 70
i+ Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void toggle_st_mark(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ cur_start = (cur_start + 1 ) % stmarks_sz; Err bitreich.org 70
i+ mark_st = st_marks[cur_start]; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+void toggle_end_mark(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ cur_end = (cur_end+ 1 ) % endmarks_sz; Err bitreich.org 70
i+ mark_end = end_marks[cur_end]; Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i+ Err bitreich.org 70
i+ Err bitreich.org 70
i void init(){ Err bitreich.org 70
i Err bitreich.org 70
i signal(SIGHUP, cleanup); Err bitreich.org 70
i@@ -191,13 +337,6 @@ void init(){ Err bitreich.org 70
i redraw(); Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i-void check_bound(){ Err bitreich.org 70
i- if (x<0) x=0; Err bitreich.org 70
i- else if (x>=WIDTH) x = WIDTH-1; Err bitreich.org 70
i- if (y<0) y=0; Err bitreich.org 70
i- else if (y>=HEIGHT) y = HEIGHT -1; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i Err bitreich.org 70
i /***** text, box, arrows *****/ Err bitreich.org 70
i Err bitreich.org 70
i@@ -215,6 +354,7 @@ void get_text(){ Err bitreich.org 70
i else { Err bitreich.org 70
i set(c); Err bitreich.org 70
i update_current(); Err bitreich.org 70
i+ modified = 1; Err bitreich.org 70
i x += 1; Err bitreich.org 70
i if (x >= WIDTH) Err bitreich.org 70
i x = orig_x; Err bitreich.org 70
i@@ -259,35 +399,6 @@ void draw_box(int x1, int y1, int fix){ Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i Err bitreich.org 70
i-int move_around(char c){ Err bitreich.org 70
i- Err bitreich.org 70
i- switch(c){ Err bitreich.org 70
i- case 'H': step = 5; Err bitreich.org 70
i- case 'h': Err bitreich.org 70
i- dir = DIR_L; Err bitreich.org 70
i- x -= step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'J': step = 5; Err bitreich.org 70
i- case 'j': Err bitreich.org 70
i- dir = DIR_D; Err bitreich.org 70
i- y += step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'K': step = 5; Err bitreich.org 70
i- case 'k': Err bitreich.org 70
i- dir = DIR_U; Err bitreich.org 70
i- y -= step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'L': step = 5; Err bitreich.org 70
i- case 'l': Err bitreich.org 70
i- dir = DIR_R; Err bitreich.org 70
i- x += step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- default: Err bitreich.org 70
i- return 1; Err bitreich.org 70
i- } Err bitreich.org 70
i- return 0; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i Err bitreich.org 70
i void get_box(){ Err bitreich.org 70
i char c; Err bitreich.org 70
i@@ -296,7 +407,7 @@ void get_box(){ Err bitreich.org 70
i step = 1; Err bitreich.org 70
i draw_box(x,y,NOFIX); Err bitreich.org 70
i while((c=getchar())!=EOF && c != 27 && c!= 'b'){ Err bitreich.org 70
i- if (move_around(c)) continue; Err bitreich.org 70
i+ if (!move_around(c)) continue; Err bitreich.org 70
i check_bound(); Err bitreich.org 70
i redraw(); Err bitreich.org 70
i step = 1; Err bitreich.org 70
i@@ -312,17 +423,6 @@ void get_box(){ Err bitreich.org 70
i state = MOVE; Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i- Err bitreich.org 70
i-int progr_x(int dir){ Err bitreich.org 70
i- return dir == DIR_L ? -1 : dir == DIR_R ? 1: 0; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i- Err bitreich.org 70
i-int progr_y(int dir){ Err bitreich.org 70
i- return dir == DIR_U ? -1 : dir == DIR_D ? 1: 0; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i- Err bitreich.org 70
i void draw_arrow(int x, int y, char *a, int a_len, int fix){ Err bitreich.org 70
i Err bitreich.org 70
i int i, j, cur_dir; Err bitreich.org 70
i@@ -381,7 +481,7 @@ void get_arrow(){ Err bitreich.org 70
i step = 1; Err bitreich.org 70
i draw_arrow(x,y, arrow, 0, NOFIX); Err bitreich.org 70
i while((c=getchar())!=EOF && c != 27 && c!= 'a'){ Err bitreich.org 70
i- if (move_around(c)) continue; Err bitreich.org 70
i+ if (!move_around(c)) continue; Err bitreich.org 70
i check_bound(); Err bitreich.org 70
i /* FIXME: if we are out of bound, do nothing? */ Err bitreich.org 70
i if (arrow_len == arrow_sz){ Err bitreich.org 70
i@@ -404,112 +504,6 @@ void get_arrow(){ Err bitreich.org 70
i state = MOVE; Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i-char get_key(char *s){ Err bitreich.org 70
i- Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- printf("%100s", " "); Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- printf("%s ", s); Err bitreich.org 70
i- printf("\033[0m"); Err bitreich.org 70
i- return getchar(); Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void get_string(char *s, int sz){ Err bitreich.org 70
i- Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- printf("%100s", " "); Err bitreich.org 70
i- printf("\033[%d;1f\033[7m", HEIGHT+1); Err bitreich.org 70
i- /* We must activate echo now */ Err bitreich.org 70
i- t3 = t2; Err bitreich.org 70
i- t3.c_lflag |= (ECHO | ICANON); Err bitreich.org 70
i- tcsetattr(0, TCSANOW, &t3); Err bitreich.org 70
i- printf("Write to: "); Err bitreich.org 70
i- printf("\033[0m"); Err bitreich.org 70
i- fgets(s, sz, stdin); Err bitreich.org 70
i- s[strlen(s)-1] = '\0'; Err bitreich.org 70
i- tcsetattr(0, TCSANOW, &t2); Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-int is_yes(char c){ Err bitreich.org 70
i- return c=='y' ? 1 : c == 'Y'? 1 : 0; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void write_file(){ Err bitreich.org 70
i- FILE *f; Err bitreich.org 70
i- int i; Err bitreich.org 70
i- Err bitreich.org 70
i- if (!fname[0] || force_new){ Err bitreich.org 70
i- get_string(fname, 255); Err bitreich.org 70
i- if (f=fopen(fname, "r")){ Err bitreich.org 70
i- if (!is_yes(get_key("File exists. Overwrite [y/n]?")) ){ Err bitreich.org 70
i- fclose(f); Err bitreich.org 70
i- return; Err bitreich.org 70
i- } Err bitreich.org 70
i- fclose(f); Err bitreich.org 70
i- } Err bitreich.org 70
i- } Err bitreich.org 70
i- if((f=fopen(fname, "w"))==NULL){ Err bitreich.org 70
i- get_key("Error opening file."); Err bitreich.org 70
i- return; Err bitreich.org 70
i- } Err bitreich.org 70
i- for (i=0; i<HEIGHT; i++){ Err bitreich.org 70
i- fprintf(f, "%s\n", screen[i]); Err bitreich.org 70
i- } Err bitreich.org 70
i- fclose(f); Err bitreich.org 70
i- modified = 0; Err bitreich.org 70
i- get_key("File saved."); Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void toggle_hline(){ Err bitreich.org 70
i- Err bitreich.org 70
i- cur_hl = (cur_hl + 1) % hlines_sz; Err bitreich.org 70
i- line_h = hlines[cur_hl]; Err bitreich.org 70
i- Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void toggle_corner(){ Err bitreich.org 70
i- Err bitreich.org 70
i- cur_corn = (cur_corn + 1 ) % corners_sz; Err bitreich.org 70
i- corner = corners[cur_corn]; Err bitreich.org 70
i- Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void toggle_vline(){ Err bitreich.org 70
i- Err bitreich.org 70
i- cur_vl = (cur_vl + 1) % vlines_sz; Err bitreich.org 70
i- line_v = vlines[cur_vl]; Err bitreich.org 70
i- Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void toggle_st_mark(){ Err bitreich.org 70
i- Err bitreich.org 70
i- cur_start = (cur_start + 1 ) % stmarks_sz; Err bitreich.org 70
i- mark_st = st_marks[cur_start]; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void toggle_end_mark(){ Err bitreich.org 70
i- Err bitreich.org 70
i- cur_end = (cur_end+ 1 ) % endmarks_sz; Err bitreich.org 70
i- mark_end = end_marks[cur_end]; Err bitreich.org 70
i-} Err bitreich.org 70
i- Err bitreich.org 70
i-void go_to(int where){ Err bitreich.org 70
i- switch(where){ Err bitreich.org 70
i- case HOME: Err bitreich.org 70
i- x = y = 0; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case END: Err bitreich.org 70
i- x = WIDTH-1; Err bitreich.org 70
i- y = HEIGHT-1; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case MIDDLE: Err bitreich.org 70
i- x = WIDTH/2; Err bitreich.org 70
i- y = HEIGHT/2; Err bitreich.org 70
i- break; Err bitreich.org 70
i- } Err bitreich.org 70
i- check_bound(); Err bitreich.org 70
i- show_cursor(); Err bitreich.org 70
i-} Err bitreich.org 70
i Err bitreich.org 70
i void do_delete(int x1, int y1){ Err bitreich.org 70
i int i; Err bitreich.org 70
i@@ -536,7 +530,7 @@ void delete(){ Err bitreich.org 70
i status_bar(); Err bitreich.org 70
i show_cursor(); Err bitreich.org 70
i while((c=getchar())!=EOF && c!=27 && c!= 'x'){ Err bitreich.org 70
i- if (move_around(c)) continue; Err bitreich.org 70
i+ if (!move_around(c)) continue; Err bitreich.org 70
i check_bound(); Err bitreich.org 70
i step = 1; Err bitreich.org 70
i do_delete(orig_x, orig_y); Err bitreich.org 70
i@@ -550,6 +544,34 @@ void delete(){ Err bitreich.org 70
i state = MOVE; Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i+/*** File management ***/ Err bitreich.org 70
i+ Err bitreich.org 70
i+void write_file(){ Err bitreich.org 70
i+ FILE *f; Err bitreich.org 70
i+ int i; Err bitreich.org 70
i+ Err bitreich.org 70
i+ if (!fname[0] || force_new){ Err bitreich.org 70
i+ get_string("Write to: ", fname, 255); Err bitreich.org 70
i+ if (f=fopen(fname, "r")){ Err bitreich.org 70
i+ if (!is_yes(get_key("File exists. Overwrite [y/n]?")) ){ Err bitreich.org 70
i+ fclose(f); Err bitreich.org 70
i+ return; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ fclose(f); Err bitreich.org 70
i+ } Err bitreich.org 70
i+ } Err bitreich.org 70
i+ if((f=fopen(fname, "w"))==NULL){ Err bitreich.org 70
i+ get_key("Error opening file."); Err bitreich.org 70
i+ return; Err bitreich.org 70
i+ } Err bitreich.org 70
i+ for (i=0; i<HEIGHT; i++){ Err bitreich.org 70
i+ fprintf(f, "%s\n", screen[i]); Err bitreich.org 70
i+ } Err bitreich.org 70
i+ fclose(f); Err bitreich.org 70
i+ modified = 0; Err bitreich.org 70
i+ get_key("File saved."); Err bitreich.org 70
i+} Err bitreich.org 70
i+ Err bitreich.org 70
i void check_modified(){ Err bitreich.org 70
i Err bitreich.org 70
i if (modified){ Err bitreich.org 70
i@@ -560,34 +582,41 @@ void check_modified(){ Err bitreich.org 70
i } Err bitreich.org 70
i } Err bitreich.org 70
i Err bitreich.org 70
i+void load_file(){ Err bitreich.org 70
i+ Err bitreich.org 70
i+ char newfname[256]; Err bitreich.org 70
i+ FILE *f; Err bitreich.org 70
i+ int i; Err bitreich.org 70
i+ Err bitreich.org 70
i+ get_string("Load file: ", newfname, 255); Err bitreich.org 70
i+ if ((f=fopen(newfname, "r")) != NULL){ Err bitreich.org 70
i+ i = 0; Err bitreich.org 70
i+ while((fgets(screen[i], WIDTH+2, f)) != NULL && i<HEIGHT) Err bitreich.org 70
i+ screen[i++][WIDTH-1]='\0'; Err bitreich.org 70
i+ for(;i<HEIGHT; i++){ Err bitreich.org 70
i+ erase_line(screen[i]); Err bitreich.org 70
i+ } Err bitreich.org 70
i+ fclose(f); Err bitreich.org 70
i+ } Err bitreich.org 70
i+ strcpy(fname, newfname); Err bitreich.org 70
i+ modified=0; Err bitreich.org 70
i+ redraw(); Err bitreich.org 70
i+} Err bitreich.org 70
i Err bitreich.org 70
i+void new_file(){ Err bitreich.org 70
i+ check_modified(); Err bitreich.org 70
i+ erase_screen(); Err bitreich.org 70
i+ go_to(MIDDLE); Err bitreich.org 70
i+ redraw(); Err bitreich.org 70
i+ fname[0] = '\0'; Err bitreich.org 70
i+ modified=0; Err bitreich.org 70
i+} Err bitreich.org 70
i Err bitreich.org 70
i void commands(){ Err bitreich.org 70
i Err bitreich.org 70
i char c; Err bitreich.org 70
i while((c=getchar())!=EOF){ Err bitreich.org 70
i- //screen[y][x]=BG; Err bitreich.org 70
i- switch(c){ Err bitreich.org 70
i- case 'H': Err bitreich.org 70
i- step=5; Err bitreich.org 70
i- case 'h': Err bitreich.org 70
i- x-=step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'J': Err bitreich.org 70
i- step=5; Err bitreich.org 70
i- case 'j': Err bitreich.org 70
i- y+=step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'K': Err bitreich.org 70
i- step=5; Err bitreich.org 70
i- case 'k': Err bitreich.org 70
i- y-=step; Err bitreich.org 70
i- break; Err bitreich.org 70
i- case 'L': Err bitreich.org 70
i- step=5; Err bitreich.org 70
i- case 'l': Err bitreich.org 70
i- x+=step; Err bitreich.org 70
i- break; Err bitreich.org 70
i+ if (!move_around(c)) switch(c){ Err bitreich.org 70
i case 'i': Err bitreich.org 70
i state = TEXT; Err bitreich.org 70
i get_text(); Err bitreich.org 70
i@@ -608,6 +637,14 @@ void commands(){ Err bitreich.org 70
i case 'w': Err bitreich.org 70
i write_file(); Err bitreich.org 70
i break; Err bitreich.org 70
i+ case 'e': Err bitreich.org 70
i+ check_modified(); Err bitreich.org 70
i+ case 'E': Err bitreich.org 70
i+ load_file(); Err bitreich.org 70
i+ break; Err bitreich.org 70
i+ case 'N': Err bitreich.org 70
i+ new_file(); Err bitreich.org 70
i+ break; Err bitreich.org 70
i case 'g': Err bitreich.org 70
i go_to(HOME); Err bitreich.org 70
i break; Err bitreich.org 70
i@@ -642,8 +679,6 @@ void commands(){ Err bitreich.org 70
i cleanup(0); Err bitreich.org 70
i exit(0); Err bitreich.org 70
i break; Err bitreich.org 70
i- default:; Err bitreich.org 70
i- //statu("got: %d\n", c); Err bitreich.org 70
i } Err bitreich.org 70
i check_bound(); Err bitreich.org 70
i status_bar(); Err bitreich.org 70
.
Response:
text/plain