123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532 |
- /*******************************************************************************
- * Emu51
- * code_editor.cpp:
- * Created by mlt on 22/03/23.
- ******************************************************************************/
- #include <stdio.h>
- #include <emu51.h>
- #include <code_editor.h>
- #include <gui.h>
- void code_editor::load_source(char *filename)
- {
- FILE *strin;
- int c, i, tp, j = 0;
- strin = NULL;
- strin = fopen(filename, "rb");
- lines = 0;
- if ( strin == NULL )
- {
- ShowMessage("Can't open the file", screen, 200, 200, 200, 60, "Message!");
- }
- else
- {
- //for (c=0;c<65535;c++)
- //{
- // if (text_edit[c]!=NULL) delete[] text_edit[c];
- // else break;
- //}
- while ( !feof(strin))
- {
- alloc_new_line();
- for ( i = 0 ; ( i < 256 ) && !feof(strin) ; i++ )
- {
- c = fgetc(strin);
- if ( c == 9 ) //TAB
- {
- tp = i / tab_size;
- tp++;
- tp *= 8;
- for ( i ; i <= tp ; i++ )
- {
- text_edit[j][i] = 32;
- }
- i--;
- }
- else
- {
- if (( c == 10 ) || ( c == 13 ))
- {
- if ( c == 13 )
- {
- fgetc(strin);
- }
- for ( i ; i < 256 ; i++ )
- {
- text_edit[j][i] = 10;
- }
- }
- else
- {
- text_edit[j][i] = c == -1 ? 10 : c;
- }
- }
- }
- j++;
- }
- lines = j;
- fclose(strin);
- }
- cp = 0;
- cl = 0;
- scp = 0;
- scl = 0;
- disp();
- }
- void code_editor::disp(void)
- {
- int i, j, cnti, cntj = 0;
- for ( j = cl - scl ; j < cl - scl + _h + 1 && cntj < lines ; j++ )
- {
- cnti = 0;
- bool endf = false;
- for ( i = cp - scp ; i < cp - scp + _w && !endf ; i++ )
- {
- if ( text_edit[j][i] == 10 || text_edit[j][i] == 0 || text_edit[j][i] == 13 )
- {
- endf = true;
- }
- else
- {
- textprintf(surface, mainf, left + cnti * 8, top + cntj * 10, makecol(255, 255, 255), "%c",
- text_edit[j][i]);
- cnti++;
- }
- }
- for ( i ; i < cp - scp + _w + 1 ; i++ )
- {
- textprintf(surface, mainf, left + cnti * 8, top + cntj * 10, makecol(255, 255, 255), " ");
- cnti++;
- }
- cntj++;
- }
- if ( cntj < _h )
- {
- rectfill(surface, left, top + cntj * 10, surface->w - left, surface->h - left, 0);
- }
- }
- void code_editor::process(void)
- {
- BITMAP *cache;
- int c, i;
- bool exit_ed = false;
- char *filen;
- filen = new char[256];
- cache = create_bitmap(SCREEN_W, SCREEN_H);
- blit(screen, cache, 0, 0, 0, 0, SCREEN_W, SCREEN_H);
- clear(surface);
- hline(surface, 2, surface->h - 2, surface->w - 2, makecol(255, 255, 255));
- vline(surface, 2, 2, surface->h - 2, makecol(255, 255, 255));
- vline(surface, surface->w - 2, 2, surface->h - 2, makecol(255, 255, 255));
- for ( c = 2 ; c <= 2 + 10 ; c += 2 )
- {
- hline(surface, 2, c, surface->w - 2, makecol(255, 255, 255));
- }
- textprintf_centre(surface, mainf, surface->w / 2, 4, makecol(255, 255, 255), " Source editor ");
- lines = 0;
- alloc_new_line();
- uint16_t key_p;
- uint16_t key_ch;
- while ( !exit_ed )
- {
- key_p = readkey();
- key_ch = key_p & 0xff;
- key_p = key_p >> 8;
- switch ( key_p )
- {
- case KEY_BACKSPACE:
- if ( cp > 0 )
- {
- clear_cr();
- if ( scp > 0 )
- {
- scp--;
- }
- cp--;
- backspace();
- }
- else
- {
- if ( cl > 0 )
- {
- clear_cr();
- for ( c = 0 ; ( c < 256 ) && ( text_edit[cl - 1][c] != 10 ) ; c++ )
- {
- }
- cp = c;
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- for ( c ; c < 256 ; c++ )
- {
- text_edit[cl - 1][c] = text_edit[cl][c - cp];
- if ( text_edit[cl][c - cp] == 10 )
- {
- break;
- }
- }
- delete[]text_edit[cl];
- for ( i = cl ; i < lines ; i++ )
- {
- text_edit[i] = text_edit[i + 1];
- }
- lines--;
- text_edit[lines] = NULL;
- cl--;
- if ( scl > 0 )
- {
- scl--;
- }
- }
- }
- break;
- case KEY_DEL:
- backspace();
- break;
- case KEY_ENTER:
- if ( cl < 65536 )
- {
- clear_cr();
- cl++;
- if ( scl < _h )
- {
- scl++;
- }
- if ( !insert_new_line(cl))
- {
- ShowMessage("Out of memory", surface, 200, 100, 200, 60, "Error!");
- }
- else
- {
- for ( c = cp ; c < 256 ; c++ )
- {
- text_edit[cl][c - cp] = text_edit[cl - 1][c];
- text_edit[cl - 1][c] = 10;
- }
- cp = 0;
- scp = 0;
- }
- }
- else
- {
- ShowMessage("Source can't has more then 65536 lines of code!!!", surface, 200, 100, 200, 60, "Error!");
- }
- break;
- case KEY_END:
- clear_cr();
- for ( cp = 0 ; cp < 256 && text_edit[cl][cp] != 10 ; cp++ )
- {
- }
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- break;
- case KEY_HOME:
- clear_cr();
- cp = 0;
- scp = 0;
- break;
- case KEY_LEFT:
- if ( cp > 0 )
- {
- clear_cr();
- cp--;
- if ( scp > 0 )
- {
- scp--;
- }
- }
- else
- {
- if ( cl > 0 )
- {
- clear_cr();
- for ( c = 0 ; ( c < 256 ) && ( text_edit[cl - 1][c] != 10 ) ; c++ )
- {
- }
- cp = c;
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- cl--;
- if ( scl > 0 )
- {
- scl--;
- }
- }
- }
- break;
- case KEY_RIGHT:
- if ( cp < 256 && text_edit[cl][cp] != 10 )
- {
- clear_cr();
- cp++;
- if ( scp < _w )
- {
- scp++;
- }
- }
- else
- {
- if ( cl + 1 < lines )
- {
- clear_cr();
- cp = 0;
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- cl++;
- if ( scl < _h )
- {
- scl++;
- }
- }
- }
- break;
- case KEY_UP:
- if ( cl > 0 )
- {
- clear_cr();
- cl--;
- if ( scl > 0 )
- {
- scl--;
- }
- for ( c = 0 ; c < 256 && text_edit[cl][c] != 10 ; c++ )
- {
- }
- if ( c - 1 < cp )
- {
- cp = c;
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- }
- }
- break;
- case KEY_DOWN:
- if ( cl < 65536 && cl < ( lines - 1 ))
- {
- clear_cr();
- cl++;
- if ( scl < _h )
- {
- scl++;
- }
- for ( c = 0 ; c < 256 && text_edit[cl][c] != 10 ; c++ )
- {
- }
- if ( c - 1 < cp )
- {
- cp = c;
- scp = cp;
- if ( scp >= _w )
- {
- scp = _w - 1;
- }
- }
- }
- break;
- case KEY_ESC:
- if ( QuestionBox("Are you sure want to EXIT?", screen, 200, 200, 400, 60, "Confirm!", makecol(255, 0, 0)))
- {
- exit_ed = true;
- for ( c = 0 ; c < lines ; c++ )
- {
- if ( text_edit[c] != NULL )
- {
- delete[] text_edit[c];
- }
- }
- lines = 0;
- }
- else
- {
- rest(500);
- clear_keybuf();
- }
- break;
- case KEY_F3:
- GetText(filen, screen, 100, 200, 600, 60, 256, " Enter source code file name ");
- for ( c = 254 ; filen[c] == ' ' || filen[c] == '\r' ; c-- )
- {
- filen[c] = 0;
- }
- load_source(filen);
- break;
- default:
- if ( key_ch != 0 && cp < 256 )
- {
- insert_char(cl, key_ch);
- clear_cr();
- cp++;
- if ( scp < _w )
- {
- scp++;
- }
- key_ch = 0;
- }
- break;
- }
- if ( !exit_ed )
- {
- disp();
- draw_cr();
- }
- textprintf(surface, mainf, 1, 1, makecol(255, 255, 255), " p%d l%d sp%d sl%d c%d ln%d", cp, cl, scp, scl,
- text_edit[cl][cp], lines);
- blit(surface, screen, 0, 0, 0, 0, surface->w, surface->h);
- }
- blit(cache, screen, 0, 0, 0, 0, SCREEN_W, SCREEN_H);
- destroy_bitmap(cache);
- delete[] filen;
- return;
- }
- void code_editor::insert_char(int ln, char ch)
- {
- int i;
- for ( i = 256 ; i > cp ; i-- )
- {
- text_edit[cl][i] = text_edit[cl][i - 1];
- }
- text_edit[cl][cp] = ch;
- }
- void code_editor::backspace(void)
- {
- int i;
- for ( i = cp ; i < 256 ; i++ )
- {
- text_edit[cl][i] = text_edit[cl][i + 1];
- }
- }
- void code_editor::draw_cr(void)
- {
- hline(surface, left + 8 * scp, top + 10 * scl + 9, left + 8 * scp + 8, makecol(255, 255, 255));
- }
- void code_editor::clear_cr(void)
- {
- hline(surface, left + 8 * scp, top + 10 * scl + 9, left + 8 * scp + 8, 0);
- }
- code_editor::code_editor(void)
- {
- int i;
- for ( i = 0 ; i < 65536 ; i++ )
- {
- text_edit[i] = NULL;
- }
- lines = 0;
- top = 24;
- left = 11;
- cl = 0;
- cp = 0;
- scl = 0;
- scp = 0;
- surface = create_bitmap(SCREEN_W, SCREEN_H - 100);
- _w = ( surface->w - left * 2 ) / 8 - 1;
- _h = ( surface->h - top - left ) / 10 - 1;
- tab_size = 8;
- }
- code_editor::~code_editor(void)
- {
- }
- bool code_editor::alloc_new_line(void)
- {
- int i;
- if ( lines < 65536 )
- {
- text_edit[lines] = new char[256];
- for ( i = 0 ; i < 256 ; i++ )
- {
- text_edit[lines][i] = 10;
- }
- lines++;
- return text_edit[lines] == NULL ? false : true;
- }
- return false;
- }
- bool code_editor::insert_new_line(int ln)
- {
- int i;
- if ( lines < 65536 )
- {
- for ( i = lines ; i > ln ; i-- )
- {
- text_edit[i] = text_edit[i - 1];
- }
- text_edit[ln] = NULL;
- text_edit[ln] = new char[256];
- for ( i = 0 ; i < 256 ; i++ )
- {
- text_edit[ln][i] = 10;
- }
- lines++;
- if ( text_edit[ln] == NULL )
- {
- for ( i = ln ; i < lines ; i++ )
- {
- text_edit[i] = text_edit[i + 1];
- }
- lines--;
- return false;
- }
- else
- {
- return true;
- }
- }
- return false;
- }
- void code_editor::delete_last(void)
- {
- lines--;
- delete[] text_edit[lines];
- text_edit[lines] = NULL;
- }
- void code_editor::cut_line(int ln)
- {
- int i;
- if ( text_edit[ln] != NULL )
- {
- for ( i = ln ; i < lines ; i++ )
- {
- text_edit[i] = text_edit[i + 1];
- }
- lines--;
- }
- }
|