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