Project

General

Profile

Download (3.61 KB) Statistics
| Revision:

repo2/firmware_eclairexl/linux/curses_screen.c

183 markw
#include <stdarg.h>
#include <stdio.h>
#include <stdint.h>
#include <curses.h>
#include "curses_screen.h"
#include "linux_helper.h"
#include "regs.h"

static WINDOW* atari_window;
static WINDOW* status_window;
static WINDOW* log_window;

static attr_t atari_color;
static attr_t atari_inverse_color;
static attr_t status_color;
static attr_t log_color;

int init_curses_screen(void)
{
int height;
int width;

initscr();

getmaxyx(stdscr, height, width);

if (height < 24 || width < 80) {
fprintf(stderr, "screen is too small (must be 80x24)\n");
return 1;
}

nonl();
cbreak();
noecho();

atari_window = newwin(24, 40, 0, 0);
status_window = newwin(4, width - 40, 0, 40);
log_window = newwin(height - 4, width - 40, 4, 40);

atari_color = 0;
atari_inverse_color = A_REVERSE;
if (has_colors()) {
start_color();
init_pair(1, COLOR_YELLOW, COLOR_BLUE);
init_pair(2, COLOR_YELLOW, COLOR_BLACK);
status_color = COLOR_PAIR(1);
log_color = COLOR_PAIR(2);
} else {
status_color = A_REVERSE;
log_color = 0;
}
wbkgdset(atari_window, atari_color | ' ');
wbkgdset(log_window, log_color | ' ');
wbkgdset(status_window, status_color | ' ');
wbkgdset(log_window, log_color | ' ');

keypad(stdscr, TRUE);
scrollok(log_window, TRUE);

werase(atari_window);
werase(status_window);
werase(log_window);

curs_set(0);

refresh();
return 0;
}

void deinit_curses_screen(void)
{
endwin();
}

#define MAXSTR 256
static char tmpstr[MAXSTR];

void display_out_regs(void)
{
uint32_t out1 = *zpu_out1;

werase(status_window);
snprintf(tmpstr, MAXSTR, "out1: %08x", out1);
mvwaddstr(status_window, 0, 1, tmpstr);

210 markw
snprintf(tmpstr, MAXSTR, "- - tur %02x ram %02x rom %02x car %02x frz %1d",
183 markw
(out1 >> 2) & 0x3f,
(out1 >> 8) & 0x07,
195 markw
(out1 >> 11) & 0x3f,
210 markw
(out1 >> 17) & 0x3f,
(out1 >> 25) & 1);
183 markw
if (out1 & 1) {
tmpstr[0] = 'P';
}
if (out1 & 2) {
tmpstr[2] = 'R';
}
mvwaddstr(status_window, 1, 1, tmpstr);

wrefresh(status_window);
}

void display_char(int x, int y, char c, int inverse)
{
if (inverse) {
wattrset(atari_window, atari_inverse_color);
}
mvwaddch(atari_window, y, x, c);
wattrset(atari_window, atari_color);

wrefresh(atari_window);
}

void clearscreen(void)
{
wattrset(atari_window, atari_color);
werase(atari_window);
wrefresh(atari_window);
}

void check_keys(void)
{
int ch;
*zpu_in1 = 0;

while (1) {
ch = wgetch(stdscr);

switch (ch) {
case KEY_F(12):
*zpu_in1 = 1<<11; return;
275 markw
case KEY_F(11):
*zpu_in1 = 1<<10; return;
803 markw
default:
*zpu_in1 = 0; return;
183 markw
}
}
}

void joystick_poll(struct joystick_status * status)
{
// we are blocking instead of polling
int ch = wgetch(stdscr);

status->x_ = 0;
status->y_ = 0;
status->fire_ = 0;
275 markw
status->escape_ = 0;
183 markw

switch (ch) {
case KEY_UP: status->y_ = -1; break;
case KEY_DOWN: status->y_ = 1; break;
case KEY_LEFT: status->x_ = -1; break;
case KEY_RIGHT: status->x_ = 1; break;
case KEY_ENTER:
case 13:
status->fire_ = 1; break;
case 27: // ESCAPE:
275 markw
status->escape_ = 1; break;
183 markw
default: break;
}
}

void joystick_wait(struct joystick_status * status, enum JoyWait waitFor)
{
if (waitFor == WAIT_QUIET)
{
status->x_ = 0;
status->y_ = 0;
status->fire_ = 0;
return;
}
while (1)
{
joystick_poll(status);
switch (waitFor)
{
case WAIT_QUIET:
break;
case WAIT_FIRE:
if (status->fire_ == 1) return;
break;
case WAIT_EITHER:
if (status->fire_ == 1) return;
// fall through
case WAIT_MOVE:
if (status->x_ !=0 || status->y_ != 0) return;
break;
}
}
}

void print_log(const char* format, ...)
{
va_list arg;
va_start(arg, format);
vw_printw(log_window, format, arg);
va_end(arg);
wrefresh(log_window);
}