seth
/
dmd_gtk
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
dmd_gtk/src/dmd_5620.c

976 lines
25 KiB
C
Raw Permalink Blame History

/*
* This file is part of the GTK+ DMD 5620 Emultor.
*
* Copyright 2018, Seth Morabito <web@loomcom.com>
*
* Permission is hereby granted, free of charge, to any person
* obtaining a copy of this software and associated documentation
* files (the "Software"), to deal in the Software without
* restriction, including without limitation the rights to use, copy,
* modify, merge, publish, distribute, sublicense, and/or sell copies
* of the Software, and to permit persons to whom the Software is
* furnished to do so, subject to the following conditions:
*
* The above copyright notice and this permission notice shall be
* included in all copies or substantial portions of the Software.
*
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
* BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
* ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
* SOFTWARE.
*/
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/socket.h>
#include <poll.h>
#include <netdb.h>
#include <arpa/inet.h>
#include <netinet/in.h>
#include <string.h>
#include <unistd.h>
#if defined __APPLE__
#include <util.h>
#include <sys/ioctl.h>
#include <sys/resource.h>
#else
#include <pty.h>
#endif
#include <stdbool.h>
#include <stdlib.h>
#include <utmp.h>
#include <fcntl.h>
#include <errno.h>
#include <getopt.h>
#include <signal.h>
#include <stdio.h>
#include <math.h>
#include <time.h>
#include <pthread.h>
#include <termios.h>
#include "version.h"
#include "dmd_5620.h"
#ifndef MIN
#define MIN(a,b) ((a) <= (b) ? (a) : (b))
#endif
#define PCHAR(p) (((p) >= 0x20 && (p) < 0x7f) ? (p) : '.')
#define TX_BUF_LEN 64
#define MAX_STEPS 350000
char VERSION_STRING[64];
GtkWidget *main_window;
cairo_surface_t *surface = NULL;
GdkPixbuf *pixbuf = NULL;
int pty_master, pty_slave;
char *nvram = NULL;
size_t previous_clock = 0;
struct pollfd fds[2];
pid_t shell_pid;
volatile bool window_beep = true;
int sigint_count = 0;
int tty_fd = -1;
bool debug = false;
void
int_handler(int signal)
{
if (sigint_count) {
fprintf(stderr, "Shutting down immediately. Good bye.\n");
exit(1);
}
if (main_window != NULL) {
gtk_window_close(GTK_WINDOW(main_window));
}
sigint_count++;
}
void
close_window()
{
uint8_t buf[NVRAM_SIZE];
FILE *fp;
if (nvram != NULL && dmd_get_nvram(buf) == 0) {
fp = fopen(nvram, "w+");
if (fp == NULL) {
fprintf(stderr, "Could not open %s for writing. Skipping\n", nvram);
} else {
if (fwrite(buf, NVRAM_SIZE, 1, fp) != 1) {
fprintf(stderr, "Could not write full NVRAM file %s\n", nvram);
}
}
}
if (surface) {
cairo_surface_destroy(surface);
}
gtk_main_quit();
}
gboolean
configure_handler(GtkWidget *widget, GdkEventConfigure *event, gpointer data)
{
if (surface) {
cairo_surface_destroy(surface);
}
surface = gdk_window_create_similar_surface(gtk_widget_get_window(widget),
CAIRO_CONTENT_COLOR,
gtk_widget_get_allocated_width(widget),
gtk_widget_get_allocated_height(widget));
pixbuf = gdk_pixbuf_new(GDK_COLORSPACE_RGB, TRUE, 8, WIDTH, HEIGHT);
return TRUE;
}
gboolean
draw_handler(GtkWidget *widget, cairo_t *cr, gpointer data)
{
cairo_set_source_surface(cr, surface, 0, 0);
gdk_cairo_set_source_pixbuf(cr, pixbuf, 0, 0);
cairo_paint(cr);
return FALSE;
}
gboolean
refresh_display(GtkWidget *widget, gpointer data)
{
uint8_t oport;
uint8_t *vram;
guchar *pixel_data;
uint32_t pixel_data_index;
GdkWindow *window;
const struct color *fg_color;
const struct color *bg_color;
/* Draw the frame */
window = gtk_widget_get_window(widget);
if (window_beep) {
gdk_window_beep(window);
window_beep = false;
}
/* If the video RAM hasn't been updated, there's nothing to do */
if (!dmd_video_ram_dirty()) {
return TRUE;
}
vram = dmd_video_ram();
pixel_data = gdk_pixbuf_get_pixels(pixbuf);
pixel_data_index = 0;
if (vram == NULL) {
fprintf(stderr, "ERROR: Unable to access video ram!\n");
exit(-1);
} else {
/* Bit 2 of the DUART output port controls whether the
* screen is Dark-on-Light or Light-on-Dark
*/
dmd_get_duart_output_port(&oport);
if (oport & 0x2) {
fg_color = &COLOR_DARK;
bg_color = &COLOR_LIGHT;
} else {
fg_color = &COLOR_LIGHT;
bg_color = &COLOR_DARK;
}
for (int y = 0; y < HEIGHT; y++) {
for (int x = 0; x < WIDTH_IN_BYTES; x++) {
uint8_t b = vram[y*WIDTH_IN_BYTES + x];
for (int i = 0; i < 8; i++) {
int bit = (b >> (7 - i)) & 1;
if (bit) {
pixel_data[pixel_data_index++] = fg_color->r;
pixel_data[pixel_data_index++] = fg_color->g;
pixel_data[pixel_data_index++] = fg_color->b;
pixel_data[pixel_data_index++] = fg_color->a;
} else {
pixel_data[pixel_data_index++] = bg_color->r;
pixel_data[pixel_data_index++] = bg_color->g;
pixel_data[pixel_data_index++] = bg_color->b;
pixel_data[pixel_data_index++] = bg_color->a;
}
}
}
}
}
/* Notify the widget that it should repaint itself */
gtk_widget_queue_draw(widget);
return TRUE;
}
gboolean
simulation_main_loop(GtkWidget *widget, GdkFrameClock *clock, gpointer data)
{
uint8_t kbc;
size_t now, steps;
/*
* Poll for simulator I/O
*/
if (tty_fd < 0) {
pty_io_poll();
} else {
tty_io_poll();
}
/*
* Poll for output to the keyboard (i.e. system beep)
*/
if (dmd_keyboard_tx(&kbc) == 0) {
if (kbc & 0x08) {
/* Beep! For thread safety reasons, we don't
* actually interct with GDK in this
* thread. Instead, we set a flag telling
* refresh_display to beep for us. */
window_beep = TRUE;
}
}
/*
* Execute the appropriate number of CPU steps based on frame rate.
*/
now = gdk_frame_clock_get_frame_time(clock);
if (previous_clock > 0) {
/* We take 7.2 simulated steps per microsecond of wall clock
* time, based on a 7.2 MHz WE 32100 CPU. The maximum number of
* steps allowed is limited in order to prevent the CPU
* simulation from stealing too much processing time if
* running on a system with a slower main GTK thread refresh
* rate. */
size_t delta = now - previous_clock;
steps = MIN((size_t)(7.2 * delta), MAX_STEPS);
if (debug) {
printf("[MAIN LOOP] executing %lu steps in %lu us. rate ~= %.2f MHz\n",
steps,
delta,
(float)steps / (float)delta);
}
} else {
steps = MAX_STEPS;
}
previous_clock = now;
/* Actually call the core CPU library */
dmd_step_loop(steps);
/* Now refresh the display */
return refresh_display(widget, data);
}
gboolean
mouse_moved(GtkWidget *widget, GdkEventMotion *event, gpointer data)
{
dmd_mouse_move((uint16_t) event->x, (uint16_t) (1024 - event->y));
return TRUE;
}
gboolean
mouse_button(GtkWidget *widget, GdkEventButton *event, gpointer data)
{
/* GDK mouse buttons are numbered 1,2,3, whereas the DMD
expects buttons to be numbered 0,1,2, so we remap
here. */
uint8_t button = event->button - 1;
switch(event->type) {
case GDK_BUTTON_PRESS:
dmd_mouse_down(button);
break;
case GDK_BUTTON_RELEASE:
dmd_mouse_up(button);
break;
default:
break;
}
return TRUE;
}
/*
* Initialize a shell PTY
*/
void
pty_init(const char *shell, char *envp[])
{
char pty_name[64];
/* Set up our PTY */
if (openpty(&pty_master, &pty_slave, pty_name, NULL, NULL) < 0) {
perror("Could not open terminal pty: ");
exit(-1);
}
/* Fork the shell process */
fds[0].fd = pty_master;
fds[0].events = POLLIN;
fds[1].fd = pty_slave;
fds[1].events = POLLOUT;
shell_pid = fork();
if (shell_pid < 0) {
perror("Could not fork child shell: ");
exit(-1);
} else if (shell_pid == 0) {
/* Child */
int retval;
close(pty_master);
setsid();
if (ioctl(pty_slave, TIOCSCTTY, NULL) == -1) {
perror("Ioctl erorr: ");
exit(-1);
}
dup2(pty_slave, 0);
dup2(pty_slave, 1);
dup2(pty_slave, 2);
close(pty_slave);
if (shell) {
retval = execle(shell, "-", NULL, envp);
} else {
retval = execle("/bin/sh", "-", NULL, envp);
}
/* Child process is now replaced, nothing beyond this point
will ever be reached unless there's an error. */
if (retval < 0) {
perror("Could not start shell process: ");
exit(-1);
}
close(pty_master);
}
close(pty_slave);
}
/*
* PTY implemntation of read and write polling
*/
void
pty_io_poll()
{
uint8_t txc;
char tx_buf[TX_BUF_LEN];
int b_read, i;
if (poll(fds, 2, 0) > 0) {
if (fds[0].revents & POLLIN) {
b_read = read(pty_master, tx_buf, TX_BUF_LEN);
if (b_read <= 0) {
perror("Nothing to read from child: ");
exit(-1);
}
for (i = 0; i < b_read; i++) {
dmd_rs232_rx(tx_buf[i] & 0xff);
}
}
}
i = 0;
while (dmd_rs232_tx(&txc) == 0) {
if (write(pty_master, &txc, 1) < 0) {
fprintf(stderr, "Error %d from write: %s\n", errno, strerror(errno));
}
}
}
/*
* Open and initialize a TTY device (e.g. "/dev/ttyS0", "/dev/pts/1", etc.)
*/
int
tty_init(int fd)
{
struct termios tty;
memset(&tty, 0, sizeof tty);
if (tcgetattr(fd, &tty) != 0) {
fprintf(stderr, "error %d from tcgetattr", errno);
return -1;
}
fds[0].fd = fd;
fds[0].events = POLLIN;
fds[1].fd = fd;
fds[1].events = POLLOUT;
cfsetospeed(&tty, B9600);
cfsetispeed(&tty, B9600);
tty.c_cflag = (tty.c_cflag & ~CSIZE) | CS8; /* 8-bit characters */
tty.c_iflag &= ~IGNBRK; /* No break */
tty.c_lflag = 0;
tty.c_oflag = 0;
tty.c_cc[VMIN] = 0;
tty.c_cc[VTIME] = 0;
tty.c_iflag &= ~(IXON | IXOFF | IXANY);
tty.c_cflag |= (CLOCAL | CREAD);
tty.c_cflag &= ~(PARENB | PARODD);
tty.c_cflag &= ~CSTOPB;
tty.c_cflag &= ~CRTSCTS;
if (tcsetattr (fd, TCSANOW, &tty) != 0) {
fprintf(stderr, "error %d from tcsetattr", errno);
return -1;
}
return 0;
}
void
tty_io_poll()
{
uint8_t txc;
char tx_buf[TX_BUF_LEN];
int b_read, i;
if (poll(fds, 2, 100) > 0) {
if (fds[0].revents & POLLIN) {
b_read = read(tty_fd, tx_buf, TX_BUF_LEN);
for (i = 0; i < b_read; i++) {
dmd_rs232_rx(tx_buf[i] & 0xff);
}
}
}
i = 0;
while (dmd_rs232_tx(&txc) == 0) {
if (write(tty_fd, &txc, 1) < 0) {
fprintf(stderr, "error %d during write: %s\n", errno, strerror(errno));
}
}
}
gboolean
keydown(GtkWidget *widget, GdkEventKey *event, gpointer data)
{
gboolean is_ctrl = event->state & GDK_CONTROL_MASK;
gboolean is_shift = event->state & GDK_SHIFT_MASK;
uint8_t c = 0;
switch(event->keyval) {
case GDK_KEY_VoidSymbol:
return TRUE;
case GDK_KEY_F1:
c = 0xe8;
break;
case GDK_KEY_F2:
c = 0xe9;
break;
case GDK_KEY_F3:
c = 0xea;
break;
case GDK_KEY_F4:
c = 0xeb;
break;
case GDK_KEY_F5:
c = 0xec;
break;
case GDK_KEY_F6:
c = 0xed;
break;
case GDK_KEY_F7:
c = 0xee;
break;
case GDK_KEY_F8:
c = 0xef;
break;
case GDK_KEY_F9:
if (is_shift) {
c = 0x8e;
} else {
c = 0xae;
}
break;
case GDK_KEY_Escape:
c = 0x1b;
break;
case GDK_KEY_Delete:
c = 0xfe;
break;
case GDK_KEY_uparrow:
case GDK_KEY_Up:
c = 0xc1;
break;
case GDK_KEY_downarrow:
case GDK_KEY_Down:
c = 0xc2;
break;
case GDK_KEY_rightarrow:
case GDK_KEY_Right:
c = 0xc3;
break;
case GDK_KEY_leftarrow:
case GDK_KEY_Left:
c = 0xc4;
break;
case GDK_KEY_BackSpace:
c = 0xd1;
break;
case GDK_KEY_Return:
c = 0xe7;
break;
case GDK_KEY_Tab:
c = 0xd0;
break;
case GDK_KEY_space:
case GDK_KEY_exclam:
case GDK_KEY_quotedbl:
case GDK_KEY_numbersign:
case GDK_KEY_dollar:
case GDK_KEY_percent:
case GDK_KEY_ampersand:
case GDK_KEY_apostrophe:
case GDK_KEY_parenleft:
case GDK_KEY_parenright:
case GDK_KEY_asterisk:
case GDK_KEY_plus:
case GDK_KEY_comma:
case GDK_KEY_minus:
case GDK_KEY_period:
case GDK_KEY_slash:
case GDK_KEY_0:
case GDK_KEY_1:
case GDK_KEY_2:
case GDK_KEY_3:
case GDK_KEY_4:
case GDK_KEY_5:
case GDK_KEY_6:
case GDK_KEY_7:
case GDK_KEY_8:
case GDK_KEY_9:
case GDK_KEY_colon:
case GDK_KEY_semicolon:
case GDK_KEY_less:
case GDK_KEY_equal:
case GDK_KEY_greater:
case GDK_KEY_question:
case GDK_KEY_quoteleft:
case GDK_KEY_braceleft:
case GDK_KEY_bar:
case GDK_KEY_braceright:
case GDK_KEY_asciitilde:
c = (uint8_t) (event->keyval & 0xff);
break;
case GDK_KEY_at:
case GDK_KEY_A:
case GDK_KEY_B:
case GDK_KEY_C:
case GDK_KEY_D:
case GDK_KEY_E:
case GDK_KEY_F:
case GDK_KEY_G:
case GDK_KEY_H:
case GDK_KEY_I:
case GDK_KEY_J:
case GDK_KEY_K:
case GDK_KEY_L:
case GDK_KEY_M:
case GDK_KEY_N:
case GDK_KEY_O:
case GDK_KEY_P:
case GDK_KEY_Q:
case GDK_KEY_R:
case GDK_KEY_S:
case GDK_KEY_T:
case GDK_KEY_U:
case GDK_KEY_V:
case GDK_KEY_W:
case GDK_KEY_X:
case GDK_KEY_Y:
case GDK_KEY_Z:
case GDK_KEY_bracketleft:
case GDK_KEY_backslash:
case GDK_KEY_bracketright:
case GDK_KEY_asciicircum:
case GDK_KEY_underscore:
if (is_ctrl) {
c = (uint8_t) ((event->keyval & 0xff) - 0x40);
} else {
c = (uint8_t) (event->keyval & 0xff);
}
break;
case GDK_KEY_a:
case GDK_KEY_b:
case GDK_KEY_c:
case GDK_KEY_d:
case GDK_KEY_e:
case GDK_KEY_f:
case GDK_KEY_g:
case GDK_KEY_h:
case GDK_KEY_i:
case GDK_KEY_j:
case GDK_KEY_k:
case GDK_KEY_l:
case GDK_KEY_m:
case GDK_KEY_n:
case GDK_KEY_o:
case GDK_KEY_p:
case GDK_KEY_q:
case GDK_KEY_r:
case GDK_KEY_s:
case GDK_KEY_t:
case GDK_KEY_u:
case GDK_KEY_v:
case GDK_KEY_w:
case GDK_KEY_x:
case GDK_KEY_y:
case GDK_KEY_z:
if (is_ctrl) {
c = (uint8_t) ((event->keyval & 0xff) - 0x60);
} else {
c = (uint8_t) (event->keyval & 0xff);
}
break;
default:
return TRUE;
}
dmd_keyboard_rx(c);
return TRUE;
}
void
show_about()
{
GtkWidget *dialog;
GtkWidget *label;
GtkWidget *content_area;
GtkDialogFlags flags = GTK_DIALOG_DESTROY_WITH_PARENT;
const char *message = "Copyright (c) 2018-2022, Seth J. Morabito <web@loomcom.com>\n"
"More information can be found on https://loomcom.com/\n";
dialog = gtk_dialog_new_with_buttons("About",
GTK_WINDOW(main_window),
flags,
"Close",
GTK_RESPONSE_NONE,
NULL);
content_area = gtk_dialog_get_content_area(GTK_DIALOG(dialog));
gtk_widget_set_margin_start(content_area, 20);
gtk_widget_set_margin_end(content_area, 20);
gtk_widget_set_margin_top(content_area, 20);
gtk_widget_set_margin_bottom(content_area, 20);
label = gtk_label_new(message);
g_signal_connect_swapped(dialog, "response", G_CALLBACK(gtk_widget_destroy), dialog);
gtk_container_add(GTK_CONTAINER(content_area), label);
gtk_widget_show_all(dialog);
}
void
build_menu(GtkWidget *menu_bar)
{
GtkWidget *file_menu;
GtkWidget *help_menu;
GtkWidget *file_mi;
GtkWidget *quit_mi;
GtkWidget *help_mi;
GtkWidget *about_mi;
file_menu = gtk_menu_new();
help_menu = gtk_menu_new();
file_mi = gtk_menu_item_new_with_label("File");
quit_mi = gtk_menu_item_new_with_label("Quit");
help_mi = gtk_menu_item_new_with_label("Help");
about_mi = gtk_menu_item_new_with_label("About");
gtk_menu_item_set_submenu(GTK_MENU_ITEM(file_mi), file_menu);
gtk_menu_shell_append(GTK_MENU_SHELL(file_menu), quit_mi);
gtk_menu_item_set_submenu(GTK_MENU_ITEM(help_mi), help_menu);
gtk_menu_shell_append(GTK_MENU_SHELL(help_menu), about_mi);
gtk_menu_shell_append(GTK_MENU_SHELL(menu_bar), file_mi);
gtk_menu_shell_append(GTK_MENU_SHELL(menu_bar), help_mi);
/* Exit when user selects "Quit" from menu */
g_signal_connect(quit_mi, "activate", G_CALLBACK(close_window), NULL);
g_signal_connect(about_mi, "activate", G_CALLBACK(show_about), NULL);
}
void
gtk_setup(int *argc, char ***argv)
{
GtkWidget *drawing_area;
GtkWidget *menu_bar;
GtkWidget *box;
gtk_init(argc, argv);
/* Create the main window */
main_window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
/* Be sure to exit cleanly when the user closes the window! */
g_signal_connect(main_window, "destroy", G_CALLBACK(close_window), NULL);
/* Set some properties on the main window */
gtk_window_set_icon_name(GTK_WINDOW(main_window), "dmd5620");
gtk_window_set_title(GTK_WINDOW(main_window), "AT&T DMD 5620");
gtk_window_set_resizable(GTK_WINDOW(main_window), FALSE);
gtk_container_set_border_width(GTK_CONTAINER(main_window), 0);
/* Create a GTK Box to contain menu and drawing area */
box = gtk_box_new(GTK_ORIENTATION_VERTICAL, 0);
/* TODO: Make border width configurable */
gtk_container_set_border_width(GTK_CONTAINER(box), 5);
/* Build the menu */
menu_bar = gtk_menu_bar_new();
build_menu(menu_bar);
/* Stuff the menu into the container. */
gtk_box_pack_start(GTK_BOX(box), menu_bar, FALSE, FALSE, 0);
drawing_area = gtk_drawing_area_new();
gtk_widget_set_size_request(drawing_area, 800, 1024);
gtk_box_pack_end(GTK_BOX(box), drawing_area, FALSE, FALSE, 0);
gtk_container_add(GTK_CONTAINER(main_window), box);
/* Set up the animation handler, which will step the simulation
and draw the display in an infinite loop */
gtk_widget_add_tick_callback(main_window, simulation_main_loop, drawing_area, NULL);
/* Signals used to handle the backing surface */
g_signal_connect(drawing_area, "draw",
G_CALLBACK(draw_handler), NULL);
g_signal_connect(drawing_area, "configure-event",
G_CALLBACK(configure_handler), NULL);
/* UI signals */
g_signal_connect(drawing_area, "button-press-event",
G_CALLBACK(mouse_button), NULL);
g_signal_connect(drawing_area, "button-release-event",
G_CALLBACK(mouse_button), NULL);
g_signal_connect(G_OBJECT(main_window), "key-press-event",
G_CALLBACK(keydown), NULL);
g_signal_connect(drawing_area, "motion-notify-event",
G_CALLBACK(mouse_moved), NULL);
gtk_widget_set_events(drawing_area,
gtk_widget_get_events(drawing_area)
| GDK_BUTTON_PRESS_MASK
| GDK_BUTTON_RELEASE_MASK
| GDK_KEY_PRESS_MASK
| GDK_POINTER_MOTION_MASK);
gtk_widget_show_all(main_window);
gtk_window_present(GTK_WINDOW(main_window));
}
struct option long_options[] = {
{"help", no_argument, 0, 'h'},
{"version", no_argument, 0, 'v'},
{"inherit", no_argument, 0, 'i'},
{"firmware", required_argument, 0, 'f'},
{"shell", required_argument, 0, 's'},
{"device", required_argument, 0, 'd'},
{"nvram", required_argument, 0, 'n'},
{"debug", no_argument, 0, 'b'}, /* Hidden and undocumented */
{0, 0, 0, 0}};
void usage()
{
printf("Usage: dmd5620 [-h] [-v] [-i] [-d DEV|-s SHELL] \\\n"
" [-f VER] [-n FILE] [-- <gtk_options> ...]\n");
printf("AT&T DMD 5620 Terminal emulator.\n\n");
printf("-h, --help display help and exit\n");
printf("-v, --version display version and exit\n");
printf("-i, --inherit inherit parent environment\n");
printf("-f, --firmware VER Firmware version (\"8;7;3\" or \"8;7;5\")\n");
printf("-d, --device DEV serial port name\n");
printf("-s, --shell SHELL execute SHELL instead of default user shell\n");
printf("-n, --nvram FILE store nvram state in FILE\n");
}
const char *FIRMWARE_873 = "8;7;3";
const char *FIRMWARE_875 = "8;7;5";
int
main(int argc, char *argv[], char *envp[])
{
int c, errflg = 0;
char *shell = NULL;
char *device = NULL;
char *firmware = NULL;
int size;
uint8_t nvram_buf[NVRAM_SIZE];
FILE *fp;
struct stat sb;
bool inherit = false; /* Inherit parent environment */
snprintf(VERSION_STRING, 64, "%d.%d.%d",
VERSION_MAJOR, VERSION_MINOR, VERSION_BUILD);
signal(SIGINT, int_handler);
signal(SIGCHLD, int_handler);
extern char *optarg;
extern int optind, optopt;
int option_index = 0;
while ((c = getopt_long(argc, argv, "hivbd:n:t:p:s:f:",
long_options, &option_index)) != -1) {
switch(c) {
case 0:
break;
case 'h':
usage();
exit(0);
case 'i':
inherit = true;
break;
case 'v':
printf("Version: %s\n", VERSION_STRING);
exit(0);
case 'b': /* Hidden and undocumented */
debug = true;
break;
case 'n':
nvram = optarg;
break;
case 's':
shell = optarg;
break;
case 'd':
device = optarg;
break;
case 'f':
firmware = optarg;
break;
case '?':
fprintf(stderr, "Unrecognized option: -%c\n", optopt);
errflg++;
break;
}
}
if (errflg) {
usage();
return -1;
}
if (shell == NULL && device == NULL) {
fprintf(stderr, "Either --shell or --device is required.\n");
return -1;
}
if (shell != NULL && device != NULL) {
fprintf(stderr, "Cannot specify both --shell or --device. Only one is allowed.\n");
return -1;
}
if (device == NULL) {
if (stat(shell, &sb) != 0 || (sb.st_mode & S_IXUSR) == 0) {
fprintf(stderr, "Cannot open %s as shell, or file is not executable.\n", shell);
return -1;
}
pty_init(shell, inherit ? envp : NULL);
} else {
if (stat(device, &sb) != 0) {
fprintf(stderr, "Cannot open device %s.\n", device);
exit(1);
}
tty_fd = open(device, O_RDWR|O_NOCTTY|O_SYNC);
if (tty_fd < 0) {
fprintf(stderr, "error %d opening %s: %s\n", errno, device, strerror(errno));
return -1;
}
tty_init(tty_fd);
}
/* Initialize the CPU */
if (firmware == NULL || strncmp(FIRMWARE_875, firmware, 5) == 0) {
dmd_init(2);
} else if (strncmp(FIRMWARE_873, firmware, 5) == 0) {
dmd_init(1);
} else {
fprintf(stderr, "--firmware must be one of either \"%s\" or \"%s\".\n",
FIRMWARE_873, FIRMWARE_875);
return -1;
}
/* Load NVRAM, if any */
if (nvram != NULL) {
fp = fopen(nvram, "r");
/* If there's no file yet, don't load anything. */
if (fp != NULL) {
/* Validate the file size */
fseek(fp, 0, SEEK_END);
size = ftell(fp);
rewind(fp);
if (size != NVRAM_SIZE) {
fprintf(stderr,
"NVRAM file %s does not seem to be valid. Skipping.\n",
nvram);
} else {
if (fread(nvram_buf, NVRAM_SIZE, 1, fp) != 1) {
fprintf(stderr,
"Unable to read NVRAM file %s. Skipping.\n",
nvram);
} else {
dmd_set_nvram(nvram_buf);
}
}
}
}
gtk_setup(&argc, &argv);
gtk_main();
return 0;
}
Reference in New Issue View Git Blame Copy Permalink