home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 October / usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso / misc / volume22 / u386mon / patch01 < prev    next >
Text File  |  1991-08-16  |  18KB  |  570 lines
  1. Newsgroups: comp.sources.misc
  2. From: Warren Tucker <wht@n4hgf.Mt-Park.GA.US>
  3. Subject:  v22i023:  u386mon - Sys V Rel 3.x Performance Monitor rev 2.40, Patch01
  4. Message-ID: <1991Aug16.024410.16017@sparky.IMD.Sterling.COM>
  5. X-Md4-Signature: d3daaac3adfcf30de27294609648773c
  6. Date: Fri, 16 Aug 1991 02:44:10 GMT
  7. Approved: kent@sparky.imd.sterling.com
  8.  
  9. Submitted-by: Warren Tucker <wht@n4hgf.Mt-Park.GA.US>
  10. Posting-number: Volume 22, Issue 23
  11. Archive-name: u386mon/patch01
  12. Environment: SYSVR3
  13. Patch-To: u386mon: Volume 22, Issue 3-9
  14.  
  15. This patch fixes a bug where incorrect data is displayed for processes
  16. which are swapping and in the indeterminate state.  There is a moment in
  17. which u386mon can learn a process' U-area is on the swap file, go to
  18. read it and, lo, the process is being swapped back in.  I have a few
  19. sanity tests for that condition, but they cannot be foolproof.  Thanks
  20. to Andreas Jennen <aball.in-berlin.de> for pointing this out.
  21.  
  22. Also, Steve Alexander <stevea@i88.isc.com> reported the STREAMS and
  23. table additions work fine on ISC 2.2, so I have enabled them.
  24.  
  25. To use:
  26.  
  27. 1. cd to the u386mon source directory
  28. 2. unshar this file
  29. 3. read README.P1
  30.  
  31. #!/bin/sh
  32. # This is u386mon-2.40-patch1, a shell archive (shar 3.46)
  33. # made 08/14/1991 19:37 UTC by wht@n4hgf
  34. # Source directory /u1/src/unew
  35. #
  36. # existing files WILL be overwritten
  37. #
  38. # This shar contains:
  39. # length  mode       name
  40. # ------ ---------- ------------------------------------------
  41. #   1710 -rw-r--r-- README.P1
  42. #    220 -rw-r--r-- PATCH1.APPLY
  43. #  11965 -rw-r--r-- PATCH1.01
  44. #     53 -rw-r--r-- patchlevel.h
  45. #
  46. # ============= README.P1 ==============
  47. echo 'x - extracting README.P1 (Text)'
  48. sed 's/^X//' << 'SHAR_EOF' > 'README.P1' &&
  49. Xu386mon 2.40 - Patch 1 - Wed Aug 14 12:15:46 EDT 1991
  50. X
  51. XThe patch:
  52. X----------
  53. X
  54. XThis patch fixes a bug where incorrect data is displayed for processes
  55. Xwhich are swapping and in the indeterminate state.  There is a moment in
  56. Xwhich u386mon can learn a process' U-area is on the swap file, go to
  57. Xread it and, lo, the process is being swapped back in.  I have a few
  58. Xsanity tests for that condition, but they cannot be foolproof.  Thanks
  59. Xto Andreas Jennen <aball.in-berlin.de> for pointing this out.
  60. X
  61. XAlso, Steve Alexander <stevea@i88.isc.com> reported the STREAMS and
  62. Xtable additions work fine on ISC 2.2, so I have enabled them.
  63. X
  64. XI ran this version for four months pretty much constantly and thought it
  65. Xbug-free.  Right!  Hopefully, this will be the only bug fix patch for
  66. Xthis version ;-<.
  67. X
  68. XRather than issue a laboriously long patch to fix a booboo in the
  69. Xedit history of all ther sources, a script is provided to apply part 
  70. Xof the patch with the patch utility and part with sed.
  71. X
  72. XWhat you get out of it:
  73. X-----------------------
  74. X
  75. X1. All users get the benefit of no more corrupted displays during
  76. Xswapping.
  77. X
  78. X2. ISC users get the STREAMS and table display previously enabled only
  79. Xfor SCO and SVR31.
  80. X
  81. XTo apply the patch:
  82. X-------------------
  83. X
  84. X1. unshar this file in the u386mon source directory (which you probably
  85. Xhave already done if you are reading this).
  86. X
  87. X2. You may wish to look over PATCH1.APPLY before executing it.
  88. XIt will process all files matching *.[ch] and Make* in the current
  89. Xdirectory tree.  I believe this is a safe thing to do, but just so
  90. Xyou won't be surprised at the unconventional procedure, look it over.
  91. X
  92. X3. Type
  93. X       csh PATCH1.APPLY
  94. X
  95. X4. Type
  96. X       make
  97. X       su root
  98. X       make install
  99. SHAR_EOF
  100. chmod 0644 README.P1 ||
  101. echo 'restore of README.P1 failed'
  102. Wc_c="`wc -c < 'README.P1'`"
  103. test 1710 -eq "$Wc_c" ||
  104.     echo 'README.P1: original size 1710, current size' "$Wc_c"
  105. # ============= PATCH1.APPLY ==============
  106. echo 'x - extracting PATCH1.APPLY (Text)'
  107. sed 's/^X//' << 'SHAR_EOF' > 'PATCH1.APPLY' &&
  108. X#!/bin/csh
  109. Xpatch -p < PATCH1.01
  110. Xforeach i( `find . -name '*.[ch]' -print;find . -name 'Make*' -print` )
  111. Xecho fixing edit history in $i
  112. Xsed -e 's/release 3.40/release 2.40/' < $i > /tmp/kludge.$$
  113. Xmv /tmp/kludge.$$ $i
  114. Xend
  115. SHAR_EOF
  116. chmod 0644 PATCH1.APPLY ||
  117. echo 'restore of PATCH1.APPLY failed'
  118. Wc_c="`wc -c < 'PATCH1.APPLY'`"
  119. test 220 -eq "$Wc_c" ||
  120.     echo 'PATCH1.APPLY: original size 220, current size' "$Wc_c"
  121. # ============= PATCH1.01 ==============
  122. echo 'x - extracting PATCH1.01 (Text)'
  123. sed 's/^X//' << 'SHAR_EOF' > 'PATCH1.01' &&
  124. X:
  125. X#-------------------------------------------------------
  126. X# PATCH1.01
  127. X# Swapping Process Bug + ISC Upgrade
  128. X# created by gendiff x1.03 on 14 Aug 1991 19:31 UTC
  129. X#-------------------------------------------------------
  130. X*** /u1/src/u386mon/det_proc.c    Wed Aug 14 15:26:10 1991
  131. X--- det_proc.c    Wed Aug 14 15:30:46 1991
  132. X***************
  133. X*** 20,25
  134. X  
  135. X  --------------------------------------------------------------------------*/
  136. X  /*+:EDITS:*/
  137. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  138. X  /*:02-14-1991-11:26-martin@hppcmart-Whittle procs with no cpu time*/
  139. X  /*:08-10-1990-14:12-jmd@p1so/wht@n4hgf-2.20-add Tandem Integrity S2 */
  140. X
  141. X--- 20,26 -----
  142. X  
  143. X  --------------------------------------------------------------------------*/
  144. X  /*+:EDITS:*/
  145. X+ /*:08-11-1991-13:58-root@n4hgf-keep bogus numbers from polluting display */
  146. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  147. X  /*:02-14-1991-11:26-martin@hppcmart-Whittle procs with no cpu time*/
  148. X  /*:08-10-1990-14:12-jmd@p1so/wht@n4hgf-2.20-add Tandem Integrity S2 */
  149. X***************
  150. X*** 587,592
  151. X  static char timestr[10];
  152. X  time_t mm,ss;
  153. X  extern int hz;
  154. X  
  155. X      ticks /= hz;
  156. X      mm = ticks / 60L;
  157. X
  158. X--- 588,596 -----
  159. X  static char timestr[10];
  160. X  time_t mm,ss;
  161. X  extern int hz;
  162. X+ 
  163. X+     if(ticks < 0)        /* keep bogus numbers from polluting display */
  164. X+         return("------");
  165. X  
  166. X      ticks /= hz;
  167. X      mm = ticks / 60L;
  168. X*** /u1/src/u386mon/detail.c    Wed Aug 14 15:26:10 1991
  169. X--- detail.c    Wed Aug 14 15:30:50 1991
  170. X***************
  171. X*** 19,24
  172. X  
  173. X  --------------------------------------------------------------------------*/
  174. X  /*+:EDITS:*/
  175. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  176. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  177. X  /*:04-16-1991-16:51-martin@hppcmart-Fix display problems */
  178. X
  179. X--- 19,25 -----
  180. X  
  181. X  --------------------------------------------------------------------------*/
  182. X  /*+:EDITS:*/
  183. X+ /*:08-14-1991-13:04-wht@n4hgf-STREAMS and table works for ISC 2.2 */
  184. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  185. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  186. X  /*:04-16-1991-16:51-martin@hppcmart-Fix display problems */
  187. X***************
  188. X*** 171,178
  189. X  }    /* end of detpanel_extra_update */
  190. X  
  191. X  /*+-------------------------------------------------------------------------
  192. X!     detpanel_streams_init()
  193. X!     SCO only streams stats
  194. X  --------------------------------------------------------------------------*/
  195. X  #if defined(M_UNIX) || defined(SVR31)
  196. X  void
  197. X
  198. X--- 172,178 -----
  199. X  }    /* end of detpanel_extra_update */
  200. X  
  201. X  /*+-------------------------------------------------------------------------
  202. X!     detpanel_streams_init() - streams stats
  203. X  --------------------------------------------------------------------------*/
  204. X  #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  205. X  void
  206. X***************
  207. X*** 174,180
  208. X      detpanel_streams_init()
  209. X      SCO only streams stats
  210. X  --------------------------------------------------------------------------*/
  211. X! #if defined(M_UNIX) || defined(SVR31)
  212. X  void
  213. X  detpanel_streams_init()
  214. X  {
  215. X
  216. X--- 174,180 -----
  217. X  /*+-------------------------------------------------------------------------
  218. X      detpanel_streams_init() - streams stats
  219. X  --------------------------------------------------------------------------*/
  220. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  221. X  void
  222. X  detpanel_streams_init()
  223. X  {
  224. X***************
  225. X*** 245,251
  226. X      detpanel_table_init()
  227. X      SCO only table stats
  228. X  --------------------------------------------------------------------------*/
  229. X! #if defined(M_UNIX) || defined(SVR31)
  230. X  void
  231. X  detpanel_table_init()
  232. X  {
  233. X
  234. X--- 245,251 -----
  235. X      detpanel_table_init()
  236. X      SCO only table stats
  237. X  --------------------------------------------------------------------------*/
  238. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  239. X  void
  240. X  detpanel_table_init()
  241. X  {
  242. X***************
  243. X*** 373,379
  244. X              detpanel_type = DPT_EXTRA;
  245. X              break;
  246. X  
  247. X! #if defined(M_UNIX) || defined(SVR31)
  248. X          case 'n':
  249. X              if(detpanel_type == DPT_STREAMS)
  250. X                  break;
  251. X
  252. X--- 373,379 -----
  253. X              detpanel_type = DPT_EXTRA;
  254. X              break;
  255. X  
  256. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  257. X          case 'n':
  258. X              if(detpanel_type == DPT_STREAMS)
  259. X                  break;
  260. X***************
  261. X*** 435,441
  262. X              detpanel_sio_update();
  263. X              break;
  264. X  #endif
  265. X! #if defined(M_UNIX) || defined (SYSVR31)
  266. X          case DPT_STREAMS:
  267. X              detpanel_streams_update();
  268. X              break;
  269. X
  270. X--- 435,441 -----
  271. X              detpanel_sio_update();
  272. X              break;
  273. X  #endif
  274. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  275. X          case DPT_STREAMS:
  276. X              detpanel_streams_update();
  277. X              break;
  278. X***************
  279. X*** 458,464
  280. X  detail_init()
  281. X  {
  282. X      det_proc_init();    /* see det_proc.c */
  283. X! #if defined(M_UNIX) || defined(SVR31)
  284. X      init_stream();
  285. X      init_table();
  286. X  #ifdef SCO322
  287. X
  288. X--- 458,464 -----
  289. X  detail_init()
  290. X  {
  291. X      det_proc_init();    /* see det_proc.c */
  292. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  293. X      init_stream();
  294. X      init_table();
  295. X  #ifdef SCO322
  296. X*** /u1/src/u386mon/nlsym.h    Wed Aug 14 15:26:34 1991
  297. X--- nlsym.h    Wed Aug 14 15:31:05 1991
  298. X***************
  299. X*** 9,14
  300. X  
  301. X  --------------------------------------------------------------------------*/
  302. X  /*+:EDITS:*/
  303. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  304. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  305. X  /*:04-16-1991-02:25-martin@hppcmart additions for SCO 3.2.2 */
  306. X
  307. X--- 9,15 -----
  308. X  
  309. X  --------------------------------------------------------------------------*/
  310. X  /*+:EDITS:*/
  311. X+ /*:08-14-1991-13:04-wht@n4hgf-STREAMS and table works for ISC 2.2 */
  312. X  /*:08-01-1991-23:34-wht@n4hgf-release 3.40 source control point */
  313. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  314. X  /*:04-16-1991-02:25-martin@hppcmart additions for SCO 3.2.2 */
  315. X***************
  316. X*** 102,108
  317. X  #if defined(M_UNIX)
  318. X  #define Nindex_SIO_TTY             68
  319. X  #endif
  320. X! #if defined(M_UNIX) || defined(SVR31)
  321. X  #define Nindex_STRST           69
  322. X  #define Nindex_RBSIZE           70
  323. X  #define Nindex_NMBLOCK           71
  324. X
  325. X--- 103,109 -----
  326. X  #if defined(M_UNIX)
  327. X  #define Nindex_SIO_TTY             68
  328. X  #endif
  329. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  330. X  #define Nindex_STRST           69
  331. X  #define Nindex_RBSIZE           70
  332. X  #define Nindex_NMBLOCK           71
  333. X***************
  334. X*** 132,138
  335. X  #if defined(M_UNIX)
  336. X  #define sio_ttyaddr (nlsym[Nindex_SIO_TTY].n_value)
  337. X  #endif
  338. X! #if defined(M_UNIX) || defined(SVR31)
  339. X  #define strstaddr (nlsym[Nindex_STRST].n_value)
  340. X  #define rbsizeaddr (nlsym[Nindex_RBSIZE].n_value)
  341. X  #define nmblockaddr (nlsym[Nindex_NMBLOCK].n_value)
  342. X
  343. X--- 133,139 -----
  344. X  #if defined(M_UNIX)
  345. X  #define sio_ttyaddr (nlsym[Nindex_SIO_TTY].n_value)
  346. X  #endif
  347. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  348. X  #define strstaddr (nlsym[Nindex_STRST].n_value)
  349. X  #define rbsizeaddr (nlsym[Nindex_RBSIZE].n_value)
  350. X  #define nmblockaddr (nlsym[Nindex_NMBLOCK].n_value)
  351. X***************
  352. X*** 144,150
  353. X  #define ractiveaddr (nlsym[Nindex_RACTIVE].n_value)
  354. X  #define cfreecntaddr (nlsym[Nindex_CFREECNT].n_value)
  355. X  #define calloutaddr (nlsym[Nindex_CALLOUT].n_value)
  356. X! #endif /* defined(M_UNIX) || defined(SVR31) */
  357. X  #ifdef SCO322
  358. X  #define flstatsaddr (nlsym[Nindex_FLSTATS].n_value)
  359. X  #define wd1010statsaddr (nlsym[Nindex_WD1010STATS].n_value)
  360. X
  361. X--- 145,151 -----
  362. X  #define ractiveaddr (nlsym[Nindex_RACTIVE].n_value)
  363. X  #define cfreecntaddr (nlsym[Nindex_CFREECNT].n_value)
  364. X  #define calloutaddr (nlsym[Nindex_CALLOUT].n_value)
  365. X! #endif /* defined(M_UNIX) || defined(SVR31) || defined(ISC22) */
  366. X  #ifdef SCO322
  367. X  #define flstatsaddr (nlsym[Nindex_FLSTATS].n_value)
  368. X  #define wd1010statsaddr (nlsym[Nindex_WD1010STATS].n_value)
  369. X***************
  370. X*** 234,240
  371. X  #else
  372. X      { "spl" },
  373. X  #endif
  374. X! #if defined(M_UNIX) || defined(SVR31)
  375. X      { "strst" },
  376. X      { "rbsize" },
  377. X      { "nmblock" },
  378. X
  379. X--- 235,241 -----
  380. X  #else
  381. X      { "spl" },
  382. X  #endif
  383. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  384. X      { "strst" },
  385. X      { "rbsize" },
  386. X      { "nmblock" },
  387. X*** /u1/src/u386mon/u386mon.c    Wed Aug 14 15:26:08 1991
  388. X--- u386mon.c    Wed Aug 14 15:31:11 1991
  389. X***************
  390. X*** 1,4
  391. X! char *revision = "3.40";
  392. X  /*+-------------------------------------------------------------------------
  393. X      u386mon.c - UNIX 386 (and other) system monitor
  394. X      wht@n4hgf.Mt-Park.GA.US and many others
  395. X
  396. X--- 1,4 -----
  397. X! char *revision = "3.4";
  398. X  /*+-------------------------------------------------------------------------
  399. X      u386mon.c - UNIX 386 (and other) system monitor
  400. X      wht@n4hgf.Mt-Park.GA.US and many others
  401. X***************
  402. X*** 38,43
  403. X  
  404. X  --------------------------------------------------------------------------*/
  405. X  /*+:EDITS:*/
  406. X  /*:08-01-1991-23:35-wht@n4hgf-release 3.40 source control point */
  407. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  408. X  /*:05-14-1991-06:11-root@n4hgf-evidently a fast cpu gets 0 cpu sometimes :-) */
  409. X
  410. X--- 38,45 -----
  411. X  
  412. X  --------------------------------------------------------------------------*/
  413. X  /*+:EDITS:*/
  414. X+ /*:08-14-1991-13:04-wht@n4hgf-STREAMS and table works for ISC 2.2 */
  415. X+ /*:08-11-1991-14:05-root@n4hgf-use PATCHLEVEL */
  416. X  /*:08-01-1991-23:35-wht@n4hgf-release 3.40 source control point */
  417. X  /*:05-15-1991-17:22-wht@n4hgf-2.3 patches for SVR31 from nba@sysware.dk */
  418. X  /*:05-14-1991-06:11-root@n4hgf-evidently a fast cpu gets 0 cpu sometimes :-) */
  419. X***************
  420. X*** 70,75
  421. X  /*:06-15-1990-18:32-wht@n4hgf-creation */
  422. X  
  423. X  #include "config.h"
  424. X  #define M_TERMINFO
  425. X  #include <curses.h>
  426. X  #undef timeout /* conflict in curses.h and bootinfo.h per trb@ima.ima.isc.com */
  427. X
  428. X--- 72,78 -----
  429. X  /*:06-15-1990-18:32-wht@n4hgf-creation */
  430. X  
  431. X  #include "config.h"
  432. X+ #include "patchlevel.h"
  433. X  #define M_TERMINFO
  434. X  #include <curses.h>
  435. X  #undef timeout /* conflict in curses.h and bootinfo.h per trb@ima.ima.isc.com */
  436. X***************
  437. X*** 796,802
  438. X          {
  439. X              case 'P':
  440. X              case 'p':
  441. X! #if defined(M_UNIX) || defined(SVR31)
  442. X              case 'n':
  443. X              case 't':
  444. X  #endif
  445. X
  446. X--- 799,805 -----
  447. X          {
  448. X              case 'P':
  449. X              case 'p':
  450. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  451. X              case 'n':
  452. X              case 't':
  453. X  #endif
  454. X***************
  455. X*** 972,977
  456. X      waddstr(wscr,basename(*argv));
  457. X      waddch(wscr,(chtype)' ');
  458. X      waddstr(wscr,revision);
  459. X  
  460. X  #if defined(mips)
  461. X      waddstr(wscr,"/Tandem");
  462. X
  463. X--- 975,981 -----
  464. X      waddstr(wscr,basename(*argv));
  465. X      waddch(wscr,(chtype)' ');
  466. X      waddstr(wscr,revision);
  467. X+     wprintw(wscr,"%d",PATCHLEVEL);    /* good for nine patches */
  468. X  
  469. X  #if defined(mips)
  470. X      waddstr(wscr,"/Tandem");
  471. X***************
  472. X*** 1005,1011
  473. X      banner_free_x = x+2;
  474. X      while(x < getmaxx(wscr))
  475. X          waddch(wscr,(chtype)' '),x++;
  476. X!     wmove(wscr,0,71);
  477. X      waddstr(wscr,"wht@n4hgf");
  478. X      if(plock_indicator)
  479. X      {
  480. X
  481. X--- 1009,1015 -----
  482. X      banner_free_x = x+2;
  483. X      while(x < getmaxx(wscr))
  484. X          waddch(wscr,(chtype)' '),x++;
  485. X!     wmove(wscr,0,COLS - 9);
  486. X      waddstr(wscr,"wht@n4hgf");
  487. X      if(plock_indicator)
  488. X      {
  489. X***************
  490. X*** 1028,1034
  491. X  #if defined(M_UNIX)
  492. X      waddstr(wscr,"s=sio ");
  493. X  #endif
  494. X! #if defined(M_UNIX) || defined(SVR31)
  495. X      waddstr(wscr,"n=net t=table ");
  496. X  #endif
  497. X  #if defined(SCO322)
  498. X
  499. X--- 1032,1038 -----
  500. X  #if defined(M_UNIX)
  501. X      waddstr(wscr,"s=sio ");
  502. X  #endif
  503. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  504. X      waddstr(wscr,"n=net t=table ");
  505. X  #endif
  506. X  #if defined(SCO322)
  507. X***************
  508. X*** 1117,1123
  509. X  #endif
  510. X  
  511. X          lt = localtime(&now);
  512. X!         wmove(wscr,0,62);
  513. X          use_cp(wscr,cpBANNER);
  514. X          wprintw(wscr,"%02d:%02d:%02d",lt->tm_hour,lt->tm_min,lt->tm_sec);
  515. X  
  516. X
  517. X--- 1121,1127 -----
  518. X  #endif
  519. X  
  520. X          lt = localtime(&now);
  521. X!         wmove(wscr,0,COLS - 18);
  522. X          use_cp(wscr,cpBANNER);
  523. X          wprintw(wscr,"%02d:%02d:%02d",lt->tm_hour,lt->tm_min,lt->tm_sec);
  524. X  
  525. X***************
  526. X*** 1406,1412
  527. X                  case 'P':
  528. X                  case 'p':
  529. X                  case 'm':
  530. X! #if defined(M_UNIX) || defined(SVR31)
  531. X                  case 'n':
  532. X                  case 't':
  533. X  #endif
  534. X
  535. X--- 1410,1416 -----
  536. X                  case 'P':
  537. X                  case 'p':
  538. X                  case 'm':
  539. X! #if defined(M_UNIX) || defined(SVR31) || defined(ISC22)
  540. X                  case 'n':
  541. X                  case 't':
  542. X  #endif
  543. SHAR_EOF
  544. chmod 0644 PATCH1.01 ||
  545. echo 'restore of PATCH1.01 failed'
  546. Wc_c="`wc -c < 'PATCH1.01'`"
  547. test 11965 -eq "$Wc_c" ||
  548.     echo 'PATCH1.01: original size 11965, current size' "$Wc_c"
  549. # ============= patchlevel.h ==============
  550. echo 'x - extracting patchlevel.h (Text)'
  551. sed 's/^X//' << 'SHAR_EOF' > 'patchlevel.h' &&
  552. X#define PATCHLEVEL 1 /* scheme good for 9 patches */
  553. SHAR_EOF
  554. chmod 0644 patchlevel.h ||
  555. echo 'restore of patchlevel.h failed'
  556. Wc_c="`wc -c < 'patchlevel.h'`"
  557. test 53 -eq "$Wc_c" ||
  558.     echo 'patchlevel.h: original size 53, current size' "$Wc_c"
  559. exit 0
  560. ----------------------------------------------------------------------------
  561. Warren Tucker, TuckerWare         emory!n4hgf!wht or wht@n4hgf.Mt-Park.GA.US
  562. "I was 35 years old before I knew a pie was meant to be eaten." - Moe Howard
  563.  
  564. exit 0 # Just in case...
  565. -- 
  566. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  567. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  568. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  569. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  570.