home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Fax / AVMA&GPFax-V1,33Sources.LHA / faxprinter.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-06-15  |  7.5 KB  |  341 lines
  1.  
  2. /*** includes ***/
  3.  
  4. #include "mui_support.h"
  5. #define MAXNAMELEN 256
  6.  
  7. #include <exec/memory.h>
  8. #include <workbench/workbench.h>
  9. #include <clib/icon_protos.h>
  10. #include <stdio.h>
  11. #include <stdlib.h>
  12.  
  13. #include <devices/printer.h>
  14. #include <devices/prtbase.h>
  15.  
  16. #include "version.h"
  17. #include "simplerexx.h"
  18.  
  19. struct PrtMsg {
  20.     struct Message  pm_Msg;
  21.     long        pm_Type;
  22. #define PM_RENDER   1
  23. #define PM_INIT     2
  24. #define PM_EXPUNGE  3
  25. };
  26. #define pm_rc        pm_Type
  27.  
  28. extern long Render(long ct, long x, long y, long status);
  29. void initializeDoChar(void);
  30.  
  31. struct RenderMsg {
  32.     struct PrtMsg   rm_PrtMsg;
  33.     long        rm_ct;
  34.     long        rm_x;
  35.     long        rm_y;
  36.     long        rm_status;
  37. };
  38.  
  39. struct PrinterData* PD;
  40. struct PrinterExtendedData* PED;
  41.  
  42. int cannotClose = 0;
  43.  
  44. extern char lastFaxFile[];
  45.  
  46. #undef VER
  47. #define VER "1.01"
  48.  
  49. static struct MsgPort* localPort = 0;
  50. AREXXCONTEXT OutgoingRexx = 0;
  51.  
  52. /*** ids ***/
  53.  
  54. enum ids {
  55.     ID_DUMMY,
  56.     ID_ABOUT,
  57.     ID_QUIT
  58. };
  59.  
  60. /*** variables ***/
  61.  
  62. static APTR app = 0;
  63. static APTR wi_main;
  64. static APTR cm_endpageonclose;
  65. static APTR bt_quit;
  66. static APTR tx_status = 0;
  67. static APTR tx_filename = 0;
  68.  
  69. void setStatus(char* s) {
  70.   set(tx_status, MUIA_Text_Contents, s);
  71. }
  72.  
  73. void setFileName(char* s) {
  74.   set(tx_filename, MUIA_Text_Contents, s);
  75. }
  76.  
  77. int endPageOnClose(void) {
  78.   int temp;
  79.   get(cm_endpageonclose, MUIA_Selected, &temp);
  80.  
  81.   return temp;
  82. }
  83.  
  84. /*** arexx list ***/
  85.  
  86. static struct MUI_Command arexx_list[] =
  87. {
  88.     {NULL,            NULL,                NULL,                NULL}
  89. };
  90.  
  91. void CloseFaxFile(void);
  92. extern int currentPage;
  93.  
  94. void processArexxMessages(void) {
  95.   void* ret;
  96.   while (ret = GetReplyARexxMsg(OutgoingRexx)) {
  97.     if (ret != REXX_RETURN_ERROR) {
  98.     }
  99.   }
  100. }
  101.  
  102. static void processLocalPortMessages(void) {
  103.   struct RenderMsg* dlMsg;
  104.   int pos;
  105.   char buf[100];
  106.   char* tmp = buf;
  107.  
  108.   while (dlMsg = (struct RenderMsg*)GetMsg(localPort)) {
  109.     switch (dlMsg->rm_PrtMsg.pm_Type) {
  110.     case 1:
  111.       dlMsg->pm_rc = Render(dlMsg->rm_ct, dlMsg->rm_x, dlMsg->rm_y, dlMsg->rm_status);
  112.       break;
  113.     case 2: /* open -- do nothing */
  114.       setStatus("Opened Printer");
  115.       cannotClose = 1;
  116.       PED = (struct PrinterExtendedData*)dlMsg->rm_ct;
  117.       PD = (struct PrinterData*)dlMsg->rm_status;
  118.       currentPage = 1;
  119.       strcpy(lastFaxFile, "");
  120.       WinWriteInit();
  121.       initializeDoChar();
  122.       break;
  123.     case 3: /* close -- end of page also */
  124.       CloseFaxFile();
  125.       /* do avm specific thing here */
  126.       if (strcmp(lastFaxFile, "") != 0) {
  127.     sprintf(buf, "CreateFax %s", lastFaxFile);
  128.     SendARexxMsg(OutgoingRexx, buf, FALSE);
  129.       }
  130.       setStatus("Closed Printer");
  131.       cannotClose = 0;
  132.       break;
  133.     case 4: /* DoSpecial */
  134.       dlMsg->pm_rc = 0;
  135.       if (getenv("AVMFCIIREL1HACK"))
  136.     dlMsg->pm_rc = 1;
  137.       switch (dlMsg->rm_status) {
  138.       case 0:
  139.     /* fallthrough */
  140.       case 1:
  141.     DoCtrl("\033c");
  142.     break;
  143.       case 5:
  144.     DoCtrl("\033[0m");
  145.     break;
  146.       case 6:
  147.     DoCtrl("\033[3m");
  148.     break;
  149.       case 7:
  150.     DoCtrl("\033[23m");
  151.     break;
  152.       case 8:
  153.     DoCtrl("\033[4m");
  154.     break;
  155.       case 9:
  156.     DoCtrl("\033[24m");
  157.     break;
  158.       case 10:
  159.     DoCtrl("\033[1m");
  160.     break;
  161.       case 11:
  162.     DoCtrl("\033[22m");
  163.     break;
  164.       }
  165. /*      printf("DoSpecial %d\n", dlMsg->rm_status); */
  166.       break;
  167.     case 5: /* ConvFunc */
  168.       if (dlMsg->rm_status == 12) {
  169.     setStatus("End of page");
  170.     /* trap end of page */
  171.     CloseFaxFile();
  172.       } else {
  173.     dochar(dlMsg->rm_status);
  174.       }
  175.       break;
  176.     }
  177.  
  178.     dlMsg->rm_PrtMsg.pm_Msg.mn_Node.ln_Type = NT_REPLYMSG;
  179.     Signal((struct Task *)dlMsg->rm_PrtMsg.pm_Msg.mn_ReplyPort, SIGF_SINGLE);
  180.  
  181.   }
  182. }
  183.  
  184. void releaseResources(void) {
  185.   if (localPort) DeletePort(localPort);
  186.   cleanup();
  187.   FreeARexx(OutgoingRexx);
  188. }
  189.  
  190. SAVEDS ASM APTR doublestart_func(
  191.     REG(a0) struct Hook *hook,
  192.     REG(a2) Object *appl,
  193.     REG(a1) ULONG *arg)
  194. {
  195.   set(app, MUIA_Application_Iconified, FALSE);
  196.   DoMethod(wi_main, MUIM_Window_ToFront);
  197.   return(RETURN_OK);
  198. }
  199.  
  200. static const struct Hook doublestart_hook = {
  201.   {NULL, NULL},
  202.   (void *)doublestart_func,
  203.   NULL,NULL
  204. };
  205.  
  206. /*** main ***/
  207.  
  208. int main(int argc, char *argv[])
  209. {
  210.     /*** init ***/
  211.     BOOL not_end = TRUE;
  212.     ULONG localPortSignal, signalReceived = 0;
  213.  
  214.     atexit(releaseResources);
  215.  
  216.     if (chdir("avmrexx:")) {
  217.       fail(app, "Couldn't get into avmrexx:");
  218.     }
  219.  
  220.     localPort = CreatePort("FAXPRINTERMP", 0); /* local port which we get
  221.                             debugger output from, aside
  222.                             from the arexx port */
  223.     if (!localPort)
  224.         fail(app, "Creating FAXPRINTERMP failed!");
  225.  
  226.     OutgoingRexx=InitARexx("AVMOPORT","avm");
  227.     if (!OutgoingRexx) fail(app, "Couldn't open outgoing rexx port\n");
  228.  
  229.     openall();
  230.  
  231.     init(argc, argv);
  232.  
  233.     /*** create mui-application ***/
  234.     app = ApplicationObject,
  235.         MUIA_Application_Title,                "AVM FaxPrinter",
  236.         MUIA_Application_Version,            "$VER: FaxPrinter " VER,
  237.         MUIA_Application_Copyright,            "© 1994 by Al Villarica",
  238.         MUIA_Application_Author,            "Al Villarica",
  239.         MUIA_Application_Description,        "FaxPrinter",
  240.         MUIA_Application_Base,                "AVMFAXPRINTER",
  241.         MUIA_Application_SingleTask,        TRUE,
  242.         MUIA_Application_Commands,            arexx_list,
  243.             MUIA_Application_DiskObject,        AVM_DiskObject,
  244.             MUIA_HelpFile, "avm:avm.guide",
  245.  
  246.         SubWindow, wi_main = WindowObject,
  247.                         MUIA_HelpNode, "Faxing",
  248.             MUIA_Window_ID, 'MAIN',
  249.             MUIA_Window_Title, "AVM FaxPrinter",
  250.                     WindowContents, VGroup,
  251.                       Child, HGroup,
  252.                         Child, Label2("Filename"),
  253.                             Child, tx_filename = TextObject,
  254.                               MUIA_Text_Contents, "",
  255.                               TextFrame,
  256.                             End,
  257.                           End,
  258.  
  259.                       Child, HGroup,
  260.                         Child, Label2("Status"),
  261.                             Child, tx_status = TextObject,
  262.                               MUIA_Text_Contents, "",
  263.                               TextFrame,
  264.                             End,
  265.                           End,
  266.  
  267.                           Child, HGroup,
  268.                           Child, Label2("End Page on Render Close"),
  269.                             Child, HGroup,
  270.                               Child, cm_endpageonclose = CheckMark(0),
  271.                               Child, HSpace(0),
  272.                             End,
  273.                           End,
  274.  
  275.                           Child, bt_quit    = KeyButton("Quit",'q'),
  276.             End, // VGroup
  277.                         End, // WindowObject
  278.     End;
  279.  
  280.  
  281.     /*** application failed ? ***/
  282.     if (!app)
  283.         fail(app, "Creating application failed !");
  284.  
  285.     
  286.  
  287.     /*** connections & cycle ***/
  288.     DoMethod(wi_main,        MUIM_Notify,    MUIA_Window_CloseRequest,    TRUE,    app,    2,    MUIM_Application_ReturnID,    ID_QUIT            );
  289.     DoMethod(bt_quit, MUIM_Notify,    MUIA_Pressed,    FALSE,        app,    2,    MUIM_Application_ReturnID,    ID_QUIT);
  290.  
  291.   DoMethod(wi_main, MUIM_Window_SetCycleChain, bt_quit, NULL);
  292.  
  293.   DoMethod(app, MUIM_Notify, MUIA_Application_DoubleStart, TRUE, app, 2, MUIM_CallHook, &doublestart_hook);
  294.  
  295.     /*** open window ***/
  296.     set(wi_main, MUIA_Window_Open,            TRUE);
  297.  
  298.     localPortSignal = (1L << localPort->mp_SigBit);
  299.  
  300.     /*** main-loop ***/
  301.     while (not_end)
  302.     {
  303.         ULONG signal, id;
  304.  
  305.         if (signalReceived & localPortSignal) processLocalPortMessages();
  306.  
  307.         processArexxMessages();
  308.  
  309.         switch (id = DoMethod(app, MUIM_Application_Input, &signal))
  310.         {
  311.             case MUIV_Application_ReturnID_Quit:
  312.             case ID_QUIT:
  313.                 if (!cannotClose) not_end = FALSE;
  314.                 else setStatus("I'm busy!");
  315.                 break;
  316.  
  317.             /*** default ***/
  318.  
  319.             default:
  320.                 if (id)
  321.                     printf("ID: %d = %08lx\n", id, id);
  322.             break;
  323.         }
  324.  
  325.         if (not_end && signal)
  326.             signalReceived = Wait(signal | localPortSignal | ARexxSignal(OutgoingRexx));
  327.     }
  328.  
  329.     fail(app, NULL);
  330. }
  331.  
  332.  
  333. /*** workbench ***/
  334.  
  335. int wbmain(struct WBStartup *wb_startup)
  336. {
  337.     return (main(0, NULL));
  338. }
  339.  
  340.  
  341.