# HG changeset patch # User Paul Boddie # Date 1526650558 -7200 # Node ID 53aec5d5b19d5d4f634ec4e266fa280cda0626b9 # Parent 1a7de85ab0cef3d4c93bbaea7e1acee3eda9460f Made use of the generic input event client to present key event information. diff -r 1a7de85ab0ce -r 53aec5d5b19d conf/landfall-examples/mips-qi_lb60-keypad-demo.cfg --- a/conf/landfall-examples/mips-qi_lb60-keypad-demo.cfg Thu May 17 22:49:35 2018 +0200 +++ b/conf/landfall-examples/mips-qi_lb60-keypad-demo.cfg Fri May 18 15:35:58 2018 +0200 @@ -152,25 +152,49 @@ }, "rom/ex_qi_lb60_keypad_physical"); +-- Expose the keypad events. + +local ev1 = l:new_channel(); + +l:start({ + caps = { + keypad = keypad, + ev = ev1:svr(), + }, + }, + "rom/dev_input_keypad_qi_lb60"); + -- Show key event values. l:start({ caps = { fb = mag_caps.svc:create(L4.Proto.Goos, "g=160x110+0+120", "barheight=10"), - keypad = keypad, + ev = ev1, }, }, - "rom/ex_qi_lb60_keypad_driver"); + "rom/ex_input_event_client"); + +-- Expose the keypad events. + +local ev2 = l:new_channel(); + +l:start({ + caps = { + keypad = keypad, + ev = ev2:svr(), + }, + }, + "rom/dev_input_keypad_qi_lb60"); -- Show key strings. l:startv({ caps = { fb = mag_caps.svc:create(L4.Proto.Goos, "g=160x110+160+120", "barheight=10"), - keypad = keypad, + ev = ev2, }, }, - "rom/ex_qi_lb60_keypad_driver", "chars"); + "rom/ex_input_event_client", "chars"); -- Control the backlight using the keyboard. diff -r 1a7de85ab0ce -r 53aec5d5b19d conf/landfall-examples/mips-qi_lb60-keypad-demo.list --- a/conf/landfall-examples/mips-qi_lb60-keypad-demo.list Thu May 17 22:49:35 2018 +0200 +++ b/conf/landfall-examples/mips-qi_lb60-keypad-demo.list Fri May 18 15:35:58 2018 +0200 @@ -19,7 +19,8 @@ module dev_panel_qi_lb60 module dev_cpm_jz4740 module dev_keypad_qi_lb60 -module ex_qi_lb60_keypad_driver +module dev_input_keypad_qi_lb60 +module ex_input_event_client module ex_keypad_ds_client module ex_qi_lb60_keypad_physical module ex_qi_lb60_backlight