home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1994 March / Source_Code_CD-ROM_Walnut_Creek_March_1994.iso / compsrcs / unix / volume26 / radio202 / patch04 < prev    next >
Encoding:
Text File  |  1993-06-03  |  18.7 KB  |  697 lines
  1. Newsgroups: comp.sources.unix
  2. From: guido.van.rossum@cwi.nl (Guido van Rossum)
  3. Subject: v26i240: radio - UDP broadcast/receive utilities for audio data, V2.0, Patch04
  4. Sender: unix-sources-moderator@gw.home.vix.com
  5. Approved: vixie@gw.home.vix.com
  6.  
  7. Submitted-By: guido.van.rossum@cwi.nl (Guido van Rossum)
  8. Posting-Number: Volume 26, Issue 240
  9. Archive-Name: radio2.0.2/patch04
  10.  
  11. This is official patch number 4 for radio version 2.0, bringing it up
  12. to patch level 4, or version 2.0.4.  See the blurb a little further
  13. below if you don't know what radio is.
  14.  
  15. Changes in 2.0 patchlevel 4
  16. ---------------------------
  17.  
  18. Fix broken info reply from broadcast (no port was filled in).
  19.  
  20. Made port numbers in info messages from radio/broadcast positive
  21. integers.
  22.  
  23. Some new debug messages in radio.c.
  24.  
  25. Port to HP-UX by Philippe-Andre Prindeville <philipp@res.enst.fr>.
  26. (This uses the raw interface to the hardware.  Philippe-Andre has
  27. tried to use the AAPI library but can't get it to work properly.  If
  28. you think you can get the AAPI version working, let me know and I'll
  29. send you his AAPI patches.)
  30.  
  31. The following improvements are thanks to Andreas Stolcke
  32. <stolcke@ICSI.Berkeley.EDU>:
  33.  
  34. It is now possible to have multiple broadcast processes running on the
  35. same host; the transmission socket is no longer bound to a fixed port
  36. (you may have to zero the control port with -c 0 if your system
  37. doesn't have the SO_REUSEPORT socket option).
  38.  
  39. Radio -r is now implemented by filtering packets based on sender's
  40. address rather than connecting to a fixed port.
  41.  
  42. Fixed integer overflow in broadcast -t after about 35 minutes.
  43.  
  44. Ignore tune requests to invalid port numbers.
  45.  
  46. Fixed unused variable in "bad broadcast address" error message.
  47.  
  48. Let opensock() return -1 on error.
  49.  
  50. ******************
  51. * What is radio? *
  52. ******************
  53.  
  54. If you have a local area network full of workstations with audio
  55. capabilities and at least one FM/AM radio or other audio source, you
  56. can broadcast the audio over the network, and let other users listen
  57. to it.
  58.  
  59. This software works for Sun Sparcs running SunOS 4.0 or 4.1, for SGI
  60. Indigo or Personal IRIS 4D/30 or 4D/35 workstations running SGI IRIX
  61. 4.0 or 3.3.2, NeXT workstations (running version 2.1), DECstations
  62. equipped with DEC lofi, machines running the AudioFile audio server
  63. from DEC CRL, and HP machines with audio hardware.  At CWI, versions
  64. of it have been in continuous use on a mix of Sun and SGI system types
  65. for almost two years; version 1.0 (patchlevel 4) was last tested on a
  66. NeXT.  (I've heard that the program doesn't work on NeXT 3.1; if you
  67. fix it please send me the changes!)
  68.  
  69. Man pages for "radio" and "broadcast" are provided.
  70.  
  71. The implementation continuously transmits UDP broadcast packets of
  72. 1400 bytes each (i.e. less than six per second), which contain the
  73. data in U-LAW format (8000 samples/second, 1 byte/sample,
  74. logarithmically encoded).  On a typical ethernet, this uses about 1
  75. percent of the net available bandwith.  Some loss of UDP packets is
  76. tolerated by the receiving program (this is heard as short
  77. interruptions of the sound).  Every now and then, a short "station
  78. call" packet is transmitted as well, for the benefit of advanced
  79. listening programs.
  80.  
  81. If you missed a part of the posting of radio, you can ftp the whole
  82. source from ftp.cwi.nl [192.16.184.180], file /pub/radio2.0.*.tar.Z,
  83. or from the comp.sources.unix archives.
  84.  
  85. Enjoy,
  86.  
  87. --Guido van Rossum, CWI, Amsterdam <Guido.van.Rossum@cwi.nl>
  88.  
  89. Prereq: 3
  90.  
  91. *** pl3/patchlevel.h    Fri May  7 16:29:01 1993
  92. --- ./patchlevel.h        Mon May 17 10:48:51 1993
  93. ***************
  94. *** 1 ****
  95. ! #define PATCHLEVEL 3
  96. --- 1 ----
  97. ! #define PATCHLEVEL 4
  98. *** pl3/Makefile    Fri May  7 16:28:59 1993
  99. --- ./Makefile    Mon May 10 21:27:11 1993
  100. ***************
  101. *** 27,30 ****
  102.           @echo 'You must use "make sun4.0", "make sun4.1",'
  103. !         @echo '"make next", "make sgi", "make lofi" or'
  104. !         @echo '"make audiofile"'
  105.           exit 1
  106. --- 27,30 ----
  107.           @echo 'You must use "make sun4.0", "make sun4.1",'
  108. !         @echo '"make next", "make sgi", "make hpux",'
  109. !         @echo '"make lofi" or "make audiofile"'
  110.           exit 1
  111. ***************
  112. *** 52,53 ****
  113. --- 52,66 ----
  114.           make all sndulaw
  115. + 
  116. + hpux:        # HPUX 8.07
  117. +         make all 'LIBS=-lX11' \
  118. +             CC="cc -Aa" \
  119. +             CFLAGS="-D_HPUX_SOURCE +e -I/usr/include/X11R4"
  120. + 
  121. + # If you are using the AAPI (Audio Application Programming Interface),
  122. + # use the next 3 lines instead and don't forget to edit radio.h.
  123. + 
  124. + #hpux:        # HPUX 8.07
  125. + #        make all 'LIBS=-lX11' \
  126. + #            CC="cc -Aa" \
  127. + #    CFLAGS="-D_HPUX_SOURCE +e -I/usr/include/Motif1.1 -I/usr/include/X11R4"
  128.   
  129. *** pl3/README    Fri May  7 16:28:59 1993
  130. --- ./README    Tue May 11 16:37:06 1993
  131. ***************
  132. *** 3,5 ****
  133.   
  134. ! This is Radio version 2.0, patchlevel 3 (a.k.a. 2.0.3).
  135.   
  136. --- 3,5 ----
  137.   
  138. ! This is Radio version 2.0, patchlevel 4 (a.k.a. 2.0.4).
  139.   
  140. ***************
  141. *** 13,20 ****
  142.   4.0 or 3.3.2, NeXT workstations (running version 2.1), DECstations
  143. ! equipped with DEC lofi, and machines running the Audio File audio
  144. ! server from DEC CRL.  At CWI, versions of it have been in continuous
  145. ! use on a mix of Sun and SGI system types for almost two years; version
  146. ! 1.0 (patchlevel 4) was last tested on a NeXT.  (I've heard that the
  147. ! program doesn't work on NeXT 3.1; if you fix it please send me the
  148. ! changes!)
  149.   
  150. --- 13,20 ----
  151.   4.0 or 3.3.2, NeXT workstations (running version 2.1), DECstations
  152. ! equipped with DEC lofi, machines running the AudioFile audio server
  153. ! from DEC CRL, and HP machines with audio hardware.  At CWI, versions
  154. ! of it have been in continuous use on a mix of Sun and SGI system types
  155. ! for almost two years; version 1.0 (patchlevel 4) was last tested on a
  156. ! NeXT.  (I've heard that the program doesn't work on NeXT 3.1; if you
  157. ! fix it please send me the changes!)
  158.   
  159. ***************
  160. *** 53,54 ****
  161. --- 53,90 ----
  162.   
  163. + Changes in 2.0 patchlevel 4
  164. + ---------------------------
  165. + 
  166. + Fix broken info reply from broadcast (no port was filled in).
  167. + 
  168. + Made port numbers in info messages from radio/broadcast positive
  169. + integers.
  170. + 
  171. + Some new debug messages in radio.c.
  172. + 
  173. + Port to HP-UX by Philippe-Andre Prindeville <philipp@res.enst.fr>.
  174. + (This uses the raw interface to the hardware.  Philippe-Andre has
  175. + tried to use the AAPI library but can't get it to work properly.  If
  176. + you think you can get the AAPI version working, let me know and I'll
  177. + send you his AAPI patches.)
  178. + 
  179. + The following improvements are thanks to Andreas Stolcke
  180. + <stolcke@ICSI.Berkeley.EDU>:
  181. + 
  182. + It is now possible to have multiple broadcast processes running on the
  183. + same host; the transmission socket is no longer bound to a fixed port
  184. + (you may have to zero the control port with -c 0 if your system
  185. + doesn't have the SO_REUSEPORT socket option).
  186. + 
  187. + Radio -r is now implemented by filtering packets based on sender's
  188. + address rather than connecting to a fixed port.
  189. + 
  190. + Fixed integer overflow in broadcast -t after about 35 minutes.
  191. + 
  192. + Ignore tune requests to invalid port numbers.
  193. + 
  194. + Fixed unused variable in "bad broadcast address" error message.
  195. + 
  196. + Let opensock() return -1 on error.
  197. + 
  198. + 
  199.   Changes in 2.0 patchlevel 3
  200. ***************
  201. *** 61,66 ****
  202.   
  203. ! Radio can now also be used with DEC CRL's AudioFile server or with DEC
  204. ! LoFi hardware (these options require additional software available
  205. ! elsewhere).  When compiled for AudioFile, broadcast can optionally
  206. ! record data directly from the server.
  207.   
  208. --- 97,103 ----
  209.   
  210. ! Thanks to George Neville-Neil, radio can now also be used with DEC
  211. ! CRL's AudioFile server or with DEC LoFi hardware (these options
  212. ! require additional software available elsewhere).  When compiled for
  213. ! AudioFile, broadcast can optionally record data directly from the
  214. ! server.
  215.   
  216. ***************
  217. *** 221,225 ****
  218.   For a DECStation with LoFi hardware, you need to fetch either the LoFi
  219. ! library by <gnn@cs.utwente.nl> or the DEC CRL AudioFile software
  220. ! distribution.  LoFiLib is available for ftp from pegasus.cs.utwente.nl
  221. ! in /pub/audio/libminilofi.tar.Z.  AudioFile is available for ftp from
  222.   crl.dec.com in /pub/DEC/AF/AF2R2.tar.Z.  Also get the patches from the
  223. --- 258,263 ----
  224.   For a DECStation with LoFi hardware, you need to fetch either the LoFi
  225. ! library by George Neville-Neil <gnn@cs.utwente.nl> (based on code by
  226. ! DEC CRL) or the DEC CRL AudioFile software distribution.  LoFiLib is
  227. ! available for ftp from pegasus.cs.utwente.nl in
  228. ! /pub/audio/libminilofi.tar.Z.  AudioFile is available for ftp from
  229.   crl.dec.com in /pub/DEC/AF/AF2R2.tar.Z.  Also get the patches from the
  230. *** pl3/broadcast.c    Fri May  7 16:29:00 1993
  231. --- ./broadcast.c    Tue May 11 16:20:48 1993
  232. ***************
  233. *** 86,87 ****
  234. --- 86,92 ----
  235.   
  236. + #ifdef __hpux
  237. + #include <sys/rtprio.h>
  238. + #include "audio_filehdr.h"        /* borrowed from a Sun */
  239. + #endif
  240. + 
  241.   #ifdef __sgi
  242. ***************
  243. *** 170,172 ****
  244.       sprintf(infostring, "radio:S:%s:%d:%d:%s:%ld:",
  245. !         name, port, transmitting, logfile, age);
  246.       n = strlen(infostring);
  247. --- 175,177 ----
  248.       sprintf(infostring, "radio:S:%s:%d:%d:%s:%ld:",
  249. !         name, 0xffff & port, transmitting, logfile, age);
  250.       n = strlen(infostring);
  251. ***************
  252. *** 199,201 ****
  253.   {
  254. -     char *broadcastaddr = NULL;
  255.       char real_buf[HEADERSIZE + 3 + BUFFERSIZE];
  256. --- 204,205 ----
  257. ***************
  258. *** 309,311 ****
  259.   
  260. !     s = opensock("data", (char *)NULL, SENDPORT, (char *)NULL, 0, 1);
  261.   
  262. --- 313,317 ----
  263.   
  264. !     s = opensock("data", (char *)NULL, 0, (char *)NULL, 0, 1);
  265. !     if (s < 0)
  266. !         exit(1);
  267.   
  268. ***************
  269. *** 316,318 ****
  270.                   "%s: bad broadcast address '%s'\n",
  271. !                 progname, broadcastaddr);
  272.               exit(2);
  273. --- 322,324 ----
  274.                   "%s: bad broadcast address '%s'\n",
  275. !                 progname, DEFMCAST);
  276.               exit(2);
  277. ***************
  278. *** 335,337 ****
  279.                       "%s: bad broadcast address '%s'\n",
  280. !                     progname, broadcastaddr);
  281.                   exit(2);
  282. --- 341,343 ----
  283.                       "%s: bad broadcast address '%s'\n",
  284. !                     progname, argv[optind]);
  285.                   exit(2);
  286. ***************
  287. *** 356,357 ****
  288. --- 362,365 ----
  289.       ctls = opensock("control", (char *)NULL, ctlport, (char *)NULL, 0, 0);
  290. +     if (ctls < 0)
  291. +         exit(1);
  292.   
  293. ***************
  294. *** 368,369 ****
  295. --- 376,381 ----
  296.   #endif
  297. + #ifdef __hpux
  298. +             Audio_filehdr hp;
  299. +             fread((char *) &hp, sizeof(Audio_filehdr), 1, stdin);
  300. + #endif
  301.           }
  302. ***************
  303. *** 372,373 ****
  304. --- 384,390 ----
  305.   
  306. + #ifdef    __hpux
  307. +     n = rtprio(0, 50);
  308. +     if (n == -1) perror("rtprio");
  309. + #endif
  310. + 
  311.       real_buf[0] = AUDIO_TYPE;
  312. ***************
  313. *** 514,516 ****
  314.                       strncmp(buf, "radio:s", 7) == 0) {
  315. !                     sendinfo(ctls, &ctlsin, ctlsinsize);
  316.                   }
  317. --- 531,534 ----
  318.                       strncmp(buf, "radio:s", 7) == 0) {
  319. !                     sendinfo(ctls, &ctlsin, ctlsinsize,
  320. !                          dftport);
  321.                   }
  322. ***************
  323. *** 570,574 ****
  324.   
  325. !     tsleep =  ((double) bytes/(double) rate) * 1000000
  326. !         - ((tnow.tv_sec - tstart.tv_sec) * 1000000
  327. !                     + tnow.tv_usec - tstart.tv_usec);
  328.       if (tsleep > 0) {
  329. --- 588,592 ----
  330.   
  331. !     tsleep =  ((double) bytes/(double) rate
  332. !                - (tnow.tv_sec - tstart.tv_sec)) * 1000000
  333. !               + (tnow.tv_usec - tstart.tv_usec);
  334.       if (tsleep > 0) {
  335. *** pl3/broadcast.man    Fri May  7 16:29:00 1993
  336. --- ./broadcast.man    Mon May 10 10:20:36 1993
  337. ***************
  338. *** 56,58 ****
  339.   packets through.
  340. ! Each transmission station should run on a different host though.
  341.   .SH OPTIONS
  342. --- 56,60 ----
  343.   packets through.
  344. ! Multiple transmission stations may reside on the same host, but on some
  345. ! systems they need to have different control ports specified with the
  346. ! \-c option.
  347.   .SH OPTIONS
  348. ***************
  349. *** 86,90 ****
  350.   Note that this option only has an effect if your machine supports multicasts
  351. ! and you specify a multicast address with the 
  352. ! .B \-b
  353. ! option.
  354.   .TP 10
  355. --- 88,91 ----
  356.   Note that this option only has an effect if your machine supports multicasts
  357. ! and you specify a multicast address to send to (or the default is a
  358. ! multicast address).
  359.   .TP 10
  360. *** pl3/radio.c    Fri May  7 16:29:02 1993
  361. --- ./radio.c    Tue May 11 16:40:00 1993
  362. ***************
  363. *** 103,104 ****
  364. --- 103,117 ----
  365.   #endif /* USE_SUN */
  366. + 
  367. + #ifdef USE_HP
  368. + #include <netinet/tcp.h>
  369. + #include <sys/audio.h>
  370. + 
  371. + int        one = 1;
  372. + int        interruptable = 1;
  373. + long        status;
  374. + int        external = 0;
  375. + FILE        *astream = NULL, *wstream = NULL;
  376. + 
  377. + #undef        index
  378. + #endif /* USE_HP */
  379.     
  380. ***************
  381. *** 172,174 ****
  382.       int s, ctls, curs;
  383. !     struct sockaddr from;
  384.       int fromlen;
  385. --- 185,187 ----
  386.       int s, ctls, curs;
  387. !     struct sockaddr_in from;
  388.       int fromlen;
  389. ***************
  390. *** 182,183 ****
  391. --- 195,197 ----
  392.       char *remotename = (char *) NULL;
  393. +     struct sockaddr_in remoteaddr;
  394.       struct timeval timeout;
  395. ***************
  396. *** 185,186 ****
  397. --- 199,203 ----
  398.       struct adpcm_state state;
  399. + #ifdef USE_HP
  400. +     int        pcnt;
  401. + #endif /* USE_HP */
  402.   #ifdef USE_AL
  403. ***************
  404. *** 207,209 ****
  405.   /* Always change these two macros and the following switch together! */
  406. ! #define OPTIONS "c:dfl:m:np:r:stv:"
  407.   #define USAGE "usage: %s [options]\n\
  408. --- 224,226 ----
  409.   /* Always change these two macros and the following switch together! */
  410. ! #define OPTIONS "c:dfl:m:np:r:stv:x"
  411.   #define USAGE "usage: %s [options]\n\
  412. ***************
  413. *** 243,244 ****
  414. --- 260,267 ----
  415.               remotename = optarg;
  416. +             if (setipaddr(remotename, &remoteaddr) < 0) {
  417. +                 fprintf(stderr,
  418. +                     "radio: %s: bad remote name\n",
  419. +                     remotename);
  420. +                 exit(2);
  421. +             }
  422.               break;
  423. ***************
  424. *** 255,257 ****
  425.           case 'n':
  426. ! #ifdef USE_SUN
  427.               interruptable = 0;
  428. --- 278,280 ----
  429.           case 'n':
  430. ! #if defined(USE_SUN) || defined(USE_HP)
  431.               interruptable = 0;
  432. ***************
  433. *** 275,276 ****
  434. --- 298,305 ----
  435.               break;
  436. +         case 'x':
  437. + #if defined(USE_HP)
  438. +             external = -1;
  439. + #else
  440. +             fprintf(stderr, "(-x not supported here)\n");
  441. + #endif
  442.           }
  443. ***************
  444. *** 303,306 ****
  445.           ctls = -1;
  446.   
  447. -     s = opensock("data", localname, receiveport, remotename, SENDPORT, 0);
  448.   #ifdef HAVE_MCAST
  449. --- 332,337 ----
  450.           ctls = -1;
  451. +     s = opensock("data", localname, receiveport, (char *)NULL, 0, 0);
  452. +     if (s < 0)
  453. +         exit(1);
  454.   
  455.   #ifdef HAVE_MCAST
  456. ***************
  457. *** 313,314 ****
  458. --- 344,348 ----
  459.       packetcount = 0;
  460. + #ifdef USE_HP
  461. +     pcnt = 0;
  462. + #endif
  463.   
  464. ***************
  465. *** 321,323 ****
  466.               FD_ZERO(&inputset);
  467. !             FD_SET(s, &inputset);
  468.               if (ctls >= 0)
  469. --- 355,358 ----
  470.               FD_ZERO(&inputset);
  471. !             if (s >= 0)
  472. !                 FD_SET(s, &inputset);
  473.               if (ctls >= 0)
  474. ***************
  475. *** 347,349 ****
  476.           n = recvfrom(curs, buf, HEADERSIZE + BUFFERSIZE, 0,
  477. !                  &from, &fromlen);
  478.           if (n <= 0) {
  479. --- 382,384 ----
  480.           n = recvfrom(curs, buf, HEADERSIZE + BUFFERSIZE, 0,
  481. !                  (struct stockaddr *)&from, &fromlen);
  482.           if (n <= 0) {
  483. ***************
  484. *** 369,371 ****
  485.                   if (pdebug)
  486. !                     fprintf(stderr, "control packet\n");
  487.                   switch(buf[6]) {
  488. --- 404,407 ----
  489.                   if (pdebug)
  490. !                     fprintf(stderr,
  491. !                         "control packet: '%s'\n", buf);
  492.                   switch(buf[6]) {
  493. ***************
  494. *** 377,381 ****
  495.                   case 'S':    /* Status from broadcast */
  496. -                     if (pdebug)
  497. -                         fprintf(stderr,
  498. -                             "Status %s\n", buf);
  499.                       break;
  500. --- 413,414 ----
  501. ***************
  502. *** 396,400 ****
  503.                       close(s);
  504. !                     s = opensock("new data", localname,
  505. !                              receiveport, remotename,
  506. !                              SENDPORT, 0);
  507.   #ifdef HAVE_MCAST
  508. --- 429,439 ----
  509.                       close(s);
  510. !                     s = opensock("new data",
  511. !                                  localname, receiveport,
  512. !                                  (char *)NULL, 0, 0);
  513. !                     /*
  514. !                      * ignore ports that we cannot reveive
  515. !                      * on (e.g., because of permissions).
  516. !                      */
  517. !                     if (s < 0)
  518. !                         break;
  519.   #ifdef HAVE_MCAST
  520. ***************
  521. *** 408,411 ****
  522.                       sprintf(buf, "radio:I:%d:%d:%s.%d",
  523. !                         !pausing, receiveport,
  524.                           VERSION, PATCHLEVEL);
  525.                       sendto(curs, buf, strlen(buf), 0,
  526. --- 447,454 ----
  527.                       sprintf(buf, "radio:I:%d:%d:%s.%d",
  528. !                         !pausing, 0xffff&receiveport,
  529.                           VERSION, PATCHLEVEL);
  530. +                     if (pdebug)
  531. +                         fprintf(stderr,
  532. +                             "sending info '%s'\n",
  533. +                             buf);
  534.                       sendto(curs, buf, strlen(buf), 0,
  535. ***************
  536. *** 441,443 ****
  537.           }
  538. !         else if (!pausing) {
  539.               encoding = PCM_64;
  540. --- 484,492 ----
  541.           }
  542. !         else if (!pausing &&
  543. !              /*
  544. !               * filter out any packets we're not interested in
  545. !               */
  546. !              (!remotename ||
  547. !               from.sin_addr.s_addr == remoteaddr.sin_addr.s_addr)) 
  548. {
  549. ! 
  550.               encoding = PCM_64;
  551. ***************
  552. *** 577,578 ****
  553. --- 626,640 ----
  554.   #endif /* USE_AF */
  555. + #ifdef USE_HP
  556. +             if (!filter) {
  557. +                 ++pcnt;
  558. +                 if (fwrite(buf, 1, n, wstream) != n) {
  559. +                     perror("fwrite wstream");
  560. +                     break;
  561. +                 }
  562. +                 if (pcnt == PCKWIN) {
  563. +                     fclose(wstream);
  564. +                     wstream = astream;
  565. +                 }
  566. +             }
  567. + #endif /* USE_HP */
  568.               if (filter || tee) {
  569. ***************
  570. *** 656,658 ****
  571.   
  572. - 
  573.   #ifdef USE_SUN
  574. --- 718,719 ----
  575. ***************
  576. *** 725,727 ****
  577. --- 786,830 ----
  578.   
  579. + 
  580.   #endif /* USE_SUN */
  581. + 
  582. + #ifdef USE_HP
  583. + 
  584. + void open_speaker()
  585. + {    
  586. +     struct audio_gains ag;
  587. +     int        streamSocket;
  588. +     long        gain;
  589. +     char        buf[80];
  590. +     char        *p;
  591. + 
  592. +     p = (external ? "/dev/audioEU" : "/dev/audioIU");
  593. +     astream = fopen(p, "w");
  594. +     if (astream == NULL) {
  595. +         perror("fopen: /dev/audioIU");
  596. +         exit(1);
  597. +     }
  598. + 
  599. +     if (volume >= 0) {        /* user has specified a volume... */
  600. +         if (ioctl(fileno(astream), AUDIO_GET_GAINS, &ag) < 0)
  601. +             perror("ioctl: AUDIO_GET_GAINS");
  602. + 
  603. +         ag.transmit_gain = ((volume *
  604. +                      (AUDIO_MAX_GAIN - AUDIO_OFF_GAIN))
  605. +                     / 100) + AUDIO_OFF_GAIN;
  606. + 
  607. +         if (ioctl(fileno(astream), AUDIO_SET_GAINS, &ag) < 0)
  608. +             perror("ioctl: AUDIO_SET_GAINS");
  609. +     }
  610. + 
  611. +     wstream = fdopen(dup(fileno(astream)), "w");
  612. + 
  613. +     setvbuf(astream, NULL, _IONBF, 0);
  614. +     setvbuf(wstream, NULL, _IOFBF, BUFFERSIZE * PCKWIN);
  615. + }
  616. + 
  617. + void close_speaker()
  618. + {
  619. +     fclose(astream);
  620. + }
  621. + #endif /* USE_HP */
  622.   
  623. *** pl3/radio.h    Fri May  7 16:29:02 1993
  624. --- ./radio.h    Mon May 10 21:30:44 1993
  625. ***************
  626. *** 29,31 ****
  627.   #define RCVPORT            54321
  628. - #define SENDPORT        54318
  629.   #define INFOPORT        54317
  630. --- 29,30 ----
  631. ***************
  632. *** 75,76 ****
  633. --- 74,82 ----
  634.   #define USE_NX
  635. + #endif
  636. + 
  637. + #ifdef    __hpux
  638. + #define    USE_HP
  639. + /* #define UseAAPI */        /* No good */
  640. + #define    CHECK_X_SERVER
  641. + #define    PCKWIN        5
  642.   #endif
  643. *** pl3/radio.man    Fri May  7 16:29:02 1993
  644. --- ./radio.man    Sat May  8 23:13:39 1993
  645. ***************
  646. *** 85,89 ****
  647.   Multicast group.
  648. ! This only makes sense if the same multicast group is passed to the
  649. ! .B \-b
  650. ! option of
  651.   .IR broadcast (1).
  652. --- 85,87 ----
  653.   Multicast group.
  654. ! This only makes sense if the same multicast group is passed as address to
  655.   .IR broadcast (1).
  656. *** pl3/socklib.c    Fri May  7 16:29:03 1993
  657. --- ./socklib.c    Mon May 10 09:44:07 1993
  658. ***************
  659. *** 54,56 ****
  660.           perror(desc);
  661. !         exit(1);
  662.       }
  663. --- 54,56 ----
  664.           perror(desc);
  665. !         return -1;
  666.       }
  667. ***************
  668. *** 81,83 ****
  669.           perror(desc);
  670. !         exit(1);
  671.       }
  672. --- 81,84 ----
  673.           perror(desc);
  674. !         close(s);
  675. !         return -1;
  676.       }
  677. ***************
  678. *** 92,94 ****
  679.               perror(desc);
  680. !             exit(1);
  681.           }
  682. --- 93,96 ----
  683.               perror(desc);
  684. !             close(s);
  685. !             return -1;
  686.           }
  687. ***************
  688. *** 102,104 ****
  689.               perror(desc);
  690. !             exit(1);
  691.           }
  692. --- 104,107 ----
  693.               perror(desc);
  694. !             close(s);
  695. !             return -1;
  696.           }
  697.