void TSC_source::cmd_cutselblock(bool backup)
{
int selline1,selcol1,selline2,selcol2;
if (!G_sel(selline1,selcol1,selline2,selcol2)) return;
if (backup) undo_begin();
if (selline1==selline2)
{
cursor_linenr=selline1;cursor_colnr=selcol1;
cmd_del(selcol2-selcol1+1);
}
else
{
cursor_linenr=selline1;cursor_colnr=selcol1;
if (cursor_colnr<G_line(selline1)->G_length()) cmd_del(G_line(selline1)->G_length()-cursor_colnr,backup);
while (selline2>selline1+1)
{
cmd_mergeline(backup);
if (cursor_colnr<G_line(selline1)->G_length()) cmd_del(G_line(selline1)->G_length()-cursor_colnr,backup);
selline2--;
}
cursor_linenr=selline2;cursor_colnr=0;
if (selcol2>=0) cmd_del(selcol2+1,backup);
Set_cursor(selline1,selcol1);
cmd_mergeline(backup);
}
Set_sel(cursor_linenr,cursor_colnr,cursor_linenr,cursor_colnr);
if (backup) undo_end();
}
int main(int argc, char *argv[])
{
if ((argc < 3) || (strcmp(argv[1], "--help") == 0))
help();
f = open("/dev/rtnet", O_RDWR);
if (f < 0) {
perror("/dev/rtnet");
exit(1);
}
memset(&cmd, 0, sizeof(cmd));
strncpy(cmd.head.if_name, argv[1], IFNAMSIZ);
if (strcmp(argv[2], "server") == 0)
cmd_server(argc, argv);
if (strcmp(argv[2], "add") == 0)
cmd_add(argc, argv);
if (strcmp(argv[2], "del") == 0)
cmd_del(argc, argv);
if (strcmp(argv[2], "wait") == 0)
cmd_wait(argc, argv);
if (strcmp(argv[2], "client") == 0)
cmd_client(argc, argv);
if (strcmp(argv[2], "announce") == 0)
cmd_announce(argc, argv);
help();
return 0;
}
static void highlight_uninit() {
/* Let everyone know we're checking out. */
scr_log_print(LPRINT_NORMAL, "highlight: plugin disabled.");
/* De-register our message handler as we're done with it now. */
hk_del_handler(HOOK_PRE_MESSAGE_IN, globals.hook);
/* Remove our commands. */
cmd_del("highlight");
/* Nullify all the pointers. */
globals.match_list = NULL;
}
// runs a script
// returns -1 is esc was pressed, 0 o/w
int run_script(char *script, DATAFILE *d) {
char buf[512];
Ttoken *token;
int i;
// set datafile
data = d;
clear_keybuf();
// init sound memory
for(i = 0; i < MAX_SCRIPT_SOUNDS; i ++) active_sounds[i] = -1;
// create gfx buffers
swap_buffer = create_bitmap(160, 120);
buffer = create_bitmap(160, 120);
script_done = FALSE;
while(!script_done) {
// get commands from script string
script = get_line(buf, script);
if (buf[0] != '#' && buf[0] != '\n' && buf[0] != '\r' && buf[0] != '-') {
token = tokenize(buf);
if (token != NULL) {
if (!stricmp(token->word, "load_map")) cmd_loadmap(get_next_word(token));
else if (!stricmp(token->word, "draw_map")) cmd_drawmap();
else if (!stricmp(token->word, "set")) cmd_set((Ttoken *)token->next);
else if (!stricmp(token->word, "move")) cmd_move((Ttoken *)token->next);
else if (!stricmp(token->word, "delete")) cmd_del((Ttoken *)token->next);
else if (!stricmp(token->word, "run")) cmd_run((Ttoken *)token->next);
else if (!stricmp(token->word, "speak")) cmd_speak((Ttoken *)token->next, 1);
else if (!stricmp(token->word, "text")) cmd_speak((Ttoken *)token->next, 0);
else if (!stricmp(token->word, "save_buffer")) cmd_savebmp();
else if (!stricmp(token->word, "show_bmp")) cmd_showbmp(get_next_word(token));
else if (!stricmp(token->word, "blit")) cmd_blit();
else if (!stricmp(token->word, "fade_in")) cmd_fadein();
else if (!stricmp(token->word, "fade_out")) cmd_fadeout();
else if (!stricmp(token->word, "wait")) cmd_wait(atoi(get_next_word(token)));
else if (!stricmp(token->word, "play_sample")) cmd_play_sample((Ttoken *)token->next);
else if (!stricmp(token->word, "stop_sample")) cmd_stop_sample((Ttoken *)token->next);
else if (!stricmp(token->word, "end_script")) cmd_end();
else {
char msg[256];
sprintf(msg, "unknown: %s", token->word);
msg_box(msg);
}
flush_tokens(token);
}
}
}
// destroy buffers
delete_all_objects();
destroy_bitmap(buffer);
destroy_bitmap(swap_buffer);
// stop old sounds
for(i = 0; i < MAX_SCRIPT_SOUNDS; i ++) {
if (active_sounds[i] != -1) {
stop_sound_id(active_sounds[i]);
forget_sound(active_sounds[i]);
}
}
return (script_done == -1 ? -1 : 0);
}
int main(void) {
int isRunning = 1;
char buffer[MAX_LINE_LENGTH];
char command[MAX_LINE_LENGTH];
while(isRunning){
//int i;
printf("> ");
fgets(buffer, MAX_LINE_LENGTH, stdin);
/*for( i = 0; i < MAX_LINE_LENGTH; i++ ){
buffer[i] = tolower(buffer[i]);
}*/
sscanf(buffer, " %s ", (char*)&command);
//Switch for commands
if(strcmp(command, "BYE") == 0){ /*BYE*/
deleteAllEntry(entry_head);
deleteAllSnapshot(snapshot_head);
printf("bye");
isRunning = 0;
}else if(strcmp(command, "HELP") == 0){ /*HELP*/
cmd_help();
}else if(strcmp(command, "LIST") == 0){
sscanf(buffer + strlen(command), "%s", (char*)&command);
if(strcmp(command, "KEYS") == 0){ /*LIST KEYS*/
cmd_list_keys();
}else if(strcmp(command, "ENTRIES") == 0){ /*LIST ENTRIES*/
cmd_list_entries();
}else if(strcmp(command, "SNAPSHOTS") == 0){ /*LIST SNAPSHOTS*/
cmd_list_snapshots();
}
}else if(strcmp(command, "GET") == 0){ /*GET*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_get(key);
}else if(strcmp(command, "DEL") == 0){ /*DEL*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_del(key);
}else if(strcmp(command, "PURGE") == 0){ /*PURGE*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_purge(key);
}else if(strcmp(command, "SET") == 0){ /*SET*/
int i = 0;
char key[MAX_KEY_LENGTH];
char *endptr;
int *values = (int*)malloc(MAX_LINE_LENGTH/2*sizeof(int));
sscanf(buffer + strlen(command), "%s", (char*)&key);
endptr = buffer + strlen(command) + strlen(key) + 2;
while(1){
values[i] = strtol(endptr, &endptr, 10);
if(*endptr == '\n'){
cmd_set(key, values, i+1);
break;
}
i++;
}
free(values);
}else if(strcmp(command, "PUSH") == 0){ /*PUSH*/
int i = 0;
char key[MAX_KEY_LENGTH];
char *endptr;
int *values = (int*)malloc(MAX_LINE_LENGTH/2*sizeof(int));
sscanf(buffer + strlen(command), "%s", (char*)&key);
endptr = buffer + strlen(command) + strlen(key) + 2;
while(1){
values[i] = strtol(endptr, &endptr, 10);
if(*endptr == '\n'){
cmd_push(key, values, i+1);
break;
}
i++;
}
free(values);
}else if(strcmp(command, "APPEND") == 0){ /*APPEND*/
int i = 0;
char key[MAX_KEY_LENGTH];
char *endptr;
int *values = (int*)malloc(MAX_LINE_LENGTH/2*sizeof(int));
sscanf(buffer + strlen(command), "%s", (char*)&key);
endptr = buffer + strlen(command) + strlen(key) + 2;
while(1){
values[i] = strtol(endptr, &endptr, 10);
if(*endptr == '\n'){
cmd_append(key, values, i+1);
break;
}
i++;
}
free(values);
}else if(strcmp(command, "PICK") == 0){ /*PICK*/
char key[MAX_KEY_LENGTH];
int index;
sscanf(buffer + strlen(command)+1, "%s", (char*)&key);
index = strtol(buffer + strlen(command) + strlen(key)+2, (char**)&command, 0);
cmd_pick(key, index);
}else if(strcmp(command, "PLUCK") == 0){ /*PLUCK*/
char key[MAX_KEY_LENGTH];
int index;
sscanf(buffer + strlen(command)+1, "%s", (char*)&key);
index = strtol(buffer + strlen(command) + strlen(key)+2, (char**)&command, 0);
cmd_pluck(key, index);
}else if(strcmp(command, "POP") == 0){ /*POP*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_pop(key);
}else if(strcmp(command, "DROP") == 0){ /*DROP*/
int id = strtol(buffer + strlen(command) +1 , (char**)&command, 10);
cmd_drop(id);
}else if(strcmp(command, "ROLLBACK") == 0){ /*ROLLBACK*/
int id = strtol(buffer + strlen(command) +1 , (char**)&command, 10);
cmd_rollback(id);
}else if(strcmp(command, "CHECKOUT") == 0){ /*CHECKOUT*/
int id = strtol(buffer + strlen(command) +1 , (char**)&command, 10);
cmd_checkout(id);
}else if(strcmp(command, "SNAPSHOT") == 0){ /*SNAPSHOT*/
cmd_snapshot();
}else if(strcmp(command, "MIN") == 0){ /*MIN*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_min(key);
}else if(strcmp(command, "MAX") == 0){ /*MAX*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_max(key);
}else if(strcmp(command, "SUM") == 0){ /*SUM*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_sum(key);
}else if(strcmp(command, "LEN") == 0){ /*LEN*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_len(key);
}else if(strcmp(command, "REV") == 0){ /*REV*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_rev(key);
}else if(strcmp(command, "UNIQ") == 0){ /*UNIQ*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_uniq(key);
}else if(strcmp(command, "SORT") == 0){ /*SORT*/
char key[MAX_KEY_LENGTH];
sscanf(buffer + strlen(command), "%s", (char*)&key);
cmd_sort(key);
}else{
printf("\n");
}
}
return 0;
}
/* Menu */
static int menu_run(void)
{
adv_bool done;
int userkey;
menu_base = 0;
menu_rel = 0;
menu_rel_max = MENU_DY;
menu_max = crtc_container_max(&the_modes);
menu_base_max = menu_max - menu_rel_max;
if (menu_base_max < 0)
menu_base_max = 0;
done = 0;
while (!done) {
draw_text_index(BAR_X, BAR_Y1+1, BAR_DX);
draw_text_bar(BAR_X, BAR_Y1, BAR_Y2, BAR_DX);
draw_text_info(INFO_X, INFO_Y, INFO_DX, INFO_DY, menu_base + menu_rel);
menu_draw(MENU_X, MENU_Y, MENU_DX, MENU_DY);
video_wait_vsync();
target_idle();
os_poll();
userkey = inputb_get();
switch (userkey) {
case INPUTB_UP:
cmd_gotopos(menu_base + menu_rel - 1);
break;
case INPUTB_DOWN:
cmd_gotopos(menu_base + menu_rel + 1);
break;
case INPUTB_HOME: {
int i = menu_base + menu_rel - 1;
if (i<0)
i = 0;
while (i>0 && !(crtc_container_pos(&the_modes, i)->user_flags & MODE_FLAGS_USER_BIT0))
--i;
cmd_gotopos(i);
break;
}
case INPUTB_END: {
int i = menu_base + menu_rel + 1;
if (i >= menu_max)
i = menu_max - 1;
while (i < menu_max - 1 && !(crtc_container_pos(&the_modes, i)->user_flags & MODE_FLAGS_USER_BIT0))
++i;
cmd_gotopos(i);
break;
}
case INPUTB_PGDN:
cmd_gotopos(menu_base + menu_rel + menu_rel_max);
break;
case INPUTB_PGUP:
cmd_gotopos(menu_base + menu_rel - menu_rel_max);
break;
case INPUTB_F2:
cmd_save();
break;
case INPUTB_LEFT :
case INPUTB_RIGHT :
cmd_type(userkey);
break;
case INPUTB_ESC:
done = cmd_exit();
break;
case INPUTB_SPACE:
cmd_select();
cmd_gotopos(menu_base + menu_rel + 1);
break;
case INPUTB_ENTER:
if (cmd_onvideo_test() != 0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_F9:
if (cmd_onvideo_calib() != 0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_F10:
if (cmd_onvideo_animate() != 0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_TAB :
cmd_rename();
break;
case INPUTB_F5 :
if (cmd_modeline_create(1) !=0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_F6 :
if (cmd_modeline_create(0) !=0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_F7 :
cmd_copy();
break;
case INPUTB_F8 :
if (cmd_mode_clock() !=0) {
text_reset();
draw_text_error();
} else {
text_reset();
}
break;
case INPUTB_DEL :
cmd_del();
cmd_gotopos(menu_base + menu_rel);
break;
case INPUTB_F1:
draw_text_help();
break;
default:
if (cmd_offvideo_test(userkey) != 0) {
draw_text_error();
}
break;
}
}
return userkey;
}
