workbench/tools/commodities/AutoPoint.c

   1 /*
   2     Copyright © 1995-2003, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     AutoPoint commodity -- activates windows under the mouse pointer.
   6 */
   7
   8 /******************************************************************************
   9
  10     NAME
  11
  12         AutoPoint
  13
  14     SYNOPSIS
  15
  16         CX_PRIORITY/N/K, LAG/S
  17
  18     LOCATION
  19
  20         Workbench:Tools/Commodities
  21
  22     FUNCTION
  23
  24         Automatically activates the window under the mouse pointer.
  25
  26     INPUTS
  27
  28         CX_PRIORITY  --  The priority of the commodity
  29
  30         LAG  --  Wait for the next timer event to activate the window
  31
  32     RESULT
  33
  34     NOTES
  35
  36     EXAMPLE
  37
  38     BUGS
  39
  40     SEE ALSO
  41
  42     INTERNALS
  43
  44     HISTORY
  45
  46     05.03.2000  SDuvan   implemented
  47
  48 ******************************************************************************/
  49
  50 #include <aros/symbolsets.h>
  51 #include <intuition/intuition.h>
  52 #include <intuition/intuitionbase.h>
  53 #include <libraries/commodities.h>
  54 #include <libraries/locale.h>
  55 #include <proto/exec.h>
  56 #include <proto/dos.h>
  57 #include <proto/intuition.h>
  58 #include <proto/layers.h>
  59 #include <proto/commodities.h>
  60 #include <proto/locale.h>
  61 #include <proto/alib.h>
  62
  63 #include <stdio.h>
  64 #include <string.h>
  65
  66 #define  DEBUG 0
  67 #include <aros/debug.h>
  68
  69 #define CATCOMP_ARRAY
  70 #include "strings.h"
  71
  72 #define CATALOG_NAME     "System/Tools/Commodities.catalog"
  73 #define CATALOG_VERSION  3
  74
  75
  76 /***************************************************************************/
  77
  78 UBYTE version[] = "$VER: AutoPoint 0.3 (15.04.2006)";
  79
  80 #define ARG_TEMPLATE "CX_PRIORITY=PRI/N/K,LAG/S"
  81
  82 #define ARG_PRI   0
  83 #define ARG_LAG   1
  84 #define NUM_ARGS  2
  85
  86
  87 static struct NewBroker nb =
  88 {
  89     NB_VERSION,
  90     NULL,
  91     NULL,
  92     NULL,
  93     NBU_NOTIFY | NBU_UNIQUE,
  94     0,
  95     0,
  96     NULL,
  97     0
  98 };
  99
 100
 101 typedef struct _APState
 102 {
 103     CxObj          *as_broker;
 104     struct MsgPort *as_msgPort;
 105 } APState;
 106
 107
 108 typedef struct AP
 109 {
 110     struct Window *ai_thisWindow;
 111     struct Window *ai_lastActivatedWindow;
 112     BOOL           ai_mouseHasMoved;
 113 } AP;
 114
 115
 116 static AP apInfo =
 117 {
 118     NULL,
 119     FALSE
 120 };
 121
 122
 123 static struct Catalog *catalog;
 124
 125 /************************************************************************************/
 126
 127 static void freeResources(APState *as);
 128 static BOOL initiate(int argc, char **argv, APState *as);
 129 static void autoActivateLag(CxMsg *msg, CxObj *co);
 130 static void autoActivate(CxMsg *msg, CxObj *co);
 131 static CONST_STRPTR _(ULONG id);
 132 static BOOL Locale_Initialize(VOID);
 133 static VOID Locale_Deinitialize(VOID);
 134 static void showSimpleMessage(CONST_STRPTR msgString);
 135
 136 /************************************************************************************/
 137
 138 static CONST_STRPTR _(ULONG id)
 139 {
 140     if (LocaleBase != NULL && catalog != NULL)
 141     {
 142         return GetCatalogStr(catalog, id, CatCompArray[id].cca_Str);
 143     }
 144     else
 145     {
 146         return CatCompArray[id].cca_Str;
 147     }
 148 }
 149
 150 /************************************************************************************/
 151
 152 static BOOL Locale_Initialize(VOID)
 153 {
 154     if (LocaleBase != NULL)
 155     {
 156         catalog = OpenCatalog
 157             (
 158              NULL, CATALOG_NAME, OC_Version, CATALOG_VERSION, TAG_DONE
 159             );
 160     }
 161     else
 162     {
 163         catalog = NULL;
 164     }
 165
 166     return TRUE;
 167 }
 168
 169 /************************************************************************************/
 170
 171 static VOID Locale_Deinitialize(VOID)
 172 {
 173     if(LocaleBase != NULL && catalog != NULL) CloseCatalog(catalog);
 174 }
 175
 176 /************************************************************************************/
 177
 178 static void showSimpleMessage(CONST_STRPTR msgString)
 179 {
 180     struct EasyStruct easyStruct;
 181
 182     easyStruct.es_StructSize    = sizeof(easyStruct);
 183     easyStruct.es_Flags         = 0;
 184     easyStruct.es_Title         = _(MSG_AUTOPOINT_CXNAME);
 185     easyStruct.es_TextFormat    = msgString;
 186     easyStruct.es_GadgetFormat  = _(MSG_OK);
 187
 188     if (IntuitionBase != NULL && !Cli() )
 189     {
 190         EasyRequestArgs(NULL, &easyStruct, NULL, NULL);
 191     }
 192     else
 193     {
 194         PutStr(msgString);
 195     }
 196 }
 197
 198 /************************************************************************************/
 199
 200 static BOOL initiate(int argc, char **argv, APState *as)
 201 {
 202     CxObj *customObj;
 203     void (*activateFunc)(CxMsg *msg, CxObj *co);
 204
 205     memset(as, 0, sizeof(APState));
 206
 207     activateFunc = autoActivate;
 208
 209     if (Cli() != NULL)
 210     {
 211         struct RDArgs *rda;
 212         IPTR          *args[] = { NULL, (IPTR)FALSE };
 213
 214         rda = ReadArgs(ARG_TEMPLATE, (IPTR *)args, NULL);
 215
 216         if (rda != NULL)
 217         {
 218             if (args[ARG_PRI] != NULL)
 219             {
 220                 nb.nb_Pri = *args[ARG_PRI];
 221             }
 222             if (args[ARG_LAG])
 223             {
 224                 activateFunc = autoActivateLag;
 225             }
 226         }
 227         FreeArgs(rda);
 228     }
 229     else
 230     {
 231         UBYTE **array = ArgArrayInit(argc, (UBYTE **)argv);
 232
 233         nb.nb_Pri = ArgInt(array, "CX_PRIORITY", 0);
 234
 235         if (ArgString(array, "LAG", 0))
 236         {
 237             activateFunc = autoActivateLag;
 238         }
 239
 240         ArgArrayDone();
 241     }
 242
 243     nb.nb_Name = _(MSG_AUTOPOINT_CXNAME);
 244     nb.nb_Title = _(MSG_AUTOPOINT_CXTITLE);
 245     nb.nb_Descr = _(MSG_AUTOPOINT_CXDESCR);
 246
 247     as->as_msgPort = CreateMsgPort();
 248
 249     if (as->as_msgPort == NULL)
 250     {
 251         showSimpleMessage(_(MSG_CANT_CREATE_MSGPORT));
 252
 253         return FALSE;
 254     }
 255
 256     nb.nb_Port = as->as_msgPort;
 257
 258     as->as_broker = CxBroker(&nb, 0);
 259
 260     if (as->as_broker == NULL)
 261     {
 262         return FALSE;
 263     }
 264
 265     customObj = CxCustom(activateFunc, 0);
 266
 267     if (customObj == NULL)
 268     {
 269         showSimpleMessage(_(MSG_CANT_CREATE_CUSTOM));
 270
 271         return FALSE;
 272     }
 273
 274     AttachCxObj(as->as_broker, customObj);
 275     ActivateCxObj(as->as_broker, TRUE);
 276
 277     apInfo.ai_thisWindow = IntuitionBase->ActiveWindow;
 278
 279     return TRUE;
 280 }
 281
 282 /************************************************************************************/
 283
 284 static void freeResources(APState *as)
 285 {
 286     struct Message  *cxm;
 287
 288     if (CxBase != NULL)
 289     {
 290         if (as->as_broker != NULL)
 291         {
 292             DeleteCxObjAll(as->as_broker);
 293         }
 294     }
 295
 296     if (as->as_msgPort != NULL)
 297     {
 298         while ((cxm = GetMsg(as->as_msgPort)))
 299         {
 300             ReplyMsg(cxm);
 301         }
 302
 303         DeleteMsgPort(as->as_msgPort);
 304     }
 305 }
 306
 307 /************************************************************************************/
 308
 309 /* Our CxCustom() function that is invoked everytime an imputevent is
 310    routed to our broker */
 311 static void autoActivateLag(CxMsg *msg, CxObj *co)
 312 {
 313     struct InputEvent *ie = (struct InputEvent *)CxMsgData(msg);
 314
 315     if (ie->ie_Class == IECLASS_TIMER)
 316     {
 317         struct Screen *screen;
 318         struct Layer  *layer;
 319
 320         if (IntuitionBase->ActiveWindow != NULL)
 321         {
 322             screen = IntuitionBase->ActiveWindow->WScreen;
 323         }
 324         else
 325         {
 326             screen = IntuitionBase->ActiveScreen;
 327         }
 328
 329         layer = screen ? WhichLayer(&screen->LayerInfo, screen->MouseX, screen->MouseY) : NULL;
 330
 331         apInfo.ai_thisWindow = (layer != NULL) ?
 332             (struct Window *)layer->Window : NULL;
 333
 334         if (apInfo.ai_mouseHasMoved ||
 335                 (IntuitionBase->ActiveWindow == apInfo.ai_thisWindow) ||
 336                 (apInfo.ai_lastActivatedWindow == apInfo.ai_thisWindow))
 337         {
 338             apInfo.ai_mouseHasMoved = FALSE;
 339             return;
 340         }
 341
 342         /* Two timer events and mouse hasn't moved in between. */
 343
 344         apInfo.ai_mouseHasMoved = FALSE;
 345
 346         /* Should be possible to use ActivateWindow(NULL)? Else, we must
 347            hack... */
 348         if (apInfo.ai_thisWindow != NULL)
 349         {
 350             apInfo.ai_lastActivatedWindow = apInfo.ai_thisWindow;
 351             ActivateWindow(apInfo.ai_thisWindow);
 352         }
 353
 354         if (apInfo.ai_thisWindow != NULL)
 355         {
 356             D(bug("Activated window %s\n", apInfo.ai_thisWindow->Title));
 357         }
 358         else
 359         {
 360             D(bug("No window active. %s\n",
 361                         IntuitionBase->ActiveWindow->Title));
 362         }
 363
 364         return;
 365     }
 366
 367     if (ie->ie_Class == IECLASS_RAWMOUSE)
 368     {
 369         if (ie->ie_Code == IECODE_NOBUTTON)
 370         {
 371             apInfo.ai_mouseHasMoved = TRUE;
 372         }
 373     }
 374 }
 375
 376 /************************************************************************************/
 377
 378 static void autoActivate(CxMsg *msg, CxObj *co)
 379 {
 380     struct InputEvent *ie = (struct InputEvent *)CxMsgData(msg);
 381
 382     if (ie->ie_Class == IECLASS_RAWMOUSE)
 383     {
 384         struct Screen *screen;
 385         struct Layer  *layer;
 386
 387         if (ie->ie_Code != IECODE_NOBUTTON)
 388         {
 389             return;
 390         }
 391
 392         if (IntuitionBase->ActiveWindow != NULL)
 393         {
 394             screen = IntuitionBase->ActiveWindow->WScreen;
 395         }
 396         else
 397         {
 398             screen = IntuitionBase->ActiveScreen;
 399         }
 400
 401         layer = screen ? WhichLayer(&screen->LayerInfo, screen->MouseX, screen->MouseY) : NULL;
 402
 403         apInfo.ai_thisWindow = (layer != NULL) ?
 404             (struct Window *)layer->Window : NULL;
 405
 406         if (apInfo.ai_thisWindow != NULL &&
 407                 apInfo.ai_thisWindow != IntuitionBase->ActiveWindow)
 408         {
 409             ActivateWindow(apInfo.ai_thisWindow);
 410             D(bug("Activated window %s\n", apInfo.ai_thisWindow->Title));
 411         }
 412
 413         return;
 414     }
 415 }
 416
 417 /************************************************************************************/
 418
 419 /* React on command messages sent by commodities.library */
 420 static void handleCx(APState *as)
 421 {
 422     CxMsg *msg;
 423     BOOL   quit = FALSE;
 424     LONG   signals;
 425
 426     while (!quit)
 427     {
 428         signals = Wait((1 << nb.nb_Port->mp_SigBit) | SIGBREAKF_CTRL_C);
 429
 430         if (signals & (1 << nb.nb_Port->mp_SigBit))
 431         {
 432             while ((msg = (CxMsg *)GetMsg(as->as_msgPort)))
 433             {
 434                 switch (CxMsgType(msg))
 435                 {
 436                     case CXM_COMMAND:
 437                         switch (CxMsgID(msg))
 438                         {
 439                             case CXCMD_DISABLE:
 440                                 ActivateCxObj(as->as_broker, FALSE);
 441                                 break;
 442
 443                             case CXCMD_ENABLE:
 444                                 ActivateCxObj(as->as_broker, TRUE);
 445                                 break;
 446
 447                             case CXCMD_UNIQUE:
 448                                 /* Running the program twice <=> quit */
 449                                 /* Fall through */
 450
 451                             case CXCMD_KILL:
 452                                 quit = TRUE;
 453                                 break;
 454
 455                         } /* switch(CxMsgID(msg)) */
 456
 457                         break;
 458                 } /* switch (CxMsgType(msg))*/
 459
 460                 ReplyMsg((struct Message *)msg);
 461
 462             } /* while((msg = (CxMsg *)GetMsg(cs->cs_msgPort))) */
 463         }
 464
 465         if (signals & SIGBREAKF_CTRL_C)
 466         {
 467             quit = TRUE;
 468         }
 469
 470     } /* while (!quit) */
 471 }
 472
 473 /************************************************************************************/
 474
 475 int main(int argc, char **argv)
 476 {
 477     APState aState;
 478     int     error = RETURN_OK;
 479
 480     if (initiate(argc, argv, &aState))
 481     {
 482         handleCx(&aState);
 483     }
 484     else
 485     {
 486         error = RETURN_FAIL;
 487     }
 488
 489     freeResources(&aState);
 490
 491     return error;
 492 }
 493
 494 /************************************************************************************/
 495
 496 ADD2INIT(Locale_Initialize,   90);
 497 ADD2EXIT(Locale_Deinitialize, 90);
 498