Return to zipup.c CVS log

Up to [PGP] / pgp / src

Annotation of pgp/src/zipup.c, revision 1.1.1.7

1.1.1.7 ! root        1: /*
        !             2: 
        !             3:  Copyright (C) 1990,1991 Mark Adler, Richard B. Wales, and Jean-loup Gailly.
        !             4:  Permission is granted to any individual or institution to use, copy, or
        !             5:  redistribute this software so long as all of the original files are included
        !             6:  unmodified, that it is not sold for profit, and that this copyright notice
        !             7:  is retained.
        !             8: 
        !             9: */
        !            10: 
        !            11: /*
        !            12:  *  zipup.c by Mark Adler. Includes modifications by Jean-loup Gailly.
        !            13:  */
        !            14: 
        !            15: #define NOCPYRT         /* this is not a main module */
        !            16: #include <ctype.h>
        !            17: #include "zip.h"
        !            18: #include "zrevisio.h"
        !            19: #include "system.h"
        !            20: 
        !            21: /* Use the raw functions for MSDOS and Unix to save on buffer space.
        !            22:    They're not used for VMS since it doesn't work (raw is weird on VMS).
        !            23:    (This sort of stuff belongs in fileio.c, but oh well.) */
        !            24: #if defined(VMS) || defined(C370)
        !            25:    typedef FILE *ftype;
        !            26: #  define fhow FOPR
        !            27: #  define fbad NULL
        !            28: #  define zopen(n,p) fopen(n,p)
        !            29: #  define zread(f,b,n) fread(b,1,n,f)
        !            30: #  define zclose(f) fclose(f)
        !            31: #  define zerr(f) ferror(f)
        !            32: #  define zrew(f) rewind(f)
        !            33: #  define zstdin stdin
        !            34: #else /* !VMS */
        !            35: #  if defined(MSDOS) || defined(WIN32)
        !            36: #    include <io.h>
        !            37: #    include <fcntl.h>
        !            38: #    define fhow (O_RDONLY|O_BINARY)
        !            39: #  elif defined(MACTC5) /* Macintosh */
        !            40: #    define fhow 0
        !            41: #  else /* !MSDOS && !Macintosh */
        !            42: #    ifndef HAVE_UNISTD_H
        !            43:        size_t lseek(int handle, size_t offset, int whence);
        !            44: #    endif /* !HAVE_UNISTD_H */
        !            45: #    define fhow 0
        !            46: #  endif /* ?MSDOS */
        !            47:    typedef int ftype;
        !            48: #  define fbad (-1)
        !            49: #  define zopen(n,p) open(n,p)
        !            50: #  define zread(f,b,n) read(f,b,n)
        !            51: #  define zclose(f) close(f)
        !            52: #  define zerr(f) (k==(extent)(-1L))
        !            53: #  define zrew(f) lseek(f,0L,0)
        !            54: #  define zstdin 0
        !            55: #endif /* ?VMS */
        !            56: 
        !            57: /* Local data */
        !            58: 
        !            59: local ftype ifile;             /* file to compress */
        !            60: 
        !            61: void lm_free();
        !            62: void ct_free();
        !            63: 
        !            64: /* Compress the file fileName and write it to the file *y. Return an error
        !            65:    code in the ZE_ class.  Also, update tempzn by the number of bytes written.
        !            66: */
        !            67: int zipup(FILE *inFile, FILE *y)
        !            68: /* ??? Does not yet handle non-seekable y */
        !            69: {
        !            70:   int m;                               /* method for this entry */
        !            71:   long q = -1L;                        /* size returned by filetime */
        !            72:   ush att;                     /* internal file attributes (dummy only) */
        !            73:   ush flg;                             /* gp compresion flags (dummy only) */
        !            74: 
        !            75:        /* Set input file and find its size */
        !            76: #if defined(VMS) || defined(C370)
        !            77:        ifile = inFile;
        !            78:        fseek(ifile, 0L, SEEK_END);
        !            79:        q = ftell(ifile);
        !            80:        fseek(ifile, 0L, SEEK_SET);
        !            81: #else
        !            82:        ifile = fileno( inFile );
        !            83:        q = lseek(ifile, 0L, SEEK_END);
        !            84:        lseek(ifile, 0L, SEEK_SET);
        !            85: #endif /* VMS */
        !            86: 
        !            87:        m = (q == 0) ? STORE : DEFLATE;
        !            88: 
        !            89:   if (m == DEFLATE) {
        !            90:         bi_init(y);
        !            91:         att = UNKNOWN;
        !            92:         ct_init(&att, &m);
        !            93:         lm_init(level, &flg);
        !            94:         /* s = */ deflate();
        !            95:   }
        !            96:   lm_free();
        !            97:   ct_free();
        !            98: 
        !            99:   return(0);
        !           100: }
        !           101: 
        !           102: int read_buf(buf, size)
        !           103:   char far *buf;
        !           104:   unsigned size;
        !           105: /* Read a new buffer from the current input file, and update the crc and
        !           106:  * input file size.
        !           107:  * IN assertion: size >= 2 (for end-of-line translation) */
        !           108: {
        !           109:   unsigned len;
        !           110: 
        !           111:   len = zread(ifile, buf, size);
        !           112:   if (len == (unsigned)EOF || len == 0) return len;
        !           113:   return len;
        !           114: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.