static t_stat net_attach(UNIT *uptr, char *cptr) {
uint32 i;
char host[CBUFSIZE], port[CBUFSIZE];
t_stat r;
r = sim_parse_addr (cptr, host, sizeof(host), "localhost", port, sizeof(port), "3000", NULL);
if (r != SCPE_OK)
return SCPE_ARG;
net_reset(&net_dev);
for (i = 0; i <= MAX_CONNECTIONS; i++)
serviceDescriptor[i].ioSocket = 0;
if (net_unit.flags & UNIT_SERVER) {
net_unit.wait = NET_INIT_POLL_SERVER;
serviceDescriptor[1].masterSocket = sim_master_sock(cptr, NULL);
if (serviceDescriptor[1].masterSocket == INVALID_SOCKET)
return SCPE_IOERR;
}
else {
net_unit.wait = NET_INIT_POLL_CLIENT;
serviceDescriptor[0].ioSocket = sim_connect_sock(cptr, "localhost", "3000");
if (serviceDescriptor[0].ioSocket == INVALID_SOCKET)
return SCPE_IOERR;
}
net_unit.flags |= UNIT_ATT;
net_unit.filename = (char *) calloc(1, strlen(cptr)+1); /* alloc name buf */
if (net_unit.filename == NULL)
return SCPE_MEM;
strcpy(net_unit.filename, cptr); /* save name */
return SCPE_OK;
}
gint Restart_clicked(UNUSED GtkWidget *Button, UNUSED gpointer data)
{
net_reset();
gtk_redraw();
return FALSE;
}
void select_loop(void) {
fd_set readfd;
fd_set writefd;
int anyset = 0;
int maxfd = 0;
int dnsfd, netfd;
#ifdef ENABLE_IPV6
int dnsfd6;
#endif
int NumPing = 0;
int paused = 0;
struct timeval lasttime, thistime, selecttime;
struct timeval startgrace;
int dt;
int rv;
int graceperiod = 0;
memset(&startgrace, 0, sizeof(startgrace));
gettimeofday(&lasttime, NULL);
while(1) {
dt = calc_deltatime (WaitTime);
intervaltime.tv_sec = dt / 1000000;
intervaltime.tv_usec = dt % 1000000;
FD_ZERO(&readfd);
FD_ZERO(&writefd);
maxfd = 0;
if(Interactive) {
FD_SET(0, &readfd);
maxfd = 1;
}
#ifdef ENABLE_IPV6
if (dns) {
dnsfd6 = dns_waitfd6();
if (dnsfd6 >= 0) {
FD_SET(dnsfd6, &readfd);
if(dnsfd6 >= maxfd) maxfd = dnsfd6 + 1;
} else {
dnsfd6 = 0;
}
} else
dnsfd6 = 0;
#endif
if (dns) {
dnsfd = dns_waitfd();
FD_SET(dnsfd, &readfd);
if(dnsfd >= maxfd) maxfd = dnsfd + 1;
} else
dnsfd = 0;
netfd = net_waitfd();
FD_SET(netfd, &readfd);
if(netfd >= maxfd) maxfd = netfd + 1;
if (mtrtype == IPPROTO_TCP)
net_add_fds(&writefd, &maxfd);
do {
if(anyset || paused) {
/* Set timeout to 0.1s.
* While this is almost instantaneous for human operators,
* it's slow enough for computers to go do something else;
* this prevents mtr from hogging 100% CPU time on one core.
*/
selecttime.tv_sec = 0;
selecttime.tv_usec = paused?100000:0;
rv = select(maxfd, (void *)&readfd, &writefd, NULL, &selecttime);
} else {
if(Interactive) display_redraw();
gettimeofday(&thistime, NULL);
if(thistime.tv_sec > lasttime.tv_sec + intervaltime.tv_sec ||
(thistime.tv_sec == lasttime.tv_sec + intervaltime.tv_sec &&
thistime.tv_usec >= lasttime.tv_usec + intervaltime.tv_usec)) {
lasttime = thistime;
if (!graceperiod) {
if (NumPing >= MaxPing && (!Interactive || ForceMaxPing)) {
graceperiod = 1;
startgrace = thistime;
}
/* do not send out batch when we've already initiated grace period */
if (!graceperiod && net_send_batch())
NumPing++;
}
}
if (graceperiod) {
dt = (thistime.tv_usec - startgrace.tv_usec) +
1000000 * (thistime.tv_sec - startgrace.tv_sec);
if (dt > GRACETIME)
return;
}
selecttime.tv_usec = (thistime.tv_usec - lasttime.tv_usec);
selecttime.tv_sec = (thistime.tv_sec - lasttime.tv_sec);
if (selecttime.tv_usec < 0) {
--selecttime.tv_sec;
selecttime.tv_usec += 1000000;
}
selecttime.tv_usec = intervaltime.tv_usec - selecttime.tv_usec;
selecttime.tv_sec = intervaltime.tv_sec - selecttime.tv_sec;
if (selecttime.tv_usec < 0) {
--selecttime.tv_sec;
selecttime.tv_usec += 1000000;
}
if (dns) {
if ((selecttime.tv_sec > (time_t)dnsinterval) ||
((selecttime.tv_sec == (time_t)dnsinterval) &&
(selecttime.tv_usec > ((time_t)(dnsinterval * 1000000) % 1000000)))) {
selecttime.tv_sec = (time_t)dnsinterval;
selecttime.tv_usec = (time_t)(dnsinterval * 1000000) % 1000000;
}
}
rv = select(maxfd, (void *)&readfd, NULL, NULL, &selecttime);
}
} while ((rv < 0) && (errno == EINTR));
if (rv < 0) {
perror ("Select failed");
exit (1);
}
anyset = 0;
/* Have we got new packets back? */
if(FD_ISSET(netfd, &readfd)) {
net_process_return();
anyset = 1;
}
if (dns) {
/* Handle any pending resolver events */
dnsinterval = WaitTime;
dns_events(&dnsinterval);
}
/* Have we finished a nameservice lookup? */
#ifdef ENABLE_IPV6
if(dns && dnsfd6 && FD_ISSET(dnsfd6, &readfd)) {
dns_ack6();
anyset = 1;
}
#endif
if(dns && dnsfd && FD_ISSET(dnsfd, &readfd)) {
dns_ack();
anyset = 1;
}
/* Has a key been pressed? */
if(FD_ISSET(0, &readfd)) {
switch (display_keyaction()) {
case ActionQuit:
return;
break;
case ActionReset:
net_reset();
break;
case ActionDisplay:
display_mode = (display_mode+1) % 3;
break;
case ActionClear:
display_clear();
break;
case ActionPause:
paused=1;
break;
case ActionResume:
paused=0;
break;
case ActionMPLS:
enablempls = !enablempls;
display_clear();
break;
case ActionDNS:
if (dns) {
use_dns = !use_dns;
display_clear();
}
break;
#ifdef IPINFO
case ActionII:
if (ipinfo_no >= 0) {
ipinfo_no++;
if (ipinfo_no > ipinfo_max)
ipinfo_no = 0;
}
break;
case ActionAS:
if (ipinfo_no >= 0)
ipinfo_no = ipinfo_no?0:ipinfo_max;
break;
#endif
case ActionScrollDown:
display_offset += 5;
break;
case ActionScrollUp:
display_offset -= 5;
if (display_offset < 0) {
display_offset = 0;
}
break;
}
anyset = 1;
}
/* Check for activity on open sockets */
if (mtrtype == IPPROTO_TCP)
net_process_fds(&writefd);
}
return;
}
void select_loop(void) {
fd_set readfd;
int anyset = 0;
int maxfd = 0;
int dnsfd, netfd;
int NumPing = 0;
int paused = 0;
struct timeval lasttime, thistime, selecttime;
int dt;
int rv;
gettimeofday(&lasttime, NULL);
while(1) {
dt = calc_deltatime (WaitTime);
intervaltime.tv_sec = dt / 1000000;
intervaltime.tv_usec = dt % 1000000;
FD_ZERO(&readfd);
maxfd = 0;
if(Interactive) {
FD_SET(0, &readfd);
maxfd = 1;
}
if (dns) {
dnsfd = dns_waitfd();
FD_SET(dnsfd, &readfd);
if(dnsfd >= maxfd) maxfd = dnsfd + 1;
} else
dnsfd = 0;
netfd = net_waitfd();
FD_SET(netfd, &readfd);
if(netfd >= maxfd) maxfd = netfd + 1;
do {
if(anyset || paused) {
selecttime.tv_sec = 0;
selecttime.tv_usec = 0;
rv = select(maxfd, (void *)&readfd, NULL, NULL, &selecttime);
} else {
if(Interactive) display_redraw();
gettimeofday(&thistime, NULL);
if(thistime.tv_sec > lasttime.tv_sec + intervaltime.tv_sec ||
(thistime.tv_sec == lasttime.tv_sec + intervaltime.tv_sec &&
thistime.tv_usec >= lasttime.tv_usec + intervaltime.tv_usec)) {
lasttime = thistime;
if(NumPing >= MaxPing && (!Interactive || ForceMaxPing))
return;
if (net_send_batch())
NumPing++;
}
selecttime.tv_usec = (thistime.tv_usec - lasttime.tv_usec);
selecttime.tv_sec = (thistime.tv_sec - lasttime.tv_sec);
if (selecttime.tv_usec < 0) {
--selecttime.tv_sec;
selecttime.tv_usec += 1000000;
}
selecttime.tv_usec = intervaltime.tv_usec - selecttime.tv_usec;
selecttime.tv_sec = intervaltime.tv_sec - selecttime.tv_sec;
if (selecttime.tv_usec < 0) {
--selecttime.tv_sec;
selecttime.tv_usec += 1000000;
}
if (dns) {
if ((selecttime.tv_sec > (time_t)dnsinterval) ||
((selecttime.tv_sec == (time_t)dnsinterval) &&
(selecttime.tv_usec > ((time_t)(dnsinterval * 1000000) % 1000000)))) {
selecttime.tv_sec = (time_t)dnsinterval;
selecttime.tv_usec = (time_t)(dnsinterval * 1000000) % 1000000;
}
}
rv = select(maxfd, (void *)&readfd, NULL, NULL, &selecttime);
}
} while ((rv < 0) && (errno == EINTR));
if (rv < 0) {
perror ("Select failed");
exit (1);
}
anyset = 0;
/* Have we got new packets back? */
if(FD_ISSET(netfd, &readfd)) {
net_process_return();
anyset = 1;
}
if (dns) {
/* Handle any pending resolver events */
dnsinterval = WaitTime;
dns_events(&dnsinterval);
}
/* Have we finished a nameservice lookup? */
if(dns && FD_ISSET(dnsfd, &readfd)) {
dns_ack();
anyset = 1;
}
/* Has a key been pressed? */
if(FD_ISSET(0, &readfd)) {
switch (display_keyaction()) {
case ActionQuit:
return;
break;
case ActionReset:
net_reset();
break;
case ActionDisplay:
display_mode = (display_mode+1) % 3;
break;
case ActionClear:
display_clear();
break;
case ActionPause:
paused=1;
break;
case ActionResume:
paused=0;
break;
case ActionMPLS:
enablempls = !enablempls;
display_clear();
break;
case ActionDNS:
if (dns) {
use_dns = !use_dns;
display_clear();
}
break;
case ActionScrollDown:
display_offset += 5;
break;
case ActionScrollUp:
display_offset -= 5;
if (display_offset < 0) {
display_offset = 0;
}
break;
}
anyset = 1;
}
}
return;
}
void gc_keyaction(int c) {
if (!c)
return;
if (c == ACTION_RESIZE) {
if (params.enable_legend) {
curses_cols = cr_recalc(hostinfo_max);
pr_lastd();
}
return;
}
if (params.enable_legend) {
switch (c) {
case '+': { // ScrollDown
int hops = net_max() - net_min();
display_offset += 5;
if (display_offset >= hops)
display_offset = hops - 1;
hostinfo_max = 0;
GCDEBUG_MSG(("display_offset=%d\n", display_offset));
} break;
case '-': { // ScrollUp
int rest = display_offset % 5;
if (rest)
display_offset -= rest;
else
display_offset -= 5;
if (display_offset < 0)
display_offset = 0;
hostinfo_max = 0;
GCDEBUG_MSG(("display_offset=%d\n", display_offset));
} break;
}
switch (tolower(c)) {
case 'd': // Display
display_mode = (display_mode + 1) % display_mode_max;
if (display_mode)
curses_cols = cr_recalc(hostinfo_max);
pr_lastd();
GCDEBUG_MSG(("display_mode=%d\n", display_mode));
break;
case 'e': // MPLS
enablempls = !enablempls;
GCDEBUG_MSG(("enable_mpls=%d\n", enablempls));
break;
case 'j':
if (index(fld_active, 'N'))
strcpy(fld_active, "DR AGJMXI");
else
strcpy(fld_active, "LS NABWV");
mtr_curses_data_fields(legend_hd[LEGEND_HEADER_STATIC]);
GCDEBUG_MSG(("toggle latency/jitter stats\n"));
break;
case 'n': // DNS
use_dns = !use_dns;
hostinfo_max = 0;
GCDEBUG_MSG(("use_dns=%d\n", use_dns));
break;
#ifdef IPINFO
case 'y': // IP Info
ii_action(0);
hostinfo_max = 0;
GCDEBUG_MSG(("switching ip info\n"));
break;
case 'z': // ASN
ii_action(1);
hostinfo_max = 0;
GCDEBUG_MSG(("toggle asn info\n"));
break;
#endif
}
}
switch (c) {
case 'q': // Quit
gc_close();
GCDEBUG_MSG(("bye-bye\n"));
exit(0);
break;
case ' ': // Resume
paused = 0;
cr_net_reset(1);
GCDEBUG_MSG(("...resume\n"));
break;
}
switch (tolower(c)) {
case 'p': // Pause
paused = 1;
GCDEBUG_MSG(("pause...\n"));
break;
case 'r': // Reset
net_reset();
cr_net_reset(0);
num_pings = 0;
GCDEBUG_MSG(("net reset\n"));
break;
case 't': // TCP and ICMP ECHO
switch (mtrtype) {
case IPPROTO_ICMP:
case IPPROTO_UDP:
mtrtype = IPPROTO_TCP;
GCDEBUG_MSG(("tcp_syn packets\n"));
break;
case IPPROTO_TCP:
mtrtype = IPPROTO_ICMP;
GCDEBUG_MSG(("icmp_echo packets\n"));
break;
}
break;
case 'u': // UDP and ICMP ECHO
switch (mtrtype) {
case IPPROTO_ICMP:
case IPPROTO_TCP:
GCDEBUG_MSG(("udp datagrams\n"));
mtrtype = IPPROTO_UDP;
break;
case IPPROTO_UDP:
mtrtype = IPPROTO_ICMP;
GCDEBUG_MSG(("icmp_echo packets\n"));
break;
}
break;
}
}
int main(int argc, char *argv[])
{
int i, n;
bool wasRunning = FALSE;
bool save_cfg = FALSE;
bool change_settings_ui(menu_e *menu, u1_t key, bool *skip_first, cfg_t *cfg);
bool show_ip = FALSE;
bool config_valid, config_key = FALSE;
bool config_ip = FALSE, config_nm = FALSE, config_gw = FALSE, config_am = FALSE;
u4_t key;
menu_e menu;
int addr_mode;
int ip[4], nm[4], gw[4], bc[4];
FILE *cfp, *efp;
char *config_file = ROOT_DIR "/.5370.config";
cfg_t *cfg = &cfg_buf;
dsp_7seg_init(FALSE); // panic routine can't use display until bus is setup
// silently ignores unrecognized arguments
for (i=1; i<argc; i++) {
if (strcmp(argv[i], "-bg") == 0) background_mode = TRUE;
if (strcmp(argv[i], "-ip") == 0) show_ip = TRUE;
if (strcmp(argv[i], "-no") == 0) menu_action = FALSE;
if (strcmp(argv[i], "?")==0 || strcmp(argv[i], "-?")==0 || strcmp(argv[i], "--?")==0 || strcmp(argv[i], "-h")==0 ||
strcmp(argv[i], "h")==0 || strcmp(argv[i], "-help")==0 || strcmp(argv[i], "--h")==0 || strcmp(argv[i], "--help")==0) {
printf( "-rcl|-recall [name] load key settings from named profile\n"
"-hpib-hard use the original HPIB hardware interface, assuming installed\n"
"-hpib-sim simulate the HPIB interface in software (debug mode)\n"
"-hpib-net simulate and re-direct transfers over an Ethernet connection\n"
"-ip show IP address of Ethernet interface and exit\n"
);
xit(0);
}
}
lprintf("HP%s v%d.%d\n", INST_STR, FIRMWARE_VER_MAJ, FIRMWARE_VER_MIN);
lprintf("compiled: %s %s\n", __DATE__, __TIME__);
sim_args(TRUE, argc, argv);
hpib_args(TRUE, argc, argv);
sim_init();
web_server_init();
if (!menu_action) printf("menu action disabled\n");
reset:
// To support the action of the 'reset' key most code files have a reset routine that zeros static variables.
// This is similar to the C runtime idea of zeroing the bss when a program is first run.
if (wasRunning) {
wasRunning = FALSE;
net_reset(NET_HPIB);
net_reset(NET_TELNET);
web_server_stop();
skip_first = save_cfg = config_key = config_ip = config_nm = config_gw = config_am = FALSE;
}
sim_reset();
if (!(bus_read(RREG_LDACSR) & DSR_VOK)) {
lprintf("waiting for 5370 power\n");
usleep(1000000);
while (!(bus_read(RREG_LDACSR) & DSR_VOK)) {
sched_yield();
usleep(250000);
}
lprintf("5370 power on\n");
usleep(1000000);
} else {
lprintf("5370 is powered on\n");
}
// display firmware version
dsp_7seg_init(TRUE);
dsp_7seg_str(DSP_LEFT, INST_STR, DSP_CLEAR);
dsp_7seg_chr(POS(10), 'v');
dsp_7seg_num(POS(11), POS_IS_LSD, FIRMWARE_VER_MAJ, DEFAULT_WIDTH, SPACE_FILL);
dsp_7seg_num(POS(12), POS_IS_MSD, FIRMWARE_VER_MIN, FIELD_WIDTH(0), ZERO_FILL);
dsp_7seg_dp(POS(12));
dsp_leds_clr_all();
delay(2000);
if ((cfp = fopen(config_file, "r")) == NULL) {
if (errno != ENOENT) sys_panic(config_file);
config_valid = FALSE;
} else {
while (fgets(lbuf, LBUF, cfp)) {
if ((sscanf(lbuf, "key 0x%x", &key) == 1) && (key == 0xcafe5370)) config_key = TRUE; else
if (sscanf(lbuf, "am %d", &addr_mode) == 1) config_am = TRUE; else
if (sscanf(lbuf, "ip %d.%d.%d.%d", &ip[0], &ip[1], &ip[2], &ip[3]) == 4) config_ip = TRUE; else
if (sscanf(lbuf, "nm %d.%d.%d.%d", &nm[0], &nm[1], &nm[2], &nm[3]) == 4) config_nm = TRUE; else
if (sscanf(lbuf, "gw %d.%d.%d.%d", &gw[0], &gw[1], &gw[2], &gw[3]) == 4) config_gw = TRUE; else
;
}
assert((addr_mode == 0) || (addr_mode == 1));
menu = cfg->menu = (addr_mode == 0)? M_DHCP : M_IP;
if (config_key && config_ip && config_nm && config_gw && config_am) {
printf("valid config file %s\n", config_file);
config_valid = TRUE;
if (menu == M_IP) {
printf("setting interface address\n");
sprintf(lbuf, "ifconfig eth0 %d.%d.%d.%d netmask %d.%d.%d.%d",
ip[0], ip[1], ip[2], ip[3], nm[0], nm[1], nm[2], nm[3]);
if (menu_action) system(lbuf);
sprintf(lbuf, "route add default %d.%d.%d.%d", gw[0], gw[1], gw[2], gw[3]);
if (menu_action) system(lbuf);
}
} else {
printf("invalid config file %s\n", config_file);
config_valid = FALSE;
}
fclose(cfp);
}
if (!config_valid) {
menu = cfg->menu = M_DHCP; // try DHCP first if not valid config
}
#define ENET_RETRY 20
if (menu == M_DHCP) { // see if interface configured by DHCP
gw[3]=gw[2]=gw[1]=gw[0]=0; // ifconfig doesn't tell us the gateway, only the broadcast which we don't care about
// sometimes the link is slow to come up, so retry a few times
for (i=0; i<ENET_RETRY; i++) {
if ((efp = popen("ifconfig eth0", "r")) == NULL) sys_panic("ifconfig eth0");
char *lp = lbuf;
n=0;
while (fgets(lp, LBUF, efp)) {
if ((n = sscanf(lp, "%*[ ]inet addr:%d.%d.%d.%d Bcast:%d.%d.%d.%d Mask:%d.%d.%d.%d",
&ip[0], &ip[1], &ip[2], &ip[3],
&bc[0], &bc[1], &bc[2], &bc[3],
&nm[0], &nm[1], &nm[2], &nm[3])) == 12)
break;
}
pclose(efp);
if (n == 12) break;
delay(1000);
}
} else {
i=0; // interface configured manually above
}
if (i != ENET_RETRY) {
for (i=0; i<4; i++) {
cfg->ip[i] = ip[i]; cfg->nm[i] = nm[i]; cfg->gw[i] = gw[i];
}
if (menu == M_DHCP) lprintf("via DHCP ");
lprintf("eth0: ip %d.%d.%d.%d mask %d.%d.%d.%d ",
ip[0], ip[1], ip[2], ip[3], nm[0], nm[1], nm[2], nm[3]);
if (menu != M_DHCP) lprintf("gw %d.%d.%d.%d", gw[0], gw[1], gw[2], gw[3]);
lprintf("\n");
dsp_7seg_str(DSP_LEFT, "ip", DSP_CLEAR);
display_ipaddr(cfg->ip);
} else {
lprintf("eth0: not configured from DHCP?");
dsp_7seg_str(DSP_LEFT, "no dhcp?", DSP_CLEAR);
}
if (!config_valid && (i == ENET_RETRY)) { // configuration not valid, DHCP failed, so set some defaults
menu = cfg->menu = M_IP;
bcopy(default_ipinfo, cfg->if_ipinfo, sizeof(default_ipinfo));
save_cfg = TRUE;
}
if (show_ip) xit(0);
delay(2000); // show ip on display for a moment before continuing
net_connect(NET_HPIB, SERVER, NULL, HPIB_TCP_PORT);
net_connect(NET_TELNET, SERVER, NULL, TELNET_TCP_PORT);
web_server_start();
// place a call here to setup your measurement extension code
meas_extend_example_init();
// reset key held down during a reboot -- drop into menu mode
preempt_reset_key(TRUE);
// while in the boot routine the reset key either starts the app or saves the changed config
app_state = S_MENU;
while (1) {
u1_t key;
sim_input(); // for remote debugging of menu mode
key = handler_dev_display_read(RREG_KEY_SCAN); // called instead of bus_read() so simulated keys will be returned
switch(app_state) {
case S_MENU:
if (key != KEY(RESET)) {
app_state = S_START;
break;
}
dsp_7seg_str(DSP_LEFT, "ready", DSP_CLEAR);
printf("ready\n");
dsp_led_set(RESET);
wait_key_release();
dsp_led_clr(RESET);
dsp_7seg_str(DSP_LEFT, "chg settings", DSP_CLEAR);
printf("menu mode\n");
skip_first = TRUE;
menu = M_HALT; // first menu item displayed
// light up the keys valid during menu mode
for (i=0; settings_keys[i].key; i++) {
dsp_led_set(settings_keys[i].key);
}
app_state = S_MENU_POLL;
break;
case S_MENU_POLL:
if (key == KEY(RESET)) {
dsp_led_set(RESET);
wait_key_release();
dsp_led_clr(RESET);
app_state = S_MENU_DONE;
break;
}
if (change_settings_ui(&menu, key, &skip_first, cfg)) save_cfg = TRUE;
break;
case S_MENU_DONE:
if (!skip_first && (menu == M_HALT)) {
// Debian takes a while to halt, but nicely clears the GPIOs so the
// display goes blank right when halted.
// Angstrom with Gnome disabled halts very fast, but doesn't
// clear the GPIOs like Debian. So we get the PRU to poll the LEDs
// until they go off, then blank the display.
dsp_7seg_str(DSP_LEFT, " halting...", DSP_CLEAR);
printf("halting...\n");
#ifdef DIST_DEBIAN
if (menu_action) system("halt");
exit(0);
#endif
#ifdef DIST_ANGSTROM
dsp_7seg_chr(POS(0), ' '); // preload address & data
send_pru_cmd(PRU_HALT);
if (menu_action) system("halt");
exit(0);
#endif
} else
if (menu == M_CANCEL || (skip_first && (menu == M_HALT))) {
app_state = S_START;
break;
} else {
if (menu != M_DHCP) menu = M_IP;
if (menu != cfg->menu) save_cfg = TRUE;
}
if (save_cfg) {
dsp_7seg_str(DSP_LEFT, "config changed", DSP_CLEAR);
delay(2000);
cfg->menu = menu;
if (menu == M_DHCP) {
dsp_7seg_str(DSP_LEFT, "using dhcp mode", DSP_CLEAR);
} else {
dsp_7seg_str(DSP_LEFT, "using ip mode", DSP_CLEAR);
}
delay(2000);
dsp_7seg_str(DSP_LEFT, "saving config", DSP_CLEAR);
if ((cfp = fopen(config_file, "w")) == NULL) sys_panic(config_file);
printf("writing config file %s\n", config_file);
fprintf(cfp, "key 0xcafe5370\n");
fprintf(cfp, "am %d\n", (cfg->menu == M_DHCP)? 0:1);
fprintf(cfp, "ip %d.%d.%d.%d\n", cfg->ip[0], cfg->ip[1], cfg->ip[2], cfg->ip[3]);
fprintf(cfp, "nm %d.%d.%d.%d\n", cfg->nm[0], cfg->nm[1], cfg->nm[2], cfg->nm[3]);
fprintf(cfp, "gw %d.%d.%d.%d\n", cfg->gw[0], cfg->gw[1], cfg->gw[2], cfg->gw[3]);
fclose(cfp);
delay(2000);
}
app_state = S_START;
break;
case S_START:
if (wasRunning) { // if previous sim was interrupted must reset before starting new one
goto reset;
}
preempt_reset_key(FALSE);
sim_main();
preempt_reset_key(TRUE);
handler_dev_display_read(RREG_KEY_SCAN); // flush extra sim reset key, if any
delay(1000);
// this sim was interrupted, so can't restart a new sim without doing a reset first
wasRunning = TRUE;
// if key still down after one second delay enter menu mode, else treat as simple reset
if (handler_dev_display_read(RREG_KEY_SCAN) == KEY(RESET)) {
app_state = S_MENU;
} else {
goto reset;
}
break;
}
}
return 0;
}
