workbench/libs/openurl/library/handler.c

   1 /*
   2 **  OpenURL-Handler - Asynch ARexx handler for openurl.library
   3 **
   4 **  Written by Troels Walsted Hansen <troels@thule.no>
   5 **  Placed in the public domain.
   6 **
   7 **  Developed by:
   8 **  - Alfonso Ranieri <alforan@tin.it>
   9 **  - Stefan Kost <ensonic@sonicpulse.de>
  10 */
  11
  12
  13 #include "lib.h"
  14
  15 /***********************************************************************/
  16
  17 static ULONG
  18 sendRexxMsg(struct MsgPort *reply,UBYTE *rxport,UBYTE *rxcmd)
  19 {
  20     struct RexxMsg *rxmsg;
  21
  22     if ((rxmsg = CreateRexxMsg(reply,NULL,NULL)))
  23     {
  24         rxmsg->rm_Action = RXCOMM|RXFF_STRING|RXFF_NOIO;
  25
  26         if ((rxmsg->rm_Args[0] = CreateArgstring(rxcmd,strlen(rxcmd))))
  27         {
  28             struct MsgPort *port;
  29
  30             Forbid();
  31
  32             if ((port = FindPort(rxport)))
  33             {
  34                 PutMsg(port,(struct Message *)rxmsg);
  35                 Permit();
  36
  37                 return TRUE;
  38             }
  39
  40             Permit();
  41
  42             DeleteArgstring(rxmsg->rm_Args[0]);
  43         }
  44
  45         DeleteRexxMsg(rxmsg);
  46     }
  47
  48     return FALSE;
  49 }
  50
  51 /**************************************************************************/
  52
  53 #ifdef __MORPHOS__
  54 void handler(void)
  55 #else
  56 void SAVEDS handler(void)
  57 #endif
  58 {
  59     struct MsgPort   port;
  60     struct Process   *me = (struct Process *)FindTask(NULL);
  61     struct startMsg  *smsg;
  62     ULONG            res;
  63     int              sig;
  64
  65     WaitPort(&me->pr_MsgPort);
  66     smsg = (struct startMsg *)GetMsg(&me->pr_MsgPort);
  67
  68     if ((sig = AllocSignal(-1))>=0)
  69     {
  70         INITPORT(&port,sig);
  71     res = sendRexxMsg(&port,smsg->port,smsg->cmd);
  72     }
  73     else res = FALSE;
  74
  75     smsg->res = res;
  76     ReplyMsg((struct Message *)smsg);
  77
  78     if (res)
  79     {
  80         struct RexxMsg *rxmsg;
  81
  82         WaitPort(&port);
  83     rxmsg = (struct RexxMsg *)GetMsg(&port);
  84
  85         DeleteArgstring(rxmsg->rm_Args[0]);
  86         DeleteRexxMsg(rxmsg);
  87     }
  88
  89     if (sig>=0) FreeSignal(sig);
  90
  91     Forbid();
  92     lib_use--;
  93 }
  94
  95 /**************************************************************************/
  96