home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / misc / volume17 / freeze / patch01 < prev    next >
Internet Message Format  |  1991-03-30  |  14KB
  1. From: leo@s514.ipmce.su (Leonid A. Broukhis)
  2. Newsgroups: comp.sources.misc
  3. Subject: v17i074:  freeze - Freeze/Melt compression package, Patch01
  4. Message-ID: <1991Mar29.041629.17264@sparky.IMD.Sterling.COM>
  5. Date: 29 Mar 91 04:16:29 GMT
  6. Approved: kent@sparky.imd.sterling.com
  7. X-Checksum-Snefru: 94bae9a7 0123dfe4 90e98f78 ff66c59c
  8.  
  9. Submitted-by: Leonid A. Broukhis <leo@s514.ipmce.su>
  10. Posting-number: Volume 17, Issue 74
  11. Archive-name: freeze/patch01
  12. Patch-To: freeze: Volume 17, Issue 67-68
  13.  
  14. Some bug fixes (endianness dependency), improvements:
  15.  
  16. freeze ... +numlist .... is now allowed. Numlist is 8 numbers
  17. (as in /etc/default/freeze) seperated by commas, for example
  18. freeze +0,1,1,1,4,10,27,18 ....
  19.  
  20. *** ../distribution/encode.c    Wed Mar 27 20:44:42 1991
  21. --- encode.c    Wed Mar 27 16:18:27 1991
  22. ***************
  23. *** 2,14 ****
  24.   
  25.   #include "lz.h"
  26.   
  27. - extern hash_t prev[];
  28. - #ifdef __XENIX__
  29. - extern u_short *next[];
  30. - #else
  31. - extern u_short next[];
  32. - #endif
  33. - 
  34.   /*
  35.    * freeze stdin to stdout
  36.    */
  37. --- 2,7 ----
  38. *** ../distribution/freeze.1    Wed Mar 27 20:44:43 1991
  39. --- freeze.1    Wed Mar 27 21:21:32 1991
  40. ***************
  41. *** 93,104 ****
  42.   .I melt
  43.   (all files are unpacked and written to stdout).
  44.   .PP
  45. ! Type is a token preceded by a '+', which defines the type
  46.   of following files in the command string. An explicite definition
  47.   of the file's type can give up to 2% of additional compression.
  48.   The list of types is stored in file
  49.   .IR /etc/default/freeze .
  50. ! Types may be abbreviated while not ambigious.
  51.   .PP
  52.   .I Freeze
  53.   uses the Lempel-Ziv algorithm on the first pass and the dynamic
  54. --- 93,108 ----
  55.   .I melt
  56.   (all files are unpacked and written to stdout).
  57.   .PP
  58. ! .I Type
  59. ! is a token preceded by a '+', which defines the type
  60.   of following files in the command string. An explicite definition
  61.   of the file's type can give up to 2% of additional compression.
  62.   The list of types is stored in file
  63.   .IR /etc/default/freeze .
  64. ! Types may be abbreviated while not ambigious. You can also determine
  65. ! values for the static Huffman table by using a list of 8 numbers
  66. ! separated by commas instead of
  67. ! .I type.
  68.   .PP
  69.   .I Freeze
  70.   uses the Lempel-Ziv algorithm on the first pass and the dynamic
  71. ***************
  72. *** 146,159 ****
  73.   .SH "SEE ALSO"
  74.   compact(1), pack(1), compress(1)
  75.   .SH "DIAGNOSTICS"
  76. - Usage: freeze [-cdfvV] [file ...]
  77. - .in +8
  78. - Invalid options were specified on the command line.
  79. - .in -8
  80.   Unknown flag: 
  81.   .I "\'x\';"
  82.   .in +8
  83. ! Invalid flags were specified on the command line.
  84.   .in -8
  85.   .IR file :
  86.   not in frozen format
  87. --- 150,160 ----
  88.   .SH "SEE ALSO"
  89.   compact(1), pack(1), compress(1)
  90.   .SH "DIAGNOSTICS"
  91.   Unknown flag: 
  92.   .I "\'x\';"
  93. + Usage: freeze [-cdfvV] [file|+type ...]
  94.   .in +8
  95. ! Invalid options were specified on the command line.
  96.   .in -8
  97.   .IR file :
  98.   not in frozen format
  99. ***************
  100. *** 224,229 ****
  101. --- 225,243 ----
  102.   .in +8
  103.   This message indicates a successful switching to
  104.   position table for mentioned file type.
  105. + .in -8
  106. + "
  107. + .I xxx
  108. + " - no such file type
  109. + .in +8
  110. + or
  111. + .in -8
  112. + .I xxx
  113. + - a list of 8 numbers expected
  114. + .in +8
  115. + This message means the given file type does not exist or
  116. + the given string contains a comma, but is not a valid list
  117. + of values for static Huffman table.
  118.   .in -8
  119.   melt: corrupt input
  120.   .in +8
  121. *** ../distribution/freeze.c    Wed Mar 27 20:44:45 1991
  122. --- freeze.c    Thu Mar 28 14:31:19 1991
  123. ***************
  124. *** 1,6 ****
  125. --- 1,7 ----
  126.   #include "freeze.h"
  127.   #include "lz.h"
  128.   #include "huf.h"
  129. + #include "patchlevel.h"
  130.   
  131.   /*
  132.    * Freeze - data freezing program
  133. ***************
  134. *** 22,27 ****
  135. --- 23,30 ----
  136.    * Improved hash function (with tuning of hash-table)
  137.    * Version 2.1: Noticeable speedup: Insert_Node and Get_Next_Match
  138.    * are now separated.
  139. +  * Version 2.2: Tunable static Huffman table for position information,
  140. +  * this info may be given in the command string now.
  141.    */
  142.   
  143.   #ifdef COMPAT
  144. ***************
  145. *** 30,36 ****
  146.   uchar magic_header[] = { "\037\237" };      /* 1F 9F = freeze 1.X + 1 */
  147.   #endif
  148.   
  149. ! static char ident[] = "@(#) freeze.c 2.1 Alpha 3/21/91 leo@s514.ipmce.su";
  150.   
  151.   #define ARGVAL() (*++(*argv) || (--argc && *++argv))
  152.   
  153. --- 33,39 ----
  154.   uchar magic_header[] = { "\037\237" };      /* 1F 9F = freeze 1.X + 1 */
  155.   #endif
  156.   
  157. ! static char ident[] = "@(#) freeze.c 2.2.%d Alpha 3/27/91 leo@s514.ipmce.su\n";
  158.   
  159.   #define ARGVAL() (*++(*argv) || (--argc && *++argv))
  160.   
  161. ***************
  162. *** 684,690 ****
  163.   
  164.   version()
  165.   {
  166. !     fprintf(stderr, "%s\n", ident);
  167.       fprintf(stderr, "Options: ");
  168.   #ifdef DEBUG
  169.       fprintf(stderr, "DEBUG, ");
  170. --- 687,693 ----
  171.   
  172.   version()
  173.   {
  174. !     fprintf(stderr, ident, PATCHLEVEL);
  175.       fprintf(stderr, "Options: ");
  176.   #ifdef DEBUG
  177.       fprintf(stderr, "DEBUG, ");
  178. ***************
  179. *** 717,748 ****
  180.   {
  181.       extern char * defread();
  182.       register char *s = defread(type), *t;
  183. !     static short v[8];
  184. !     int i;
  185.       if(!s) {
  186. !         if(!quiet)
  187. !             fprintf(stderr, "\"%s\" - no such file type\n", type);
  188. !         exit(1);
  189. !     }
  190. ! 
  191. !     if(!(t = rindex(s, '='))) {
  192. !         if(!quiet)
  193. !             fprintf(stderr, "\"%s\" - invalid entry\n", type);
  194. !         exit(1);
  195.       }
  196. !     t++;
  197. !     if(sscanf(t, "%d %d %d %d %d %d %d %d",
  198. !         v, v+1, v+2, v+3, v+4, v+5, v+6, v+7) != 8) {
  199.           if(!quiet)
  200. !             fprintf(stderr, "\"%s\" - invalid entry\n", type);
  201.           exit(1);
  202.       }
  203.       for(i = 0; i < 8; i++)
  204.           Table[i+1] = v[i];
  205.       if(!quiet) {
  206. !         t = s;
  207. !         while(*s != '=' && *s != ' ' && *s != '\t') s++;
  208. !         *s = '\0';
  209.           fprintf(stderr, "Using \"%s%s\" type\n", type, t);
  210.       }
  211.   }
  212. --- 720,761 ----
  213.   {
  214.       extern char * defread();
  215.       register char *s = defread(type), *t;
  216. !     static int v[8];
  217. !     int i, is_list = 0;
  218.       if(!s) {
  219. !     /* try to consider 'type' as a list of values: n1,n2, ... */
  220. !         if(rindex(type, ','))
  221. !             is_list = 1;
  222. !         else {
  223. !             if (!quiet)
  224. !                 fprintf(stderr, "\"%s\" - no such file type\n", type);
  225. !             exit(1);
  226. !         }
  227. !         if(sscanf(type, "%d,%d,%d,%d,%d,%d,%d,%d",
  228. !             v, v+1, v+2, v+3, v+4, v+5, v+6, v+7) != 8) {
  229. !             if (!quiet)
  230. !                 fprintf(stderr,
  231. !                     "%s - a list of 8 numbers expected\n", type);
  232. !             exit(1);
  233. !         }
  234.       }
  235. !     if(!is_list && (!(t = rindex(s, '=')) ||
  236. !         sscanf(++t, "%d %d %d %d %d %d %d %d",
  237. !         v, v+1, v+2, v+3, v+4, v+5, v+6, v+7) != 8)) {
  238.           if(!quiet)
  239. !             fprintf(stderr,
  240. !                 "\"%s\" - invalid entry\n", type);
  241.           exit(1);
  242.       }
  243.       for(i = 0; i < 8; i++)
  244.           Table[i+1] = v[i];
  245.       if(!quiet) {
  246. !         if(!is_list) {
  247. !             t = s;
  248. !             while(*s != '=' && *s != ' ' && *s != '\t') s++;
  249. !             *s = '\0';
  250. !         } else
  251. !             t = "";
  252.           fprintf(stderr, "Using \"%s%s\" type\n", type, t);
  253.       }
  254.   }
  255. *** ../distribution/freeze.h    Wed Mar 27 20:45:03 1991
  256. --- freeze.h    Wed Mar 27 15:03:06 1991
  257. ***************
  258. *** 1,12 ****
  259.   
  260.   #include <stdio.h>
  261.   
  262. - /* for GCC */
  263. - 
  264.   #ifdef SUN4
  265.   #include <sys/stdtypes.h>
  266.   #else
  267.     typedef int mode_t; /* for GCC */
  268.   # ifndef getc
  269.   #   define getc(p)         (--(p)->_cnt < 0 ? _filbuf(p) : (int) *(p)->_ptr++)
  270.   # endif
  271. --- 1,12 ----
  272.   
  273.   #include <stdio.h>
  274.   
  275.   #ifdef SUN4
  276.   #include <sys/stdtypes.h>
  277.   #else
  278. + #if !defined(ultrix) && defined(__GNUC__)
  279.     typedef int mode_t; /* for GCC */
  280. + #endif
  281.   # ifndef getc
  282.   #   define getc(p)         (--(p)->_cnt < 0 ? _filbuf(p) : (int) *(p)->_ptr++)
  283.   # endif
  284. ***************
  285. *** 13,20 ****
  286. --- 13,22 ----
  287.   # ifndef putc
  288.   #   define putc(x, p)      (--(p)->_cnt < 0 ? _flsbuf((unsigned char) (x), (p)) : (int) (*(p)->_ptr++ = (unsigned char) (x)))
  289.   # endif
  290. + #ifndef BSD4_2
  291.     typedef unsigned short u_short;
  292.   #endif
  293. + #endif
  294.   
  295.   /* end (for GCC) */
  296.   
  297. ***************
  298. *** 96,103 ****
  299.   
  300.   extern int exit_stat;
  301.   
  302. - extern short new_flg;
  303. - 
  304.   #ifdef DEBUG
  305.   extern short debug;
  306.   extern short verbose;
  307. --- 98,103 ----
  308. ***************
  309. *** 113,119 ****
  310.            GetByte(), GetNBits();
  311.   
  312.   #ifdef COMPAT
  313. ! extern short DecodeCOld(), DecodePOld();
  314.   #endif
  315.   
  316.   #if defined(BSD42) && !defined(BSD4_2)
  317. --- 113,119 ----
  318.            GetByte(), GetNBits();
  319.   
  320.   #ifdef COMPAT
  321. ! extern short DecodeCOld(), DecodePOld(), new_flg;
  322.   #endif
  323.   
  324.   #if defined(BSD42) && !defined(BSD4_2)
  325. *** ../distribution/lz.c    Wed Mar 27 20:45:04 1991
  326. --- lz.c    Wed Mar 27 15:03:06 1991
  327. ***************
  328. *** 7,14 ****
  329.   /*                                    */
  330.   /*----------------------------------------------------------------------*/
  331.   
  332. - #define NIL        N    /* term of tree */
  333. - 
  334.   uchar    text_buf[N + _F - 1];
  335.   u_short   match_position, match_length;
  336.   
  337. --- 7,12 ----
  338. ***************
  339. *** 18,35 ****
  340.   */
  341.   
  342.   hash_t             prev[N + 1];
  343.   #ifndef __XENIX__
  344. ! u_short            next[array_size];
  345.   #else
  346.   #if parts == 2
  347.   u_short next0[32768], next1[8193];
  348. ! #elif parts == 3
  349.   u_short next0[32768], next1[32768], next2[8193];
  350. ! #elif parts == 5
  351.   u_short next0[32768], next1[32768], next2[32768], next3[32768], next4[8193];
  352. ! #else
  353.   u_short next0[32768], next1[32768], next2[32768], next3[32768], next4[32768],
  354.       next5[32768], next6[32768], next7[32768], next8[8193];
  355.   #endif
  356.   
  357.   u_short *next[parts] = {
  358. --- 16,42 ----
  359.   */
  360.   
  361.   hash_t             prev[N + 1];
  362. + 
  363.   #ifndef __XENIX__
  364. ! u_short
  365. ! #ifdef __TURBOC__
  366. !     huge
  367. ! #endif
  368. !         next[array_size];
  369.   #else
  370.   #if parts == 2
  371.   u_short next0[32768], next1[8193];
  372. ! #else
  373. ! #    if parts == 3
  374.   u_short next0[32768], next1[32768], next2[8193];
  375. ! #    else
  376. ! #        if parts == 5
  377.   u_short next0[32768], next1[32768], next2[32768], next3[32768], next4[8193];
  378. ! #        else
  379.   u_short next0[32768], next1[32768], next2[32768], next3[32768], next4[32768],
  380.       next5[32768], next6[32768], next7[32768], next8[8193];
  381. + #        endif
  382. + #    endif
  383.   #endif
  384.   
  385.   u_short *next[parts] = {
  386. ***************
  387. *** 46,52 ****
  388.   #endif
  389.   };
  390.   #endif
  391. - 
  392.   
  393.   #ifdef GATHER_STAT
  394.   long node_steps, node_matches;
  395. --- 53,58 ----
  396. *** ../distribution/lz.h    Wed Mar 27 20:45:04 1991
  397. --- lz.h    Thu Mar 28 14:11:37 1991
  398. ***************
  399. *** 32,42 ****
  400. --- 32,64 ----
  401.   
  402.   #define array_size      (N + 1 + (1 << BITS))
  403.   
  404. + extern hash_t prev[];
  405. + 
  406.   #ifndef __XENIX__
  407.   #define nextof(i)       next[i]
  408. + extern u_short
  409. + #ifdef __TURBOC__
  410. +         huge
  411. + #endif
  412. +             next[];
  413.   #else
  414.   #define parts (array_size/32768 + 1)
  415.   #define nextof(i)       next[(i) >> 15][(i) & 0x7fff]
  416. + #if parts == 2
  417. + extern u_short next0[], next1[];
  418. + #else
  419. + #    if parts == 3
  420. + extern u_short next0[], next1[], next2[];
  421. + #    else
  422. + #        if parts == 5
  423. + extern u_short next0[], next1[], next2[], next3[], next4[];
  424. + #        else
  425. + extern u_short next0[], next1[], next2[], next3[], next4[],
  426. +     next5[], next6[], next7[], next8[];
  427. + #        endif
  428. + #    endif
  429. + #endif
  430. + extern u_short *next[];
  431.   #endif
  432.   
  433.   /* To eliminate function-call overhead */
  434. *** ../distribution/makefile    Wed Mar 27 20:45:05 1991
  435. --- makefile    Thu Mar 28 16:27:15 1991
  436. ***************
  437. *** 1,4 ****
  438. --- 1,5 ----
  439.   DEST          = /usr/local/bin
  440. + MANDEST       = /usr/local/man/cat1
  441.   EXTHDRS          =
  442.   HDRS          = freeze.h\
  443.           lz.h\
  444. ***************
  445. *** 25,30 ****
  446. --- 26,35 ----
  447.   
  448.   PROGRAM       = freeze
  449.   
  450. + CATMAN        = freeze.man
  451. + 
  452. + MAN           = freeze.1
  453. + 
  454.   SRCS          = bitio.c\
  455.           debug.c\
  456.           decode.c\
  457. ***************
  458. *** 34,40 ****
  459.           huf.c\
  460.           lz.c
  461.   
  462. ! all:            $(PROGRAM) statist freeze.man
  463.   
  464.   lint:           $(SRCS)
  465.           lint $(LINTFLAGS) $(SRCS) $(LIBS)
  466. --- 39,45 ----
  467.           huf.c\
  468.           lz.c
  469.   
  470. ! all:            $(PROGRAM) statist $(CATMAN)
  471.   
  472.   lint:           $(SRCS)
  473.           lint $(LINTFLAGS) $(SRCS) $(LIBS)
  474. ***************
  475. *** 47,59 ****
  476.   
  477.   clean:;         rm -f *.o *.b .,* core a.out $(PROGRAM) statist
  478.   
  479. ! install:    $(PROGRAM)
  480.           install -s -c $(PROGRAM) $(DEST)
  481. !         ln -f $(DEST)/freeze $(DEST)/melt
  482. !         ln -f $(DEST)/freeze $(DEST)/fcat
  483.   
  484. ! freeze.man:     freeze.1
  485. !         nroff -man < freeze.1 > freeze.man
  486.   
  487.   ###
  488.   bitio.o: freeze.h huf.h
  489. --- 52,72 ----
  490.   
  491.   clean:;         rm -f *.o *.b .,* core a.out $(PROGRAM) statist
  492.   
  493. ! install:        $(DEST)/$(PROGRAM) $(MANDEST)/$(MAN)
  494. ! 
  495. ! $(DEST)/$(PROGRAM): $(PROGRAM)
  496.           install -s -c $(PROGRAM) $(DEST)
  497. !         ln -f $(DEST)/$(PROGRAM) $(DEST)/melt
  498. !         ln -f $(DEST)/$(PROGRAM) $(DEST)/fcat
  499. ! 
  500. ! $(MANDEST)/$(MAN): $(CATMAN)
  501. !         cp $(CATMAN) $(MANDEST)/$(MAN)
  502. !         chmod +r $(MANDEST)/$(MAN)
  503. !         ln -f $(MANDEST)/$(MAN) $(MANDEST)/melt.1
  504. !         ln -f $(MANDEST)/$(MAN) $(MANDEST)/fcat.1
  505.   
  506. ! $(CATMAN):      $(MAN)
  507. !         nroff -man < $(MAN) > $(CATMAN)
  508.   
  509.   ###
  510.   bitio.o: freeze.h huf.h
  511. ***************
  512. *** 62,65 ****
  513.   encode.o: freeze.h lz.h
  514.   freeze.o: freeze.h lz.h huf.h
  515.   huf.o: freeze.h huf.h
  516. ! lz.o: freeze.h
  517. --- 75,78 ----
  518.   encode.o: freeze.h lz.h
  519.   freeze.o: freeze.h lz.h huf.h
  520.   huf.o: freeze.h huf.h
  521. ! lz.o: freeze.h lz.h
  522. *** ../distribution/patchlevel.h    Thu Mar 28 14:36:11 1991
  523. --- patchlevel.h    Thu Mar 28 14:29:31 1991
  524. ***************
  525. *** 0 ****
  526. --- 1 ----
  527. + #define PATCHLEVEL 1
  528. *** ../distribution/statist.c    Wed Mar 27 20:44:46 1991
  529. --- statist.c    Thu Mar 28 13:54:48 1991
  530. ***************
  531. *** 16,22 ****
  532.   hash_t  prev[N + 1];
  533.   
  534.   #ifndef __XENIX__
  535. ! u_short            next[array_size];
  536.   #else
  537.   #if parts == 2
  538.   u_short next0[32768], next1[8193];
  539. --- 16,26 ----
  540.   hash_t  prev[N + 1];
  541.   
  542.   #ifndef __XENIX__
  543. ! u_short
  544. ! #ifdef __TURBOC__
  545. !     huge
  546. ! #endif
  547. !         next[array_size];
  548.   #else
  549.   #if parts == 2
  550.   u_short next0[32768], next1[8193];
  551. -- 
  552. Leonid A. Broukhis | 89-1-95 Liberty St. | "BROUKHIS" is Hebrew for
  553. 7+095 494.6241 (h) | Moscow 123481 USSR  |       "BENEDICTAE"
  554. 7+095 132.9475 (o) | (leo@s514.ipmce.su) | {Licet omnia qualibet dicas}
  555.  
  556.  
  557. exit 0 # Just in case...
  558. -- 
  559. Kent Landfield                   INTERNET: kent@sparky.IMD.Sterling.COM
  560. Sterling Software, IMD           UUCP:     uunet!sparky!kent
  561. Phone:    (402) 291-8300         FAX:      (402) 291-4362
  562. Please send comp.sources.misc-related mail to kent@uunet.uu.net.
  563.