home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 592b.lha / TermII / English / XCMD Examples / XCMDTools.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-22  |  1.3 KB  |  74 lines
  1. /*
  2. *
  3. *       XCMDTools.c
  4. *
  5. *       Useful routines for XCMD
  6. *
  7. *
  8. */
  9. #include <exec/types.h>
  10. #include <exec/memory.h>
  11. #include <exec/ports.h>
  12. #include <clib/exec_protos.h>
  13. #include <clib/alib_protos.h>
  14. #include <stdio.h>
  15. #include "XCMD.h"
  16. #include "XCMDTools.h"
  17.  
  18.  
  19. /*
  20. *       CreateXCMD()
  21. *
  22. *       Create a XCMD. Memory is allocated. Memory will be
  23. *       freed with a DeleteXCMD(). The port given to this
  24. *       function is the port of external processus, that is
  25. *       the port which will receive answered messages from
  26. *       Term.
  27. *
  28. */
  29. struct XCMD *CreateXCMD(struct MsgPort *port)
  30.   {
  31.   struct XCMD *xcmd = AllocMem(sizeof(struct XCMD),MEMF_PUBLIC|MEMF_CLEAR);
  32.   if(xcmd)
  33.     {
  34.     xcmd->xcmd_Message.mn_Length = sizeof(struct XCMD);
  35.     xcmd->xcmd_Message.mn_ReplyPort = port;
  36.     }
  37.   return(xcmd);
  38.   }
  39.  
  40.  
  41. /*
  42. *       DeleteXCMD()
  43. *
  44. *       Delete a XCMD. Free memory allocated by CreateXCMD
  45. *
  46. */
  47. void DeleteXCMD(struct XCMD *xcmd)
  48.   {
  49.   FreeMem(xcmd,sizeof(struct XCMD));
  50.   }
  51.  
  52.  
  53. /*
  54. *       SendXCMD()
  55. *
  56. *       Send a XCMD to Term II. Return TRUE if succeded,
  57. *       FALSE otherwise.
  58. *
  59. */
  60. BOOL SendXCMD(struct XCMD *xcmd)
  61.   {
  62.   BOOL sent = FALSE;
  63.   struct MsgPort *TermPort;
  64.   Forbid() ;
  65.     if(TermPort = FindPort("XTERM"))
  66.       {
  67.       PutMsg(TermPort,xcmd);
  68.       sent = TRUE;
  69.       }
  70.   Permit();
  71.   return(sent);
  72.   }
  73.  
  74.