workbench/tools/commodities/ASCIITable.c

   1 /*
   2     Copyright © 2012, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     ASCIITable -- Insert characters to clipboard from GUI.
   6  */
   7
   8 /******************************************************************************
   9
  10     NAME
  11
  12         ASCIITable
  13
  14     SYNOPSIS
  15
  16         CX_PRIORITY/N/K,CX_POPKEY/K,CX_POPUP/S
  17
  18     LOCATION
  19
  20         SYS:Tools/Commodities
  21
  22     FUNCTION
  23
  24         Insert characters to clipboard from GUI
  25
  26     INPUTS
  27
  28         CX_PRIORITY  --  Priority of the ASCIITable broker
  29         CX_POPKEY    --  Hotkey combination for ASCIITable
  30         CX_POPUP     --  Appear at startup
  31
  32     RESULT
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41
  42     INTERNALS
  43
  44 ******************************************************************************/
  45
  46 #define MUIMASTER_YES_INLINE_STDARG
  47
  48 #include <stdio.h>
  49 #include <stdlib.h>
  50 #include <string.h>
  51
  52 //#define DEBUG 1
  53 #include <aros/debug.h>
  54 #include <aros/asmcall.h>
  55 #include <aros/symbolsets.h>
  56 #include <libraries/iffparse.h>
  57 #include <libraries/mui.h>
  58 #include <zune/customclasses.h>
  59 #include <devices/clipboard.h>
  60 #include <workbench/startup.h>
  61
  62 #include <proto/muimaster.h>
  63 #include <proto/locale.h>
  64 #include <proto/intuition.h>
  65 #include <proto/exec.h>
  66 #include <proto/dos.h>
  67 #include <proto/alib.h>
  68 #include <proto/commodities.h>
  69 #include <proto/utility.h>
  70 #include <proto/icon.h>
  71
  72 #define CATCOMP_ARRAY
  73 #include "strings.h"
  74
  75 #define CATALOG_NAME     "System/Tools/Commodities.catalog"
  76 #define CATALOG_VERSION  3
  77
  78 TEXT version[] = "$VER: ASCIITable 1.2 (14.01.2012)";
  79
  80 #define ARG_TEMPLATE "CX_PRIORITY/N/K,CX_POPKEY/K,CX_POPUP/S"
  81 #define DEF_POPKEY "ctrl alt a"
  82
  83 enum {
  84     ARG_CXPRI,
  85     ARG_CXPOPKEY,
  86     ARG_CXPOPUP,
  87     NUM_ARGS
  88 };
  89
  90 static Object *app, *wnd;
  91 static struct Catalog *catalog;
  92 static UBYTE s[257];
  93
  94 static struct Hook broker_hook;
  95 static struct Hook show_hook;
  96
  97 static LONG cx_pri;
  98 static char *cx_popkey;
  99 static BOOL cx_popup = FALSE;
 100 static CxObj *broker;
 101 static struct MsgPort *brokermp;
 102 static struct Task *maintask;
 103
 104 static void Cleanup(CONST_STRPTR txt);
 105 static void GetArguments(int argc, char **argv);
 106 static void HandleAll(void);
 107 static void InitMenus(void);
 108 static VOID Locale_Deinitialize(VOID);
 109 static int Locale_Initialize(VOID);
 110 static void MakeGUI(void);
 111 static void showSimpleMessage(CONST_STRPTR msgString);
 112 static CONST_STRPTR _(ULONG id);
 113
 114 static struct IOClipReq *CBOpen(ULONG unit);
 115 static void CBClose(struct IOClipReq *ior);
 116 static BOOL CBWriteFTXT(struct IOClipReq *ior, CONST_STRPTR string);
 117 static BOOL CBWriteLong(struct IOClipReq *ior, LONG *ldata);
 118 static struct DiskObject *disko;
 119
 120 /*** ASCIITable class *******************************************************/
 121
 122 #define MAXLEN (60)
 123
 124 #define ASCIITableObject BOOPSIOBJMACRO_START(ASCIITable_CLASS->mcc_Class)
 125
 126 #define MUIM_ASCIITable_Copy   (TAG_USER | 1)
 127 #define MUIM_ASCIITable_Clear  (TAG_USER | 2)
 128 #define MUIM_ASCIITable_Insert (TAG_USER | 3)
 129 struct  MUIP_ASCIITable_Insert  {STACKED ULONG MethodID; STACKED LONG code;};
 130
 131 struct ASCIITable_DATA
 132 {
 133     Object *copy_button;
 134     Object *clear_button;
 135     Object *ascii_string;
 136     TEXT buffer[MAXLEN + 1];
 137     struct IOClipReq *clip_req;
 138     TEXT shorthelp[192][20];
 139 };
 140
 141 /*** CBOpen *****************************************************************/
 142 static struct IOClipReq *CBOpen(ULONG unit)
 143 {
 144     struct MsgPort *mp;
 145     struct IORequest *ior;
 146
 147     if ((mp = CreatePort(0, 0)))
 148     {
 149         if ((ior = (struct IORequest *)CreateExtIO(mp, sizeof(struct IOClipReq))))
 150         {
 151             if (!(OpenDevice("clipboard.device", unit, ior, 0)))
 152             {
 153                 return (struct IOClipReq *)ior;
 154             }
 155             DeleteExtIO(ior);
 156         }
 157         DeletePort(mp);
 158     }
 159     return NULL;
 160 }
 161
 162 /*** CBCLose ****************************************************************/
 163 static void CBClose(struct IOClipReq *ior)
 164 {
 165     if (ior)
 166     {
 167         struct MsgPort *mp = ior->io_Message.mn_ReplyPort;
 168
 169         CloseDevice((struct IORequest *)ior);
 170         DeleteExtIO((struct IORequest *)ior);
 171         DeletePort(mp);
 172     }
 173 }
 174
 175 /*** CBWriteFTXT ************************************************************/
 176 static BOOL CBWriteFTXT(struct IOClipReq *ior, CONST_STRPTR string)
 177 {
 178     LONG length, slen, temp;
 179     BOOL odd;
 180
 181     if (!ior || !string)
 182         return FALSE;
 183
 184     slen = strlen(string);
 185     odd = (slen & 1);
 186
 187     length = (odd) ? slen+1 : slen;
 188
 189     ior->io_Offset = 0;
 190     ior->io_Error  = 0;
 191     ior->io_ClipID = 0;
 192
 193     CBWriteLong(ior, (LONG *) "FORM");
 194     length += 12;
 195
 196     temp = AROS_LONG2BE(length);
 197     CBWriteLong(ior, &temp);
 198     CBWriteLong(ior, (LONG *) "FTXT");
 199     CBWriteLong(ior, (LONG *) "CHRS");
 200     temp = AROS_LONG2BE(slen);
 201     CBWriteLong(ior, &temp);
 202
 203     ior->io_Data    = (STRPTR)string;
 204     ior->io_Length  = slen;
 205     ior->io_Command = CMD_WRITE;
 206     DoIO((struct IORequest *)ior);
 207
 208     if (odd)
 209     {
 210         ior->io_Data   = (APTR)"";
 211         ior->io_Length = 1;
 212         DoIO((struct IORequest *)ior);
 213     }
 214
 215     ior->io_Command=CMD_UPDATE;
 216     DoIO ((struct IORequest *)ior);
 217
 218     return ior->io_Error ? FALSE : TRUE;
 219 }
 220
 221 /*** WriteLong **************************************************************/
 222 static BOOL CBWriteLong(struct IOClipReq *ior, LONG *ldata)
 223 {
 224     ior->io_Data    = (APTR)ldata;
 225     ior->io_Length  = 4;
 226     ior->io_Command = CMD_WRITE;
 227     DoIO( (struct IORequest *) ior);
 228
 229     if (ior->io_Actual == 4)
 230     {
 231         return ior->io_Error ? FALSE : TRUE;
 232     }
 233
 234     return FALSE;
 235 }
 236
 237 /*** MakeButton *************************************************************/
 238 static Object *MakeButton(LONG code)
 239 {
 240     char buffer[2] = {0};
 241     buffer[0] = code;
 242
 243     Object *btn = (Object *)TextObject,
 244         ButtonFrame,
 245         MUIA_Font, MUIV_Font_Button,
 246         MUIA_Text_Contents, (IPTR)buffer,
 247         MUIA_Text_PreParse, (IPTR)"\33c",
 248         MUIA_InputMode    , MUIV_InputMode_RelVerify,
 249         MUIA_Background   , MUII_ButtonBack,
 250         MUIA_CycleChain   , TRUE,
 251     End;
 252     return btn;
 253 }
 254
 255 /*** OM_NEW *****************************************************************/
 256 IPTR ASCIITable__OM_NEW(Class *CLASS, Object *self, struct opSet *message)
 257 {
 258     struct ASCIITable_DATA *data = NULL;
 259     Object *copy_button, *clear_button, *ascii_string, *key_group;
 260     struct TagItem key_group_tags[200];
 261     LONG i, code;
 262
 263     for (code = 32 , i = 0 ; code < 128 ; code++ , i++)
 264     {
 265         key_group_tags[i].ti_Tag = Child;
 266         key_group_tags[i].ti_Data = (IPTR)MakeButton(code);
 267     }
 268     for (code = 160 ; code < 256 ; code++, i++)
 269     {
 270         key_group_tags[i].ti_Tag = Child;
 271         key_group_tags[i].ti_Data = (IPTR)MakeButton(code);
 272     }
 273     key_group_tags[i].ti_Tag = MUIA_Group_Columns;
 274     key_group_tags[i].ti_Data = 16;
 275     key_group_tags[++i].ti_Tag = TAG_DONE;
 276     key_group = MUI_NewObjectA(MUIC_Group, key_group_tags);
 277
 278     self = (Object *) DoSuperNewTags
 279     (
 280         CLASS, self, NULL,
 281         Child, key_group,
 282         Child, (IPTR) (RectangleObject,
 283             MUIA_Rectangle_HBar, TRUE,
 284             MUIA_FixHeight,      2,
 285         End),
 286         Child, (IPTR)(ascii_string = (Object *)StringObject,
 287             StringFrame,
 288             MUIA_String_MaxLen, MAXLEN,
 289         End),
 290         Child, (IPTR) (HGroup,
 291             MUIA_Weight,         0,
 292             MUIA_Group_SameSize, TRUE,
 293
 294             Child, (IPTR) (copy_button    = SimpleButton(_(MSG_ASCIITABLE_GAD_COPY))),
 295             Child, (IPTR) (clear_button   = SimpleButton(_(MSG_ASCIITABLE_GAD_CLEAR))),
 296         End),
 297         TAG_MORE, message->ops_AttrList
 298     );
 299
 300     if (self != NULL)
 301     {
 302         /*-- Store important variables -------------------------------------*/
 303         data = INST_DATA(CLASS, self);
 304         data->copy_button = copy_button;
 305         data->clear_button = clear_button;
 306         data->ascii_string = ascii_string;
 307
 308         /*-- Setup notifications -------------------------------------------*/
 309         DoMethod
 310         (
 311             copy_button, MUIM_Notify, MUIA_Pressed, FALSE,
 312             (IPTR) self, 1, MUIM_ASCIITable_Copy
 313         );
 314         DoMethod
 315         (
 316             clear_button, MUIM_Notify, MUIA_Pressed, FALSE,
 317             (IPTR) self, 1, MUIM_ASCIITable_Clear
 318         );
 319
 320         for (i = 0 ; i < 192 ; i++)
 321         {
 322             code = (i < 96) ? i + 32 : i + 64;
 323             sprintf(data->shorthelp[i], "%c\n%d\n0x%x", (int)code, (int)code, (unsigned int)code);
 324             set((Object *)key_group_tags[i].ti_Data, MUIA_ShortHelp, data->shorthelp[i]);
 325             DoMethod
 326             (
 327                 (Object *)key_group_tags[i].ti_Data, MUIM_Notify, MUIA_Pressed, FALSE,
 328                 (IPTR) self, 2, MUIM_ASCIITable_Insert, code
 329             );
 330         }
 331         data->clip_req = CBOpen(0);
 332         if (!data->clip_req)
 333         {
 334             showSimpleMessage(_(MSG_CANT_OPEN_CLIPDEVICE));
 335         }
 336     }
 337
 338     return (IPTR) self;
 339 }
 340
 341 /*** OM_DISPOSE *************************************************************/
 342 IPTR ASCIITable__OM_DISPOSE(Class *CLASS, Object *self, Msg message)
 343 {
 344     struct ASCIITable_DATA *data = INST_DATA(CLASS, self);
 345
 346     CBClose(data->clip_req);
 347
 348     return DoSuperMethodA(CLASS, self, message);
 349 }
 350
 351 /*** MUIM_ASCIITable_Copy ***************************************************/
 352 IPTR ASCIITable__MUIM_ASCIITable_Copy(Class *CLASS, Object *self, Msg msg)
 353 {
 354     struct ASCIITable_DATA *data = INST_DATA(CLASS, self);
 355     CBWriteFTXT(data->clip_req, (CONST_STRPTR)XGET(data->ascii_string, MUIA_String_Contents));
 356     return TRUE;
 357 }
 358
 359 /*** MUIM_ASCIITable_Clear **************************************************/
 360 IPTR ASCIITable__MUIM_ASCIITable_Clear(Class *CLASS, Object *self, Msg msg)
 361 {
 362     struct ASCIITable_DATA *data = INST_DATA(CLASS, self);
 363     data->buffer[0] = '\0';
 364     set(data->ascii_string, MUIA_String_Contents, "");
 365     return TRUE;
 366 }
 367
 368 /*** MUIM_ASCIITable_Insert *************************************************/
 369 IPTR ASCIITable__MUIM_ASCIITable_Insert(Class *CLASS, Object *self, struct MUIP_ASCIITable_Insert *msg)
 370 {
 371     struct ASCIITable_DATA *data = INST_DATA(CLASS, self);
 372     LONG len;
 373     D(bug("insert code %d\n", msg->code));
 374     strcpy(data->buffer, (CONST_STRPTR)XGET(data->ascii_string, MUIA_String_Contents));
 375     len = strlen(data->buffer);
 376     if (len < MAXLEN)
 377     {
 378         data->buffer[len] = msg->code;
 379         data->buffer[len+1] = '\0';
 380         set(data->ascii_string, MUIA_String_Contents, data->buffer);
 381     }
 382     return TRUE;
 383 }
 384
 385 /*** Setup ******************************************************************/
 386 ZUNE_CUSTOMCLASS_5
 387 (
 388     ASCIITable, NULL, MUIC_Group, NULL,
 389     OM_NEW,                   struct opSet *,
 390     OM_DISPOSE,               Msg,
 391     MUIM_ASCIITable_Copy,     Msg,
 392     MUIM_ASCIITable_Clear,    Msg,
 393     MUIM_ASCIITable_Insert,   struct MUIP_ASCIITable_Insert *
 394 );
 395
 396
 397
 398 /*** Begin application ******************************************************/
 399
 400
 401 static CONST_STRPTR _(ULONG id)
 402 {
 403     if (LocaleBase != NULL && catalog != NULL)
 404     {
 405         return GetCatalogStr(catalog, id, CatCompArray[id].cca_Str);
 406     }
 407     else
 408     {
 409         return CatCompArray[id].cca_Str;
 410     }
 411 }
 412
 413 #define __(id) ((IPTR) _(id))   /* Get a message, as an IPTR */
 414
 415 /*** Locale_Initialize ******************************************************/
 416 static int Locale_Initialize(VOID)
 417 {
 418     if (LocaleBase != NULL)
 419     {
 420         catalog = OpenCatalog
 421             (
 422              NULL, CATALOG_NAME, OC_Version, CATALOG_VERSION, TAG_DONE
 423             );
 424     }
 425     else
 426     {
 427         catalog = NULL;
 428     }
 429     return TRUE;
 430 }
 431
 432 /*** Locale_Deinitialize ****************************************************/
 433 static VOID Locale_Deinitialize(VOID)
 434 {
 435     if (LocaleBase != NULL && catalog != NULL) CloseCatalog(catalog);
 436 }
 437
 438 /*** GetArguments ***********************************************************/
 439 static void GetArguments(int argc, char **argv)
 440 {
 441     static struct RDArgs *myargs;
 442     static IPTR args[NUM_ARGS];
 443     static UBYTE **wbargs;
 444     static STRPTR cxname;
 445     static struct WBStartup *argmsg;
 446     static struct WBArg *wb_arg;
 447
 448     if (argc)
 449     {
 450         if (!(myargs = ReadArgs(ARG_TEMPLATE, args, NULL)))
 451         {
 452             Fault(IoErr(), 0, s, 256);
 453             Cleanup(s);
 454         }
 455         if (args[ARG_CXPRI]) cx_pri = *(LONG*)args[ARG_CXPRI];
 456         if (args[ARG_CXPOPKEY])
 457         {
 458             cx_popkey = StrDup((char *)args[ARG_CXPOPKEY]);
 459         }
 460         else
 461         {
 462             cx_popkey = StrDup(DEF_POPKEY);
 463         }
 464         if (args[ARG_CXPOPUP]) cx_popup = TRUE;
 465         FreeArgs(myargs);
 466         cxname = argv[0];
 467     }
 468     else
 469     {
 470         argmsg = (struct WBStartup *)argv;
 471         wb_arg = argmsg->sm_ArgList;
 472         cxname = wb_arg->wa_Name;
 473         wbargs = ArgArrayInit(argc, (UBYTE**)argv);
 474         cx_pri = ArgInt(wbargs, "CX_PRIORITY", 0);
 475         cx_popkey = StrDup(ArgString(wbargs, "CX_POPKEY", DEF_POPKEY));
 476         if (strnicmp(ArgString(wbargs, "CX_POPUP", "NO"), "Y", 1) == 0)
 477         {
 478             cx_popup = TRUE;
 479         }
 480         ArgArrayDone();
 481     }
 482     D(bug("ASCIITable Arguments pri %d popkey %s popup %d\n", cx_pri, cx_popkey, cx_popup));
 483     disko = GetDiskObject(cxname);
 484 }
 485
 486 /****************************************************************************/
 487 static struct NewMenu nm[] =
 488 {
 489     {NM_TITLE, (STRPTR)MSG_MEN_PROJECT         },
 490      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_HIDE    },
 491      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_ICONIFY },
 492      {NM_ITEM, NM_BARLABEL                     },
 493      {NM_ITEM, (STRPTR)MSG_MEN_PROJECT_QUIT    },
 494     {NM_END                                    }
 495 };
 496
 497 /*** InitMenus **************************************************************/
 498 static void InitMenus(void)
 499 {
 500     struct NewMenu *actnm = nm;
 501
 502     for(actnm = nm; actnm->nm_Type != NM_END; actnm++)
 503     {
 504         if (actnm->nm_Label != NM_BARLABEL)
 505         {
 506             ULONG  id = (IPTR)actnm->nm_Label;
 507             CONST_STRPTR str = _(id);
 508
 509             if (actnm->nm_Type == NM_TITLE)
 510             {
 511                 actnm->nm_Label = str;
 512             } else {
 513                 actnm->nm_Label = str + 2;
 514                 if (str[0] != ' ') actnm->nm_CommKey = str;
 515             }
 516             actnm->nm_UserData = (APTR)(IPTR)id;
 517
 518         } /* if (actnm->nm_Label != NM_BARLABEL) */
 519
 520     } /* for(actnm = nm; nm->nm_Type != NM_END; nm++) */
 521 }
 522
 523 /*** showSimpleMessage ******************************************************/
 524 static void showSimpleMessage(CONST_STRPTR msgString)
 525 {
 526     struct EasyStruct easyStruct;
 527
 528     easyStruct.es_StructSize    = sizeof(easyStruct);
 529     easyStruct.es_Flags         = 0;
 530     easyStruct.es_Title         = _(MSG_ASCIITABLE_CXNAME);
 531     easyStruct.es_TextFormat    = msgString;
 532     easyStruct.es_GadgetFormat  = _(MSG_OK);
 533
 534     if (IntuitionBase != NULL && !Cli() )
 535     {
 536         EasyRequestArgs(NULL, &easyStruct, NULL, NULL);
 537     }
 538     else
 539     {
 540         PutStr(msgString);
 541     }
 542 }
 543
 544 /*** broker_func ************************************************************/
 545 AROS_UFH3(void, broker_func,
 546     AROS_UFHA(struct Hook *, h,      A0),
 547     AROS_UFHA(Object *     , object, A2),
 548     AROS_UFHA(CxMsg *      , msg,    A1))
 549 {
 550     AROS_USERFUNC_INIT
 551
 552     D(bug("ASCIITable: Broker hook called\n"));
 553     if (CxMsgType(msg) == CXM_COMMAND)
 554     {
 555         if (CxMsgID(msg) == CXCMD_APPEAR)
 556         {
 557             CallHookPkt(&show_hook, NULL, NULL);
 558         }
 559         else if (CxMsgID(msg) == CXCMD_DISAPPEAR)
 560         {
 561             set(wnd, MUIA_Window_Open, FALSE);
 562         }
 563     }
 564     AROS_USERFUNC_EXIT
 565 }
 566
 567 /*** show_func ************************************************************/
 568 AROS_UFH3(
 569     void, show_func,
 570     AROS_UFHA(struct Hook *,    hook,   A0),
 571     AROS_UFHA(APTR *,           obj,    A2),
 572     AROS_UFHA(APTR,             param,  A1)
 573 )
 574 {
 575     AROS_USERFUNC_INIT
 576
 577     if (XGET(app, MUIA_Application_Iconified) == TRUE)
 578         set(app, MUIA_Application_Iconified, FALSE);
 579     else
 580         set(wnd, MUIA_Window_Open, TRUE);
 581
 582     AROS_USERFUNC_EXIT
 583 }
 584
 585 /*** MakeGUI ****************************************************************/
 586 static void MakeGUI(void)
 587 {
 588     Object *menu;
 589     static TEXT wintitle[100];
 590     CxObj *popfilter;
 591
 592     menu = MUI_MakeObject(MUIO_MenustripNM, &nm, 0);
 593
 594     broker_hook.h_Entry = (HOOKFUNC)broker_func;
 595     show_hook.h_Entry = (HOOKFUNC)show_func;
 596
 597     snprintf(wintitle, sizeof(wintitle), _(MSG_ASCIITABLE_WINTITLE), cx_popkey);
 598
 599     app = (Object *)ApplicationObject,
 600         MUIA_Application_Title, __(MSG_ASCIITABLE_CXNAME),
 601         MUIA_Application_Version, (IPTR)version,
 602         MUIA_Application_Copyright, (IPTR)"Copyright  © 2012, The AROS Development TEAM",
 603         MUIA_Application_Author, (IPTR)"The AROS Development Team",
 604         MUIA_Application_Description, __(MSG_ASCIITABLE_CXDESCR),
 605         MUIA_Application_BrokerPri, cx_pri,
 606         MUIA_Application_BrokerHook, (IPTR)&broker_hook,
 607         MUIA_Application_Base, (IPTR)"ASCIITABLE",
 608         MUIA_Application_SingleTask, TRUE,
 609         MUIA_Application_Menustrip, (IPTR)menu,
 610         MUIA_Application_DiskObject, (IPTR)disko,
 611         SubWindow, (IPTR)(wnd = (Object *)WindowObject,
 612             MUIA_Window_Title, (IPTR)wintitle,
 613             MUIA_Window_ID, MAKE_ID('A', 'I', 'T', 'B'),
 614             WindowContents, (IPTR)ASCIITableObject,
 615             End,
 616         End),
 617     End;
 618
 619     if (! app)
 620         Cleanup(NULL); // Propably double start
 621
 622     // enable hotkey
 623     maintask = FindTask(NULL);
 624     get(app, MUIA_Application_Broker, &broker);
 625     get(app, MUIA_Application_BrokerPort, &brokermp);
 626     if ( ! broker || ! brokermp)
 627         Cleanup(_(MSG_CANT_CREATE_BROKER));
 628
 629     popfilter = CxFilter(cx_popkey);
 630     if (popfilter)
 631     {
 632         CxObj *popsig = CxSignal(maintask, SIGBREAKB_CTRL_F);
 633         if (popsig)
 634         {
 635             CxObj *trans;
 636             AttachCxObj(popfilter, popsig);
 637             trans = CxTranslate(NULL);
 638             if (trans) AttachCxObj(popfilter, trans);
 639         }
 640         AttachCxObj(broker, popfilter);
 641     }
 642
 643     DoMethod(wnd, MUIM_Notify, MUIA_Window_CloseRequest, TRUE,
 644         (IPTR)wnd, 3, MUIM_Set, MUIA_Window_Open, FALSE);
 645
 646     DoMethod(app, MUIM_Notify, MUIA_Application_DoubleStart, TRUE,
 647         (IPTR)wnd, 2, MUIM_CallHook, &show_hook);
 648
 649     DoMethod(wnd, MUIM_Notify, MUIA_Window_MenuAction, MSG_MEN_PROJECT_QUIT,
 650         (IPTR)app, 2, MUIM_Application_ReturnID, MUIV_Application_ReturnID_Quit);
 651
 652     DoMethod(wnd, MUIM_Notify, MUIA_Window_MenuAction, MSG_MEN_PROJECT_HIDE,
 653         (IPTR)wnd, 3, MUIM_Set, MUIA_Window_Open, FALSE);
 654
 655     DoMethod(wnd, MUIM_Notify, MUIA_Window_MenuAction, MSG_MEN_PROJECT_ICONIFY,
 656         (IPTR)app, 3, MUIM_Set, MUIA_Application_Iconified, TRUE);
 657 }
 658
 659 /*** HandleAll **************************************************************/
 660 static void HandleAll(void)
 661 {
 662     ULONG sigs = 0;
 663
 664     set(wnd, MUIA_Window_Open, cx_popup);
 665
 666     while((LONG) DoMethod(app, MUIM_Application_NewInput, (IPTR)&sigs)
 667             != MUIV_Application_ReturnID_Quit)
 668     {
 669         if (sigs)
 670         {
 671             sigs = Wait(sigs | SIGBREAKF_CTRL_C | SIGBREAKF_CTRL_F);
 672             if (sigs & SIGBREAKF_CTRL_C)
 673             {
 674                 break;
 675             }
 676             if (sigs & SIGBREAKF_CTRL_F)
 677             {
 678                 CallHookPkt(&show_hook, NULL, NULL);
 679             }
 680         }
 681     }
 682 }
 683
 684 /*** Cleanup ****************************************************************/
 685 static void Cleanup(CONST_STRPTR txt)
 686 {
 687     MUI_DisposeObject(app);
 688     FreeVec(cx_popkey);
 689     FreeDiskObject(disko);
 690     if (txt)
 691     {
 692         showSimpleMessage(txt);
 693         exit(RETURN_ERROR);
 694     }
 695     exit(RETURN_OK);
 696 }
 697
 698 /*** main *******************************************************************/
 699 int main(int argc, char **argv)
 700 {
 701     D(bug("ASCIITable started\n"));
 702     GetArguments(argc, argv);
 703     InitMenus();
 704     MakeGUI();
 705     HandleAll();
 706     Cleanup(NULL);
 707     return RETURN_OK;
 708 }
 709
 710 /****************************************************************************/
 711 ADD2INIT(Locale_Initialize,   90);
 712 ADD2EXIT(Locale_Deinitialize, 90);