/*
 * ShPort.c  Widget 呼び出し？ module
 *
 *    かえるにょ国にょアリス(未使用)
 *    大悪司
 *
 * Copyright (C) 1997-1998 Masaki Chikama (Wren) <chikama@kasumi.ipl.mech.nagoya-u.ac.jp>
 *               1998-                           <masaki-c@is.aist-nara.ac.jp>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
*/
/* $Id: ShPort.c,v 1.6 2003/01/25 01:34:50 chikama Exp $ */

#include "config.h"

#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "portab.h"
#include "nact.h"
#include "system.h"
#include "xsystem35.h"
#include "modules.h"
#include "input.h"
#include "menu.h"

// キー変換テーブル
#define KEYMAP_MAX 8
static uint8_t *keymap[KEYMAP_MAX];

static void OutputMessageBox(void) { /* 0 */
	int p1 = getCaliValue();
	int p2 = getCaliValue();
	int title = getCaliValue();
	int msg = getCaliValue();
	int *res = getCaliVariable();
	int ISys3xSystem = getCaliValue();

	char *title_utf8 = toUTF8(svar_get(title));
	char *msg_utf8 = toUTF8(svar_get(msg));

	sys_show_message_box(MESSAGEBOX_INFO, title_utf8, msg_utf8);

	free(title_utf8);
	free(msg_utf8);

	TRACE("ShPort.OutputMessageBox: %d,%d,%d,%d,%p,%d:", p1, p2, title, msg, res, ISys3xSystem);
}

static void InputListNum(void) { /* 1 */
	int flags = getCaliValue();
	int title = getCaliValue();
	int *val = getCaliVariable();
	int minval = getCaliValue();
	int maxval = getCaliValue();
	int *res = getCaliVariable();
	int ISys3xSystem = getCaliValue();

	INPUTNUM_PARAM ni_param = {
		.def = minval,
		.min = minval,
		.max = maxval,
		.title = toUTF8(svar_get(title)),
	};

	menu_inputnumber(&ni_param);
	if (ni_param.value < 0) {
		*res = 0;
	} else {
		*val = (uint16_t)ni_param.value;
		*res = 1;
	}

	free(ni_param.title);
	TRACE("ShPort.InputListNum: %d,%d,%p,%d,%d,%p,%d:", flags, title, val, minval, maxval, res, ISys3xSystem);
}

/**
 * ShPort:Init
 *   ShPortサブシステム全体の初期化
 *   @param p1: ISys3x
 */
static void Init(void) {
	int p1 = getCaliValue();
	
	TRACE_UNIMPLEMENTED("ShPort.Init: %d:", p1);
}

/**
 * ShPort:InitKeyStatus
 *   指定のキーコードマップの初期化
 *   @param no: キーコードマップの番号(1~)
 */
static void InitKeyStatus(void) {
	int no = getCaliValue();
	
	if (no >= KEYMAP_MAX) {
		WARNING("Overflow keymap table(p1)", no);
		return;
	}
	
	if (keymap[no -1] == NULL) {
		keymap[no -1] = calloc(256, sizeof(uint8_t));
	} else {
		memset(keymap[no -1], 0, 256);
	}
	
	TRACE("ShPort.InitKeyStatus: %d:", no);
}

/**
 * ShPort:SetKeyStatus
 *   指定マップのキーコードへの機能の割り付け。
 *   @param no: マップ番号
 *   @param key: キーコード
 *   @param func: 機能キーコード
 */
static void SetKeyStatus(void) {
	int no   = getCaliValue();
	int key  = getCaliValue();
	int func = getCaliValue();
	
	if (no >= KEYMAP_MAX) {
		WARNING("Overflow keymap table(p1)", no);
		return;
	}
	
	keymap[no -1][key] = func;
	
	TRACE("ShPort.SetKeyStatus: %d,%d,%d:", no, key, func);
}

/**
 * ShPort:GetKeyStatus
 *   指定マップのキーの押下状態の取得
 *   @param no:  マップ番号
 *   @param var: 押下キーに対応する機能コードを返す変数
 */
static void GetKeyStatus(void) {
	int no   = getCaliValue();
	int *var = getCaliVariable();
	int i;
	
	if (no >= KEYMAP_MAX) {
		WARNING("Overflow keymap table(p1)", no);
		return;
	}
	
	*var = 0;
	for (i = 0; i < NUM_KEYCODES; i++) {
		*var |= (keymap[no -1][i] * RawKeyInfo[i]);
	}
	
	TRACE("ShPort.GetKeyStatus: %d,%p:", no, var);
}

static void InputListString(void) {
	int p1 = getCaliValue();
	int p2 = getCaliValue();
	int p3 = getCaliValue();
	int p4 = getCaliValue();
	int p5 = getCaliValue();
	int p6 = getCaliValue();
	int p7 = getCaliValue();

	TRACE_UNIMPLEMENTED("ShPort.InputListString: %d,%d,%d,%d,%d,%d,%d:", p1, p2, p3, p3, p4, p5, p6, p7);
}

static void InputOpenFile(void) {
	int p1 = getCaliValue();
	int p2 = getCaliValue();
	int p3 = getCaliValue();
	int p4 = getCaliValue();
	int p5 = getCaliValue();
	int p6 = getCaliValue();
	int p7 = getCaliValue();

	TRACE_UNIMPLEMENTED("ShPort.InputOpenFile: %d,%d,%d,%d,%d,%d,%d:", p1, p2, p3, p3, p4, p5, p6, p7);
}

static void InputSaveFile(void) {
	int p1 = getCaliValue();
	int p2 = getCaliValue();
	int p3 = getCaliValue();
	int p4 = getCaliValue();
	int p5 = getCaliValue();
	int p6 = getCaliValue();
	int p7 = getCaliValue();

	TRACE_UNIMPLEMENTED("ShPort.InputSaveFile: %d,%d,%d,%d,%d,%d,%d:", p1, p2, p3, p3, p4, p5, p6, p7);
}

static const ModuleFunc functions[] = {
	{"GetKeyStatus", GetKeyStatus},
	{"Init", Init},
	{"InitKeyStatus", InitKeyStatus},
	{"InputListNum", InputListNum},
	{"InputListString", InputListString},
	{"InputOpenFile", InputOpenFile},
	{"InputSaveFile", InputSaveFile},
	{"OutputMessageBox", OutputMessageBox},
	{"SetKeyStatus", SetKeyStatus},
};

const Module module_ShPort = {"ShPort", functions, sizeof(functions) / sizeof(ModuleFunc)};