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 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=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: %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