htmenu.cc

功能较全面的反汇编器：反汇编器ht-2.0.15.tar.gz

/*
 *	HT Editor
 *	htmenu.cc
 *
 *	Copyright (C) 1999-2002 Stefan Weyergraf
 *
 *	This program is free software; you can redistribute it and/or modify
 *	it under the terms of the GNU General Public License version 2 as
 *	published by the Free Software Foundation.
 *
 *	This program is distributed in the hope that it will be useful,
 *	but WITHOUT ANY WARRANTY; without even the implied warranty of
 *	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *	GNU General Public License for more details.
 *
 *	You should have received a copy of the GNU General Public License
 *	along with this program; if not, write to the Free Software
 *	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 */

#include <cstring>

#include "htapp.h"		// for queuemsg
#include "htctrl.h"
#include "keyb.h"
#include "htmenu.h"
#include "htpal.h"
#include "htreg.h"
#include "strtools.h"
#include "stream.h"
#include "tools.h"

#define button_left	100
#define button_right	101

char *shortcut_str(char *str)
{
	while (*str) {
		if (*str=='~') {
			memmove(str, str+1, strlen(str));
			return str;
		}
		str++;
	}
	return NULL;
}

bool execute_submenu(int x, int y, ht_context_menu *m)
{
	int curentry=0;
	bool term=false;
	Bounds scr;
	app->getbounds(&scr);
	do {
		Bounds b;
		b.x=x+m->xpos-1;
		b.y=y;
		b.w=m->width+4;
		b.h=m->count()+2;
		if (b.y+b.h > scr.h) {
			if (scr.h > b.h) {
				b.y = scr.h - b.h;
				if (b.y >= 2) b.y -= 2;
			} else {
				b.y = 0;
			}
		}
		ht_menu_window *d = new ht_menu_window();
		d->init(&b, m);
		ht_menu_window_data a;
		a.selected = curentry;
		d->databuf_set(&a, sizeof a);
		b.x = 0;
		b.y = 0;
		ht_frame *frame = new ht_menu_frame();
		frame->init(&b, 0, FS_MOVE/*just for fun*/);
		d->setframe(frame);
		d->setpalette(palkey_generic_menu_default);
		int r = d->run(false);
		d->done();
		delete d;
		switch (r) {
		case button_ok: {
			return true;
		}
		default:
			term = true;
		}
	} while (!term);
	return false;
}

/*
 *	CLASS ht_context_menu
 */

void ht_context_menu::init(const char *Name)
{
	name = ht_strdup(Name);
	shortcut = shortcut_str(name);
	width = 0;
}

void ht_context_menu::done()
{
	free(name);
}

int ht_context_menu::count()
{
	return 0;
}

ht_context_menu_entry *ht_context_menu::enum_entry_first()
{
	return NULL;
}

ht_context_menu_entry *ht_context_menu::enum_entry_next()
{
	return NULL;
}

ht_context_menu_entry *ht_context_menu::get_entry(int n)
{
	ht_context_menu_entry *e=enum_entry_first();
	while (n-- && e) {
		e = enum_entry_next();
	}
	return e;
}

const char *ht_context_menu::get_name()
{
	return name;
}

const char *ht_context_menu::get_shortcut()
{
	return shortcut;
}

/*
 *	CLASS ht_static_context_menu
 */

void ht_static_context_menu::init(const char *name)
{
	ht_context_menu::init(name);
	context_menu_entry = new Array(true);
}

void ht_static_context_menu::done()
{
	delete context_menu_entry;
	ht_context_menu::done();
}

int ht_static_context_menu::count()
{
	return context_menu_entry->count();
}

ht_context_menu_entry *ht_static_context_menu::enum_entry_first()
{
	enum_idx = 0;
	ht_context_menu_entry *e = (ht_context_menu_entry*)(*context_menu_entry)[enum_idx];
	return e;
}

ht_context_menu_entry *ht_static_context_menu::enum_entry_next()
{
	enum_idx++;
	ht_context_menu_entry *e = (ht_context_menu_entry*)(*context_menu_entry)[enum_idx];
	return e;
}

void ht_static_context_menu::insert_entry(const char *Name, const char *Comment, int cmd, int k, bool a)
{
	char *name = ht_strdup(Name);
	char *comment = ht_strdup(Comment);
	char *shortcut = shortcut_str(name);
	int l = strlen(name);
	int cl = comment ? strlen(comment)+2 : 0;
	width = MAX(width, l+cl);
	ht_context_menu_entry *e = new ht_context_menu_entry();
	e->type = CME_ENTRY;
	e->entry.name = name;
	e->entry.shortcut = shortcut;
	e->entry.comment = comment;
	e->entry.command = cmd;
	e->entry.key = k;
	e->entry.active = a;
	context_menu_entry->insert(e);
}

void ht_static_context_menu::insert_separator()
{
	ht_context_menu_entry *entry = new ht_context_menu_entry();
	entry->type = CME_SEPARATOR;
	context_menu_entry->insert(entry);
}

void ht_static_context_menu::insert_submenu(ht_context_menu *submenu)
{
	ht_context_menu_entry *entry = new ht_context_menu_entry();
	entry->type = CME_SUBMENU;
	entry->submenu = submenu;
	submenu->xpos = 0;
	context_menu_entry->insert(entry);
}

/*
 *	CLASS ht_context_menu_entry
 */

ht_context_menu_entry::~ht_context_menu_entry()
{
	switch (type) {
	case CME_ENTRY:
		free(entry.name);
		free(entry.comment);
		break;
	case CME_SUBMENU:
		submenu->done();
		delete submenu;
		break;
	}
}

/*
 *	CLASS ht_menu
 */

void ht_menu::init(Bounds *b)
{
	ht_view::init(b, VO_OWNBUFFER | VO_POSTPROCESS | VO_RESIZE, "menu");
	VIEW_DEBUG_NAME("ht_menu");

	growmode = MK_GM(GMH_FIT, GMV_TOP);

	menu = new Array(true);
	lastmenux = 1;
	curmenu = -1;
	localmenu = -1;
	context_menu_hack = NULL;
	last_context_menu_hack = NULL;
	context_menu_hack2 = false;
}

void ht_menu::done()
{
	delete menu;
	ht_view::done();
}

const char *ht_menu::defaultpalette()
{
	return palkey_generic_menu_default;
}

const char *ht_menu::defaultpaletteclass()
{
	return palclasskey_generic;
}

ht_context_menu *ht_menu::get_context_menu(int i)
{
	ht_context_menu *q = (ht_context_menu*)(*menu)[i];
	if (context_menu_hack && (i == localmenu) && !q) return context_menu_hack;
	return q;
}

void ht_menu::getminbounds(int *width, int *height)
{
	*width = 1;
	*height = 1;
}

void ht_menu::draw()
{
	clear(getcolor(palidx_generic_body));
	int c = count();
	for (int i=0; i < c; i++) {
		ht_context_menu *c = get_context_menu(i);
		const char *n = c->get_name();
		const char *s = c->get_shortcut();
		if (i == curmenu) {
			buf->printChar(c->xpos-1, 0, getcolor(palidx_generic_text_selected), ' ');
			buf->print(c->xpos, 0, getcolor(palidx_generic_text_selected), n);
			buf->printChar(c->xpos+strlen(n), 0, getcolor(palidx_generic_text_selected), ' ');
			if (s) buf->printChar(c->xpos+(s - n), 0, getcolor(palidx_generic_text_shortcut_selected), *s);
		} else {
			buf->print(c->xpos, 0, getcolor(palidx_generic_text_focused), n);
			if (s) buf->printChar(c->xpos+(s - n), 0, getcolor(palidx_generic_text_shortcut), *s);
		}
	}
}

void ht_menu::execute_menu(int i)
{
	curmenu = i;
	int curentry = 0;
	bool term = false;
	dirtyview();
	do {
		ht_context_menu *m = get_context_menu(curmenu);
		Bounds b;
		b.x = m->xpos-1;
		b.y = 1;
		b.w = m->width + 4;
		b.h = m->count() + 2;
		ht_menu_window *d = new ht_menu_window();
		d->init(&b, m);
		ht_menu_window_data a;
		a.selected = curentry;
		d->databuf_set(&a, sizeof a);
		b.x = 0;
		b.y = 0;
		ht_frame *frame = new ht_menu_frame();
		frame->init(&b, 0, FS_MOVE);	// just for fun
		d->setframe(frame);
		d->setpalette(palkey_generic_menu_default);
		int r = d->run(false);
		switch (r) {
		case button_left:
			curmenu--;
			if (curmenu < 0) curmenu = count() - 1;
			curentry=0;
			dirtyview();
			break;
		case button_right:
			curmenu++;
			if (curmenu > (int)count()-1) curmenu = 0;
			curentry = 0;
			dirtyview();
			break;
		case button_ok: {
//			return true;
		}
		default:
			term = true;
		}
		d->done();
		delete d;
	} while (!term);
	curmenu = -1;
	dirtyview();
}

void ht_menu::handlemsg(htmsg *msg)
{
	if (msg->type == mt_postprocess) {
		if (msg->msg == msg_keypressed) {
			/* shortcuts */
			ht_key k = keyb_unmetakey((ht_key)msg->data1.integer);
			if (k != K_INVALID) {
				int c=count();
				for (int i=0; i<c; i++) {
					ht_context_menu *m = get_context_menu(i);
					int s = *m->get_shortcut();
					if (s >= 'A' && s <= 'Z') s += 'a'-'A';
					if (s == k) {
						if (last_context_menu_hack) {
							last_context_menu_hack->done();
							delete last_context_menu_hack;
							last_context_menu_hack = NULL;
						}
						if (localmenu != -1) {
							context_menu_hack = (ht_context_menu*)(*menu)[localmenu];
							last_context_menu_hack = NULL;
							if (context_menu_hack) {
								menu->remove(menu->findByIdx(localmenu));
							}
						}
						context_menu_hack2 = true;
						execute_menu(i);
						context_menu_hack2 = false;
						if (context_menu_hack) {
							context_menu_hack->done();
							delete context_menu_hack;
							context_menu_hack = NULL;
						}
						if (last_context_menu_hack) {
							set_local_menu(last_context_menu_hack);
							last_context_menu_hack = NULL;
						} else {
							delete_local_menu();
						}
						clearmsg(msg);
						return;
					}
				}
			}
			/* keys associated with menu entries */
			int c = count();
			for (int i=0; i<c; i++) {
				ht_context_menu *a = get_context_menu(i);
				if (handle_key_context_menu(a, msg->data1.integer)) {
					clearmsg(msg);
					return;
				}
			}
		}
	}
	ht_view::handlemsg(msg);
}

bool ht_menu::handle_key_context_menu(ht_context_menu *a, int k)
{
	ht_context_menu_entry *e = a->enum_entry_first();
	while (e) {
		if (e->type == CME_ENTRY && e->entry.name && e->entry.key && k == e->entry.key) {
			htmsg m;
			m.msg = e->entry.command;
			m.type = mt_empty;