home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / alt / sources / 2512 next >
Encoding:
Internet Message Format  |  1992-11-15  |  9.2 KB
  1. Path: sparky!uunet!psgrain!percy!hfglobe!ichips!iWarp.intel.com|eff!sol.ctr.columbia.edu!ira.uka.de!ira.uka.de!chx400!sicsun!disuns2!lslsun4!chris
  2. From: chris@lslsun4.epfl.ch (Christian Iseli)
  3. Newsgroups: alt.sources
  4. Subject: Unofficial xgopher patch to display images
  5. Keywords: xgopher gopher
  6. Message-ID: <5107@disuns2.epfl.ch>
  7. Date: 15 Nov 92 15:40:30 GMT
  8. Sender: news@disuns2.epfl.ch
  9. Followup-To: alt.sources.d
  10. Organization: Ecole Polytechnique Federale de Lausanne
  11. Lines: 326
  12. Nntp-Posting-Host: lslsun4.epfl.ch
  13.  
  14. Here is a quick hack to add the possibility for xgopher to display
  15. images (for example Meteosat images which can be found on various gopher
  16. servers). It's just a quick hack, but seems to do the trick. It's based
  17. on the sound playing stuff. Here's the diff against the xgopher 1.1
  18. release. This patch is, of course, totally unofficial and utterly
  19. unsupported :-)
  20.  
  21. --------- apply with patch -----------------------
  22.  
  23. *** Xgopher.ad.orig    Sun Nov 15 15:20:16 1992
  24. --- Xgopher.ad    Sun Nov 15 16:09:28 1992
  25. ***************
  26. *** 12,17 ****
  27. --- 12,19 ----
  28.   Xgopher.directoryTime:            600
  29.   Xgopher.hasSound:            True
  30.   Xgopher.soundCommand:            /usr/bin/tr -d '\012\015' | play -v7
  31. + Xgopher.hasImage:            True
  32. + Xgopher.imageCommand:            /usr/local/bin/xv -
  33.   Xgopher.allowTelnet:            True
  34.   Xgopher.telnetCommand:            xterm -e telnet
  35.   Xgopher.itemStart:            500
  36. *** conf.h.orig    Sun Nov 15 15:10:22 1992
  37. --- conf.h    Sun Nov 15 16:09:02 1992
  38. ***************
  39. *** 35,40 ****
  40. --- 35,42 ----
  41.   #define DIRECTORY_TIME    600        /* number of seconds a dir is valid */
  42.   #define HAS_SOUND    TRUE        /* the X server(!) has sound      */
  43.   #define SOUND_COMMAND    "/usr/bin/tr -d '\012\015' | play -v7"    /* command to get sound out        */
  44. + #define HAS_IMAGE    TRUE        /* the X server(!) has image      */
  45. + #define IMAGE_COMMAND    "/usr/local/bin/xv -"    /* command to get image out        */
  46.   #define ALLOW_TELNET    TRUE        /* allow telnet sessions          */
  47.   #define TELNET_COMMAND    "xterm -e telnet"
  48.                       /* command to start telnet        */
  49. ***************
  50. *** 54,59 ****
  51. --- 56,62 ----
  52.   #define PREFIX_INDEX    "<idx> "    /* listing prefix for index search   */
  53.   #define PREFIX_TELNET    "<tel> "    /* listing prefix for telnet session */
  54.   #define PREFIX_SOUND    "<snd> "    /* listing prefix for sound files    */
  55. + #define PREFIX_IMAGE    "<img> "    /* listing prefix for image files    */
  56.   #define PREFIX_UNKNOWN    "<???> "    /* listing prefix for unknown files  */
  57.   
  58.   /* ----- end of application defaults ---- */
  59. *** gopher.h.orig    Sun Nov 15 15:31:00 1992
  60. --- gopher.h    Sun Nov 15 15:31:56 1992
  61. ***************
  62. *** 75,80 ****
  63. --- 75,81 ----
  64.   #define A_CNS        '9'
  65.   #define A_DUP_SERVER    '+'
  66.   #define A_SOUND        's'
  67. + #define A_IMAGE        'I'
  68.   #define A_EVENT        'e'
  69.   #define A_CALENDAR    'c'
  70.   #define A_EOI        '.'
  71. *** options.c.orig    Sun Nov 15 15:14:23 1992
  72. --- options.c    Sun Nov 15 15:18:35 1992
  73. ***************
  74. *** 101,106 ****
  75. --- 101,107 ----
  76.       makePrefix(prefixIndex,  appResources.prefixIndex);
  77.       makePrefix(prefixTelnet, appResources.prefixTelnet);
  78.       makePrefix(prefixSound,  appResources.prefixSound);
  79. +     makePrefix(prefixImage,  appResources.prefixImage);
  80.       makePrefix(prefixUnknown,appResources.prefixUnknown);
  81.   
  82.   #ifdef DEBUG
  83. ***************
  84. *** 127,132 ****
  85. --- 128,137 ----
  86.               appResources.hasSound ? "True" : "False");
  87.       LOG (logFP, "\tsoundCommand:\t%s\n",
  88.               appResources.soundCommand);
  89. +     LOG (logFP, "\thasImage:\t%s\n",
  90. +             appResources.hasImage ? "True" : "False");
  91. +     LOG (logFP, "\timageCommand:\t%s\n",
  92. +             appResources.imageCommand);
  93.       LOG (logFP, "\tallowTelnet:\t%s\n",
  94.               appResources.allowTelnet ? "True" : "False");
  95.       LOG (logFP, "\ttelnetCommand:\t%s\n",
  96. ***************
  97. *** 160,165 ****
  98. --- 165,172 ----
  99.                PREFIX_LEN, appResources.prefixIndex);
  100.       LOG (logFP, "\tprefixSound:\t%.*s\n",
  101.                PREFIX_LEN, appResources.prefixSound);
  102. +     LOG (logFP, "\tprefixImage:\t%.*s\n",
  103. +              PREFIX_LEN, appResources.prefixImage);
  104.       LOG (logFP, "\tprefixUnknown:\t%.*s\n",
  105.                PREFIX_LEN, appResources.prefixUnknown);
  106.   #endif /* DEBUG */
  107. *** options.h.orig    Sun Nov 15 15:23:40 1992
  108. --- options.h    Sun Nov 15 15:28:02 1992
  109. ***************
  110. *** 37,42 ****
  111. --- 37,44 ----
  112.       int        directoryTime;
  113.       Boolean        hasSound;
  114.       String        soundCommand;
  115. +     Boolean        hasImage;
  116. +     String        imageCommand;
  117.       Boolean        allowTelnet;
  118.       String        telnetCommand;
  119.       int        itemStart;
  120. ***************
  121. *** 53,58 ****
  122. --- 55,61 ----
  123.       String        prefixCSO;
  124.       String        prefixIndex;
  125.       String        prefixSound;
  126. +     String        prefixImage;
  127.       String        prefixUnknown;
  128.       } gopherAppResources, *gopherAppResourcesP;
  129.   
  130. ***************
  131. *** 86,91 ****
  132. --- 89,98 ----
  133.           GOffset(hasSound), XtRImmediate, (XPointer) HAS_SOUND},
  134.       {"soundCommand", "SoundCommand", XtRString, sizeof(String),
  135.           GOffset(soundCommand), XtRString, SOUND_COMMAND},
  136. +     {"hasImage", "HasImage", XtRBoolean, sizeof(Boolean),
  137. +         GOffset(hasImage), XtRImmediate, (XPointer) HAS_IMAGE},
  138. +     {"imageCommand", "ImageCommand", XtRString, sizeof(String),
  139. +         GOffset(imageCommand), XtRString, IMAGE_COMMAND},
  140.       {"allowTelnet", "AllowTelnet", XtRBoolean, sizeof(Boolean),
  141.           GOffset(allowTelnet), XtRImmediate, (XPointer) ALLOW_TELNET},
  142.       {"telnetCommand", "TelnetCommand", XtRString, sizeof(String),
  143. ***************
  144. *** 118,123 ****
  145. --- 125,132 ----
  146.           GOffset(prefixIndex), XtRString, PREFIX_INDEX},
  147.       {"prefixSound", "prefixSound", XtRString, sizeof(String),
  148.           GOffset(prefixSound), XtRString, PREFIX_SOUND},
  149. +     {"prefixImage", "prefixImage", XtRString, sizeof(String),
  150. +         GOffset(prefixImage), XtRString, PREFIX_IMAGE},
  151.       {"prefixUnknown", "prefixUnknown", XtRString, sizeof(String),
  152.           GOffset(prefixUnknown), XtRString, PREFIX_UNKNOWN},
  153.       };
  154. *** prefixP.h.orig    Sun Nov 15 15:56:54 1992
  155. --- prefixP.h    Sun Nov 15 15:57:12 1992
  156. ***************
  157. *** 21,24 ****
  158. --- 21,25 ----
  159.       prefixIndex   [PREFIX_LEN],
  160.       prefixTelnet  [PREFIX_LEN],
  161.       prefixSound   [PREFIX_LEN],
  162. +     prefixImage   [PREFIX_LEN],
  163.       prefixUnknown [PREFIX_LEN];
  164. *** util.c.orig    Sun Nov 15 15:09:29 1992
  165. --- util.c    Sun Nov 15 16:07:47 1992
  166. ***************
  167. *** 92,97 ****
  168. --- 92,100 ----
  169.           case A_SOUND:
  170.           PREFIX(gi, prefixSound);
  171.           break;
  172. +         case A_IMAGE:
  173. +         PREFIX(gi, prefixImage);
  174. +         break;
  175.           case A_EOI:
  176.           freeItem(gi);
  177.           return NULL;
  178. ***************
  179. *** 155,161 ****
  180.                   gi->type == A_CSO ||
  181.                   gi->type == A_INDEX ||
  182.                   gi->type == A_TELNET ||
  183. !                 gi->type == A_SOUND) {
  184.                   appendItem(&(d->contents), gi);
  185.   
  186.               } else {
  187. --- 158,165 ----
  188.                   gi->type == A_CSO ||
  189.                   gi->type == A_INDEX ||
  190.                   gi->type == A_TELNET ||
  191. !                 gi->type == A_SOUND ||
  192. !                 gi->type == A_IMAGE) {
  193.                   appendItem(&(d->contents), gi);
  194.   
  195.               } else {
  196. ***************
  197. *** 558,563 ****
  198. --- 562,665 ----
  199.       }
  200.   }
  201.   
  202. + /* getImage
  203. +    get an image file and display it. */
  204. + 
  205. + BOOLEAN
  206. + getImage(gi)
  207. + gopherItemP    gi;
  208. + {
  209. +     static BOOLEAN    firstTime = TRUE;
  210. +     static BOOLEAN    imageCommandOK = TRUE;
  211. +     static char    *imageCmd;
  212. +     char        message[MESSAGE_STRING_LEN];
  213. +     FILE        *imageCmdFile;
  214. +     int        s;
  215. +     static int    childPID = 0;
  216. + 
  217. +     /* see if image command is turned on */
  218. + 
  219. +     if (! appResources->hasImage) {
  220. +         showError("This machine does not support images.");
  221. +         return FALSE;
  222. +     }
  223. + 
  224. +     if (childPID != 0) {    /* image may still be active */
  225. + 
  226. +         union wait    status;
  227. +         int        pid;
  228. +         struct rusage    rusage;
  229. + 
  230. +         pid = wait3(&status, WNOHANG, &rusage);
  231. +         if (pid == 0) {
  232. +             showError("Another image file is still showing. Close it first.");
  233. +             return FALSE;
  234. +         } else if (pid == childPID) {
  235. +             childPID = 0;
  236. +         } else {
  237. +             showError("It doesn't look good for showing any more images.");
  238. +             return FALSE;
  239. +         }
  240. +     }
  241. + 
  242. +     /* see if image command is an executable file */
  243. + 
  244. +     if (firstTime) {
  245. +         firstTime = FALSE;
  246. +         imageCmd = cmdPath(appResources->imageCommand);
  247. +         if (imageCmd == NULL) {
  248. +             imageCommandOK = FALSE;
  249. +         }
  250. +     }
  251. + 
  252. +     if (! imageCommandOK) {
  253. +         sprintf (message,
  254. +             "Unable to execute the image display command: \'%s\'\n",
  255. +             imageCmd);
  256. +         showError(message);
  257. +         return FALSE;
  258. +     }
  259. + 
  260. +     if ((childPID = fork()) < 0) {
  261. +         sprintf(message,
  262. +             "Unable to display the image (error %d)\n",
  263. +             errno);
  264. +         showError(message);
  265. +         return FALSE;
  266. + 
  267. +     } else if (childPID != 0) {
  268. +         return TRUE;
  269. + 
  270. +     } else {
  271. + 
  272. +         s = connectToSocket(gi->host, gi->port);
  273. +         if (s < 0) {
  274. +             networkError(s, gi->host, gi->port);
  275. +             return FALSE;
  276. +         }
  277. + 
  278. +         writeString(s, vStringValue(&(gi->selector)));
  279. +         writeString(s, EOL_STRING);
  280. + 
  281. +         imageCmdFile = popen(imageCmd, "w");
  282. + 
  283. +         if (imageCmdFile == NULL) {
  284. +             sprintf(message,
  285. +             "Unable to start the image command (\'%s\')\n",
  286. +                 imageCmd);
  287. +             showError(message);
  288. +             close (s);
  289. +             exit(-1);
  290. +         }
  291. + 
  292. +         copyNetUntilEOF(s, imageCmdFile);
  293. + 
  294. +         close(s);
  295. +         pclose(imageCmdFile);
  296. +         exit(0);
  297. +     }
  298. + }
  299. + 
  300.   
  301.   #define NET_BUFFER_SIZE    1400
  302.   
  303. ***************
  304. *** 758,763 ****
  305. --- 860,870 ----
  306.              by getSound. */
  307.   
  308.           result = getSound(gi);
  309. +         
  310. +         break;
  311. + 
  312. +     case A_IMAGE:
  313. +         result = getImage(gi);
  314.           
  315.           break;
  316.   
  317. *** util.h.orig    Sun Nov 15 15:51:32 1992
  318. --- util.h    Sun Nov 15 15:52:11 1992
  319. ***************
  320. *** 84,89 ****
  321. --- 84,95 ----
  322.   #endif
  323.   );
  324.   
  325. + BOOLEAN getImage(
  326. + #ifdef PROTO
  327. +     gopherItemP    /* gi */
  328. + #endif
  329. + );
  330. + 
  331.   void    getTempFile(
  332.   #ifdef PROTO
  333.       char *        /* tempName */
  334.  
  335. -- 
  336.  
  337.                     Christian Iseli
  338.                     LSL-DI-EPFL
  339.                     Lausanne, Switzerland
  340.