💾 Archived View for mirrors.apple2.org.za › archive › ground.icaen.uiowa.edu › unix › Nulib.v324 › n… captured on 2023-01-29 at 11:02:20.
View Raw
More Information
-=-=-=-=-=-=-
/*
* nucomp.h - declarations for nucomp.c
*
* NuLib v3.2 March 1992 Freeware (distribute, don't sell)
* By Andy McFadden (fadden@uts.amdahl.com)
*/
#ifdef BSD43
# define NO_SETVBUF
#endif
#include <ctype.h>
#include <string.h>
#ifdef UNIX /* this is asking for trouble */
# include <sys/types.h>
#else
# ifdef IAPX286
# include <sys/types.h>
# else
# ifdef IAPX386
# include <sys/types.h>
# else
# include <types.h>
# endif
# endif
#endif
#include <fcntl.h>
#ifdef MSDOS
# include <sys/types.h>
#endif
/*@H************************ < COMPRESS HEADER > ****************************
- $@(#) compress.c,v 4.3 88/12/26 08:00:00 don Release ^ *
- *
- compress : compress.h <global defines, etc> *
- *
- port by : Donald J. Gloistein *
- *
- Source, Documentation, Object Code: *
- released to Public Domain. This code is based on code as documented *
- below in release notes. *
- *
- --------------------------- Module Description --------------------------*
- THIS HEADER CONTAINS MUCH IMPLEMENTATION INFORMATION AND ASSUMPTIONS *
- PLEASE PRINT IT OUT AND READ IT BEFORE COMPILING CODE FOR YOURSELF *
- *
- This header supports a number of compiler defines and predefines. *
- Rather than explain all of them, please print the header and read the *
- notes. Also the unix and xenix makefiles are commented for the *
- various options. There continues to have a lot of Dos specific info in *
- the header. This is to help on 16 bit Msdos machines to get their *
- compiler to work properly. I make no appology for that, as this port *
- began as a way to implement 16 bit compress on a segmented MsDos machine*
- *
- However, for Unix and Xenix, all you should have to define is -DXENIX *
- or -DUNIX and compile. There may be a problem with whether your library *
- supports alloc() or malloc(), but there is a define for that, also. *
- *
- This header can be maintained to keep up with the different compilers *
- and systems. As distributed in don Release, the files will compile with *
- no changes under Microsoft version 5.1 C compiler, and Xenix C compiler *
- which is the Microsoft version 4 ported. If you are going to bind the *
- code for use in MsDos and OS/2 machines, then you must uncomment the *
- #define BIND in this header. Otherwise, this distribution of source *
- detect Msdos and Xenix predefines from the compiler and adjust. *
- *
- --------------------------- Implementation Notes --------------------------*
- *
- compiled with : compress.fns *
- NOTE!!! Defaults of this code now are completely Unix, even for the *
- msdos ports. That means that the program works as a filter, *
- and will just sit there waiting for input from stdin if you *
- issue just the command name. You must use -h or -? to get the *
- full help screen now. Also, it will unlink (kill) as a default *
- on successful compression and decompression. That means the *
- source file will be erased. *
- These defaults are changed with the FILTER and KEEPFLAG *
- defines. *
- *
- NOTE!!! Compiler predefines were taken out of the compress.h header. *
- You must either specify them on compile or uncomment the *
- compiler define in this header. Compiling without doing these *
- will result in a program that does unspecified actions. *
- problems: *
- The inpath and outpath is a bit kludged. It should work okay. *
- Let me know if you have problems, especially under Unix. *
- *
- CAUTION: The bound version will run on Dos 2.x, but you must use the *
- name compress.exe. If you rename the file, it will not run *
- The unbound version will run on Dos 2.x with the name changed *
- but due to the dos version, will not detect its own name. *
- *
- CAUTION: Non MsDos users. You must modify the _MAX_PATH defines for *
- your operating system if it is different from the assumed *
- standard. *
- *
- CAUTION: I have used a number of defines to make it possible to compile *
- properly under a number of bit sizes and adjust for the memory *
- allocation scheme needed. If you do not use a dos system, *
- PLEASE pay attention to the defines for MAXSEG_64 and the one *
- called SMALLMODEL. The SMALLMODEL define is set in the header *
- but if you don't have a compiler that triggers the MAXSEG_64 *
- define, you may end up with bad pointers. Becareful. *
- *
- Header for files using version 4 compress routines define MAIN *
- in the file with defining instance of the global variables. *
- There are a number of compilers for MsDos and Unix/Xenix. *
- So the user must define the actions required. *
- *
- *
- Defines: This header file contains most of the system wide defines. *
- the purpose for this was to consolodate compiler differences *
- into one area that is easily changed. *
- *
- define MAXBITS= if you want a different maximum bits. 16 bits will now *
- run in about 400K of memory. *
- define BIND if you are going to use Microsoft bind.exe program on the *
- executable. *
- *
- define MSDOS if you are compiling under MsDos or PcDos and your compiler*
- does not predefine it. *
- *
- Initials ---- Name --------------------------------- *
- DjG Donald J. Gloistein, current port to MsDos 16 bit *
- Plus many others, see rev.hst file for full list *
- LvR Lyle V. Rains, many thanks for improved implementation *
- of the compression and decompression routines. *
- ************************************************************************@H*/
#ifndef FALSE /* let's get some sense to this */
#define FALSE 0
#define TRUE !FALSE
#endif
#define NDEBUG
#define NPROTO
#define COMP40 /* take this out for a little more speed */
char *malloc();
#define ALLOCATE(x,y) malloc((unsigned int)x*y)
#define FREEIT(ptr) free(ptr)
#define NOSIGNAL /* what the hell is "SIGTYPE"? */
#define setbinary(fp)
#define FAR
#define CONST
#define _MAX_DIR 64
/* FILTER if you want the program to operate as a unix type filter */
/* if not defined TRUE, then issuing command without parameters will */
/* print a usage and help information */
/* Use -DFILTER=0 to deactivate filter operation */
#ifndef FILTER
#define FILTER FALSE
#endif
/* KEEPFLAG determines the default action on successful completion */
/* Unix convention is FALSE (erase input file) */
/* Use -DKEEPFLAG=1 to keep files as default or change here */
/* if you don't set it before here and you are compiling the debug */
/* version, then files will be kept. */
#ifndef KEEPFLAG
#define KEEPFLAG TRUE
#endif
/* the following tells the system that the maximum segment is 64k */
/* if your compiler is not one of these and has this limitation */
/* Because of this, this code should compile with minimum porting */
/* in the COMPUSI.XEN module to most unix systems. */
/* This is also used to keep array indexing to 16 bit integer */
/* if not predefined in compiler implementation, you must define */
/* it separately if applicable to your compiler/system */
#define MAXSEG_64K
/* put this in if you are compiling in small code */
/* model and your compiler does not predefine it */
/* this is for CPU' with 64k segment limitation. */
/* Use this define for small code, it is used by */
/* the header to decide on value for NEARHEAP */
/* #define SMALLMODEL */
/* does your system use far pointers ? if you want it enabled keep this */
/* if you have segment limit and compile in larger than 13 bits */
/* then you will have to use compact or large model if your compiler */
/* does not support far pointer keyword. */
#ifndef FAR
#define FAR
#endif
/* What type does the alloc() function return, char or void? */
#ifndef ALLOCTYPE
#define ALLOCTYPE char
#endif
/* Does your run time library support the ANSI functions for:*/
/* reverse string set search? strrpbrk() if not: */
#define NO_REVSEARCH
/* Does your library include strrchr()? If not define this: */
/*#define NO_STRRCHR*//* unix/xenix module uses this function*/
/* Does your library include strchr()? If not define this: */
/*#define NO_STRCHR*//* dos module uses this function. */
/* definition for const key word if supported */
#ifndef CONST
#define CONST
#endif
/* And now for some typedefs */
typedef unsigned short CODE;
typedef unsigned char UCHAR;
typedef unsigned int HASH;
typedef int FLAG;
/*
* You can define the value of MAXBITS to be anything betweeen MINBITS
* and MAXMAXBITS. This is will determine the maximum memory you will
* use and how the tables will be handled. I recommend you just leave
* it at MAXMAXBITS, because you can define DFLTBITS in compiling the
* module COMPRESS.C to set the default, and you can vary the number
* of bits at runtime by using the -b switch.
*/
/*
* The only reason to change MAXBITS is if you absolutely must have
* faster performance. If you specify 14 bits, the tables will not
* be split; at 13 bits, you can fit in the MSDOS small memory model
* and allocate tables in near heap.
* This value is available to other modules through the variable maxbits.
*/
#define INITBITS 9
#define MINBITS 12
#define MAXMAXBITS 16
#ifndef MAXBITS
#define MAXBITS MAXMAXBITS
#endif
#if (MAXBITS > MAXMAXBITS)
#undef MAXBITS
#define MAXBITS MAXMAXBITS
#endif
#if (MAXBITS < MINBITS)
#undef MAXBITS
#define MAXBITS MINBITS
#endif
/* You should define DFLTBITS to be the default compression code
* bit length you desire on your system.
* (I define mine in the compiler command line in my Makefile.LvR)
* (I leave mine alone and keep to the maximum. DjG)
*/
#ifndef DFLTBITS
#define DFLTBITS MAXBITS
#endif
#if (DFLTBITS < MINBITS)
#undef DFLTBITS
#define DFLTBITS MINBITS
#endif
#if (DFLTBITS > MAXBITS)
#undef DFLTBITS
#define DFLTBITS MAXBITS
#endif
/* correcting for different types of pointer arithmatic */
/* probably won't have to change it */
#define NULLPTR(type) ((type FAR *) NULL)
/* in making this program portable the following allocation and */
/* free functions are called, with the following parameters: */
/* ALLOCTYPE FAR *emalloc(unsigned int x, int y) */
/* void efree(ALLOCTYPE FAR *ptr) */
/* you must define the allocation function and the free function */
/* keep in mind that the casts must be correct for your compiler */
/* NOTE these are the two functions to change for allocating pointers to */
/* far data space if you are not using Microsoft C v.5.1 */
/* Consult your compiler manual and find the low level function that */
/* returns a far pointer when compiled in the small model. */
/* if your compiler does not support that, you will have to compile with */
/* a model that defaults to far pointers to data (compact or large model)*/
/* HERE ARE SOME SAMPLE PREDEFINED ONES */
/* default allocation function, in segmented addressing, must return */
/* a far pointer or compile with far pointer data as default */
#ifndef ALLOCATE
#include <malloc.h>
#define ALLOCATE(x,y) malloc((unsigned int)x*y)
#define FREEIT(ptr) free((ptr))
#endif
# ifdef MAXSEG_64K
# if MAXBITS > 14
# define SPLIT_HT TRUE
# else
# define SPLIT_HT 0
# endif
# else
# define SPLIT_HT 0
# endif
# ifdef MAXSEG_64K
# if MAXBITS > 15
# define SPLIT_PFX TRUE
# else
# define SPLIT_PFX 0
# endif
# else
# define SPLIT_PFX 0
# endif
#ifndef BUFSIZ
#define BUFSIZ 512
#endif
#ifdef NO_SETBUF
#define NO_SETVBUF
#endif
/* NuLib: comment: this ought to use setbuffer() if available */
#ifdef NO_SETVBUF
# ifndef NO_SETBUF
# define setvbuf(fp,buf,mode,size) setbuf((fp),(buf))
# define ZBUFSIZE BUFSIZ
# define XBUFSIZE BUFSIZ
# else
# define setvbuf(fp,buf,mode,size)
# define ZBUFSIZE (1)
# define XBUFSIZE (1)
# endif
#else
# ifdef NEARHEAP
# define XBUFSIZE (0xC00)
# define ZBUFSIZE (0x1800)
# else
# define XBUFSIZE (0x3000) /* 12k bytes */
# define ZBUFSIZE (0x6000) /* 24k bytes */
# endif
#endif
#define UNUSED ((CODE)0) /* Indicates hash table value unused */
#define CLEAR ((CODE)256) /* Code requesting table to be cleared */
#define FIRSTFREE ((CODE)(CLEAR+1))/* First free code for token encoding */
#define MAXTOKLEN 512 /* Max chars in token; size of buffer */
#define OK 0 /* Result codes from functions: */
#define ERROR 1
#define NORMAL 0
#define SIGNAL_ERROR -1 /* signal function error */
#define NOMEM 2 /* Ran out of memory */
#define TOKTOOBIG 3 /* Token longer than MAXTOKLEN chars */
#define READERR 4 /* I/O error on input */
#define WRITEERR 5 /* I/O error on output */
#define INFILEBAD 6 /* Infile not in compressed format */
#define CODEBAD 7 /* Infile contained a bad token code */
#define TABLEBAD 8 /* The tables got corrupted (!) */
#define NOSAVING 9 /* no saving in file size */
#define NOTOPENED 10 /* output file couldn't be opened */
#define YES 1
#define NO 0
#include "nucompfn.h" /* This has to come late... needs typedefs above */
/* defines opening mode for files */
/* and suffixes for compressed file */
#define WRITE_FILE_TYPE FWRITE_STR /* NuLib: was "wb" */
#define READ_FILE_TYPE FREAD_STR /* NuLib: was "rb" */
#define SUFFIX ".Z"
/* Defines for third byte of header */
#define BIT_MASK 0x1f
#define BLOCK_MASK 0x80
/* Masks 0x40 and 0x20 are free. I think 0x20 should mean that there is
a fourth header byte (for expansion).
#define CHECK_GAP 10000L /* ratio check interval */
#ifdef MAIN
UCHAR magic_header[] = { 0x1F,0x9D }; /* 1F 9D */
char rcs_ident[] = "@(#) compress,v 4.3 88/12/26 08:00:00 don Release $";
int overwrite = 0; /* Do not overwrite unless given -f flag */
int maxbits = DFLTBITS; /* user settable max # bits/code */
int exit_stat = 0;
int keep = KEEPFLAG; /* True = don't kill file */
int keep_error = FALSE; /* True = keep output file even if error exist */
char *prog_name;
char ifname[_MAX_DIR];
char inpath[_MAX_DIR];
char ofname [_MAX_DIR];
char outpath[_MAX_DIR];
int is_list = FALSE; /* flag for file parameters */
char endchar[1];
char xbuf[XBUFSIZE];
char zbuf[ZBUFSIZE];
char separator[] = "/";
int nomagic = FALSE; /* Use a 3-byte magic number header, unless old file */
int zcat_flg = TRUE; /* Write output on stdout, suppress messages */
int quiet = TRUE; /* don't tell me about compression */
/*
* block compression parameters -- after all codes are used up,
* and compression rate changes, start over.
*/
int block_compress = BLOCK_MASK;
#ifdef COMP40
long int ratio = 0L;
long checkpoint = CHECK_GAP;
#endif
/* force the overwrite */
int force = 0;
#ifndef NDEBUG
int verbose = FALSE;
int debug = FALSE;
#endif /* !NDEBUG */
int do_decomp = FALSE;
#else /* not defining instance */
extern UCHAR magic_header[];
extern char rcs_ident[];
extern int overwrite;
extern int maxbits;
extern int exit_stat;
extern int keep;
extern int keep_error;
extern char *prog_name;
extern char inpath[];
extern char outpath[];
extern int is_list;
extern char endchar[];
extern char xbuf[];
extern char zbuf[];
extern char ifname[];
extern char ofname[];
extern char separator[];
extern int nomagic;
extern int zcat_flg;
extern int quiet;
extern int block_compress;
#ifdef COMP40
extern long int ratio;
extern long checkpoint;
#endif
extern int force;
#ifndef NDEBUG
extern int verbose;
extern int debug;
#endif /* !NDEBUG */
extern int do_decomp;
#endif