TB9.2 Example Applications: examples/PIPS/antiword/src/startup.c Source File

00001 /*
-00002  * startup.c
-00003  * Copyright (C) 1998-2001 A.J. van Os; Released under GPL
-00004  *
-00005  * Description:
-00006  * Try to force a single startup of !Antiword
-00007  */
-00008 
-00009 #include <stdlib.h>
-00010 #include <string.h>
-00011 #include <ctype.h>
-00012 #include "DeskLib:Error.h"
-00013 #include "DeskLib:Event.h"
-00014 #include "DeskLib:SWI.h"
-00015 #include "antiword.h"
-00016 
-00017 
-00018 #if !defined(TaskManager_EnumerateTasks)
-00019 #define TaskManager_EnumerateTasks      0x042681
-00020 #endif /* TaskManager_EnumerateTasks */
-00021 
-00022 /*
-00023  * bIsMatch - decide whether the two strings match
-00024  *
-00025  * like strcmp, but this one ignores case
-00026  */
-00027 static BOOL
-00028 bIsMatch(const char *szStr1, const char *szStr2)
-00029 {
-00030         const char      *pcTmp1, *pcTmp2;
-00031 
-00032         for (pcTmp1 = szStr1, pcTmp2 = szStr2;
-00033              *pcTmp1 != '\0';
-00034              pcTmp1++, pcTmp2++) {
-00035                 if (toupper(*pcTmp1) != toupper(*pcTmp2)) {
-00036                         return FALSE;
-00037                 }
-00038         }
-00039         return *pcTmp2 == '\0';
-00040 } /* end of bIsMatch */
-00041 
-00042 /*
-00043  * tGetTaskHandle - get the task handle of the given task
-00044  *
-00045  * returns the task handle when found, otherwise 0
-00046  */
-00047 static task_handle
-00048 tGetTaskHandle(const char *szTaskname)
-00049 {
-00050         const char      *pcTmp;
-00051         int     iReg0, iIndex;
-00052         int     aiBuffer[4];
-00053         char    szTmp[21];
-00054 
-00055         iReg0 = 0;
-00056         do {
-00057                 /* Get info on the next task */
-00058                 Error_CheckFatal(SWI(3, 1, TaskManager_EnumerateTasks | XOS_Bit,
-00059                         iReg0, aiBuffer, sizeof(aiBuffer), &iReg0));
-00060                 /* Copy the (control character terminated) task name */
-00061                 for (iIndex = 0, pcTmp = (const char *)aiBuffer[1];
-00062                      iIndex < elementsof(szTmp);
-00063                      iIndex++, pcTmp++) {
-00064                         if (iscntrl(*pcTmp)) {
-00065                                 szTmp[iIndex] = '\0';
-00066                                 break;
-00067                         }
-00068                         szTmp[iIndex] = *pcTmp;
-00069                 }
-00070                 szTmp[elementsof(szTmp) - 1] = '\0';
-00071                 if (bIsMatch(szTmp, szTaskname)) {
-00072                         /* Task found */
-00073                         return (task_handle)aiBuffer[0];
-00074                 }
-00075         } while (iReg0 >= 0);
-00076 
-00077         /* Task not found */
-00078         return 0;
-00079 } /* end of tGetTaskHandle */
-00080 
-00081 int
-00082 main(int argc, char **argv)
-00083 {
-00084         message_block   tMsg;
-00085         task_handle     tTaskHandle;
-00086         size_t  tArgLen;
-00087         int     aiMessages[] = {0};
-00088         char    szCommand[512];
-00089 
-00090         Event_Initialise3("StartUp", 310, aiMessages);
-00091 
-00092         if (argc > 1) {
-00093                 tArgLen = strlen(argv[1]);
-00094         } else {
-00095                 tArgLen = 0;
-00096         }
-00097         if (tArgLen >= sizeof(tMsg.data.dataload.filename)) {
-00098                 werr(1, "Input filename too long");
-00099                 return EXIT_FAILURE;
-00100         }
-00101 
-00102         tTaskHandle = tGetTaskHandle("antiword");
-00103 
-00104         if (tTaskHandle == 0) {
-00105                 /* Antiword is not active */
-00106                 strcpy(szCommand, "chain:<Antiword$Dir>.!Antiword");
-00107                 if (argc > 1) {
-00108                         strcat(szCommand, " ");
-00109                         strcat(szCommand, argv[1]);
-00110                 }
-00111 #if defined(DEBUG)
-00112                 strcat(szCommand, " ");
-00113                 strcat(szCommand, "2><Antiword$Dir>.Debug");
-00114 #endif /* DEBUG */
-00115                 system(szCommand);
-00116                 /* If we reach here something has gone wrong */
-00117                 return EXIT_FAILURE;
-00118         }
-00119 
-00120         /* Antiword is active */
-00121         if (argc > 1) {
-00122                 /*
-00123                  * Send the argument to Antiword by imitating a
-00124                  * drag-and-drop to Antiword's iconbar icon
-00125                  */
-00126                 memset(&tMsg, 0, sizeof(tMsg));
-00127                 tMsg.header.size = ROUND4(offsetof(message_block, data) +
-00128                                         offsetof(message_dataload, filename) +
-00129                                         1 + tArgLen);
-00130                 tMsg.header.yourref = 0;
-00131                 tMsg.header.action = message_DATALOAD;
-00132                 tMsg.data.dataload.window = window_ICONBAR;
-00133                 tMsg.data.dataload.icon = -1;
-00134                 tMsg.data.dataload.size = 0;
-00135                 tMsg.data.dataload.filetype = FILETYPE_MSWORD;
-00136                 strcpy(tMsg.data.dataload.filename, argv[1]);
-00137                 Error_CheckFatal(Wimp_SendMessage(event_SEND,
-00138                                                 &tMsg, tTaskHandle, 0));
-00139                 return EXIT_SUCCESS;
-00140         } else {
-00141                 /* Give an error message and return */
-00142                 werr(1, "Antiword is already running");
-00143                 return EXIT_FAILURE;
-00144         }
-00145 } /* end of main */
-