![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to x68kkbd.cpp CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Isaki's NoNo m68k/m88k emulator] / nono / vm|
Return to x68kkbd.cpp CVS log | Up to [Isaki's NoNo m68k/m88k emulator] / nono / vm |
1.1 root 1: //
2: // nono
1.1.1.4 root 3: // Copyright (C) 2020 nono project
4: // Licensed under nono-license.txt
1.1 root 5: //
6:
1.1.1.5 root 7: // 送信タイミングについて
8: // キーボードは MFP の USART に繋がっている。
9: // MFP USART の RR 線 (Receiver Ready) は受信可能なら 'H'、受信中は 'L' に
10: // なっている。キーボードは RR が 'H' の時だけデータを送信する。また、
11: // システムポート#4 の KEY CTRL = 0 (キーデータ送信不可) はこの RR を
12: // 'L' に落とす AND 回路になっている。キーボードからの送信は 2400bps、
13: // ストップビット1、パリティなしなので、1バイトの送信に 3.75 msec かかる。
14: // 実装では、キーボードは MFP の RR が 'H' なら MFP にキーデータを送信。
15: // MFP 側で RR を 'L' にして 3.75 msec をイベントで待った後、キーを処理
16: // して RR を 'H' に戻すことにする。
17:
18: // SHIFT キーについては keyboard.cpp のコメントを参照。
1.1.1.4 root 19:
1.1 root 20: #include "x68kkbd.h"
21: #include "mfp.h"
1.1.1.7 root 22: #include "scc.h"
1.1.1.5 root 23: #include "sysport.h"
1.1 root 24:
25: // コンストラクタ
26: X68030Keyboard::X68030Keyboard()
27: {
1.1.1.4 root 28: led.resize(7);
1.1.1.6 root 29:
30: rept_event.func = (DeviceCallback_t)&X68030Keyboard::ReptCallback;
31: rept_event.time = 0;
32: rept_event.SetName("Keyboard Repeat");
1.1.1.7 root 33:
34: for (int i = 0; i < mouse_event.size(); i++) {
35: mouse_event[i].dev = this;
36: mouse_event[i].func = (DeviceCallback_t)&X68030Keyboard::MouseCallback;
37: // 700us 後から 11bit を 4800 bps の速度で送る
38: mouse_event[i].time = 700_usec + 1_sec * 11 * (i + 1) / 4800;
39: mouse_event[i].SetName(string_format("Mouse Data %d", i));
40: }
1.1.1.3 root 41: }
42:
43: // デストラクタ
44: X68030Keyboard::~X68030Keyboard()
45: {
46: }
47:
1.1.1.4 root 48: // 本体リセットスイッチによるリセット
49: void
50: X68030Keyboard::ResetHard()
1.1.1.3 root 51: {
1.1.1.5 root 52: inherited::ResetHard();
53:
1.1.1.6 root 54: rept_delay = 500_msec;
55: rept_time = 110_msec;
56: rept_key = KC_none;
57: rept_event.Stop();
1.1.1.4 root 58:
59: for (int i = 0; i < led.size(); i++) {
60: led[i] = false;
61: }
62: led_darkness = 0;
1.1.1.7 root 63:
64: for (int i = 0; i < mouse_event.size(); i++) {
65: mouse_event[i].Stop();
66: }
1.1 root 67: }
68:
1.1.1.5 root 69: // 共通キーコードを X680x0 キーコードに変換して返す。
70: // 対応する X680x0 のキーがなければ 0 を返す。
71: uint
72: X68030Keyboard::KeyToMDKey(uint keycode) const
1.1 root 73: {
1.1.1.5 root 74: if (keycode >= countof(keycode2x68kkey_table)) {
75: return 0;
76: }
1.1 root 77:
1.1.1.5 root 78: return keycode2x68kkey_table[keycode];
79: }
80:
81: // シフト状態なら true を返す
82: bool
83: X68030Keyboard::IsShift() const
84: {
85: return pressed[KC_SHIFT];
86: }
1.1 root 87:
1.1.1.6 root 88: // キー入力を1つ処理する
89: void
90: X68030Keyboard::KeyInput(uint keystat)
1.1.1.5 root 91: {
1.1.1.6 root 92: uint keycode = KC_CODE(keystat);
93: bool ismake = KC_IS_MAKE(keystat);
94:
95: assert(keycode < KC_max);
96:
1.1.1.5 root 97: // X68k のキーボードは左右の [SHIFT] の区別がない。
98: // KC_SHIFT_L はホストの物理キー左 [SHIFT] に対応、
99: // KC_SHIFT_R はホストの物理キー右 [SHIFT] に対応、
100: // KC_SHIFT はソフトウェアキーボードからの左右のない [SHIFT] に対応。
101: // どのキーコードで問い合わせをされても KC_SHIFT_L と KC_SHIFT_R の OR が
102: // [SHIFT] キーの状態である。
103: if (keycode == KC_SHIFT_L || keycode == KC_SHIFT_R) {
104: // KC_SHIFT_L, R に対する pressed は内部の OR 処理用
1.1.1.6 root 105: pressed[keycode] = ismake;
1.1.1.5 root 106: if (keycode == KC_SHIFT_L && pressed[KC_SHIFT_R]) {
1.1.1.6 root 107: return;
1.1.1.5 root 108: }
109: if (keycode == KC_SHIFT_R && pressed[KC_SHIFT_L]) {
1.1.1.6 root 110: return;
1.1.1.5 root 111: }
1.1.1.6 root 112: keycode = KC_SHIFT;
1.1.1.8 ! root 113:
1.1.1.6 root 114: // keycode を変更したので keystat も更新
1.1.1.8 ! root 115: keystat = (keystat & 0xff00) | keycode;
1.1 root 116: }
1.1.1.5 root 117:
1.1.1.6 root 118: // 共通処理へ
119: if (KeyInputCommon(keystat) == false) {
120: return;
121: }
1.1 root 122:
1.1.1.4 root 123: // LED は MPU 側から点灯/消灯指示が来るのでここでは何もしなくてよい
1.1 root 124:
1.1.1.6 root 125: // ここでキーリピートのイベント開始処理
126: if (ismake) {
127: // いま起きているリピートは中止
128: rept_event.Stop();
129: rept_key = keycode;
130: rept_event.time = rept_delay;
131: rept_event.Start();
132: } else {
133: if (keycode == rept_key) {
134: // 同じキーのブレークでのみリピートを終了する
135: rept_event.Stop();
136: rept_key = KC_none;
137: }
138: }
139: }
1.1.1.5 root 140:
1.1.1.6 root 141: void
142: X68030Keyboard::ReptCallback(Event& ev)
143: {
144: // リピート
145: sendqueue.Enqueue(rept_key);
146: SendStart();
147:
148: // 二回目以降のリピートは rept_time 間隔で発生
149: rept_event.time = rept_time;
150: rept_event.Start();
1.1 root 151: }
1.1.1.5 root 152:
153: // MFP、システムポートと、キーボードの関係。
154: //
155: // キーボードの Ready 信号は MFP の RR とシステムポートの KeyCtrl の
156: // AND で作られているが、この AND 部分はキーボードが担当することにする。
157: // そのほうが都合がいいため。
158: //
159: // <- 本体 || キーボード ->
160: // MFP ||
161: // --------+ : || +-----
162: // | : +--+ || |
163: // RR|o-------| | || |
164: // --------+ : | |-----|T0 (Ready)
165: // +-----| | || |
166: // Sysport | : +--+ || |
167: // --------+ | : || |
168: // KeyCtrl|--+ : || +-----
169: // | : ||
170: // :エミュレータでは点線から右をキーボードが担当
1.1 root 171:
1.1.1.5 root 172: // キーデータを送信
1.1 root 173: void
1.1.1.5 root 174: X68030Keyboard::SendStart()
1.1 root 175: {
1.1.1.5 root 176: if (gMFP->RxIsReady()) {
177: // 本体が Ready ならここで送信
178: Ready();
179: } else {
180: // そうでない場合、ここでは処理は不要。
181: // MFP 側が受信可能になると Ready() がコールされ、そっちで処理される
1.1 root 182: }
183: }
184:
1.1.1.5 root 185: // MFP からの Ready 通知
186: // 実際にはキーボード側が MFP (を含む本体側) が Ready になるのを待っている
187: // のだが、待っているを作るのは大変なので。
1.1.1.2 root 188: void
1.1.1.5 root 189: X68030Keyboard::Ready()
1.1.1.2 root 190: {
1.1.1.5 root 191: if (gSysport->GetKeyCtrl()) {
192: // KEYCTRL が有効なら処理する
193:
194: // ここで取り出せるのは keystat。
195: uint keystat;
196: if (sendqueue.Dequeue(&keystat)) {
197: // あれば送信
198:
199: // 呼ばれたからには送信できるはず
200: assert(gMFP->RxIsReady() == true);
201:
202: uint keycode = KC_CODE(keystat);
203: // ここで X68k キーコードに変換 (変換できないはずはない)
204: uint x68kkey = KeyToMDKey(keycode);
205: assert(x68kkey != 0);
206:
207: // 送信
208: if (KC_IS_BREAK(keystat)) {
209: x68kkey |= 0x80;
210: }
211: gMFP->Rx(x68kkey);
212: } else {
213: // なければ何もせず終了
214: }
215: } else {
216: // KEYCTRL が無効なら何もしないだけでなく、キューをクリア。
217: // KEYCTRL が無効から有効になった時に、無効だった期間のキーデータを
218: // 吐き出すのはおかしいので。
219: sendqueue.Clear();
220: }
1.1.1.2 root 221: }
222:
1.1.1.5 root 223: // マウス入力
1.1.1.4 root 224: void
1.1.1.5 root 225: X68030Keyboard::MouseInput(int x, int y, bool rb, bool lb, bool mb)
1.1.1.4 root 226: {
1.1.1.7 root 227: // ホストからマウスイベントのたびに呼ばれるので、ここで積算。
228: // 20msec ごとのサンプリングのタイミングで積算結果を処理する。
229: // X68k のマウスの Y 方向は下に動く方向がプラス。
230: mouse_x += x;
231: mouse_y += y;
232: mouse_r = rb;
233: mouse_l = lb;
234: }
235:
236: // マウスデータを VM に送信
237: void
238: X68030Keyboard::MouseSendStart()
239: {
240: uint8 status = 0;
241:
242: // 最後のバイトを送るまでは、次は受け付けられない
243: if (mouse_event[2].IsRunning()) {
244: return;
245: }
246:
247: if (mouse_x > 127) {
248: status |= XOVFL;
249: mouse_x = 127;
250: }
251: if (mouse_x < -128) {
252: status |= XUNFL;
253: mouse_x = -128;
254: }
255: if (mouse_y > 127) {
256: status |= YOVFL;
257: mouse_y = 127;
258: }
259: if (mouse_y < -128) {
260: status |= YUNFL;
261: mouse_y = -128;
262: }
263: status |= mouse_l ? SW_L : 0;
264: status |= mouse_r ? SW_R : 0;
265:
266: mouse_event[0].code = status;
267: mouse_event[1].code = mouse_x;
268: mouse_event[2].code = mouse_y;
269:
270: mouse_x = 0;
271: mouse_y = 0;
272:
273: mouse_event[0].Start();
274: mouse_event[1].Start();
275: mouse_event[2].Start();
276: }
277:
278: void
279: X68030Keyboard::MouseCallback(Event& ev)
280: {
281: // LUNA とオブジェクトが違うだけ
282: gSCC->Rx(1, ev.code);
1.1.1.4 root 283: }
284:
285: // ホストからの制御
286: void
287: X68030Keyboard::Command(uint32 data)
288: {
289: if (data < 0x40) {
290: // $00-$3f TV 制御
291: // (実装不要)
292: putlog(2, "Command TV 制御 $%02x", (data & 0x1f));
293:
294: } else if (data < 0x48) {
295: // $40-$47 MSCTRL 信号制御
296: // こいつは頻度が高いのでログレベルを上げておく
297: putlog(3, "Command MSCTRL 制御 %d", (data & 1));
298:
299: } else if (data < 0x50) {
300: // $48-$4f キーデータ送出許可
301: putlog(1, "Command キー送出許可 %d (未実装)", (data & 1));
302:
303: } else if (data < 0x54) {
304: // $50-$53 ディスプレイ制御モード選択
305: // (実装不要)
306: putlog(2, "Command ディスプレイ制御 X68000モード %d", (data & 1));
307:
308: } else if (data < 0x58) {
309: // $54-$57 LED 明るさ選択
310: // 0 が明るく 3 が暗いので、明るさというより暗さ。
311: led_darkness = (data & 3);
312: putlog(1, "Command LED 明るさ %d", led_darkness);
313:
314: } else if (data < 0x5c) {
315: // $58-$5b 本体からのディスプレイ制御許可
316: // (実装不要)
317: putlog(2, "Command 本体からディスプレイ制御 %d", (data & 1));
318:
319: } else if (data < 0x60) {
320: // $5c-$5f OPT.2 によるディスプレイ制御許可
321: // (実装不要)
322: putlog(2, "Command OPT2からディスプレイ制御 %d", (data & 1));
323:
324: } else if (data < 0x70) {
325: // $60-$6f リピートまでの時間
1.1.1.6 root 326: rept_delay = 200_msec + (data & 15) * 100_msec;
327: putlog(1, "Command Repeat Delay %d (%d msec)", (data & 15),
328: (int)(rept_delay / 1_msec));
1.1.1.4 root 329:
330: } else if (data < 0x80) {
331: // $70-$7f リピート間隔
1.1.1.6 root 332: rept_time = 30_msec + (data & 15) * (data & 15) * 5_msec;
333: putlog(1, "Command Repeat time %d (%d msec)", (data & 15),
334: (int)(rept_time / 1_msec));
1.1.1.4 root 335:
336: } else {
337: // $80-$ff LED 制御
338: data &= 0x7f;
339: putlog(1, "Command LED 制御 $%02x", data);
340: uint32 b = 0x01;
341: for (int i = 0; i < led.size(); i++) {
342: // data は %0 で点灯、led[] は true で点灯
343: led[i] = ((data & b) == 0);
344: b <<= 1;
345: }
346: }
347: }
348:
1.1 root 349: // キーコード変換表
350: // 共通キーコードから X680x0 キーコードに変換する。
351: /*static*/ const uint
1.1.1.5 root 352: X68030Keyboard::keycode2x68kkey_table[KC_max] = {
1.1 root 353: NoKey, // [00]
354: X68kKey_BREAK, // [01]
355: X68kKey_COPY, // [02]
356: X68kKey_romaji, // [03]
1.1.1.4 root 357: X68kKey_code, // [04]
1.1 root 358: X68kKey_kigou, // [05]
359: X68kKey_touroku, // [06]
360: X68kKey_HELP, // [07]
361: X68kKey_HOME, // [08]
362: X68kKey_TAB, // [09]
363: X68kKey_CTRL, // [0a]
364: X68kKey_kana, // [0b]
365: X68kKey_SHIFT, // [0c]
1.1.1.5 root 366: X68kKey_SHIFT, // [0d]
1.1 root 367: X68kKey_CAPS, // [0e]
368: NoKey, // [0f]
369:
370: X68kKey_ESC, // [10]
371: X68kKey_BS, // [11]
372: X68kKey_enter, // [12]
373: X68kKey_INS, // [13]
374: X68kKey_space, // [14]
375: X68kKey_DEL, // [15]
376: NoKey, // [16]
377: NoKey, // [17]
378: NoKey, // [18]
379: NoKey, // [19]
380: NoKey, // [1a]
381: NoKey, // [1b]
382: X68kKey_up, // [1c]
383: X68kKey_left, // [1d]
384: X68kKey_right, // [1e]
385: X68kKey_down, // [1f]
386:
387: X68kKey_ROLLUP, // [20]
388: X68kKey_ROLLDOWN, // [21]
389: X68kKey_1, // [22]
390: X68kKey_2, // [23]
391: X68kKey_3, // [24]
392: X68kKey_4, // [25]
393: X68kKey_5, // [26]
394: X68kKey_6, // [27]
395: X68kKey_7, // [28]
396: X68kKey_8, // [29]
397: X68kKey_9, // [2a]
398: X68kKey_0, // [2b]
399: X68kKey_minus, // [2c]
400: X68kKey_circum, // [2d]
401: X68kKey_backslash, // [2e]
402: X68kKey_UNDO, // [2f]
403:
404: X68kKey_OPT1, // [30]
405: X68kKey_OPT2, // [31]
406: X68kKey_Q, // [32]
407: X68kKey_W, // [33]
408: X68kKey_E, // [34]
409: X68kKey_R, // [35]
410: X68kKey_T, // [36]
411: X68kKey_Y, // [37]
412: X68kKey_U, // [38]
413: X68kKey_I, // [39]
414: X68kKey_O, // [3a]
415: X68kKey_P, // [3b]
416: X68kKey_at, // [3c]
417: X68kKey_bracketleft, // [3d]
418: X68kKey_hira, // [3e]
419: X68kKey_zenkaku, // [3f]
420:
421: NoKey, // [40]
422: NoKey, // [41]
423: X68kKey_A, // [42]
424: X68kKey_S, // [43]
425: X68kKey_D, // [44]
426: X68kKey_F, // [45]
427: X68kKey_G, // [46]
428: X68kKey_H, // [47]
429: X68kKey_J, // [48]
430: X68kKey_K, // [49]
431: X68kKey_L, // [4a]
432: X68kKey_semicolon, // [4b]
433: X68kKey_colon, // [4c]
434: X68kKey_bracketright, // [4d]
435: NoKey, // [4e]
436: NoKey, // [4f]
437:
438: NoKey, // [50]
439: NoKey, // [51]
440: X68kKey_Z, // [52]
441: X68kKey_X, // [53]
442: X68kKey_C, // [54]
443: X68kKey_V, // [55]
444: X68kKey_B, // [56]
1.1.1.5 root 445: X68kKey_N, // [57]
446: X68kKey_M, // [58]
1.1 root 447: X68kKey_comma, // [59]
448: X68kKey_period, // [5a]
449: X68kKey_slash, // [5b]
450: X68kKey_underscore, // [5c]
451: NoKey, // [5d]
452: NoKey, // [5e]
453: NoKey, // [5f]
454:
455: NoKey, // [60]
456: X68kKey_PAD_plus, // [61]
457: X68kKey_PAD_minus, // [62]
458: X68kKey_PAD_7, // [63]
459: X68kKey_PAD_8, // [64]
460: X68kKey_PAD_9, // [65]
461: X68kKey_PAD_4, // [66]
462: X68kKey_PAD_5, // [67]
463: X68kKey_PAD_6, // [68]
464: X68kKey_PAD_1, // [69]
465: X68kKey_PAD_2, // [6a]
466: X68kKey_PAD_3, // [6b]
467: X68kKey_PAD_0, // [6c]
468: X68kKey_PAD_decimal, // [6d]
469: X68kKey_PAD_enter, // [6e]
470: X68kKey_PAD_CLR, // [6f]
471:
472: NoKey, // [70]
473: NoKey, // [71]
474: X68kKey_F1, // [72]
475: X68kKey_F2, // [73]
476: X68kKey_F3, // [74]
477: X68kKey_F4, // [75]
478: X68kKey_F5, // [76]
479: X68kKey_F6, // [77]
480: X68kKey_F7, // [78]
481: X68kKey_F8, // [79]
482: X68kKey_F9, // [7a]
483: X68kKey_F10, // [7b]
484: X68kKey_PAD_multiply, // [7c]
485: X68kKey_PAD_divide, // [7d]
486: X68kKey_PAD_equal, // [7e]
487: X68kKey_PAD_comma, // [7f]
488:
489: X68kKey_XF1, // [80]
490: X68kKey_XF2, // [81]
491: X68kKey_XF3, // [82]
492: X68kKey_XF4, // [83]
493: X68kKey_XF5, // [84]
1.1.1.5 root 494: X68kKey_SHIFT, // [85]
1.1 root 495: };
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.