1809 lines
47 KiB
C
1809 lines
47 KiB
C
#include <stdio.h>
|
|
#include <conio.h>
|
|
#include <fcntl.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
#include <stdlib.h>
|
|
#include "v2types.h"
|
|
#include "cfgtoken.h"
|
|
#include "v2loader.h"
|
|
|
|
#define PROGNAME "Config Utility"
|
|
volatile uint16_t cardslot = 3;
|
|
|
|
#include "v2analog.h"
|
|
#include "menu.h"
|
|
|
|
#define menutop 3
|
|
#define menuleft 2
|
|
|
|
uint16_t cfb;
|
|
|
|
serialmux_t serialmux[2] = { SERIAL_PRINTER, SERIAL_WIFI };
|
|
uint16_t baud[2] = { 19200, 19200 };
|
|
|
|
usbmux_t usbmux = USB_GUEST_CDC;
|
|
compat_t machine = MACHINE_AUTO;
|
|
wifimode_t wifimode = WIFI_AP;
|
|
char wifi_ssid[32] = "V2RetroNet";
|
|
char wifi_psk[32] = "Analog";
|
|
uint32_t wifi_address = 0x00000000;
|
|
uint32_t wifi_netmask = 0xFFFFFF00;
|
|
|
|
char jd_host[32] = "192.168.0.1";
|
|
uint16_t jd_port = 9100;
|
|
|
|
uint8_t blockbuffer[4096];
|
|
|
|
#define CARD_TIMEOUT 0x3fff
|
|
uint16_t timeout = CARD_TIMEOUT;
|
|
|
|
uint8_t default_font = 0;
|
|
uint8_t mono_palette = 0;
|
|
uint8_t terminal_fgcolor = 0xF;
|
|
uint8_t terminal_bgcolor = 0x0;
|
|
uint8_t terminal_border = 0x0;
|
|
|
|
uint8_t config_rev = 0x00;
|
|
|
|
typedef struct menu_strings_s {
|
|
char *str;
|
|
} menu_strings_t;
|
|
|
|
uint16_t baudvalue[9] = {
|
|
75, 150, 300, 600, 1200, 2400, 4800, 9600, 19200
|
|
};
|
|
|
|
menu_strings_t baud_strings[9] = {
|
|
{ "75" },
|
|
{ "150" },
|
|
{ "300" },
|
|
{ "600" },
|
|
{ "1200" },
|
|
{ "2400" },
|
|
{ "4800" },
|
|
{ "9600" },
|
|
{ "19200" }
|
|
};
|
|
|
|
menu_strings_t wifi_mode_str[2] = {
|
|
{"Access Point"},
|
|
{"Client"}
|
|
};
|
|
|
|
menu_strings_t serialmux_strings[4] = {
|
|
{ "Loopback" },
|
|
{ "USB CDC" },
|
|
{ "WiFi Modem" },
|
|
{ "Printer" }
|
|
};
|
|
|
|
menu_strings_t font_strings[40] = {
|
|
{ "00: US Enhanced " },
|
|
{ "01: US Un-Enhanced " },
|
|
{ "02: Clinton V1 Enh " },
|
|
{ "03: Reactive Micro " },
|
|
{ "04: Dan Paymar Enh " },
|
|
{ "05: Blippo Enhanced " },
|
|
{ "06: Byte Enhanced " },
|
|
{ "07: Colossal Enh " },
|
|
{ "08: Count Enhanced " },
|
|
{ "09: Flow Enhanced " },
|
|
{ "0A: Gothic Enhanced " },
|
|
{ "0B: Outline Enhanced" },
|
|
{ "0C: PigFont Enhanced" },
|
|
{ "0D: Pinocchio Enh " },
|
|
{ "0E: Slant Enhanced " },
|
|
{ "0F: Stop Enhanced " },
|
|
{ "10: Euro UnEnhanced " },
|
|
{ "11: Euro Enhanced " },
|
|
{ "12: Clinton V2 " },
|
|
{ "13: German Enh " },
|
|
{ "14: German Un-Enh " },
|
|
{ "15: French Enh " },
|
|
{ "16: French Un-Enh " },
|
|
{ "17: Hebrew Enh " },
|
|
{ "18: Hebrew Un-Enh " },
|
|
{ "19: Plus Enhanced " },
|
|
{ "1A: Plus Un-Enhanced" },
|
|
{ "1B: KataKana " },
|
|
{ "1C: Cyrillic " },
|
|
{ "1D: Greek " },
|
|
{ "1E: Esperanto " },
|
|
{ "1F: Videx Enhanced " },
|
|
{ "20: Apple II Un-Enh " },
|
|
{ "21: Apple IIe Enh " },
|
|
{ "22: Apple IIgs Enh " },
|
|
{ "23: Pravetz Enhanced" },
|
|
{ "24: PCBold Enhanced " },
|
|
{ "25: Custom " },
|
|
{ "26: Custom " },
|
|
{ "27: Custom " },
|
|
};
|
|
|
|
menu_strings_t monochrome_strings[9] = {
|
|
{ "Disabled" },
|
|
{ "B&W" },
|
|
{ "Inverse" },
|
|
{ "Amber" },
|
|
{ "Amber I" },
|
|
{ "Green" },
|
|
{ "Green I" },
|
|
{ "C64" },
|
|
{ "Custom" }
|
|
};
|
|
|
|
menu_strings_t color_strings[16] = {
|
|
{ "Black" },
|
|
{ "Magenta" },
|
|
{ "D.Blue" },
|
|
{ "H.Violet" },
|
|
{ "D.Green" },
|
|
{ "D.Grey" },
|
|
{ "H.Blue" },
|
|
{ "L.Blue" },
|
|
{ "Brown" },
|
|
{ "H.Orange" },
|
|
{ "L.Grey" },
|
|
{ "Pink" },
|
|
{ "H.Green" },
|
|
{ "Yellow" },
|
|
{ "Aqua" },
|
|
{ "White" }
|
|
};
|
|
|
|
menu_strings_t machine_strings[MACHINE_MAXVALUE] = {
|
|
{ "Auto Detect" },
|
|
{ "Apple II" },
|
|
{ "Apple IIe" },
|
|
{ "Apple IIgs" },
|
|
{ "Pravetz" },
|
|
{ "Basis" },
|
|
};
|
|
|
|
void ok_button(void) {
|
|
gotoy(14); gotox(18);
|
|
revers(1);
|
|
cputs(" OK ");
|
|
revers(0);
|
|
|
|
for(;;) {
|
|
switch(cgetc()) {
|
|
case 0x0A:
|
|
case 0x0D:
|
|
case 0x1B:
|
|
case 'O':
|
|
case 'o':
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
|
|
void print_menu_select(char *str, int width, int highlighted, int selected) {
|
|
revers(highlighted);
|
|
if(selected) {
|
|
cputs(" [");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
printlimited(str, width - 4);
|
|
if(selected) {
|
|
cputs("] ");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
width -= longmin(width, strlen(str) + 4);
|
|
if(width > 0)
|
|
repeatchar(' ', width);
|
|
revers(0);
|
|
}
|
|
|
|
void print_menu_select_int(char *str, int i, int width, int highlighted, int selected) {
|
|
revers(highlighted);
|
|
if(selected) {
|
|
cputs(" [");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
width -= 4 + cprintf(str, i);
|
|
if(selected) {
|
|
cputs("] ");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
if(width > 0)
|
|
repeatchar(' ', width);
|
|
revers(0);
|
|
}
|
|
|
|
void print_menu_select_ip(uint32_t ip, int width, int highlighted, int selected) {
|
|
uint8_t temp_ip[4];
|
|
|
|
temp_ip[0] = (ip >> 24) & 0xff;
|
|
temp_ip[1] = (ip >> 16) & 0xff;
|
|
temp_ip[2] = (ip >> 8) & 0xff;
|
|
temp_ip[3] = (ip >> 0) & 0xff;
|
|
|
|
width -= 11;
|
|
if(temp_ip[0] > 99) width--;
|
|
if(temp_ip[0] > 9) width--;
|
|
if(temp_ip[1] > 99) width--;
|
|
if(temp_ip[1] > 9) width--;
|
|
if(temp_ip[2] > 99) width--;
|
|
if(temp_ip[2] > 9) width--;
|
|
if(temp_ip[3] > 99) width--;
|
|
if(temp_ip[3] > 9) width--;
|
|
|
|
revers(highlighted);
|
|
if(selected) {
|
|
cputs(" [");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
if(width > 0)
|
|
repeatchar(' ', width);
|
|
cprintf("%d.%d.%d.%d", temp_ip[0], temp_ip[1], temp_ip[2], temp_ip[3]);
|
|
if(selected) {
|
|
cputs("] ");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
revers(0);
|
|
}
|
|
|
|
void print_menu_select_str(char *str1, char *str2, int width, int highlighted, int selected) {
|
|
revers(highlighted);
|
|
if(selected) {
|
|
cputs(" [");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
width -= 4 + cprintf(str1, str2);
|
|
if(selected) {
|
|
cputs("] ");
|
|
} else {
|
|
cputs(" ");
|
|
}
|
|
if(width > 0)
|
|
repeatchar(' ', width);
|
|
revers(0);
|
|
}
|
|
|
|
int list_menu(char *screen_title, char *window_title, menu_strings_t *menu_str, int max_item, int current_item) {
|
|
int paint_menu = 2;
|
|
int selected_item = (current_item > max_item) ? 0 : current_item;
|
|
int y;
|
|
int top = -1;
|
|
int i;
|
|
|
|
y = 12 - 5;
|
|
|
|
while(paint_menu >= 0) {
|
|
if(top != ((selected_item / 10) * 10)) {
|
|
top = (selected_item / 10) * 10;
|
|
}
|
|
if(paint_menu == 2) {
|
|
backdrop(screen_title);
|
|
window(window_title, 26, 12, 0);
|
|
}
|
|
if(paint_menu > 0) {
|
|
for(i = 0; i < longmin((max_item-top)+1, 10); i++) {
|
|
gotoy(y+i); gotox(8);
|
|
print_menu_select(menu_str[i+top].str, 24, (selected_item == i+top), (current_item == i+top));
|
|
}
|
|
if(max_item > 9) while(i < 10) {
|
|
gotoy(y+i); gotox(8);
|
|
repeatchar(' ', 24);
|
|
i++;
|
|
}
|
|
paint_menu = 0;
|
|
}
|
|
switch(cgetc()) {
|
|
case 0x08:
|
|
case 0x0B:
|
|
if(selected_item > 0) {
|
|
selected_item--;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x15:
|
|
case 0x0A:
|
|
if(selected_item < max_item) {
|
|
selected_item++;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x0D:
|
|
return selected_item;
|
|
case 0x1B:
|
|
paint_menu = -1;
|
|
}
|
|
}
|
|
|
|
return current_item;
|
|
}
|
|
|
|
void default_config() {
|
|
serialmux[0] = SERIAL_PRINTER;
|
|
serialmux[1] = SERIAL_WIFI;
|
|
baud[0] = 19200;
|
|
baud[1] = 19200;
|
|
usbmux = USB_GUEST_CDC;
|
|
|
|
wifimode = WIFI_AP;
|
|
strcpy(wifi_ssid, "V2RetroNet");
|
|
strcpy(wifi_psk, "Analog");
|
|
wifi_address = 0x00000000;
|
|
wifi_netmask = 0xFFFFFF00;
|
|
|
|
strcpy(jd_host, "192.168.0.1");
|
|
jd_port = 9100;
|
|
machine = MACHINE_AUTO;
|
|
}
|
|
|
|
int parse_config() {
|
|
int i = 0;
|
|
uint32_t *ptr = (uint32_t*)blockbuffer;
|
|
uint32_t configlen = sizeof(blockbuffer)/sizeof(uint32_t);
|
|
|
|
if(ptr[i++] != NEWCONFIG_MAGIC) {
|
|
return 0;
|
|
}
|
|
|
|
while(i < configlen) {
|
|
if(ptr[i] == NEWCONFIG_EOF_MARKER) {
|
|
configlen = i++;
|
|
} else
|
|
switch(ptr[i] & 0x0000FFFF) {
|
|
case CFGTOKEN_REVISION:
|
|
config_rev = (ptr[i] >> 16) & 0xFF;
|
|
break;
|
|
case CFGTOKEN_HOST_AUTO:
|
|
machine = MACHINE_AUTO;
|
|
break;
|
|
case CFGTOKEN_HOST_II:
|
|
machine = MACHINE_APPLE_II;
|
|
break;
|
|
case CFGTOKEN_HOST_IIE:
|
|
machine = MACHINE_APPLE_IIE;
|
|
break;
|
|
case CFGTOKEN_HOST_IIGS:
|
|
machine = MACHINE_APPLE_IIGS;
|
|
break;
|
|
case CFGTOKEN_HOST_PRAVETZ:
|
|
machine = MACHINE_PRAVETZ;
|
|
break;
|
|
case CFGTOKEN_HOST_BASIS:
|
|
machine = MACHINE_BASIS;
|
|
break;
|
|
case CFGTOKEN_MUX_LOOP:
|
|
serialmux[(ptr[i] >> 16) & 1] = SERIAL_LOOP;
|
|
break;
|
|
case CFGTOKEN_MUX_USB:
|
|
serialmux[(ptr[i] >> 16) & 1] = SERIAL_USB;
|
|
break;
|
|
case CFGTOKEN_MUX_WIFI:
|
|
serialmux[(ptr[i] >> 16) & 1] = SERIAL_WIFI;
|
|
break;
|
|
case CFGTOKEN_MUX_PRN:
|
|
serialmux[(ptr[i] >> 16) & 1] = SERIAL_PRINTER;
|
|
break;
|
|
case CFGTOKEN_SER_BAUD:
|
|
baud[(ptr[i] >> 16) & 1] = ptr[i+1];
|
|
break;
|
|
case CFGTOKEN_USB_HOST:
|
|
usbmux = USB_HOST_CDC;
|
|
break;
|
|
case CFGTOKEN_USB_GUEST:
|
|
usbmux = USB_GUEST_CDC;
|
|
break;
|
|
case CFGTOKEN_USB_MIDI:
|
|
usbmux = USB_GUEST_MIDI;
|
|
break;
|
|
case CFGTOKEN_WIFI_AP:
|
|
wifimode = WIFI_AP;
|
|
break;
|
|
case CFGTOKEN_WIFI_CL:
|
|
wifimode = WIFI_CLIENT;
|
|
break;
|
|
case CFGTOKEN_WIFI_SSID:
|
|
memset(wifi_ssid, 0, sizeof(wifi_ssid));
|
|
strncpy(wifi_ssid, (char*)(&ptr[i+1]), (ptr[i] >> 24));
|
|
break;
|
|
case CFGTOKEN_WIFI_PSK:
|
|
memset(wifi_psk, 0, sizeof(wifi_psk));
|
|
strncpy(wifi_psk, (char*)(&ptr[i+1]), (ptr[i] >> 24));
|
|
break;
|
|
case CFGTOKEN_WIFI_IP:
|
|
wifi_address = ptr[i+1];
|
|
break;
|
|
case CFGTOKEN_WIFI_NM:
|
|
wifi_netmask = ptr[i+1];
|
|
break;
|
|
case CFGTOKEN_JD_HOST:
|
|
memset(jd_host, 0, sizeof(jd_host));
|
|
strncpy(jd_host, (char*)(&ptr[i+1]), (ptr[i] >> 24));
|
|
break;
|
|
case CFGTOKEN_JD_PORT:
|
|
jd_port = ptr[i+1];
|
|
break;
|
|
case CFGTOKEN_FONT_00:
|
|
default_font = (ptr[i] >> 16) & 0x2F;
|
|
break;
|
|
case CFGTOKEN_MONO_00:
|
|
mono_palette = (ptr[i] >> 20) & 0xF;
|
|
if(mono_palette) mono_palette = (mono_palette & 0x7) + 1;
|
|
break;
|
|
case CFGTOKEN_TBCOLOR:
|
|
terminal_fgcolor = (ptr[i] >> 20) & 0xF;
|
|
terminal_bgcolor = (ptr[i] >> 16) & 0xF;
|
|
break;
|
|
case CFGTOKEN_BORDER:
|
|
terminal_border = (ptr[i] >> 16) & 0xF;
|
|
break;
|
|
}
|
|
|
|
// Advance by the number of dwords for this token
|
|
i += 1 + (((ptr[i] >> 24) + 3) >> 2);
|
|
}
|
|
|
|
return i*4;
|
|
}
|
|
|
|
int build_config(uint32_t rev) {
|
|
int i = 0;
|
|
uint32_t *ptr = (uint32_t*)blockbuffer;
|
|
|
|
memset(blockbuffer, 0xFF, sizeof(blockbuffer));
|
|
|
|
ptr[i++] = NEWCONFIG_MAGIC;
|
|
ptr[i++] = CFGTOKEN_REVISION | ((rev & 0xff) << 16);
|
|
|
|
ptr[i++] = CFGTOKEN_FONT_00 | ((((uint32_t)default_font) & 0x2F) << 20);
|
|
if(mono_palette) {
|
|
ptr[i++] = CFGTOKEN_MONO_80 | ((((uint32_t)mono_palette-1) & 0xF) << 20);
|
|
} else {
|
|
ptr[i++] = CFGTOKEN_MONO_00;
|
|
}
|
|
ptr[i++] = CFGTOKEN_TBCOLOR | ((((uint32_t)terminal_fgcolor) & 0xF) << 20) | ((((uint32_t)terminal_bgcolor) & 0xF) << 16);
|
|
ptr[i++] = CFGTOKEN_BORDER | ((((uint32_t)terminal_border) & 0xF) << 16);
|
|
|
|
switch(machine) {
|
|
default:
|
|
case MACHINE_AUTO:
|
|
ptr[i++] = CFGTOKEN_HOST_AUTO;
|
|
break;
|
|
case MACHINE_APPLE_II:
|
|
ptr[i++] = CFGTOKEN_HOST_II;
|
|
break;
|
|
case MACHINE_APPLE_IIE:
|
|
ptr[i++] = CFGTOKEN_HOST_IIE;
|
|
break;
|
|
case MACHINE_APPLE_IIGS:
|
|
ptr[i++] = CFGTOKEN_HOST_IIGS;
|
|
break;
|
|
#if 0
|
|
case MACHINE_PRAVETZ:
|
|
ptr[i++] = CFGTOKEN_HOST_PRAVETZ;
|
|
break;
|
|
case MACHINE_BASIS:
|
|
ptr[i++] = CFGTOKEN_HOST_BASIS;
|
|
break;
|
|
#endif
|
|
}
|
|
|
|
switch(serialmux[0]) {
|
|
case SERIAL_USB:
|
|
ptr[i++] = CFGTOKEN_MUX_USB;
|
|
break;
|
|
case SERIAL_WIFI:
|
|
ptr[i++] = CFGTOKEN_MUX_WIFI;
|
|
break;
|
|
case SERIAL_PRINTER:
|
|
ptr[i++] = CFGTOKEN_MUX_PRN;
|
|
break;
|
|
default:
|
|
case SERIAL_LOOP:
|
|
ptr[i++] = CFGTOKEN_MUX_LOOP;
|
|
break;
|
|
}
|
|
ptr[i++] = CFGTOKEN_SER_BAUD;
|
|
ptr[i++] = baud[0];
|
|
|
|
switch(serialmux[1]) {
|
|
case SERIAL_USB:
|
|
ptr[i++] = CFGTOKEN_MUX_USB | 0x010000;
|
|
break;
|
|
case SERIAL_WIFI:
|
|
ptr[i++] = CFGTOKEN_MUX_WIFI | 0x010000;
|
|
break;
|
|
case SERIAL_PRINTER:
|
|
ptr[i++] = CFGTOKEN_MUX_PRN | 0x010000;
|
|
break;
|
|
default:
|
|
case SERIAL_LOOP:
|
|
ptr[i++] = CFGTOKEN_MUX_LOOP | 0x010000;
|
|
break;
|
|
}
|
|
ptr[i++] = CFGTOKEN_SER_BAUD | 0x010000;
|
|
ptr[i++] = baud[1];
|
|
|
|
|
|
switch(usbmux) {
|
|
case USB_HOST_CDC:
|
|
ptr[i++] = CFGTOKEN_USB_HOST;
|
|
break;
|
|
default:
|
|
case USB_GUEST_CDC:
|
|
ptr[i++] = CFGTOKEN_USB_GUEST;
|
|
break;
|
|
case USB_GUEST_MIDI:
|
|
ptr[i++] = CFGTOKEN_USB_MIDI;
|
|
break;
|
|
}
|
|
|
|
switch(wifimode) {
|
|
case WIFI_AP:
|
|
ptr[i++] = CFGTOKEN_WIFI_AP;
|
|
break;
|
|
case WIFI_CLIENT:
|
|
ptr[i++] = CFGTOKEN_WIFI_CL;
|
|
break;
|
|
}
|
|
|
|
ptr[i++] = CFGTOKEN_WIFI_SSID | (((uint32_t)strlen(wifi_ssid)+1) << 24);
|
|
strncpy((char*)(&ptr[i]), wifi_ssid, longmin(strlen(wifi_ssid)+1,31));
|
|
i += (strlen(wifi_ssid)+4) >> 2;
|
|
|
|
ptr[i++] = CFGTOKEN_WIFI_PSK | (((uint32_t)strlen(wifi_psk)+1) << 24);
|
|
strncpy((char*)(&ptr[i]), wifi_psk, longmin(strlen(wifi_psk)+1,31));
|
|
i += (strlen(wifi_psk)+4) >> 2;
|
|
|
|
ptr[i++] = CFGTOKEN_WIFI_IP;
|
|
ptr[i++] = wifi_address;
|
|
|
|
ptr[i++] = CFGTOKEN_WIFI_NM;
|
|
ptr[i++] = wifi_netmask;
|
|
|
|
ptr[i++] = CFGTOKEN_JD_HOST | (((uint32_t)strlen(jd_host)+1) << 24);
|
|
strncpy((char*)(&ptr[i]), jd_host, longmin(strlen(jd_host)+1,31));
|
|
ptr += (strlen(jd_host)+4) >> 2;
|
|
|
|
ptr[i++] = CFGTOKEN_JD_PORT;
|
|
ptr[i++] = jd_port;
|
|
|
|
ptr[i++] = NEWCONFIG_EOF_MARKER;
|
|
|
|
return i*4;
|
|
}
|
|
|
|
void cfgfile_upload(char *pdfile, uint16_t block) {
|
|
FILE *f;
|
|
size_t bytesread;
|
|
int i;
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(13);
|
|
cputs("Writing file,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
f = fopen(pdfile, "rb");
|
|
if(f == NULL) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", longmax(28, strlen(pdfile)+2), 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to open prodos file");
|
|
gotoy(12); gotox(20 - (strlen(pdfile)/2));
|
|
cputs(pdfile);
|
|
ok_button();
|
|
|
|
return;
|
|
}
|
|
|
|
memset(blockbuffer, 0xff, 4096);
|
|
bytesread = fread(blockbuffer, 1, 4096, f);
|
|
if(bytesread == 0) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", longmax(28, strlen(pdfile)+2), 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to read prodos file");
|
|
gotoy(12); gotox(20 - (strlen(pdfile)/2));
|
|
cputs(pdfile);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
if(cfg_cmd1("fe", block)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cprintf("Unable to erase block $%4X", block);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
CF_PTRL = 0;
|
|
CF_PTRH = 0;
|
|
for(i = 0; i < sizeof(blockbuffer); i++) {
|
|
CF_DATW = blockbuffer[i];
|
|
}
|
|
|
|
if(cfg_cmd1("fw", block)) {
|
|
ok_button();
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cprintf("Unable to write block $%4X", block);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
cleanup:
|
|
if(f != NULL)
|
|
fclose(f);
|
|
}
|
|
|
|
void cfgfile_download(char *pdfile, uint16_t block) {
|
|
FILE *f;
|
|
size_t byteswritten;
|
|
int i;
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(13);
|
|
cputs("Reading file,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
f = fopen(pdfile, "wb");
|
|
if(f == NULL) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", longmax(28, strlen(pdfile)+2), 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to open prodos file");
|
|
gotoy(12); gotox(20 - (strlen(pdfile)/2));
|
|
cputs(pdfile);
|
|
ok_button();
|
|
|
|
return;
|
|
}
|
|
|
|
if(cfg_cmd1("fr", block)) {
|
|
ok_button();
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cprintf("Unable to read block $%4X", block);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
CF_PTRL = 0;
|
|
CF_PTRH = 0;
|
|
for(i = 0; i < sizeof(blockbuffer); i++) {
|
|
blockbuffer[i] = CF_DATR;
|
|
}
|
|
|
|
byteswritten = fwrite(blockbuffer, 1, sizeof(blockbuffer), f);
|
|
if(byteswritten != sizeof(blockbuffer)) {
|
|
ok_button();
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Error ", longmax(30, strlen(pdfile)+2), 7, 1);
|
|
gotoy(11); gotox(6);
|
|
cputs("Unable to write prodos file");
|
|
gotoy(12); gotox(20 - (strlen(pdfile)/2));
|
|
cputs(pdfile);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
cleanup:
|
|
if(f != NULL)
|
|
fclose(f);
|
|
}
|
|
|
|
void restore_config() {
|
|
uint16_t last, next;
|
|
|
|
// Get current config blocks
|
|
if(cfg_cmd0("fc")) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to get config block");
|
|
ok_button();
|
|
return;
|
|
}
|
|
|
|
next = RPY_BUFFER[5];
|
|
next <<= 8;
|
|
next |= RPY_BUFFER[4];
|
|
|
|
last = RPY_BUFFER[3];
|
|
last <<= 8;
|
|
last |= RPY_BUFFER[2];
|
|
|
|
if(cfg_cmd1("fe", last)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cprintf("Unable to erase block $%4X", block);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
cfgfile_upload("CONFIG.BACKUP", next);
|
|
}
|
|
|
|
void backup_config() {
|
|
uint16_t last;
|
|
|
|
// Get current config blocks
|
|
if(cfg_cmd0("fc")) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to get config block");
|
|
ok_button();
|
|
goto cleanup;
|
|
}
|
|
|
|
last = RPY_BUFFER[3];
|
|
last <<= 8;
|
|
last |= RPY_BUFFER[2];
|
|
|
|
cfgfile_download("CONFIG.BACKUP", last);
|
|
|
|
cleanup:
|
|
return;
|
|
}
|
|
|
|
void read_config() {
|
|
int i;
|
|
uint16_t next, last;
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(13);
|
|
cputs("Reading file,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
// Get current config blocks
|
|
if(cfg_cmd0("fc")) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to get config block");
|
|
ok_button();
|
|
goto cleanup;
|
|
}
|
|
|
|
last = RPY_BUFFER[3];
|
|
last <<= 8;
|
|
last |= RPY_BUFFER[2];
|
|
|
|
if(cfg_cmd1("fr", last)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 30, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cprintf("Unable to read block $%4X", last);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
CF_PTRL = 0;
|
|
CF_PTRH = 0;
|
|
for(i = 0; i < sizeof(blockbuffer); i++) {
|
|
blockbuffer[i] = CF_DATR;
|
|
}
|
|
|
|
parse_config();
|
|
|
|
cleanup:
|
|
return;
|
|
}
|
|
|
|
int write_config() {
|
|
int i;
|
|
uint16_t next;
|
|
|
|
build_config(config_rev+1);
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(10);
|
|
cputs("Saving configuration,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
// Get current config blocks
|
|
if(cfg_cmd0("fc")) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(7);
|
|
cputs("Unable to get config block");
|
|
ok_button();
|
|
goto cleanup;
|
|
}
|
|
|
|
next = RPY_BUFFER[5];
|
|
next <<= 8;
|
|
next |= RPY_BUFFER[4];
|
|
|
|
if(cfg_cmd1("fe", next)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 32, 7, 1);
|
|
gotoy(11); gotox(6);
|
|
cprintf("Unable to erase block $%4X", next);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
CF_PTRL = 0;
|
|
CF_PTRH = 0;
|
|
for(i = 0; i < sizeof(blockbuffer); i++) {
|
|
CF_DATW = blockbuffer[i];
|
|
}
|
|
|
|
if(cfg_cmd1("fw", next)) {
|
|
ok_button();
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 32, 7, 1);
|
|
gotoy(11); gotox(6);
|
|
cprintf("Unable to write block $%04X", next);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
return 1;
|
|
|
|
cleanup:
|
|
return 0;
|
|
}
|
|
|
|
void apply_config(void) {
|
|
timeout = CARD_TIMEOUT;
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(10); gotox(13);
|
|
cputs("Rebooting card");
|
|
gotoy(11); gotox(9);
|
|
cputs("to apply configuration,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
// Ask card to reboot.
|
|
cfg_cmd0("RB");
|
|
|
|
while(timeout--);
|
|
}
|
|
|
|
int format_card(void) {
|
|
uint16_t last, next;
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(12);
|
|
cputs("Erasing configs,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
// Get current config blocks
|
|
if(cfg_cmd0("fc")) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(8);
|
|
cputs("Unable to get config block");
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
|
|
next = RPY_BUFFER[5];
|
|
next <<= 8;
|
|
next |= RPY_BUFFER[4];
|
|
|
|
last = RPY_BUFFER[3];
|
|
last <<= 8;
|
|
last |= RPY_BUFFER[2];
|
|
|
|
if(last != next) {
|
|
if(cfg_cmd1("fe", last)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(8);
|
|
cprintf("Unable to erase block $%04X", last);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
if(cfg_cmd1("fe", next)) {
|
|
backdrop(PROGNAME);
|
|
window(" Error ", 28, 7, 1);
|
|
gotoy(11); gotox(8);
|
|
cprintf("Unable to erase block $%04X", next);
|
|
ok_button();
|
|
|
|
goto cleanup;
|
|
}
|
|
}
|
|
|
|
return 1;
|
|
|
|
cleanup:
|
|
return 0;
|
|
}
|
|
|
|
int baud_menu(char *screen_title, int baudrate) {
|
|
int i, selected_item = 0;
|
|
|
|
for(i = 0; i < (sizeof(baudvalue)/sizeof(uint16_t)); i++) {
|
|
if(baudrate == baudvalue[i]) {
|
|
selected_item = i;
|
|
}
|
|
}
|
|
|
|
selected_item = list_menu(screen_title, " Baud Rate ", baud_strings, (sizeof(baud_strings)/sizeof(menu_strings_t))-1, selected_item);
|
|
|
|
return baudvalue[selected_item];
|
|
}
|
|
|
|
static char tolower(char c) {
|
|
if((c >= 'A') && (c <= 'Z')) {
|
|
return (c-'A')+'a';
|
|
}
|
|
return c;
|
|
}
|
|
|
|
void jdhost_edit(void) {
|
|
char temp_host[32];
|
|
int c, l;
|
|
int paint_menu = 1;
|
|
int y = 12 - 1;
|
|
int x = 7;
|
|
|
|
strcpy(temp_host, jd_host);
|
|
l = strlen(temp_host);
|
|
|
|
for(;;) {
|
|
if(paint_menu) {
|
|
backdrop("JetDirect");
|
|
window(" Server ", 30, 5, 1);
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter hostname or IP:");
|
|
gotoy(y+2); gotox(x);
|
|
cputs("_________________________");
|
|
gotoy(y+2); gotox(x);
|
|
cputs(temp_host);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
gotox(x+l);
|
|
cputc(CHAR_CURSOR);
|
|
c = cgetc();
|
|
if(c == 0x08) {
|
|
if(l > 0) {
|
|
// Remove flashing cursor
|
|
gotox(x+l);
|
|
cputc('_');
|
|
|
|
// Remove deleted character
|
|
l--;
|
|
gotox(x+l);
|
|
cputc('_');
|
|
temp_host[l] = 0;
|
|
}
|
|
} else if(c == 0x0D) {
|
|
strcpy(jd_host, temp_host);
|
|
return;
|
|
} else if(c == 0x1B) {
|
|
if(confirm(" Are you sure? ", "Go back without saving?")) {
|
|
return;
|
|
}
|
|
paint_menu = 1;
|
|
} else if(((c >= 'A') && (c <= 'Z')) || ((c >= 'a') && (c <= 'z')) || ((c >= '0') && (c <= '9')) || (c == '.')) {
|
|
if(l < 24) {
|
|
gotox(x+l);
|
|
cputc(tolower(c));
|
|
temp_host[l] = tolower(c);
|
|
l++;
|
|
temp_host[l] = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void jdport_edit(void) {
|
|
char temp_port[8];
|
|
int c, l;
|
|
int paint_menu = 1;
|
|
int y = 12 - 1;
|
|
int x = 15;
|
|
|
|
sprintf(temp_port, "%i", jd_port);
|
|
l = strlen(temp_port);
|
|
|
|
for(;;) {
|
|
if(paint_menu) {
|
|
backdrop("JetDirect");
|
|
window(" TCP/IP Port ", 16, 5, 1);
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter port:");
|
|
gotoy(y+2); gotox(x);
|
|
cputs("______");
|
|
gotoy(y+2); gotox(x);
|
|
cputs(temp_port);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
gotox(x+l);
|
|
cputc(CHAR_CURSOR);
|
|
c = cgetc();
|
|
if(c == 0x08) {
|
|
if(l > 0) {
|
|
// Remove flashing cursor
|
|
gotox(x+l);
|
|
cputc('_');
|
|
|
|
// Remove deleted character
|
|
l--;
|
|
gotox(x+l);
|
|
cputc('_');
|
|
temp_port[l] = 0;
|
|
}
|
|
} else if(c == 0x0D) {
|
|
jd_port = strtoul(temp_port, NULL, 0);
|
|
return;
|
|
} else if(c == 0x1B) {
|
|
gotox(x+l);
|
|
cputc('_');
|
|
if(confirm(" Are you sure? ", "Go back without saving?")) {
|
|
return;
|
|
}
|
|
paint_menu = 1;
|
|
} else if((c >= '0') && (c <= '9')) {
|
|
if(l < 5) {
|
|
gotox(x+l);
|
|
cputc(c);
|
|
temp_port[l] = c;
|
|
l++;
|
|
temp_port[l] = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void ssid_edit(void) {
|
|
char temp_ssid[32];
|
|
int c, l;
|
|
int paint_menu = 1;
|
|
int y = 12 - 1;
|
|
int x = 7;
|
|
|
|
strcpy(temp_ssid, wifi_ssid);
|
|
l = strlen(temp_ssid);
|
|
|
|
for(;;) {
|
|
if(paint_menu) {
|
|
backdrop("WiFi");
|
|
window(" Network Name (SSID) ", 30, 5, 1);
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter network name:");
|
|
gotoy(y+2); gotox(x);
|
|
cputs("_________________________");
|
|
gotoy(y+2); gotox(x);
|
|
cputs(temp_ssid);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
gotox(x+l);
|
|
cputc(CHAR_CURSOR);
|
|
c = cgetc();
|
|
if(c == 0x08) {
|
|
if(l > 0) {
|
|
// Remove flashing cursor
|
|
gotox(x+l);
|
|
cputc('_');
|
|
|
|
// Remove deleted character
|
|
l--;
|
|
gotox(x+l);
|
|
cputc('_');
|
|
temp_ssid[l] = 0;
|
|
}
|
|
} else if(c == 0x0D) {
|
|
strcpy(wifi_ssid, temp_ssid);
|
|
return;
|
|
} else if(c == 0x1B) {
|
|
gotox(x+l);
|
|
cputc('_');
|
|
if(confirm(" Are you sure? ", "Go back without saving?")) {
|
|
return;
|
|
}
|
|
paint_menu = 1;
|
|
} else if(c >= 32) {
|
|
if(l < 24) {
|
|
gotox(x+l);
|
|
cputc(c);
|
|
temp_ssid[l] = c;
|
|
l++;
|
|
temp_ssid[l] = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void psk_edit(void) {
|
|
char temp_psk[32];
|
|
int c, l;
|
|
int paint_menu = 1;
|
|
int y = 12 - 1;
|
|
int x = 7;
|
|
|
|
strcpy(temp_psk, wifi_psk);
|
|
l = strlen(temp_psk);
|
|
|
|
for(;;) {
|
|
if(paint_menu) {
|
|
backdrop("WiFi");
|
|
window(" Passphrase (PSK) ", 30, 5, 1);
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter passphrase:");
|
|
gotoy(y+1); gotox(x);
|
|
cputs("_________________________");
|
|
gotoy(y+1); gotox(x);
|
|
cputs(temp_psk);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
gotox(x+l);
|
|
cputc(CHAR_CURSOR);
|
|
c = cgetc();
|
|
if(c == 0x08) {
|
|
if(l > 0) {
|
|
// Remove flashing cursor
|
|
gotox(x+l);
|
|
cputc('_');
|
|
|
|
// Remove deleted character
|
|
l--;
|
|
gotox(x+l);
|
|
cputc('_');
|
|
temp_psk[l] = 0;
|
|
}
|
|
} else if(c == 0x0D) {
|
|
strcpy(wifi_psk, temp_psk);
|
|
return;
|
|
} else if(c == 0x1B) {
|
|
gotox(x+l);
|
|
cputc('_');
|
|
if(confirm(" Are you sure? ", "Go back without saving?")) {
|
|
return;
|
|
}
|
|
paint_menu = 1;
|
|
} else if(c >= 32) {
|
|
if(l < 24) {
|
|
gotox(x+l);
|
|
cputc(c);
|
|
temp_psk[l] = c;
|
|
l++;
|
|
temp_psk[l] = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
int valid_netmask(uint32_t ip) {
|
|
int i;
|
|
uint32_t first_one = 32;
|
|
uint32_t bit_test = 1;
|
|
|
|
if((ip & 0x80000000) == 0) return 0;
|
|
|
|
for(i = 0; i < 31; i++) {
|
|
if(ip & bit_test) { // Bit is set
|
|
if(i < first_one) {
|
|
first_one = i;
|
|
}
|
|
} else { // Bit is clear
|
|
if(i > first_one) { // But we've seen a 1 already
|
|
return 0;
|
|
}
|
|
}
|
|
bit_test <<= 1;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
int valid_ip_or_dhcp(uint32_t ip) {
|
|
if(ip == 0) return 1;
|
|
|
|
if((ip & 0xFF000000) == 0) return 0;
|
|
if(ip == wifi_netmask) return 0;
|
|
|
|
if((ip & ~wifi_netmask) == 0) return 0;
|
|
if((ip & ~wifi_netmask) == ~wifi_netmask) return 0;
|
|
|
|
return 1;
|
|
}
|
|
|
|
// Parse a decimal dotted quad segment
|
|
uint16_t parse_dq(char *ptr, char **ptr_out) {
|
|
uint16_t rv = 0;
|
|
while((*ptr != 0) && (*ptr != '.')) {
|
|
if((*ptr >= '0') && (*ptr <= '9')) {
|
|
rv *= 10;
|
|
rv += *ptr - '0';
|
|
} else {
|
|
*ptr_out = ptr;
|
|
return 0xFFFF;
|
|
}
|
|
ptr++;
|
|
}
|
|
|
|
if(*ptr == 0) {
|
|
*ptr_out = NULL;
|
|
} else {
|
|
*ptr_out = ptr;
|
|
}
|
|
|
|
return rv;
|
|
}
|
|
|
|
uint32_t address_edit(uint32_t ip, int is_netmask) {
|
|
char temp_address[32];
|
|
int c, l;
|
|
int paint_menu = 1;
|
|
uint16_t temp_ip[4];
|
|
int y = 12 - 1;
|
|
int x = is_netmask ? 12 : 5;
|
|
|
|
temp_ip[0] = (ip >> 24) & 0xff;
|
|
temp_ip[1] = (ip >> 16) & 0xff;
|
|
temp_ip[2] = (ip >> 8) & 0xff;
|
|
temp_ip[3] = (ip >> 0) & 0xff;
|
|
|
|
sprintf(temp_address, "%d.%d.%d.%d", temp_ip[0], temp_ip[1], temp_ip[2], temp_ip[3]);
|
|
l = strlen(temp_address);
|
|
|
|
for(;;) {
|
|
if(paint_menu) {
|
|
backdrop("WiFi");
|
|
window(is_netmask ? "Netmask" : "IP Address", is_netmask ? 20 : 32, 5, 1);
|
|
if(is_netmask) {
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter netmask:");
|
|
} else {
|
|
gotoy(y+0); gotox(x);
|
|
cputs("Enter IP or 0.0.0.0 for DHCP:");
|
|
}
|
|
gotoy(y+2); gotox(x);
|
|
cputs("________________");
|
|
gotoy(y+2); gotox(x);
|
|
cputs(temp_address);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
gotox(x+l);
|
|
cputc(CHAR_CURSOR);
|
|
c = cgetc();
|
|
if(c == 0x08) {
|
|
if(l > 0) {
|
|
// Remove flashing cursor
|
|
gotox(x+l);
|
|
cputc('_');
|
|
|
|
// Remove deleted character
|
|
l--;
|
|
gotox(x+l);
|
|
cputc('_');
|
|
temp_address[l] = 0;
|
|
}
|
|
} else if((c == 0x0A) || (c == 0x0D)) {
|
|
char *ptr = temp_address;
|
|
temp_ip[0] = parse_dq(ptr, &ptr);
|
|
if((ptr != NULL) && (*ptr == '.')) {
|
|
ptr++;
|
|
temp_ip[1] = parse_dq(ptr, &ptr);
|
|
}
|
|
if((ptr != NULL) && (*ptr == '.')) {
|
|
ptr++;
|
|
temp_ip[2] = parse_dq(ptr, &ptr);
|
|
}
|
|
if((ptr != NULL) && (*ptr == '.')) {
|
|
ptr++;
|
|
temp_ip[3] = parse_dq(ptr, &ptr);
|
|
if((temp_ip[0] < 256) && (temp_ip[1] < 256) &&
|
|
(temp_ip[2] < 256) && (temp_ip[3] < 256)) {
|
|
ip = temp_ip[0];
|
|
ip <<= 8;
|
|
ip |= temp_ip[1];
|
|
ip <<= 8;
|
|
ip |= temp_ip[2];
|
|
ip <<= 8;
|
|
ip |= temp_ip[3];
|
|
if((is_netmask && valid_netmask(ip)) || (!is_netmask && valid_ip_or_dhcp(ip)))
|
|
return ip;
|
|
}
|
|
}
|
|
message(" Error ", "Invalid Address Specified");
|
|
paint_menu = 1;
|
|
} else if(c == 0x1B) {
|
|
backdrop("WiFi");
|
|
if(confirm(" Are you sure? ", "Go back without saving?")) {
|
|
return ip;
|
|
}
|
|
paint_menu = 2;
|
|
} else if(c >= 32) {
|
|
if(l < 15) {
|
|
gotox(x+l);
|
|
cputc(c);
|
|
temp_address[l] = c;
|
|
l++;
|
|
temp_address[l] = 0;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
int video_menu_action(int action) {
|
|
switch(action) {
|
|
case 0:
|
|
default_font = list_menu("Video Settings", "Default Font", font_strings, (sizeof(font_strings)/sizeof(menu_strings_t))-1, default_font);
|
|
return 2;
|
|
case 1:
|
|
mono_palette = list_menu("Video Settings", "Monochrome Mode", monochrome_strings, (sizeof(monochrome_strings)/sizeof(menu_strings_t))-1, mono_palette);
|
|
return 2;
|
|
case 2:
|
|
terminal_fgcolor = list_menu("Video Settings", "Foreground Color", color_strings, (sizeof(color_strings)/sizeof(menu_strings_t))-1, terminal_fgcolor);
|
|
return 2;
|
|
case 3:
|
|
terminal_bgcolor = list_menu("Video Settings", "Background Color", color_strings, (sizeof(color_strings)/sizeof(menu_strings_t))-1, terminal_bgcolor);
|
|
return 2;
|
|
case 4:
|
|
terminal_border = list_menu("Video Settings", "Border Color", color_strings, (sizeof(color_strings)/sizeof(menu_strings_t))-1, terminal_border);
|
|
return 2;
|
|
case 5:
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
void video_menu(void) {
|
|
int paint_menu = 2;
|
|
int selected_item = 0;
|
|
int y = 12 - 7;
|
|
|
|
while(paint_menu >= 0) {
|
|
if(paint_menu == 2) {
|
|
backdrop("Video Settings");
|
|
window(" Video Settings ", 26, 17, 0);
|
|
}
|
|
if(paint_menu > 0) {
|
|
gotoy(y+0); gotox(8);
|
|
print_menu_select_int("Default Font: %6x", default_font, 24, (selected_item == 0), 0);
|
|
gotoy(y+2); gotox(8);
|
|
print_menu_select_str("Monochrome: %8s", monochrome_strings[mono_palette].str, 24, (selected_item == 1), 0);
|
|
gotoy(y+4); gotox(8);
|
|
print_menu_select_str("Foreground: %8s", color_strings[terminal_fgcolor].str, 24, (selected_item == 2), 0);
|
|
gotoy(y+6); gotox(8);
|
|
print_menu_select_str("Background: %8s", color_strings[terminal_bgcolor].str, 24, (selected_item == 3), 0);
|
|
gotoy(y+8); gotox(8);
|
|
print_menu_select_str("Border: %12s", color_strings[terminal_border & 0xf].str, 24, (selected_item == 4), 0);
|
|
|
|
gotoy(y+14); gotox(8);
|
|
print_menu_select(" Back to Main Menu", 24, (selected_item == 5), 0);
|
|
|
|
paint_menu = 0;
|
|
}
|
|
switch(cgetc()) {
|
|
case 0x08:
|
|
case 0x0B:
|
|
if(selected_item > 0) {
|
|
selected_item--;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x15:
|
|
case 0x0A:
|
|
if(selected_item < 5) {
|
|
selected_item++;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x0D:
|
|
paint_menu = video_menu_action(selected_item);
|
|
break;
|
|
case 0x1B:
|
|
paint_menu = -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
int wifi_menu_action(int action) {
|
|
switch(action) {
|
|
case 0:
|
|
wifimode = (wifimode == WIFI_AP) ? WIFI_CLIENT : WIFI_AP;
|
|
return 1;
|
|
case 1:
|
|
ssid_edit();
|
|
return 2;
|
|
case 2:
|
|
psk_edit();
|
|
return 2;
|
|
case 3:
|
|
if(wifimode != WIFI_AP) {
|
|
wifi_address = address_edit(wifi_address, 0);
|
|
return 2;
|
|
}
|
|
return 0;
|
|
case 4:
|
|
if(wifimode != WIFI_AP) {
|
|
wifi_netmask = address_edit(wifi_netmask, 1);
|
|
return 2;
|
|
}
|
|
return 0;
|
|
case 5:
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
void wifi_menu(void) {
|
|
int paint_menu = 2;
|
|
int selected_item = 0;
|
|
int y = 12 - 7;
|
|
|
|
while(paint_menu >= 0) {
|
|
if(paint_menu == 2) {
|
|
backdrop(PROGNAME);
|
|
window(" WiFi Options ", 26, 17, 0);
|
|
}
|
|
if(paint_menu > 0) {
|
|
gotoy(y+0); gotox(8);
|
|
print_menu_select_str("Mode: %14s", wifi_mode_str[wifimode == WIFI_CLIENT].str, 24, (selected_item == 0), 0);
|
|
|
|
gotoy(y+2); gotox(8);
|
|
print_menu_select("Network Name:", 24, (selected_item == 1), 0);
|
|
gotoy(y+3); gotox(8);
|
|
print_menu_select_str("%20s", wifi_ssid, 24, (selected_item == 1), 1);
|
|
|
|
gotoy(y+5); gotox(8);
|
|
print_menu_select("Pre-Shared Key:", 24, (selected_item == 2), 0);
|
|
gotoy(y+6); gotox(8);
|
|
print_menu_select_str("%20s", "*****", 24, (selected_item == 2), 1);
|
|
|
|
gotoy(y+8); gotox(8);
|
|
print_menu_select("IP Address:", 24, (selected_item == 3), 0);
|
|
gotoy(y+9); gotox(8);
|
|
if(wifimode == WIFI_AP) {
|
|
print_menu_select_str("%20s", "10.65.50.1", 24, (selected_item == 3), 1);
|
|
} else if(wifi_address == 0) {
|
|
print_menu_select_str("%20s", "DHCP", 24, (selected_item == 3), 1);
|
|
} else {
|
|
print_menu_select_ip(wifi_address, 24, (selected_item == 3), 1);
|
|
}
|
|
|
|
gotoy(y+11); gotox(8);
|
|
print_menu_select("Netmask:", 24, (selected_item == 4), 0);
|
|
gotoy(y+12); gotox(8);
|
|
if(wifimode == WIFI_AP) {
|
|
print_menu_select_str("%20s", "255.255.255.0", 24, (selected_item == 4), 1);
|
|
} else {
|
|
print_menu_select_ip(wifi_netmask, 24, (selected_item == 4), 1);
|
|
}
|
|
|
|
gotoy(y+14); gotox(8);
|
|
print_menu_select("Back to Main Menu", 24, (selected_item == 5), 0);
|
|
|
|
paint_menu = 0;
|
|
}
|
|
|
|
switch(cgetc()) {
|
|
case 0x08:
|
|
case 0x0B:
|
|
if(selected_item > 0) {
|
|
selected_item--;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x15:
|
|
case 0x0A:
|
|
if(selected_item < 5) {
|
|
selected_item++;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x0D:
|
|
paint_menu = wifi_menu_action(selected_item);
|
|
break;
|
|
case 0x1B:
|
|
paint_menu = -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
int io_menu_action(int action) {
|
|
switch(action) {
|
|
case 0:
|
|
serialmux[0] = list_menu("Serial Port 0", " Port Mux ", serialmux_strings, (sizeof(serialmux_strings)/sizeof(menu_strings_t))-1, serialmux[0]);
|
|
return 2;
|
|
case 1:
|
|
baud[0] = baud_menu("Serial Port 0", baud[0]);
|
|
return 2;
|
|
case 2:
|
|
serialmux[1] = list_menu("Serial Port 1", " Port Mux ", serialmux_strings, (sizeof(serialmux_strings)/sizeof(menu_strings_t))-1, serialmux[1]);
|
|
return 2;
|
|
case 3:
|
|
baud[1] = baud_menu("Serial Port 1", baud[1]);
|
|
return 2;
|
|
case 4:
|
|
jdhost_edit();
|
|
return 2;
|
|
case 5:
|
|
jdport_edit();
|
|
return 2;
|
|
case 6:
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
void io_menu(void) {
|
|
int paint_menu = 2;
|
|
int selected_item = 0;
|
|
int y = 12 - 7;
|
|
|
|
while(paint_menu >= 0) {
|
|
if(paint_menu == 2) {
|
|
backdrop(PROGNAME);
|
|
window(" I/O Settings ", 26, 17, 0);
|
|
}
|
|
if(paint_menu > 0) {
|
|
gotoy(y+0); gotox(8);
|
|
print_menu_select_str("Serial 0: %10s", serialmux_strings[serialmux[0]].str, 24, (selected_item == 0), 0);
|
|
gotoy(y+1); gotox(8);
|
|
print_menu_select_int(" Baud: %13d", baud[0], 24, (selected_item == 1), 0);
|
|
|
|
gotoy(y+3); gotox(8);
|
|
print_menu_select_str("Serial 1: %10s", serialmux_strings[serialmux[1]].str, 24, (selected_item == 2), 0);
|
|
gotoy(y+4); gotox(8);
|
|
print_menu_select_int(" Baud: %13d", baud[1], 24, (selected_item == 3), 0);
|
|
|
|
gotoy(y+6); gotox(8);
|
|
print_menu_select("JetDirect Server:", 24, (selected_item == 4), 0);
|
|
gotoy(y+7); gotox(8);
|
|
print_menu_select_str("%20s", jd_host, 24, (selected_item == 4), 1);
|
|
|
|
gotoy(y+9); gotox(8);
|
|
print_menu_select("JetDirect Port:", 24, (selected_item == 5), 0);
|
|
gotoy(y+10); gotox(8);
|
|
print_menu_select_int("%20d", jd_port, 24, (selected_item == 5), 1);
|
|
|
|
gotoy(y+14); gotox(8);
|
|
print_menu_select("Back to Main Menu", 24, (selected_item == 6), 0);
|
|
|
|
paint_menu = 0;
|
|
}
|
|
|
|
switch(cgetc()) {
|
|
case 0x08:
|
|
case 0x0B:
|
|
if(selected_item > 0) {
|
|
selected_item--;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x15:
|
|
case 0x0A:
|
|
if(selected_item < 6) {
|
|
selected_item++;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x0D:
|
|
paint_menu = io_menu_action(selected_item);
|
|
break;
|
|
case 0x1B:
|
|
paint_menu = -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
int main_menu_action(int action) {
|
|
switch(action) {
|
|
case 0:
|
|
machine = list_menu(PROGNAME, " Host Type ", machine_strings, (sizeof(machine_strings)/sizeof(menu_strings_t))-1, machine);
|
|
return 2;
|
|
case 1:
|
|
video_menu();
|
|
return 2;
|
|
case 2:
|
|
wifi_menu();
|
|
return 2;
|
|
case 3:
|
|
io_menu();
|
|
return 2;
|
|
case 4:
|
|
backup_config();
|
|
return 2;
|
|
case 5:
|
|
restore_config();
|
|
return 2;
|
|
case 6:
|
|
backdrop(PROGNAME);
|
|
if(confirm(" Are you sure? ", "Format Card?")) {
|
|
format_card();
|
|
default_config();
|
|
return 2;
|
|
}
|
|
return 2;
|
|
case 7:
|
|
backdrop(PROGNAME);
|
|
if(confirm(" Are you sure? ", "Quit without saving?")) {
|
|
clrscr();
|
|
exec("MENU.SYSTEM", "");
|
|
return -1;
|
|
}
|
|
return 2;
|
|
case 8:
|
|
backdrop(PROGNAME);
|
|
if(confirm(" Are you sure? ", "Save and exit?")) {
|
|
write_config();
|
|
clrscr();
|
|
exec("MENU.SYSTEM", "");
|
|
return -1;
|
|
}
|
|
return 2;
|
|
}
|
|
}
|
|
|
|
void main (void) {
|
|
int paint_menu = 2;
|
|
int selected_item = 0;
|
|
int y = 12 - 6;
|
|
|
|
if(!prompt_slot(PROGNAME)) {
|
|
goto cleanup;
|
|
}
|
|
|
|
switch(get_ostype() & 0xF0) {
|
|
default:
|
|
case 0x10:
|
|
machine = MACHINE_APPLE_II;
|
|
break;
|
|
case 0x30:
|
|
machine = MACHINE_APPLE_IIE;
|
|
break;
|
|
case 0x80:
|
|
machine = MACHINE_APPLE_IIGS;
|
|
break;
|
|
}
|
|
|
|
backdrop(PROGNAME);
|
|
window(" Please Wait ", 26, 6, 1);
|
|
gotoy(11); gotox(9);
|
|
cputs("Reading configuration,");
|
|
gotoy(12); gotox(8);
|
|
cputs("your screen may flicker.");
|
|
|
|
read_config();
|
|
|
|
while(paint_menu >= 0) {
|
|
if(paint_menu == 2) {
|
|
backdrop(PROGNAME);
|
|
|
|
window(" Main Menu ", 26, 15, 0);
|
|
gotoy(y+5); gotox(8);
|
|
repeatchar(CHAR_BORDER_BOTTOM, 24);
|
|
gotoy(y+10); gotox(8);
|
|
repeatchar(CHAR_BORDER_BOTTOM, 24);
|
|
}
|
|
if(paint_menu) {
|
|
gotoy(y+0); gotox(8);
|
|
if(machine < MACHINE_MAXVALUE) {
|
|
print_menu_select_str("Machine: %11s", machine_strings[machine].str, 24, (selected_item == 0), 0);
|
|
} else {
|
|
print_menu_select("Machine: Unknown", 24, (selected_item == 0), 0);
|
|
}
|
|
gotoy(y+1); gotox(8);
|
|
print_menu_select("Video Settings", 24, (selected_item == 1), 0);
|
|
gotoy(y+2); gotox(8);
|
|
print_menu_select("WiFi Settings", 24, (selected_item == 2), 0);
|
|
gotoy(y+3); gotox(8);
|
|
print_menu_select("I/O Settings", 24, (selected_item == 3), 0);
|
|
|
|
gotoy(y+6); gotox(8);
|
|
print_menu_select("Backup config file", 24, (selected_item == 4), 0);
|
|
gotoy(y+7); gotox(8);
|
|
print_menu_select("Restore config file", 24, (selected_item == 5), 0);
|
|
gotoy(y+8); gotox(8);
|
|
print_menu_select("Erase config files", 24, (selected_item == 6), 0);
|
|
|
|
gotoy(y+11); gotox(8);
|
|
print_menu_select("Quit without saving", 24, (selected_item == 7), 0);
|
|
gotoy(y+12); gotox(8);
|
|
print_menu_select("Save config & Exit", 24, (selected_item == 8), 0);
|
|
paint_menu = 0;
|
|
}
|
|
|
|
switch(cgetc()) {
|
|
case 0x08:
|
|
case 0x0B:
|
|
if(selected_item > 0) {
|
|
selected_item--;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 0x15:
|
|
case 0x0A:
|
|
if(selected_item < 8) {
|
|
selected_item++;
|
|
paint_menu = 1;
|
|
}
|
|
break;
|
|
case 'M':
|
|
case 'm':
|
|
paint_menu = main_menu_action(selected_item = 0);
|
|
break;
|
|
case 'V':
|
|
case 'v':
|
|
paint_menu = main_menu_action(selected_item = 1);
|
|
break;
|
|
case 'W':
|
|
case 'w':
|
|
paint_menu = main_menu_action(selected_item = 2);
|
|
break;
|
|
case 'I':
|
|
case 'i':
|
|
paint_menu = main_menu_action(selected_item = 3);
|
|
break;
|
|
case 'B':
|
|
case 'b':
|
|
paint_menu = main_menu_action(selected_item = 4);
|
|
break;
|
|
case 'R':
|
|
case 'r':
|
|
paint_menu = main_menu_action(selected_item = 5);
|
|
break;
|
|
case 'F':
|
|
case 'f':
|
|
paint_menu = main_menu_action(selected_item = 6);
|
|
break;
|
|
case 0x1B:
|
|
case 'Q':
|
|
case 'q':
|
|
paint_menu = main_menu_action(selected_item = 7);
|
|
break;
|
|
case 'S':
|
|
case 's':
|
|
paint_menu = main_menu_action(selected_item = 8);
|
|
break;
|
|
case 0x0D:
|
|
paint_menu = main_menu_action(selected_item);
|
|
break;
|
|
}
|
|
}
|
|
|
|
cleanup:
|
|
backdrop(PROGNAME);
|
|
gotoy(12); gotox(13);
|
|
cputs("Launching Menu");
|
|
|
|
exec("MENU.SYSTEM", "");
|
|
}
|