quakeforge/ruamoko/qwaq/qwaq-app.r
Bill Currie 8a7fbdfc9f [qwaq] Rework allocation to use retain/release
It currently dies when single stepping or exiting due to EditBuffer's
retain count not getting incremented when initialized. This is because
EditBuffer is initialized in C and thus does not call Object's -init.
2020-03-30 16:58:36 +09:00

166 lines
2.8 KiB
R

int fence;
#include <AutoreleasePool.h>
#include <key.h>
#include "ui/color.h"
#include "ui/curses.h"
#include "ui/group.h"
#include "ui/view.h"
#include "debugger/debugger.h"
#include "qwaq-app.h"
int color_palette[64];
static AutoreleasePool *autorelease_pool;
static void
arp_start (void)
{
autorelease_pool = [[AutoreleasePool alloc] init];
}
static void
arp_end (void)
{
[autorelease_pool release];
autorelease_pool = nil;
}
@implementation QwaqApplication
+app
{
return [[[self alloc] init] autorelease];
}
-init
{
if (!(self = [super init])) {
return nil;
}
initialize ();
for (int i = 1; i < 64; i++) {
init_pair (i, i & 0x7, i >> 3);
color_palette[i] = COLOR_PAIR (i);
}
screen = [TextContext screen];
screenSize = [screen size];
objects = [[Group withContext: screen owner: nil] retain];
[screen bkgd: color_palette[047]];
[screen scrollok: 1];
[screen clear];
wrefresh (stdscr);//FIXME
debuggers = [[Array array] retain];
return self;
}
-(Extent)size
{
return screenSize;
}
-(TextContext *)screen
{
return screen;
}
-draw
{
[objects draw];
[TextContext refresh];
return self;
}
-(Debugger *)find_debugger:(qdb_target_t) target
{
Debugger *debugger;
for (int i = [debuggers count]; i-- > 0; ) {
debugger = [debuggers objectAtIndex: i];
if ([debugger target].handle == target.handle) {
return debugger;
}
}
debugger = [Debugger withTarget: target];
[debuggers addObject: debugger];
return debugger;
}
-handleEvent: (qwaq_event_t *) event
{
switch (event.what) {
case qe_resize:
Extent delta;
delta.width = event.resize.width - screenSize.width;
delta.height = event.resize.height - screenSize.height;
resizeterm (event.resize.width, event.resize.height);
[screen resizeTo: {event.resize.width, event.resize.height}];
screenSize = [screen size];
[objects resize: delta];
[screen refresh];
event.what = qe_none;
break;
case qe_key:
if (event.key.code == '\x18' || event.key.code == '\x11') {
endState = event.message.int_val;
event.what = qe_none;
}
break;
case qe_debug_event:
[[self find_debugger:{event.message.int_val}] handleDebugEvent];
event.what = qe_none;
break;
}
if (event.what != qe_none) {
[objects handleEvent: event];
}
return self;
}
-run
{
[objects takeFocus];
[self draw];
do {
arp_start ();
get_event (&event);
if (event.what != qe_none) {
[self handleEvent: &event];
}
arp_end ();
} while (!endState);
return self;
}
-addView:(View *)view
{
[objects insertSelected: view];
[screen refresh];
return self;
}
@end
QwaqApplication *application;
int main (int argc, string *argv)
{
fence = 0;
//while (!fence) {}
arp_start ();
application = [[QwaqApplication app] retain];
arp_end ();
[application run];
[application release];
qwaq_event_t event;
get_event (&event); // XXX need a "wait for queue idle"
return 0;
}