home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 160.lha / StructureBrowser_v1.3 / Sources / twmClient.c < prev   
Encoding:
C/C++ Source or Header  |  1988-04-27  |  3.1 KB  |  127 lines
  1. /* twmClient.c
  2.  
  3.    This module should be compiled and linked with applications that wish to
  4.    be clients of twm when it is present in the system. Briefly, the client
  5.    calls the function twmInit() to set up, afterwards calls PostMe() whenever
  6.    he wishes to go to sleep, then finally calls twmCleanUP() just before
  7.    exiting. Full details are in the prefatory comments to twm.c.
  8.    
  9.    Update history:
  10.       Nov 12/87:  Forbid()/Permit() added to PostMe() and UnPostMe()
  11.       Aug 13/88:  Forbid()/Permit() loophole closed in PostMe()
  12. */
  13.  
  14. #include "header/twm.h"
  15.  
  16. #define TWM_MSGSIZE ((long)sizeof(struct twmMessage))
  17.  
  18. extern VOID *CreatePort(), *FindPort();
  19. extern VOID *GetMsg(),     *AllocMem();
  20.  
  21. struct MsgPort      *mp       = NULL;  /* reply port for our msgs    */
  22. struct MsgPort      *twmport  = NULL;  /* points to twm's port       */
  23. struct twmMessage   *Addmsg   = NULL;  /* TWM_ACTION_ADD message     */
  24. struct twmMessage   *Delmsg   = NULL;  /* TWM_ACTION_DELETE message  */
  25.  
  26. int twmReady = FALSE;   /* TRUE means ports are allocated & initialized */
  27.  
  28.  
  29. PostMe (clientName)
  30. register char *clientName;
  31. {
  32.    /* trying not to pass junk to twm... */
  33.    if (clientName == NULL || *clientName == '\0')
  34.       return FALSE;
  35.    
  36.    /* set up our message telling twm to add its gadget   */
  37.    Addmsg->tmName   = clientName;
  38.    Addmsg->tmAction = TWM_ACTION_ADD;
  39.    
  40.    /* check we're initialized and that twm exists in systemh and send message
  41.    */
  42.    
  43.    Forbid();                  /* to be on the safe side */
  44.    
  45.    if (!twmReady || (twmport = FindPort(PORTNAME)) == NULL)
  46.    {
  47.       Permit();
  48.       return FALSE;
  49.    }
  50.    
  51.    PutMsg(twmport, Addmsg);
  52.    
  53.    Permit();
  54.    
  55.    WaitPort(mp);
  56.    
  57.    Addmsg = GetMsg(mp);
  58.    
  59.    /* anything other than E_OK return code is bad news... forget about twm */
  60.    return (Addmsg->tmAction == E_OK);
  61. }   
  62.    
  63.  
  64. UnPostMe ()
  65. {
  66.    Delmsg->tmAction = TWM_ACTION_DELETE;
  67.  
  68.    if (twmReady)
  69.    {
  70.       Forbid();
  71.       
  72.       if ((twmport = FindPort(PORTNAME)) != NULL)
  73.          PutMsg(twmport, Delmsg);
  74.          
  75.       Permit();
  76.       
  77.       /* twm will reply the original (ADD) message before replying this 
  78.          one if it's going to reply it at all... hence loop exit condition
  79.       */
  80.       if (twmport != NULL)
  81.          do
  82.          {
  83.             WaitPort(mp);
  84.          } while (GetMsg(mp) != Delmsg);
  85.    }
  86. }        
  87.  
  88.  
  89. twmInit ()
  90. {
  91.    /* don't re-initialize */
  92.    if (twmReady)
  93.       return TRUE;
  94.       
  95.    /* set up our messages, allocate a port */
  96.    if ((mp = CreatePort(NULL, 0L)) == NULL
  97.        || (Delmsg = AllocMem(TWM_MSGSIZE, MEMF_CLEAR)) == NULL
  98.        || (Addmsg = AllocMem(TWM_MSGSIZE, MEMF_CLEAR)) == NULL
  99.       )
  100.    {
  101.       twmCleanUp();
  102.       return FALSE;
  103.    }
  104.    else
  105.    {
  106.       Delmsg->tmMessage.mn_ReplyPort = mp;
  107.       Addmsg->tmMessage.mn_ReplyPort = mp;
  108.       
  109.       Delmsg->tmMessage.mn_Node.ln_Type = NT_MESSAGE;
  110.       Addmsg->tmMessage.mn_Node.ln_Type = NT_MESSAGE;
  111.       
  112.       return (twmReady = TRUE);
  113.    }
  114. }
  115.  
  116.  
  117. twmCleanUp ()
  118. {
  119.    twmReady = FALSE;
  120.    
  121.    if (mp)        DeletePort(mp);
  122.    if (Delmsg)    FreeMem(Delmsg, TWM_MSGSIZE);
  123.    if (Addmsg)    FreeMem(Addmsg, TWM_MSGSIZE);
  124. }
  125.  
  126.  
  127.