#include <errno.h>
#include <assert.h>
#include <sysexits.h>
+#include <time.h>
+#include <sys/time.h>
#include <readline/readline.h>
+#ifdef HAVE_LIBVNCSERVER
+#include "rfb/rfb.h"
+#endif /* HAVE_LIBVNCSERVER */
#include "dcpu16.h"
#include "common.h"
#include "hw_lem1802.h"
+#include "hw_keyboard.h"
/*
* shell-like driver for dcpu16 core
}
+#ifdef HAVE_LIBVNCSERVER
+static struct dynamic_array rfbScreens_;
+/* wups, kbdAddEvent isn't null by default, so I guess track things externally */
+struct rfb_instance_ {
+ rfbScreenInfoPtr screen;
+ struct dcpu16_hw *attached_display;
+ struct dcpu16_hw *attached_keyboard;
+};
+
+/* locate or allocate the next display with an un-occupied framebuffer */
+static
+struct rfb_instance_ *rfbScreen_next_available_display_(struct dynamic_array *rfbScreens, int argc, char *argv[]) {
+ size_t i;
+ struct rfb_instance_ new_instance, *s;
+
+ fprintf(stderr, "DEBUG: rfbScreens->entries:%zu\n", rfbScreens->entries);
+
+ for (i = 0; i < rfbScreens->entries; i++) {
+ s = (struct rfb_instance_ *)DYNARRAY_ITEM(*rfbScreens, i);
+ if (s->attached_display == NULL)
+ return s;
+ }
+
+ new_instance.screen = lem1802_rfb_new(argc, argv);
+ new_instance.attached_display = NULL;
+ new_instance.attached_keyboard = NULL;
+ s = dynarray_add(rfbScreens, &new_instance);
+ return s;
+}
+
+/* locate or allocate the next display with an un-occupied keyboard */
+static
+struct rfb_instance_ *rfbScreen_next_available_keyboard_(struct dynamic_array *rfbScreens, int argc, char *argv[]) {
+ size_t i;
+ struct rfb_instance_ new_instance, *s;
+
+ for (i = 0; i < rfbScreens->entries; i++) {
+ s = (struct rfb_instance_ *)DYNARRAY_ITEM(*rfbScreens, i);
+ if (s->attached_keyboard == NULL)
+ return s;
+ }
+
+ new_instance.screen = lem1802_rfb_new(argc, argv);
+ new_instance.attached_display = NULL;
+ new_instance.attached_keyboard = NULL;
+ s = dynarray_add(rfbScreens, &new_instance);
+ return s;
+}
+
+/* begin serving a screen */
+void rfbScreen_start(rfbScreenInfoPtr s) {
+ rfbInitServer(s);
+ rfbRunEventLoop(s, -1, TRUE);
+}
+#endif /* HAVE_LIBVNCSERVER */
+
/*
Here follows the various commands the shell can execute.
fprintf(f, "Sets addr to value.");
}
+#define MICROSECONDS_PER_CYCLE 10
COMMAND_IMPL(run) {
struct sigaction act;
+ struct timeval run_start_tv, run_stop_tv;
+ long long run_cycle_start;
+ struct timeval start_tv, now_tv, diff_tv;
+ long long cycle_start, cycles_to_wait;
+ struct timespec sleep_time, rem_time;
+ long long run_usec;
+
(void)arg_count, (void)arg_vector;
running_ = 1;
+ gettimeofday(&run_start_tv, NULL);
+ run_cycle_start = vm->cycle_;
memset(&act, 0, sizeof act);
act.sa_handler = sigint_handler_;
return -1;
}
- while(running_) {
+ while (running_) {
+ gettimeofday(&start_tv, NULL);
+ cycle_start = vm->cycle_;
+
dcpu16_step(vm);
if (opt_.verbose > 1)
dcpu16_state_print(vm);
dcpu16_disassemble_print(vm, vm->reg[DCPU16_REG_PC]);
printf("\n");
}
+
+ /* how many cycles did this instr use? */
+ cycles_to_wait = vm->cycle_ - cycle_start;
+
+ if (cycles_to_wait == 0)
+ continue;
+
+ /* each cycle wants 10 microseconds */
+
+ /* how much of that did we spend already */
+ gettimeofday(&now_tv, NULL);
+ timeval_subtract(&diff_tv, &now_tv, &start_tv);
+ /* do we have time to kill? */
+ if (cycles_to_wait * MICROSECONDS_PER_CYCLE > diff_tv.tv_usec) {
+ sleep_time.tv_sec = diff_tv.tv_sec;
+ /* this is not accurate.. */
+ sleep_time.tv_nsec = 250 * ( (cycles_to_wait * MICROSECONDS_PER_CYCLE) - diff_tv.tv_usec);
+
+ /* nanosleep doesn't interfere with libvncserver, unlike usleep */
+ while ( nanosleep(&sleep_time, &rem_time) ) {
+ sleep_time = rem_time;
+ fprintf(stderr, "rem:%ld %ld\n", rem_time.tv_sec, rem_time.tv_nsec);
+ }
+ }
}
+ gettimeofday(&run_stop_tv, NULL);
+ timeval_subtract(&diff_tv, &run_stop_tv, &run_start_tv);
+ run_usec = diff_tv.tv_sec * 1000000;
+ run_usec += diff_tv.tv_usec;
+ fprintf(stderr, "ran %llu cycles in %lds %dus (%lldus)\n",
+ vm->cycle_ - run_cycle_start,
+ diff_tv.tv_sec,
+ diff_tv.tv_usec,
+ run_usec);
+
printf("interrupted...\n");
return 0;
#endif /* HAVE_LIBPNG */
;
COMMAND_IMPL(display) {
- struct dcpu16_hw *hw = lem1802_new(vm);
+ struct dcpu16_hw *hw;
const char *renderer = arg_vector[1];
const char *renderer_arg = NULL;
- void *renderer_data = NULL;
+ void *renderer_data;
if (arg_count == 3)
renderer_arg = arg_vector[2];
+ hw = lem1802_new(vm);
if (hw == NULL) {
fprintf(stderr, "failed to initialize new display\n");
return 0;
if (strcmp(renderer, "vnc") == 0) {
int argc = 1;
char *argv[] = { "vm-dcpu16", NULL };
+ struct rfb_instance_ *s;
- renderer_data = lem1802_vnc_init_data(argc, argv, hw);
-
- /* FIXME: keep refs to vnc displays around somewhere, in global list maybe.. */
- /* keyboards will want to attach to them as well.. */
-
- if (renderer_data == NULL) {
+ s = rfbScreen_next_available_display_(&rfbScreens_, argc, argv);
+ if (s == NULL) {
fprintf(stderr, "failed to initialize vnc\n");
lem1802_del(&hw);
return 0;
}
+
+ lem1802_vnc_associate(hw, s->screen);
+ s->attached_display = hw;
+ rfbScreen_start(s->screen);
+ renderer_data = s->screen;
}
#endif /* HAVE_LIBVNCSERVER */
}
}
+COMMAND_IMPL(keyboard) {
+ struct dcpu16_hw *hw;
+
+ (void)arg_count, (void)arg_vector;
+
+ hw = keyboard_new(vm);
+ if (hw == NULL) {
+ fprintf(stderr, "failed to initialize new keyboard\n");
+ return 0;
+ }
+
+#ifdef HAVE_LIBVNCSERVER
+ struct rfb_instance_ *s;
+ int argc = 1;
+ char *argv[] = { "vm-dcpu16", NULL };
+
+ s = rfbScreen_next_available_keyboard_(&rfbScreens_, argc, argv);
+ if (s == NULL) {
+ fprintf(stderr, "failed to initialize vnc\n");
+ keyboard_del(&hw);
+ return 0;
+ }
+ keyboard_vnc_associate(hw, s->screen);
+ s->attached_keyboard = hw;
+
+ if (dcpu16_hw_add(vm, hw)) {
+ fprintf(stderr, "failed to attach new keyboard\n");
+ keyboard_del(&hw);
+ return 0;
+ }
+#endif /* HAVE_LIBVNCSERVER */
+
+ return 0;
+}
+COMMAND_HELP(keyboard) {
+ fprintf(f, "\tkeyboard\n");
+ if (summary) return;
+
+ fprintf(f, "Attaches new keyboard unit.\n");
+}
+
/* gather all these together into a searchable table */
/* help command gets some assistance in declarations */
COMMAND_ENTRY(set, 2, 2),
COMMAND_ENTRY(reset, 0, 0),
COMMAND_ENTRY(display, 1, 2),
+ COMMAND_ENTRY(keyboard, 0, 0),
{ NULL, 0, 0, NULL, NULL }
};
exit(EX_UNAVAILABLE);
}
+#ifdef HAVE_LIBVNCSERVER
+ if (dynarray_init(&rfbScreens_, sizeof(struct rfb_instance_), 4)) {
+ fprintf(stderr, "could not allocate rfb container\n");
+ exit(EX_UNAVAILABLE);
+ }
+#endif /* HAVE_LIBVNCSERVER */
+
if (argc) {
if (file_load_(vm, *argv, 0)) {
fprintf(stderr, "couldn't load '%s'\n", *argv);