workbench/tools/KeyShow/main.c

   1 /*
   2     Copyright © 2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4 */
   5
   6 #define MUIMASTER_YES_INLINE_STDARG
   7
   8 #include <proto/muimaster.h>
   9 #include <proto/intuition.h>
  10 #include <proto/icon.h>
  11 #include <proto/alib.h>
  12 #include <proto/commodities.h>
  13 #include <proto/utility.h>
  14
  15 #include <libraries/mui.h>
  16
  17 #include <strings.h>
  18
  19 #include "keyboardgroup_class.h"
  20 #include "locale.h"
  21
  22 //#define DEBUG 1
  23 #include <aros/debug.h>
  24
  25
  26 /*
  27     TODO
  28     - fix layout, maybe we need a render hook
  29     - a custom class for the keys might be useful
  30     - keys are rendered too small to show control state e.g. ^X
  31     - original KeyShow prefixes some control keys with ~ and others with ^. WTF?
  32     - original KeyShow prints $$ when pressing shift and tab. WTF?
  33     - fix handling of control keys for dead keys
  34 */
  35
  36
  37 static void cleanup_exit(CONST_STRPTR str);
  38 static void HandleAll(void);
  39
  40 static Object *app, *win;
  41 static BOOL cx_popup = FALSE;
  42 static struct Hook broker_hook;
  43 static struct Hook show_hook;
  44
  45 AROS_UFH3(void, broker_func,
  46     AROS_UFHA(struct Hook *, hook,   A0),
  47     AROS_UFHA(Object *     , obj,    A2),
  48     AROS_UFHA(CxMsg *      , msg,    A1))
  49 {
  50     AROS_USERFUNC_INIT
  51
  52     D(bug("KeyShow: Broker hook called\n"));
  53     if (CxMsgType(msg) == CXM_COMMAND)
  54     {
  55         if (CxMsgID(msg) == CXCMD_APPEAR)
  56         {
  57             CallHookPkt(&show_hook, NULL, NULL);
  58         }
  59         else if (CxMsgID(msg) == CXCMD_DISAPPEAR)
  60         {
  61             set(win, MUIA_Window_Open, FALSE);
  62         }
  63     }
  64
  65     AROS_USERFUNC_EXIT
  66 }
  67
  68 AROS_UFH3(void, show_func,
  69     AROS_UFHA(struct Hook *,    hook,   A0),
  70     AROS_UFHA(APTR,             obj,    A2),
  71     AROS_UFHA(APTR,             param,  A1))
  72 {
  73     AROS_USERFUNC_INIT
  74
  75     if (XGET(app, MUIA_Application_Iconified) == TRUE)
  76         set(app, MUIA_Application_Iconified, FALSE);
  77     else
  78         set(win, MUIA_Window_Open, TRUE);
  79
  80     AROS_USERFUNC_EXIT
  81 }
  82
  83 int main(int argc, char **argv)
  84 {
  85     ULONG kbtype = MUIV_KeyboardGroup_Type_Amiga;
  86     STRPTR result;
  87
  88     // Read icon even if we have been started from CLI
  89     struct DiskObject *dobj = GetDiskObject("PROGDIR:KeyShow");
  90     if (dobj)
  91     {
  92         STRPTR *toolarray = dobj->do_ToolTypes;
  93
  94         result = FindToolType(toolarray, "TYPE");
  95         if (result)
  96         {
  97             if (strcasecmp(result, "PC105") == 0)
  98             {
  99                 kbtype = MUIV_KeyboardGroup_Type_PC105;
 100             }
 101             else if (strcasecmp(result, "PC104") == 0)
 102             {
 103                 kbtype = MUIV_KeyboardGroup_Type_PC104;
 104             }
 105         }
 106     }
 107
 108     broker_hook.h_Entry = HookEntry;
 109     broker_hook.h_SubEntry = (HOOKFUNC)broker_func;
 110     show_hook.h_Entry = (HOOKFUNC)show_func;
 111
 112     app = ApplicationObject,
 113         MUIA_Application_Title, (IPTR)"KeyShow",
 114         MUIA_Application_Version, (IPTR)"$VER: KeyShow 1.6 (20.03.2012)",
 115         MUIA_Application_Copyright, (IPTR)_(MSG_AppCopyright),
 116         MUIA_Application_Author, (IPTR)"The AROS Development Team",
 117         MUIA_Application_Description, (IPTR)_(MSG_AppDescription),
 118         MUIA_Application_Base, (IPTR)"KEYSHOW",
 119         MUIA_Application_DiskObject, (IPTR)dobj,
 120         MUIA_Application_BrokerHook, (IPTR)&broker_hook,
 121         SubWindow, (IPTR)(win = WindowObject,
 122             MUIA_Window_Title, (IPTR)_(MSG_WI_TITLE),
 123             MUIA_Window_ID, MAKE_ID('K','S','W','N'),
 124             WindowContents, (IPTR)KeyboardGroupObject,
 125                 MUIA_KeyboardGroup_Type, kbtype,
 126             End,
 127         End),
 128     End;
 129
 130     if (app == NULL)
 131     {
 132         cleanup_exit("Can't create application");
 133     }
 134
 135     DoMethod(win, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
 136         app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
 137
 138     cx_popup = TRUE;
 139     HandleAll();
 140     FreeDiskObject(dobj);
 141     cleanup_exit(NULL);
 142     return 0;
 143 }
 144
 145 static void HandleAll(void)
 146 {
 147     ULONG sigs = 0;
 148
 149     set(win, MUIA_Window_Open, cx_popup);
 150
 151     while((LONG) DoMethod(app, MUIM_Application_NewInput, (IPTR)&sigs)
 152            != MUIV_Application_ReturnID_Quit)
 153     {
 154         if (sigs)
 155         {
 156             sigs = Wait(sigs | SIGBREAKF_CTRL_C | SIGBREAKF_CTRL_F);
 157             if (sigs & SIGBREAKF_CTRL_C)
 158             {
 159                 break;
 160             }
 161             if (sigs & SIGBREAKF_CTRL_F)
 162             {
 163                 CallHookPkt(&show_hook, NULL, NULL);
 164             }
 165         }
 166     }
 167 }
 168
 169 static void cleanup_exit(CONST_STRPTR str)
 170 {
 171     if (str)
 172     {
 173         struct EasyStruct es =
 174         {
 175             sizeof(struct EasyStruct), 0,
 176             _(MSG_ERR), str, _(MSG_OK)
 177         };
 178         EasyRequestArgs(NULL, &es, NULL, NULL);
 179     }
 180     MUI_DisposeObject(app);
 181 }