mirror of https://github.com/BOINC/boinc.git
1948 lines
66 KiB
C
1948 lines
66 KiB
C
/*
|
|
Copyright (c) 1990-2002 Info-ZIP. All rights reserved.
|
|
|
|
See the accompanying file LICENSE, version 2000-Apr-09 or later
|
|
(the contents of which are also included in unzip.h) for terms of use.
|
|
If, for some reason, all these files are missing, the Info-ZIP license
|
|
also may be found at: ftp://ftp.info-zip.org/pub/infozip/license.html
|
|
*/
|
|
/*---------------------------------------------------------------------------
|
|
|
|
unzip.c
|
|
|
|
UnZip - a zipfile extraction utility. See below for make instructions, or
|
|
read the comments in Makefile and the various Contents files for more de-
|
|
tailed explanations. To report a bug, send a *complete* description to
|
|
Zip-Bugs@lists.wku.edu; include machine type, operating system and ver-
|
|
sion, compiler and version, and reasonably detailed error messages or prob-
|
|
lem report. To join Info-ZIP, see the instructions in README.
|
|
|
|
UnZip 5.x is a greatly expanded and partially rewritten successor to 4.x,
|
|
which in turn was almost a complete rewrite of version 3.x. For a detailed
|
|
revision history, see UnzpHist.zip at quest.jpl.nasa.gov. For a list of
|
|
the many (near infinite) contributors, see "CONTRIBS" in the UnZip source
|
|
distribution.
|
|
|
|
---------------------------------------------------------------------------
|
|
|
|
[from original zipinfo.c]
|
|
|
|
This program reads great gobs of totally nifty information, including the
|
|
central directory stuff, from ZIP archives ("zipfiles" for short). It
|
|
started as just a testbed for fooling with zipfiles, but at this point it
|
|
is actually a useful utility. It also became the basis for the rewrite of
|
|
UnZip (3.16 -> 4.0), using the central directory for processing rather than
|
|
the individual (local) file headers.
|
|
|
|
As of ZipInfo v2.0 and UnZip v5.1, the two programs are combined into one.
|
|
If the executable is named "unzip" (or "unzip.exe", depending), it behaves
|
|
like UnZip by default; if it is named "zipinfo" or "ii", it behaves like
|
|
ZipInfo. The ZipInfo behavior may also be triggered by use of unzip's -Z
|
|
option; for example, "unzip -Z [zipinfo_options] archive.zip".
|
|
|
|
Another dandy product from your buddies at Newtware!
|
|
|
|
Author: Greg Roelofs, newt@pobox.com, http://pobox.com/~newt/
|
|
23 August 1990 -> April 1997
|
|
|
|
---------------------------------------------------------------------------
|
|
|
|
Version: unzip5??.{tar.Z | tar.gz | zip} for Unix, VMS, OS/2, MS-DOS, Amiga,
|
|
Atari, Windows 3.x/95/NT/CE, Macintosh, Human68K, Acorn RISC OS,
|
|
BeOS, SMS/QDOS, VM/CMS, MVS, AOS/VS, Tandem NSK, Theos and
|
|
TOPS-20.
|
|
|
|
Copyrights: see accompanying file "LICENSE" in UnZip source distribution.
|
|
(This software is free but NOT IN THE PUBLIC DOMAIN.)
|
|
|
|
---------------------------------------------------------------------------*/
|
|
|
|
|
|
|
|
#define __UNZIP_C /* identifies this source module */
|
|
#define UNZIP_INTERNAL
|
|
#include "unzip.h" /* includes, typedefs, macros, prototypes, etc. */
|
|
//#include "crypt.h"
|
|
#include "unzvers.h"
|
|
|
|
#ifndef WINDLL /* The WINDLL port uses windll/windll.c instead... */
|
|
|
|
/***************************/
|
|
/* Local type declarations */
|
|
/***************************/
|
|
|
|
#ifdef REENTRANT
|
|
typedef struct _sign_info
|
|
{
|
|
struct _sign_info *previous;
|
|
void (*sighandler)(int);
|
|
int sigtype;
|
|
} savsigs_info;
|
|
#endif
|
|
|
|
/*******************/
|
|
/* Local Functions */
|
|
/*******************/
|
|
|
|
#ifdef REENTRANT
|
|
static int setsignalhandler OF((__GPRO__ savsigs_info **p_savedhandler_chain,
|
|
int signal_type, void (*newhandler)(int)));
|
|
#endif
|
|
#ifndef SFX
|
|
static void show_version_info OF((__GPRO));
|
|
#endif
|
|
|
|
|
|
/*************/
|
|
/* Constants */
|
|
/*************/
|
|
|
|
#include "consts.h" /* all constant global variables are in here */
|
|
/* (non-constant globals were moved to globals.c) */
|
|
|
|
/* constant local variables: */
|
|
|
|
#ifndef SFX
|
|
static ZCONST char Far EnvUnZip[] = ENV_UNZIP;
|
|
static ZCONST char Far EnvUnZip2[] = ENV_UNZIP2;
|
|
static ZCONST char Far EnvZipInfo[] = ENV_ZIPINFO;
|
|
static ZCONST char Far EnvZipInfo2[] = ENV_ZIPINFO2;
|
|
#ifdef RISCOS
|
|
static ZCONST char Far EnvUnZipExts[] = ENV_UNZIPEXTS;
|
|
#endif /* RISCOS */
|
|
static ZCONST char Far NoMemArguments[] =
|
|
"envargs: cannot get memory for arguments";
|
|
#endif
|
|
|
|
#ifdef REENTRANT
|
|
static ZCONST char Far CantSaveSigHandler[] =
|
|
"error: cannot save signal handler settings\n";
|
|
#endif
|
|
|
|
#if (!defined(SFX) || defined(SFX_EXDIR))
|
|
static ZCONST char Far NotExtracting[] =
|
|
"caution: not extracting; -d ignored\n";
|
|
static ZCONST char Far MustGiveExdir[] =
|
|
"error: must specify directory to which to extract with -d option\n";
|
|
static ZCONST char Far OnlyOneExdir[] =
|
|
"error: -d option used more than once (only one exdir allowed)\n";
|
|
#endif
|
|
|
|
#if CRYPT
|
|
static ZCONST char Far MustGivePasswd[] =
|
|
"error: must give decryption password with -P option\n";
|
|
#endif
|
|
|
|
#ifndef SFX
|
|
static ZCONST char Far Zfirst[] =
|
|
"error: -Z must be first option for ZipInfo mode (check UNZIP variable?)\n";
|
|
#endif
|
|
static ZCONST char Far InvalidOptionsMsg[] = "error:\
|
|
-fn or any combination of -c, -l, -p, -t, -u and -v options invalid\n";
|
|
static ZCONST char Far IgnoreOOptionMsg[] =
|
|
"caution: both -n and -o specified; ignoring -o\n";
|
|
|
|
/* usage() strings */
|
|
#ifndef SFX
|
|
#ifdef VMS
|
|
static ZCONST char Far Example3[] = "vms.c";
|
|
static ZCONST char Far Example2[] = " unzip\
|
|
\"-V\" foo \"Bar\" => must quote uppercase options and filenames in VMS\n";
|
|
#else /* !VMS */
|
|
static ZCONST char Far Example3[] = "ReadMe";
|
|
#ifdef RISCOS
|
|
static ZCONST char Far Example2[] =
|
|
" unzip foo -d RAM:$ => extract all files from foo into RAMDisc\n";
|
|
#else /* !RISCOS */
|
|
#if (defined(OS2) || (defined(DOS_FLX_OS2_W32) && defined(MORE)))
|
|
static ZCONST char Far Example2[] =
|
|
""; /* no room: too many local3[] items */
|
|
#else /* !OS2 */
|
|
#ifdef MACOS
|
|
static ZCONST char Far Example2[] = ""; /* not needed */
|
|
#else /* !MACOS */
|
|
static ZCONST char Far Example2[] = " \
|
|
unzip -p foo | more => send contents of foo.zip via pipe into program more\n";
|
|
#endif /* ?MACOS */
|
|
#endif /* ?OS2 */
|
|
#endif /* ?RISCOS */
|
|
#endif /* ?VMS */
|
|
|
|
/* local1[]: command options */
|
|
#if (defined(DLL) && defined(API_DOC))
|
|
static ZCONST char Far local1[] =
|
|
" -A print extended help for API functions";
|
|
#else /* !(DLL && API_DOC) */
|
|
static ZCONST char Far local1[] = "";
|
|
#endif /* ?(DLL && API_DOC) */
|
|
|
|
/* local2[] and local3[]: modifier options */
|
|
#ifdef DOS_FLX_H68_OS2_W32
|
|
#ifdef FLEXOS
|
|
static ZCONST char Far local2[] = "";
|
|
#else
|
|
static ZCONST char Far local2[] =
|
|
" -$ label removables (-$$ => fixed disks)";
|
|
#endif
|
|
#ifdef OS2
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = "\
|
|
-X restore ACLs if supported -s spaces in filenames => '_'\n\
|
|
-M pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = " \
|
|
-X restore ACLs if supported -s spaces in filenames => '_'\n\n";
|
|
#endif /* ?MORE */
|
|
#else /* !OS2 */
|
|
#ifdef WIN32
|
|
#ifdef NTSD_EAS
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = "\
|
|
-X restore ACLs (-XX => use privileges) -s spaces in filenames => '_'\n\
|
|
-M pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = " \
|
|
-X restore ACLs (-XX => use privileges) -s spaces in filenames => '_'\n\n";
|
|
#endif /* ?MORE */
|
|
#else /* !NTSD_EAS */
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = "\
|
|
-M pipe through \"more\" pager \
|
|
-s spaces in filenames => '_'\n\n";
|
|
#else
|
|
static ZCONST char Far local3[] = " \
|
|
-s spaces in filenames => '_'\n\n";
|
|
#endif /* ?MORE */
|
|
#endif /* ?NTSD_EAS */
|
|
#else /* !WIN32 */
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = " -\
|
|
M pipe through \"more\" pager -s spaces in filenames => '_'\n\n";
|
|
#else
|
|
static ZCONST char Far local3[] = "\
|
|
-s spaces in filenames => '_'\n";
|
|
#endif
|
|
#endif /* ?WIN32 */
|
|
#endif /* ?OS2 || ?WIN32 */
|
|
#else /* !DOS_FLX_OS2_W32 */
|
|
#ifdef VMS
|
|
static ZCONST char Far local2[] = "\"-X\" restore owner/protection info";
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = " \
|
|
\"-M\" pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = "\n";
|
|
#endif
|
|
#else /* !VMS */
|
|
#ifdef BEO_UNX
|
|
static ZCONST char Far local2[] = " -X restore UID/GID info";
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = "\
|
|
-M pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = "\n";
|
|
#endif
|
|
#else /* !BEO_UNX */
|
|
#ifdef TANDEM
|
|
static ZCONST char Far local2[] = " -X restore Tandem User ID";
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = "\
|
|
-b create 'C' (180) text files -M pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = " -b create 'C' (180) text files\n";
|
|
#endif
|
|
#else /* !TANDEM */
|
|
#ifdef AMIGA
|
|
static ZCONST char Far local2[] = " -N restore comments as filenotes";
|
|
#ifdef MORE
|
|
static ZCONST char Far local3[] = " \
|
|
-M pipe through \"more\" pager\n";
|
|
#else
|
|
static ZCONST char Far local3[] = "\n";
|
|
#endif
|
|
#else /* !AMIGA */
|
|
#ifdef MACOS
|
|
static ZCONST char Far local2[] = " -E show Mac info during extraction";
|
|
static ZCONST char Far local3[] = " \
|
|
-i ignore filenames in mac extra info -J junk (ignore) Mac extra info\n\
|
|
\n";
|
|
#else /* !MACOS */
|
|
#ifdef MORE
|
|
static ZCONST char Far local2[] = " -M pipe through \"more\" pager";
|
|
static ZCONST char Far local3[] = "\n";
|
|
#else
|
|
static ZCONST char Far local2[] = ""; /* Atari, Mac, CMS/MVS etc. */
|
|
static ZCONST char Far local3[] = "";
|
|
#endif
|
|
#endif /* ?MACOS */
|
|
#endif /* ?AMIGA */
|
|
#endif /* ?TANDEM */
|
|
#endif /* ?BEO_UNX */
|
|
#endif /* ?VMS */
|
|
#endif /* ?DOS_FLX_OS2_W32 */
|
|
#endif /* !SFX */
|
|
|
|
#ifndef NO_ZIPINFO
|
|
#ifdef VMS
|
|
static ZCONST char Far ZipInfoExample[] = "* or % (e.g., \"*font-%.zip\")";
|
|
#else
|
|
static ZCONST char Far ZipInfoExample[] = "*, ?, [] (e.g., \"[a-j]*.zip\")";
|
|
#endif
|
|
|
|
static ZCONST char Far ZipInfoUsageLine1[] = "\
|
|
ZipInfo %d.%d%d%s of %s, by Greg Roelofs and the Info-ZIP group.\n\
|
|
\n\
|
|
List name, date/time, attribute, size, compression method, etc., about files\n\
|
|
in list (excluding those in xlist) contained in the specified .zip archive(s).\
|
|
\n\"file[.zip]\" may be a wildcard name containing %s.\n\n\
|
|
usage: zipinfo [-12smlvChMtTz] file[.zip] [list...] [-x xlist...]\n\
|
|
or: unzip %s-Z%s [-12smlvChMtTz] file[.zip] [list...] [-x xlist...]\n";
|
|
|
|
static ZCONST char Far ZipInfoUsageLine2[] = "\nmain\
|
|
listing-format options: -s short Unix \"ls -l\" format (def.)\n\
|
|
-1 filenames ONLY, one per line -m medium Unix \"ls -l\" format\n\
|
|
-2 just filenames but allow -h/-t/-z -l long Unix \"ls -l\" format\n\
|
|
-v verbose, multi-page format\n";
|
|
|
|
static ZCONST char Far ZipInfoUsageLine3[] = "miscellaneous options:\n\
|
|
-h print header line -t print totals for listed files or for all\n\
|
|
-z print zipfile comment %c-T%c print file times in sortable decimal format\
|
|
\n %c-C%c be case-insensitive %s\
|
|
-x exclude filenames that follow from listing\n";
|
|
#ifdef MORE
|
|
#ifdef VMS
|
|
static ZCONST char Far ZipInfoUsageLine4[] =
|
|
" \"-M\" page output through built-in \"more\"\n";
|
|
#else
|
|
static ZCONST char Far ZipInfoUsageLine4[] =
|
|
" -M page output through built-in \"more\"\n";
|
|
#endif
|
|
#else /* !MORE */
|
|
static ZCONST char Far ZipInfoUsageLine4[] = "";
|
|
#endif /* ?MORE */
|
|
#endif /* !NO_ZIPINFO */
|
|
|
|
#ifdef BETA
|
|
# ifdef VMSCLI
|
|
/* BetaVersion[] is also used in vms/cmdline.c: do not make it static */
|
|
ZCONST char Far BetaVersion[] = "%s\
|
|
THIS IS STILL A BETA VERSION OF UNZIP%s -- DO NOT DISTRIBUTE.\n\n";
|
|
# else
|
|
static ZCONST char Far BetaVersion[] = "%s\
|
|
THIS IS STILL A BETA VERSION OF UNZIP%s -- DO NOT DISTRIBUTE.\n\n";
|
|
# endif
|
|
#endif
|
|
|
|
#ifdef SFX
|
|
# ifdef VMSCLI
|
|
/* UnzipSFXBanner[] is also used in vms/cmdline.c: do not make it static */
|
|
ZCONST char Far UnzipSFXBanner[] =
|
|
# else
|
|
static ZCONST char Far UnzipSFXBanner[] =
|
|
# endif
|
|
"UnZipSFX %d.%d%d%s of %s, by Info-ZIP (Zip-Bugs@lists.wku.edu).\n";
|
|
# ifdef SFX_EXDIR
|
|
static ZCONST char Far UnzipSFXOpts[] =
|
|
"Valid options are -tfupcz and -d <exdir>; modifiers are -abjnoqCL%sV%s.\n";
|
|
# else
|
|
static ZCONST char Far UnzipSFXOpts[] =
|
|
"Valid options are -tfupcz; modifiers are -abjnoqCL%sV%s.\n";
|
|
# endif
|
|
#else /* !SFX */
|
|
static ZCONST char Far CompileOptions[] =
|
|
"UnZip special compilation options:\n";
|
|
static ZCONST char Far CompileOptFormat[] = "\t%s\n";
|
|
static ZCONST char Far EnvOptions[] =
|
|
"\nUnZip and ZipInfo environment options:\n";
|
|
static ZCONST char Far EnvOptFormat[] = "%16s: %s\n";
|
|
static ZCONST char Far None[] = "[none]";
|
|
# ifdef ACORN_FTYPE_NFS
|
|
static ZCONST char Far AcornFtypeNFS[] = "ACORN_FTYPE_NFS";
|
|
# endif
|
|
# ifdef ASM_CRC
|
|
static ZCONST char Far AsmCRC[] = "ASM_CRC";
|
|
# endif
|
|
# ifdef ASM_INFLATECODES
|
|
static ZCONST char Far AsmInflateCodes[] = "ASM_INFLATECODES";
|
|
# endif
|
|
# ifdef CHECK_VERSIONS
|
|
static ZCONST char Far Check_Versions[] = "CHECK_VERSIONS";
|
|
# endif
|
|
# ifdef COPYRIGHT_CLEAN
|
|
static ZCONST char Far Copyright_Clean[] =
|
|
"COPYRIGHT_CLEAN (PKZIP 0.9x unreducing method not supported)";
|
|
# endif
|
|
# ifdef DEBUG
|
|
static ZCONST char Far UDebug[] = "DEBUG";
|
|
# endif
|
|
# ifdef DEBUG_TIME
|
|
static ZCONST char Far DebugTime[] = "DEBUG_TIME";
|
|
# endif
|
|
# ifdef DLL
|
|
static ZCONST char Far Dll[] = "DLL";
|
|
# endif
|
|
# ifdef DOSWILD
|
|
static ZCONST char Far DosWild[] = "DOSWILD";
|
|
# endif
|
|
# ifdef LZW_CLEAN
|
|
static ZCONST char Far LZW_Clean[] =
|
|
"LZW_CLEAN (PKZIP/Zip 1.x unshrinking method not supported)";
|
|
# endif
|
|
# ifndef MORE
|
|
static ZCONST char Far No_More[] = "NO_MORE";
|
|
# endif
|
|
# ifdef NO_ZIPINFO
|
|
static ZCONST char Far No_ZipInfo[] = "NO_ZIPINFO";
|
|
# endif
|
|
# ifdef NTSD_EAS
|
|
static ZCONST char Far NTSDExtAttrib[] = "NTSD_EAS";
|
|
# endif
|
|
# ifdef OLD_THEOS_EXTRA
|
|
static ZCONST char Far OldTheosExtra[] =
|
|
"OLD_THEOS_EXTRA (handle also old Theos port extra field)";
|
|
# endif
|
|
# ifdef OS2_EAS
|
|
static ZCONST char Far OS2ExtAttrib[] = "OS2_EAS";
|
|
# endif
|
|
# ifdef QLZIP
|
|
static ZCONST char Far SMSExFldOnUnix[] = "QLZIP";
|
|
# endif
|
|
# ifdef REENTRANT
|
|
static ZCONST char Far Reentrant[] = "REENTRANT";
|
|
# endif
|
|
# ifdef REGARGS
|
|
static ZCONST char Far RegArgs[] = "REGARGS";
|
|
# endif
|
|
# ifdef RETURN_CODES
|
|
static ZCONST char Far Return_Codes[] = "RETURN_CODES";
|
|
# endif
|
|
# ifdef SET_DIR_ATTRIB
|
|
static ZCONST char Far SetDirAttrib[] = "SET_DIR_ATTRIB";
|
|
# endif
|
|
# ifdef TIMESTAMP
|
|
static ZCONST char Far TimeStamp[] = "TIMESTAMP";
|
|
# endif
|
|
# ifdef UNIXBACKUP
|
|
static ZCONST char Far UnixBackup[] = "UNIXBACKUP";
|
|
# endif
|
|
# ifdef USE_EF_UT_TIME
|
|
static ZCONST char Far Use_EF_UT_time[] = "USE_EF_UT_TIME";
|
|
# endif
|
|
# ifndef LZW_CLEAN
|
|
static ZCONST char Far Use_Unshrink[] =
|
|
"USE_UNSHRINK (PKZIP/Zip 1.x unshrinking method supported)";
|
|
# endif
|
|
# ifndef COPYRIGHT_CLEAN
|
|
static ZCONST char Far Use_Smith_Code[] =
|
|
"USE_SMITH_CODE (PKZIP 0.9x unreducing method supported)";
|
|
# endif
|
|
# ifdef USE_DEFLATE64
|
|
static ZCONST char Far Use_Deflate64[] =
|
|
"USE_DEFLATE64 (PKZIP 4.x Deflate64(tm) supported)";
|
|
# endif
|
|
# ifdef MULT_VOLUME
|
|
static ZCONST char Far Use_MultiVol[] =
|
|
"MULT_VOLUME (multi-volume archives supported)";
|
|
# endif
|
|
# if (defined(__DJGPP__) && (__DJGPP__ >= 2))
|
|
# ifdef USE_DJGPP_ENV
|
|
static ZCONST char Far Use_DJGPP_Env[] = "USE_DJGPP_ENV";
|
|
# endif
|
|
# ifdef USE_DJGPP_GLOB
|
|
static ZCONST char Far Use_DJGPP_Glob[] = "USE_DJGPP_GLOB";
|
|
# endif
|
|
# endif /* __DJGPP__ && (__DJGPP__ >= 2) */
|
|
# ifdef USE_VFAT
|
|
static ZCONST char Far Use_VFAT_support[] = "USE_VFAT";
|
|
# endif
|
|
# ifdef USE_ZLIB
|
|
static ZCONST char Far UseZlib[] =
|
|
"USE_ZLIB (compiled with version %s; using version %s)";
|
|
# endif
|
|
# ifdef VMS_TEXT_CONV
|
|
static ZCONST char Far VmsTextConv[] = "VMS_TEXT_CONV";
|
|
# endif
|
|
# ifdef VMSCLI
|
|
static ZCONST char Far VmsCLI[] = "VMSCLI";
|
|
# endif
|
|
# ifdef VMSWILD
|
|
static ZCONST char Far VmsWild[] = "VMSWILD";
|
|
# endif
|
|
# ifdef WILD_STOP_AT_DIR
|
|
static ZCONST char Far WildStopAtDir[] = "WILD_STOP_AT_DIR";
|
|
# endif
|
|
# if CRYPT
|
|
# ifdef PASSWD_FROM_STDIN
|
|
static ZCONST char Far PasswdStdin[] = "PASSWD_FROM_STDIN";
|
|
# endif
|
|
static ZCONST char Far Decryption[] =
|
|
"\t[decryption, version %d.%d%s of %s]\n";
|
|
static ZCONST char Far CryptDate[] = CR_VERSION_DATE;
|
|
# endif
|
|
# ifndef __RSXNT__
|
|
# ifdef __EMX__
|
|
static ZCONST char Far EnvEMX[] = "EMX";
|
|
static ZCONST char Far EnvEMXOPT[] = "EMXOPT";
|
|
# endif
|
|
# if (defined(__GO32__) && (!defined(__DJGPP__) || (__DJGPP__ < 2)))
|
|
static ZCONST char Far EnvGO32[] = "GO32";
|
|
static ZCONST char Far EnvGO32TMP[] = "GO32TMP";
|
|
# endif
|
|
# endif /* !__RSXNT__ */
|
|
|
|
#ifdef VMS
|
|
/* UnzipUsageLine1[] is also used in vms/cmdline.c: do not make it static */
|
|
ZCONST char Far UnzipUsageLine1[] = "\
|
|
UnZip %d.%d%d%s of %s, by Info-ZIP. For more details see: unzip -v.\n\n";
|
|
#ifdef COPYRIGHT_CLEAN
|
|
static ZCONST char Far UnzipUsageLine1v[] = "\
|
|
UnZip %d.%d%d%s of %s, by Info-ZIP. Maintained by C. Spieler. Send\n\
|
|
bug reports to the authors at Zip-Bugs@lists.wku.edu; see README for details.\
|
|
\n\n";
|
|
#else
|
|
static ZCONST char Far UnzipUsageLine1v[] = "\
|
|
UnZip %d.%d%d%s of %s, by Info-ZIP. UnReduce (c) 1989 by S. H. Smith.\n\
|
|
Send bug reports to authors at Zip-Bugs@lists.wku.edu; see README for details.\
|
|
\n\n";
|
|
#endif /* ?COPYRIGHT_CLEAN */
|
|
#else /* !VMS */
|
|
#ifdef COPYRIGHT_CLEAN
|
|
static ZCONST char Far UnzipUsageLine1[] = "\
|
|
UnZip %d.%d%d%s of %s, by Info-ZIP. Maintained by C. Spieler. Send\n\
|
|
bug reports to the authors at Zip-Bugs@lists.wku.edu; see README for details.\
|
|
\n\n";
|
|
#else
|
|
static ZCONST char Far UnzipUsageLine1[] = "\
|
|
UnZip %d.%d%d%s of %s, by Info-ZIP. UnReduce (c) 1989 by S. H. Smith.\n\
|
|
Send bug reports to authors at Zip-Bugs@lists.wku.edu; see README for details.\
|
|
\n\n";
|
|
#endif /* ?COPYRIGHT_CLEAN */
|
|
#define UnzipUsageLine1v UnzipUsageLine1
|
|
#endif /* ?VMS */
|
|
|
|
static ZCONST char Far UnzipUsageLine2v[] = "\
|
|
Latest sources and executables are at ftp://ftp.info-zip.org/pub/infozip/ ;\
|
|
\nsee ftp://ftp.info-zip.org/pub/infozip/UnZip.html for other sites.\
|
|
\n\n";
|
|
|
|
#ifdef MACOS
|
|
static ZCONST char Far UnzipUsageLine2[] = "\
|
|
Usage: unzip %s[-opts[modifiers]] file[.zip] [list] [-d exdir]\n \
|
|
Default action is to extract files in list, to exdir;\n\
|
|
file[.zip] may be a wildcard. %s\n";
|
|
#else /* !MACOS */
|
|
#ifdef VM_CMS
|
|
static ZCONST char Far UnzipUsageLine2[] = "\
|
|
Usage: unzip %s[-opts[modifiers]] file[.zip] [list] [-x xlist] [-d fm]\n \
|
|
Default action is to extract files in list, except those in xlist, to disk fm;\
|
|
\n file[.zip] may be a wildcard. %s\n";
|
|
#else /* !VM_CMS */
|
|
static ZCONST char Far UnzipUsageLine2[] = "\
|
|
Usage: unzip %s[-opts[modifiers]] file[.zip] [list] [-x xlist] [-d exdir]\n \
|
|
Default action is to extract files in list, except those in xlist, to exdir;\n\
|
|
file[.zip] may be a wildcard. %s\n";
|
|
#endif /* ?VM_CMS */
|
|
#endif /* ?MACOS */
|
|
|
|
#ifdef NO_ZIPINFO
|
|
# define ZIPINFO_MODE_OPTION ""
|
|
static ZCONST char Far ZipInfoMode[] =
|
|
"(ZipInfo mode is disabled in this version.)";
|
|
#else
|
|
# define ZIPINFO_MODE_OPTION "[-Z] "
|
|
# ifdef VMS
|
|
static ZCONST char Far ZipInfoMode[] =
|
|
"\"-Z\" => ZipInfo mode (`unzip \"-Z\"' for usage).";
|
|
# else
|
|
static ZCONST char Far ZipInfoMode[] =
|
|
"-Z => ZipInfo mode (\"unzip -Z\" for usage).";
|
|
# endif
|
|
#endif /* ?NO_ZIPINFO */
|
|
|
|
#ifdef VMS
|
|
static ZCONST char Far VMSusageLine2b[] = "\
|
|
=> define foreign command symbol in LOGIN.COM: $ unzip :== $dev:[dir]unzip.exe\
|
|
\n";
|
|
#endif
|
|
|
|
#ifdef MACOS
|
|
static ZCONST char Far UnzipUsageLine3[] = "\n\
|
|
-d extract files into exdir -l list files (short format)\n\
|
|
-f freshen existing files, create none -t test compressed archive data\n\
|
|
-u update files, create if necessary -z display archive comment\n\
|
|
%s\n";
|
|
#else /* !MACOS */
|
|
#ifdef VM_CMS
|
|
static ZCONST char Far UnzipUsageLine3[] = "\n\
|
|
-p extract files to pipe, no messages -l list files (short format)\n\
|
|
-f freshen existing files, create none -t test compressed archive data\n\
|
|
-u update files, create if necessary -z display archive comment\n\
|
|
-x exclude files that follow (in xlist) -d extract files onto disk fm\n\
|
|
%s\n";
|
|
#else /* !VM_CMS */
|
|
static ZCONST char Far UnzipUsageLine3[] = "\n\
|
|
-p extract files to pipe, no messages -l list files (short format)\n\
|
|
-f freshen existing files, create none -t test compressed archive data\n\
|
|
-u update files, create if necessary -z display archive comment\n\
|
|
-x exclude files that follow (in xlist) -d extract files into exdir\n\
|
|
%s\n";
|
|
#endif /* ?VM_CMS */
|
|
#endif /* ?MACOS */
|
|
|
|
static ZCONST char Far UnzipUsageLine4[] = "\
|
|
modifiers: -q quiet mode (-qq => quieter)\n\
|
|
-n never overwrite existing files -a auto-convert any text files\n\
|
|
-o overwrite files WITHOUT prompting -aa treat ALL files as text\n \
|
|
-j junk paths (do not make directories) -v be verbose/print version info\n\
|
|
%c-C%c match filenames case-insensitively %c-L%c make (some) names \
|
|
lowercase\n %-42s %c-V%c retain VMS version numbers\n%s";
|
|
|
|
static ZCONST char Far UnzipUsageLine5[] = "\
|
|
Examples (see unzip.txt for more info):\n\
|
|
unzip data1 -x joe => extract all files except joe from zipfile data1.zip\n\
|
|
%s\
|
|
unzip -fo foo %-6s => quietly replace existing %s if archive file newer\n";
|
|
#endif /* ?SFX */
|
|
|
|
|
|
|
|
|
|
|
|
/*****************************/
|
|
/* main() / UzpMain() stub */
|
|
/*****************************/
|
|
#include <setjmp.h> // for jmp stuff
|
|
|
|
// set jump point
|
|
jmp_buf unzipdll_error_return;
|
|
int jmperrcode;
|
|
|
|
|
|
int unzip_main(argc, argv) /* return PK-type error code (except under VMS) */
|
|
int argc;
|
|
char **argv;
|
|
{
|
|
int r;
|
|
|
|
CONSTRUCTGLOBALS();
|
|
r = unzip(__G__ argc, argv);
|
|
DESTROYGLOBALS();
|
|
RETURN(r);
|
|
}
|
|
|
|
|
|
|
|
|
|
/*******************************/
|
|
/* Primary UnZip entry point */
|
|
/*******************************/
|
|
|
|
int unzip(__G__ argc, argv)
|
|
__GDEF
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
|
|
#ifndef NO_ZIPINFO
|
|
char *p;
|
|
#endif
|
|
#ifdef DOS_FLX_H68_NLM_OS2_W32
|
|
int i;
|
|
#endif
|
|
int retcode,error=FALSE;
|
|
|
|
SETLOCALE(LC_CTYPE,"");
|
|
|
|
#if (defined(__IBMC__) && defined(__DEBUG_ALLOC__))
|
|
extern void DebugMalloc(void);
|
|
|
|
atexit(DebugMalloc);
|
|
#endif
|
|
|
|
#ifdef MALLOC_WORK
|
|
/* The following (rather complex) expression determines the allocation
|
|
size of the decompression work area. It simulates what the
|
|
combined "union" and "struct" declaration of the "static" work
|
|
area reservation achieves automatically at compile time.
|
|
Any decent compiler should evaluate this expression completely at
|
|
compile time and provide constants to the zcalloc() call.
|
|
(For better readability, some subexpressions are encapsulated
|
|
in temporarly defined macros.)
|
|
*/
|
|
# define UZ_SLIDE_CHUNK (sizeof(shrint)+sizeof(uch)+sizeof(uch))
|
|
# define UZ_NUMOF_CHUNKS \
|
|
(unsigned)(((WSIZE+UZ_SLIDE_CHUNK-1)/UZ_SLIDE_CHUNK > HSIZE) ? \
|
|
(WSIZE+UZ_SLIDE_CHUNK-1)/UZ_SLIDE_CHUNK : HSIZE)
|
|
G.area.Slide = (uch *)zcalloc(UZ_NUMOF_CHUNKS, UZ_SLIDE_CHUNK);
|
|
# undef UZ_SLIDE_CHUNK
|
|
# undef UZ_NUMOF_CHUNKS
|
|
G.area.shrink.Parent = (shrint *)G.area.Slide;
|
|
G.area.shrink.value = G.area.Slide + (sizeof(shrint)*(HSIZE));
|
|
G.area.shrink.Stack = G.area.Slide +
|
|
(sizeof(shrint) + sizeof(uch))*(HSIZE);
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Set signal handler for restoring echo, warn of zipfile corruption, etc.
|
|
---------------------------------------------------------------------------*/
|
|
jmperrcode = setjmp(unzipdll_error_return);
|
|
if (jmperrcode) {
|
|
return jmperrcode;
|
|
}
|
|
|
|
#if (defined(WIN32) && defined(__RSXNT__))
|
|
for (i = 0 ; i < argc; i++) {
|
|
_ISO_INTERN(argv[i]);
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Macintosh initialization code.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef MACOS
|
|
{
|
|
int a;
|
|
|
|
for (a = 0; a < 4; ++a)
|
|
G.rghCursor[a] = GetCursor(a+128);
|
|
G.giCursor = 0;
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
NetWare initialization code.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef NLM
|
|
InitUnZipConsole();
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Acorn RISC OS initialization code.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef RISCOS
|
|
set_prefix();
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Theos initialization code.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef THEOS
|
|
/* The easiest way found to force creation of libraries when selected
|
|
* members are to be unzipped. Explicitely add libraries names to the
|
|
* arguments list before the first member of the library.
|
|
*/
|
|
if (! _setargv(&argc, &argv)) {
|
|
Info(slide, 0x401, ((char *)slide, "cannot process argv\n"));
|
|
retcode = PK_MEM;
|
|
goto cleanup_and_exit;
|
|
}
|
|
#endif
|
|
|
|
/*---------------------------------------------------------------------------
|
|
First figure out if we're running in UnZip mode or ZipInfo mode, and put
|
|
the appropriate environment-variable options into the queue. Then rip
|
|
through any command-line options lurking about...
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef SFX
|
|
G.argv0 = argv[0];
|
|
#if (defined(OS2) || defined(WIN32))
|
|
G.zipfn = GetLoadPath(__G);/* non-MSC NT puts path into G.filename[] */
|
|
#else
|
|
G.zipfn = G.argv0;
|
|
#endif
|
|
|
|
#ifdef VMSCLI
|
|
{
|
|
ulg status = vms_unzip_cmdline(&argc, &argv);
|
|
if (!(status & 1)) {
|
|
retcode = (int)status;
|
|
goto cleanup_and_exit;
|
|
}
|
|
}
|
|
#endif /* VMSCLI */
|
|
|
|
uO.zipinfo_mode = FALSE;
|
|
error = uz_opts(__G__ &argc, &argv); /* UnZipSFX call only */
|
|
|
|
#else /* !SFX */
|
|
|
|
#ifdef RISCOS
|
|
/* get the extensions to swap from environment */
|
|
getRISCOSexts(ENV_UNZIPEXTS);
|
|
#endif
|
|
|
|
#ifdef MSDOS
|
|
/* extract MKS extended argument list from environment (before envargs!) */
|
|
mksargs(&argc, &argv);
|
|
#endif
|
|
|
|
#ifdef VMSCLI
|
|
{
|
|
ulg status = vms_unzip_cmdline(&argc, &argv);
|
|
if (!(status & 1)) {
|
|
retcode = (int)status;
|
|
goto cleanup_and_exit;
|
|
}
|
|
}
|
|
#endif /* VMSCLI */
|
|
|
|
G.noargs = (argc == 1); /* no options, no zipfile, no anything */
|
|
|
|
#ifndef NO_ZIPINFO
|
|
for (p = argv[0] + strlen(argv[0]); p >= argv[0]; --p) {
|
|
if (*p == DIR_END
|
|
#ifdef DIR_END2
|
|
|| *p == DIR_END2
|
|
#endif
|
|
)
|
|
break;
|
|
}
|
|
++p;
|
|
|
|
#ifdef THEOS
|
|
if (strncmp(p, "ZIPINFO.",8) == 0 || strstr(p, ".ZIPINFO:") != NULL ||
|
|
strncmp(p, "II.",3) == 0 || strstr(p, ".II:") != NULL ||
|
|
#else
|
|
if (STRNICMP(p, LoadFarStringSmall(Zipnfo), 7) == 0 ||
|
|
STRNICMP(p, "ii", 2) == 0 ||
|
|
#endif
|
|
(argc > 1 && strncmp(argv[1], "-Z", 2) == 0))
|
|
{
|
|
uO.zipinfo_mode = TRUE;
|
|
if ((error = envargs(&argc, &argv, LoadFarStringSmall(EnvZipInfo),
|
|
LoadFarStringSmall2(EnvZipInfo2))) != PK_OK)
|
|
perror(LoadFarString(NoMemArguments));
|
|
else
|
|
error = zi_opts(__G__ &argc, &argv);
|
|
} else
|
|
#endif /* NO_ZIPINFO */
|
|
{
|
|
uO.zipinfo_mode = FALSE;
|
|
if ((error = envargs(&argc, &argv, LoadFarStringSmall(EnvUnZip),
|
|
LoadFarStringSmall2(EnvUnZip2))) != PK_OK)
|
|
perror(LoadFarString(NoMemArguments));
|
|
else
|
|
error = uz_opts(__G__ &argc, &argv);
|
|
}
|
|
|
|
#endif /* ?SFX */
|
|
|
|
if ((argc < 0) || error) {
|
|
retcode = error;
|
|
goto cleanup_and_exit;
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Now get the zipfile name from the command line and then process any re-
|
|
maining options and file specifications.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef DOS_FLX_H68_NLM_OS2_W32
|
|
/* convert MSDOS-style 'backward slash' directory separators to Unix-style
|
|
* 'forward slashes' for user's convenience (include zipfile name itself)
|
|
*/
|
|
#ifdef SFX
|
|
for (G.pfnames = argv, i = argc; i > 0; --i) {
|
|
#else
|
|
/* argc does not include the zipfile specification */
|
|
for (G.pfnames = argv, i = argc+1; i > 0; --i) {
|
|
#endif
|
|
#ifdef __human68k__
|
|
extern char *_toslash(char *);
|
|
_toslash(*G.pfnames);
|
|
#else /* !__human68k__ */
|
|
char *q;
|
|
|
|
for (q = *G.pfnames; *q; ++q)
|
|
if (*q == '\\')
|
|
*q = '/';
|
|
++G.pfnames;
|
|
#endif /* ?__human68k__ */
|
|
}
|
|
#endif /* DOS_FLX_H68_NLM_OS2_W32 */
|
|
|
|
#ifndef SFX
|
|
G.wildzipfn = *argv++;
|
|
#endif
|
|
|
|
#if (defined(SFX) && !defined(SFX_EXDIR)) /* only check for -x */
|
|
|
|
G.filespecs = argc;
|
|
G.xfilespecs = 0;
|
|
|
|
if (argc > 0) {
|
|
char **pp = argv-1;
|
|
|
|
G.pfnames = argv;
|
|
while (*++pp)
|
|
if (strcmp(*pp, "-x") == 0) {
|
|
if (pp > argv) {
|
|
*pp = 0; /* terminate G.pfnames */
|
|
G.filespecs = pp - G.pfnames;
|
|
} else {
|
|
G.pfnames = (char **)fnames; /* defaults */
|
|
G.filespecs = 0;
|
|
}
|
|
G.pxnames = pp + 1; /* excluded-names ptr: _after_ -x */
|
|
G.xfilespecs = argc - G.filespecs - 1;
|
|
break; /* skip rest of args */
|
|
}
|
|
G.process_all_files = FALSE;
|
|
} else
|
|
G.process_all_files = TRUE; /* for speed */
|
|
|
|
#else /* !SFX || SFX_EXDIR */ /* check for -x or -d */
|
|
|
|
G.filespecs = argc;
|
|
G.xfilespecs = 0;
|
|
|
|
if (argc > 0) {
|
|
int in_files=FALSE, in_xfiles=FALSE, ctr=0; // needs a counter loop
|
|
char **pp = argv-1;
|
|
|
|
G.process_all_files = FALSE;
|
|
G.pfnames = argv;
|
|
while (*++pp && ctr<argc) {
|
|
ctr++;
|
|
Trace((stderr, "pp - argv = %d\n", pp-argv));
|
|
#ifdef CMS_MVS
|
|
if (!uO.exdir && STRNICMP(*pp, "-d", 2) == 0) {
|
|
#else
|
|
if (!uO.exdir && strncmp(*pp, "-d", 2) == 0) {
|
|
#endif
|
|
int firstarg = (pp == argv);
|
|
|
|
uO.exdir = (*pp) + 2;
|
|
if (in_files) { /* ... zipfile ... -d exdir ... */
|
|
*pp = (char *)NULL; /* terminate G.pfnames */
|
|
G.filespecs = pp - G.pfnames;
|
|
in_files = FALSE;
|
|
} else if (in_xfiles) {
|
|
*pp = (char *)NULL; /* terminate G.pxnames */
|
|
G.xfilespecs = pp - G.pxnames;
|
|
/* "... -x xlist -d exdir": nothing left */
|
|
}
|
|
/* first check for "-dexdir", then for "-d exdir" */
|
|
if (*uO.exdir == '\0') {
|
|
if (*++pp)
|
|
uO.exdir = *pp;
|
|
else {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGiveExdir)));
|
|
/* don't extract here by accident */
|
|
retcode = PK_PARAM;
|
|
goto cleanup_and_exit;
|
|
}
|
|
}
|
|
if (firstarg) { /* ... zipfile -d exdir ... */
|
|
if (pp[1]) {
|
|
G.pfnames = pp + 1; /* argv+2 */
|
|
G.filespecs = argc - (G.pfnames-argv); /* for now... */
|
|
} else {
|
|
G.process_all_files = TRUE;
|
|
G.pfnames = (char **)fnames; /* GRR: necessary? */
|
|
G.filespecs = 0; /* GRR: necessary? */
|
|
break;
|
|
}
|
|
}
|
|
} else if (!in_xfiles) {
|
|
if (strcmp(*pp, "-x") == 0) {
|
|
in_xfiles = TRUE;
|
|
if (pp == G.pfnames) {
|
|
G.pfnames = (char **)fnames; /* defaults */
|
|
G.filespecs = 0;
|
|
} else if (in_files) {
|
|
*pp = 0; /* terminate G.pfnames */
|
|
G.filespecs = pp - G.pfnames; /* adjust count */
|
|
in_files = FALSE;
|
|
}
|
|
G.pxnames = pp + 1; /* excluded-names ptr starts after -x */
|
|
G.xfilespecs = argc - (G.pxnames-argv); /* anything left */
|
|
} else
|
|
in_files = TRUE;
|
|
}
|
|
}
|
|
} else
|
|
G.process_all_files = TRUE; /* for speed */
|
|
|
|
if (uO.exdir != (char *)NULL && !G.extract_flag) /* -d ignored */
|
|
Info(slide, 0x401, ((char *)slide, LoadFarString(NotExtracting)));
|
|
#endif /* ?(SFX && !SFX_EXDIR) */
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Okey dokey, we have everything we need to get started. Let's roll.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
retcode = process_zipfiles(__G);
|
|
|
|
cleanup_and_exit:
|
|
#ifdef REENTRANT
|
|
/* restore all signal handlers back to their state at function entry */
|
|
while (oldsighandlers != NULL) {
|
|
savsigs_info *thissigsav = oldsighandlers;
|
|
|
|
signal(thissigsav->sigtype, thissigsav->sighandler);
|
|
oldsighandlers = thissigsav->previous;
|
|
free(thissigsav);
|
|
}
|
|
#endif
|
|
#if (defined(MALLOC_WORK) && !defined(REENTRANT))
|
|
if (G.area.Slide != (uch *)NULL) {
|
|
free(G.area.Slide);
|
|
G.area.Slide = (uch *)NULL;
|
|
}
|
|
#endif
|
|
return(retcode);
|
|
|
|
} /* end main()/unzip() */
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/**********************/
|
|
/* Function uz_opts() */
|
|
/**********************/
|
|
|
|
int uz_opts(__G__ pargc, pargv)
|
|
__GDEF
|
|
int *pargc;
|
|
char ***pargv;
|
|
{
|
|
char **argv, *s;
|
|
int argc, c, error=FALSE, negative=0;
|
|
|
|
|
|
argc = *pargc;
|
|
argv = *pargv;
|
|
|
|
while (++argv, (--argc > 0 && *argv != NULL && **argv == '-')) {
|
|
s = *argv + 1;
|
|
while ((c = *s++) != 0) { /* "!= 0": prevent Turbo C warning */
|
|
#ifdef CMS_MVS
|
|
switch (tolower(c))
|
|
#else
|
|
switch (c)
|
|
#endif
|
|
{
|
|
case ('-'):
|
|
++negative;
|
|
break;
|
|
#ifdef RISCOS
|
|
case ('/'):
|
|
if (negative) { /* negative not allowed with -/ swap */
|
|
Info(slide, 0x401, ((char *)slide,
|
|
"error: must give extensions list"));
|
|
return(PK_PARAM); /* don't extract here by accident */
|
|
}
|
|
exts2swap = s; /* override Unzip$Exts */
|
|
s += strlen(s);
|
|
break;
|
|
#endif
|
|
case ('a'):
|
|
if (negative) {
|
|
uO.aflag = MAX(uO.aflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.aflag;
|
|
break;
|
|
#if (defined(DLL) && defined(API_DOC))
|
|
case ('A'): /* extended help for API */
|
|
APIhelp(__G__ argc, argv);
|
|
*pargc = -1; /* signal to exit successfully */
|
|
return 0;
|
|
#endif
|
|
case ('b'):
|
|
if (negative) {
|
|
#if (defined(TANDEM) || defined(VMS))
|
|
uO.bflag = MAX(uO.bflag-negative,0);
|
|
#endif
|
|
negative = 0; /* do nothing: "-b" is default */
|
|
} else {
|
|
#ifdef VMS
|
|
if (uO.aflag == 0)
|
|
++uO.bflag;
|
|
#endif
|
|
#ifdef TANDEM
|
|
++uO.bflag;
|
|
#endif
|
|
uO.aflag = 0;
|
|
}
|
|
break;
|
|
#ifdef UNIXBACKUP
|
|
case ('B'): /* -B: back up existing files */
|
|
if (negative)
|
|
uO.B_flag = FALSE, negative = 0;
|
|
else
|
|
uO.B_flag = TRUE;
|
|
break;
|
|
#endif
|
|
case ('c'):
|
|
if (negative) {
|
|
uO.cflag = FALSE, negative = 0;
|
|
#ifdef NATIVE
|
|
uO.aflag = 0;
|
|
#endif
|
|
} else {
|
|
uO.cflag = TRUE;
|
|
#ifdef NATIVE
|
|
uO.aflag = 2; /* so you can read it on the screen */
|
|
#endif
|
|
#ifdef DLL
|
|
if (G.redirect_text)
|
|
G.redirect_data = 2;
|
|
#endif
|
|
}
|
|
break;
|
|
#ifndef CMS_MVS
|
|
case ('C'): /* -C: match filenames case-insensitively */
|
|
if (negative)
|
|
uO.C_flag = FALSE, negative = 0;
|
|
else
|
|
uO.C_flag = TRUE;
|
|
break;
|
|
#endif /* !CMS_MVS */
|
|
#if (!defined(SFX) || defined(SFX_EXDIR))
|
|
case ('d'):
|
|
if (negative) { /* negative not allowed with -d exdir */
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGiveExdir)));
|
|
return(PK_PARAM); /* don't extract here by accident */
|
|
}
|
|
if (uO.exdir != (char *)NULL) {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(OnlyOneExdir)));
|
|
return(PK_PARAM); /* GRR: stupid restriction? */
|
|
} else {
|
|
/* first check for "-dexdir", then for "-d exdir" */
|
|
uO.exdir = s;
|
|
if (*uO.exdir == '\0') {
|
|
if (argc > 1) {
|
|
--argc;
|
|
uO.exdir = *++argv;
|
|
if (*uO.exdir == '-') {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGiveExdir)));
|
|
return(PK_PARAM);
|
|
}
|
|
/* else uO.exdir points at extraction dir */
|
|
} else {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGiveExdir)));
|
|
return(PK_PARAM);
|
|
}
|
|
}
|
|
/* uO.exdir now points at extraction dir (-dexdir or
|
|
* -d exdir); point s at end of exdir to avoid mis-
|
|
* interpretation of exdir characters as more options
|
|
*/
|
|
if (*s != 0)
|
|
while (*++s != 0)
|
|
;
|
|
}
|
|
break;
|
|
#endif /* !SFX || SFX_EXDIR */
|
|
case ('e'): /* just ignore -e, -x options (extract) */
|
|
break;
|
|
#ifdef MACOS
|
|
case ('E'): /* -E [MacOS] display Mac e.f. when restoring */
|
|
if( negative ) {
|
|
uO.E_flag = FALSE, negative = 0;
|
|
} else {
|
|
uO.E_flag = TRUE;
|
|
}
|
|
break;
|
|
#endif /* MACOS */
|
|
case ('f'): /* "freshen" (extract only newer files) */
|
|
if (negative)
|
|
uO.fflag = uO.uflag = FALSE, negative = 0;
|
|
else
|
|
uO.fflag = uO.uflag = TRUE;
|
|
break;
|
|
#if (defined(RISCOS) || defined(ACORN_FTYPE_NFS))
|
|
case ('F'): /* Acorn filetype & NFS extension handling */
|
|
if (negative)
|
|
uO.acorn_nfs_ext = FALSE, negative = 0;
|
|
else
|
|
uO.acorn_nfs_ext = TRUE;
|
|
break;
|
|
#endif /* RISCOS || ACORN_FTYPE_NFS */
|
|
case ('h'): /* just print help message and quit */
|
|
*pargc = -1;
|
|
return USAGE(PK_OK);
|
|
#ifdef MACOS
|
|
case ('i'): /* -i [MacOS] ignore filenames stored in Mac ef */
|
|
if( negative ) {
|
|
uO.i_flag = FALSE, negative = 0;
|
|
} else {
|
|
uO.i_flag = TRUE;
|
|
}
|
|
break;
|
|
#endif /* MACOS */
|
|
case ('j'): /* junk pathnames/directory structure */
|
|
if (negative)
|
|
uO.jflag = FALSE, negative = 0;
|
|
else
|
|
uO.jflag = TRUE;
|
|
break;
|
|
#if (defined(__BEOS__) || defined(MACOS))
|
|
case ('J'): /* Junk BeOS or MacOS file attributes */
|
|
if( negative ) {
|
|
uO.J_flag = FALSE, negative = 0;
|
|
} else {
|
|
uO.J_flag = TRUE;
|
|
}
|
|
break;
|
|
#endif /* __BEOS__ || MACOS */
|
|
#ifndef SFX
|
|
case ('l'):
|
|
if (negative) {
|
|
uO.vflag = MAX(uO.vflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.vflag;
|
|
break;
|
|
#endif /* !SFX */
|
|
#ifndef CMS_MVS
|
|
case ('L'): /* convert (some) filenames to lowercase */
|
|
if (negative) {
|
|
uO.L_flag = MAX(uO.L_flag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.L_flag;
|
|
break;
|
|
#endif /* !CMS_MVS */
|
|
#ifdef MORE
|
|
#ifdef CMS_MVS
|
|
case ('m'):
|
|
#endif
|
|
case ('M'): /* send all screen output through "more" fn. */
|
|
/* GRR: eventually check for numerical argument => height */
|
|
if (negative)
|
|
G.M_flag = FALSE, negative = 0;
|
|
else
|
|
G.M_flag = TRUE;
|
|
break;
|
|
#endif /* MORE */
|
|
case ('n'): /* don't overwrite any files */
|
|
if (negative)
|
|
uO.overwrite_none = FALSE, negative = 0;
|
|
else
|
|
uO.overwrite_none = TRUE;
|
|
break;
|
|
#ifdef AMIGA
|
|
case ('N'): /* restore comments as filenotes */
|
|
if (negative)
|
|
uO.N_flag = FALSE, negative = 0;
|
|
else
|
|
uO.N_flag = TRUE;
|
|
break;
|
|
#endif /* AMIGA */
|
|
case ('o'): /* OK to overwrite files without prompting */
|
|
if (negative) {
|
|
uO.overwrite_all = MAX(uO.overwrite_all-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.overwrite_all;
|
|
break;
|
|
case ('p'): /* pipes: extract to stdout, no messages */
|
|
if (negative) {
|
|
uO.cflag = FALSE;
|
|
uO.qflag = MAX(uO.qflag-999,0);
|
|
negative = 0;
|
|
} else {
|
|
uO.cflag = TRUE;
|
|
uO.qflag += 999;
|
|
}
|
|
break;
|
|
#if CRYPT
|
|
/* GRR: yes, this is highly insecure, but dozens of people
|
|
* have pestered us for this, so here we go... */
|
|
case ('P'):
|
|
if (negative) { /* negative not allowed with -P passwd */
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGivePasswd)));
|
|
return(PK_PARAM); /* don't extract here by accident */
|
|
}
|
|
if (uO.pwdarg != (char *)NULL) {
|
|
/*
|
|
GRR: eventually support multiple passwords?
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(OnlyOnePasswd)));
|
|
return(PK_PARAM);
|
|
*/
|
|
} else {
|
|
/* first check for "-Ppasswd", then for "-P passwd" */
|
|
uO.pwdarg = s;
|
|
if (*uO.pwdarg == '\0') {
|
|
if (argc > 1) {
|
|
--argc;
|
|
uO.pwdarg = *++argv;
|
|
if (*uO.pwdarg == '-') {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGivePasswd)));
|
|
return(PK_PARAM);
|
|
}
|
|
/* else pwdarg points at decryption password */
|
|
} else {
|
|
Info(slide, 0x401, ((char *)slide,
|
|
LoadFarString(MustGivePasswd)));
|
|
return(PK_PARAM);
|
|
}
|
|
}
|
|
/* pwdarg now points at decryption password (-Ppasswd or
|
|
* -P passwd); point s at end of passwd to avoid mis-
|
|
* interpretation of passwd characters as more options
|
|
*/
|
|
if (*s != 0)
|
|
while (*++s != 0)
|
|
;
|
|
}
|
|
break;
|
|
#endif /* CRYPT */
|
|
case ('q'): /* quiet: fewer comments/messages */
|
|
if (negative) {
|
|
uO.qflag = MAX(uO.qflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.qflag;
|
|
break;
|
|
#ifdef QDOS
|
|
case ('Q'): /* QDOS flags */
|
|
qlflag ^= strtol(s, &s, 10);
|
|
break; /* we XOR this as we can config qlflags */
|
|
#endif
|
|
#ifdef DOS_FLX_NLM_OS2_W32
|
|
case ('s'): /* spaces in filenames: allow by default */
|
|
if (negative)
|
|
uO.sflag = FALSE, negative = 0;
|
|
else
|
|
uO.sflag = TRUE;
|
|
break;
|
|
#endif /* DOS_FLX_NLM_OS2_W32 */
|
|
case ('t'):
|
|
if (negative)
|
|
uO.tflag = FALSE, negative = 0;
|
|
else
|
|
uO.tflag = TRUE;
|
|
break;
|
|
#ifdef TIMESTAMP
|
|
case ('T'):
|
|
if (negative)
|
|
uO.T_flag = FALSE, negative = 0;
|
|
else
|
|
uO.T_flag = TRUE;
|
|
break;
|
|
#endif
|
|
case ('u'): /* update (extract only new and newer files) */
|
|
if (negative)
|
|
uO.uflag = FALSE, negative = 0;
|
|
else
|
|
uO.uflag = TRUE;
|
|
break;
|
|
#ifndef CMS_MVS
|
|
case ('U'): /* obsolete; to be removed in version 6.0 */
|
|
if (negative)
|
|
uO.L_flag = TRUE, negative = 0;
|
|
else
|
|
uO.L_flag = FALSE;
|
|
break;
|
|
#endif /* !CMS_MVS */
|
|
#ifndef SFX
|
|
case ('v'): /* verbose */
|
|
if (negative) {
|
|
uO.vflag = MAX(uO.vflag-negative,0);
|
|
negative = 0;
|
|
} else if (uO.vflag)
|
|
++uO.vflag;
|
|
else
|
|
uO.vflag = 2;
|
|
break;
|
|
#endif /* !SFX */
|
|
#ifndef CMS_MVS
|
|
case ('V'): /* Version (retain VMS/DEC-20 file versions) */
|
|
if (negative)
|
|
uO.V_flag = FALSE, negative = 0;
|
|
else
|
|
uO.V_flag = TRUE;
|
|
break;
|
|
#endif /* !CMS_MVS */
|
|
case ('x'): /* extract: default */
|
|
#ifdef SFX
|
|
/* when 'x' is the only option in this argument, and the
|
|
* next arg is not an option, assume this initiates an
|
|
* exclusion list (-x xlist): terminate option-scanning
|
|
* and leave uz_opts with argv still pointing to "-x";
|
|
* the xlist is processed later
|
|
*/
|
|
if (s - argv[0] == 2 && *s == '\0' &&
|
|
argc > 1 && argv[1][0] != '-') {
|
|
/* break out of nested loops without "++argv;--argc" */
|
|
goto opts_done;
|
|
}
|
|
#endif /* SFX */
|
|
break;
|
|
#if (defined(RESTORE_UIDGID) || defined(RESTORE_ACL))
|
|
case ('X'): /* restore owner/protection info (need privs?) */
|
|
if (negative) {
|
|
uO.X_flag = MAX(uO.X_flag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.X_flag;
|
|
break;
|
|
#endif /* RESTORE_UIDGID || RESTORE_ACL */
|
|
case ('z'): /* display only the archive comment */
|
|
if (negative) {
|
|
uO.zflag = MAX(uO.zflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.zflag;
|
|
break;
|
|
#ifndef SFX
|
|
case ('Z'): /* should have been first option (ZipInfo) */
|
|
Info(slide, 0x401, ((char *)slide, LoadFarString(Zfirst)));
|
|
error = TRUE;
|
|
break;
|
|
#endif /* !SFX */
|
|
#ifdef DOS_H68_OS2_W32
|
|
case ('$'):
|
|
if (negative) {
|
|
uO.volflag = MAX(uO.volflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.volflag;
|
|
break;
|
|
#endif /* DOS_H68_OS2_W32 */
|
|
#if (!defined(RISCOS) && !defined(CMS_MVS) && !defined(TANDEM))
|
|
case (':'):
|
|
if (negative) {
|
|
uO.ddotflag = MAX(uO.ddotflag-negative,0);
|
|
negative = 0;
|
|
} else
|
|
++uO.ddotflag;
|
|
break;
|
|
#endif /* !RISCOS && !CMS_MVS && !TANDEM */
|
|
default:
|
|
error = TRUE;
|
|
break;
|
|
|
|
} /* end switch */
|
|
} /* end while (not end of argument string) */
|
|
} /* end while (not done with switches) */
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Check for nonsensical combinations of options.
|
|
---------------------------------------------------------------------------*/
|
|
|
|
#ifdef SFX
|
|
opts_done: /* yes, very ugly...but only used by UnZipSFX with -x xlist */
|
|
#endif
|
|
|
|
if ((uO.cflag && uO.tflag) || (uO.cflag && uO.uflag) ||
|
|
(uO.tflag && uO.uflag) || (uO.fflag && uO.overwrite_none))
|
|
{
|
|
Info(slide, 0x401, ((char *)slide, LoadFarString(InvalidOptionsMsg)));
|
|
error = TRUE;
|
|
}
|
|
if (uO.aflag > 2)
|
|
uO.aflag = 2;
|
|
#ifdef VMS
|
|
if (uO.bflag > 2)
|
|
uO.bflag = 2;
|
|
#endif
|
|
if (uO.overwrite_all && uO.overwrite_none) {
|
|
Info(slide, 0x401, ((char *)slide, LoadFarString(IgnoreOOptionMsg)));
|
|
uO.overwrite_all = FALSE;
|
|
}
|
|
#ifdef MORE
|
|
if (G.M_flag && !isatty(1)) /* stdout redirected: "more" func. useless */
|
|
G.M_flag = 0;
|
|
#endif
|
|
|
|
#ifdef SFX
|
|
if (error)
|
|
#else
|
|
if ((argc-- == 0) || error)
|
|
#endif
|
|
{
|
|
*pargc = argc;
|
|
*pargv = argv;
|
|
#ifndef SFX
|
|
if (uO.vflag >= 2 && argc == -1) { /* "unzip -v" */
|
|
show_version_info(__G);
|
|
return PK_OK;
|
|
}
|
|
if (!G.noargs && !error)
|
|
error = PK_PARAM; /* had options (not -h or -v) but no zipfile */
|
|
#endif /* !SFX */
|
|
return USAGE(error);
|
|
}
|
|
|
|
#ifdef SFX
|
|
/* print our banner unless we're being fairly quiet */
|
|
if (uO.qflag < 2)
|
|
Info(slide, error? 1 : 0, ((char *)slide, LoadFarString(UnzipSFXBanner),
|
|
UZ_MAJORVER, UZ_MINORVER, UZ_PATCHLEVEL, UZ_BETALEVEL,
|
|
LoadFarStringSmall(VersionDate)));
|
|
#ifdef BETA
|
|
/* always print the beta warning: no unauthorized distribution!! */
|
|
Info(slide, error? 1 : 0, ((char *)slide, LoadFarString(BetaVersion), "\n",
|
|
"SFX"));
|
|
#endif
|
|
#endif /* SFX */
|
|
|
|
if (uO.cflag || uO.tflag || uO.vflag || uO.zflag
|
|
#ifdef TIMESTAMP
|
|
|| uO.T_flag
|
|
#endif
|
|
)
|
|
G.extract_flag = FALSE;
|
|
else
|
|
G.extract_flag = TRUE;
|
|
|
|
*pargc = argc;
|
|
*pargv = argv;
|
|
return PK_OK;
|
|
|
|
} /* end function uz_opts() */
|
|
|
|
|
|
|
|
|
|
/********************/
|
|
/* Function usage() */
|
|
/********************/
|
|
|
|
#ifdef SFX
|
|
# ifdef VMS
|
|
# define LOCAL "X. Quote uppercase options"
|
|
# endif
|
|
# ifdef UNIX
|
|
# define LOCAL "X"
|
|
# endif
|
|
# ifdef DOS_OS2_W32
|
|
# define LOCAL "s$"
|
|
# endif
|
|
# if (defined(FLEXOS) || defined(NLM))
|
|
# define LOCAL "s"
|
|
# endif
|
|
# ifdef AMIGA
|
|
# define LOCAL "N"
|
|
# endif
|
|
/* Default for all other systems: */
|
|
# ifndef LOCAL
|
|
# define LOCAL ""
|
|
# endif
|
|
|
|
# ifdef MORE
|
|
# define SFXOPT1 "M"
|
|
# else
|
|
# define SFXOPT1 ""
|
|
# endif
|
|
|
|
int usage(__G__ error) /* return PK-type error code */
|
|
__GDEF
|
|
int error;
|
|
{
|
|
Info(slide, error? 1 : 0, ((char *)slide, LoadFarString(UnzipSFXBanner),
|
|
UZ_MAJORVER, UZ_MINORVER, UZ_PATCHLEVEL, UZ_BETALEVEL,
|
|
LoadFarStringSmall(VersionDate)));
|
|
Info(slide, error? 1 : 0, ((char *)slide, LoadFarString(UnzipSFXOpts),
|
|
SFXOPT1, LOCAL));
|
|
#ifdef BETA
|
|
Info(slide, error? 1 : 0, ((char *)slide, LoadFarString(BetaVersion), "\n",
|
|
"SFX"));
|
|
#endif
|
|
|
|
if (error)
|
|
return PK_PARAM;
|
|
else
|
|
return PK_COOL; /* just wanted usage screen: no error */
|
|
|
|
} /* end function usage() */
|
|
|
|
|
|
|
|
|
|
|
|
#else /* !SFX */
|
|
# ifdef VMS
|
|
# define QUOT '\"'
|
|
# define QUOTS "\""
|
|
# else
|
|
# define QUOT ' '
|
|
# define QUOTS ""
|
|
# endif
|
|
|
|
int usage(__G__ error) /* return PK-type error code */
|
|
__GDEF
|
|
int error;
|
|
{
|
|
int flag = (error? 1 : 0);
|
|
|
|
|
|
/*---------------------------------------------------------------------------
|
|
Print either ZipInfo usage or UnZip usage, depending on incantation.
|
|
(Strings must be no longer than 512 bytes for Turbo C, apparently.)
|
|
---------------------------------------------------------------------------*/
|
|
|
|
if (uO.zipinfo_mode) {
|
|
|
|
#ifndef NO_ZIPINFO
|
|
|
|
Info(slide, flag, ((char *)slide, LoadFarString(ZipInfoUsageLine1),
|
|
ZI_MAJORVER, ZI_MINORVER, UZ_PATCHLEVEL, UZ_BETALEVEL,
|
|
LoadFarStringSmall(VersionDate),
|
|
LoadFarStringSmall2(ZipInfoExample), QUOTS,QUOTS));
|
|
Info(slide, flag, ((char *)slide, LoadFarString(ZipInfoUsageLine2)));
|
|
Info(slide, flag, ((char *)slide, LoadFarString(ZipInfoUsageLine3),
|
|
QUOT,QUOT, QUOT,QUOT, LoadFarStringSmall(ZipInfoUsageLine4)));
|
|
#ifdef VMS
|
|
Info(slide, flag, ((char *)slide, "\nRemember that non-lowercase\
|
|
filespecs must be quoted in VMS (e.g., \"Makefile\").\n"));
|
|
#endif
|
|
|
|
#endif /* !NO_ZIPINFO */
|
|
|
|
} else { /* UnZip mode */
|
|
|
|
Info(slide, flag, ((char *)slide, LoadFarString(UnzipUsageLine1),
|
|
UZ_MAJORVER, UZ_MINORVER, UZ_PATCHLEVEL, UZ_BETALEVEL,
|
|
LoadFarStringSmall(VersionDate)));
|
|
#ifdef BETA
|
|
Info(slide, flag, ((char *)slide, LoadFarString(BetaVersion), "", ""));
|
|
#endif
|
|
|
|
Info(slide, flag, ((char *)slide, LoadFarString(UnzipUsageLine2),
|
|
ZIPINFO_MODE_OPTION, LoadFarStringSmall(ZipInfoMode)));
|
|
#ifdef VMS
|
|
if (!error) /* maybe no command-line tail found; show extra help */
|
|
Info(slide, flag, ((char *)slide, LoadFarString(VMSusageLine2b)));
|
|
#endif
|
|
|
|
Info(slide, flag, ((char *)slide, LoadFarString(UnzipUsageLine3),
|
|
LoadFarStringSmall(local1)));
|
|
|
|
Info(slide, flag, ((char *)slide, LoadFarString(UnzipUsageLine4),
|
|
QUOT,QUOT, QUOT,QUOT, LoadFarStringSmall(local2), QUOT,QUOT,
|
|
LoadFarStringSmall2(local3)));
|
|
|
|
/* This is extra work for SMALL_MEM, but it will work since
|
|
* LoadFarStringSmall2 uses the same buffer. Remember, this
|
|
* is a hack. */
|
|
Info(slide, flag, ((char *)slide, LoadFarString(UnzipUsageLine5),
|
|
LoadFarStringSmall(Example2), LoadFarStringSmall2(Example3),
|
|
LoadFarStringSmall2(Example3)));
|
|
|
|
} /* end if (uO.zipinfo_mode) */
|
|
|
|
if (error)
|
|
return PK_PARAM;
|
|
else
|
|
return PK_COOL; /* just wanted usage screen: no error */
|
|
|
|
} /* end function usage() */
|
|
|
|
#endif /* ?SFX */
|
|
|
|
|
|
|
|
|
|
#ifndef SFX
|
|
|
|
/********************************/
|
|
/* Function show_version_info() */
|
|
/********************************/
|
|
|
|
static void show_version_info(__G)
|
|
__GDEF
|
|
{
|
|
if (uO.qflag > 3) /* "unzip -vqqqq" */
|
|
Info(slide, 0, ((char *)slide, "%d\n",
|
|
(UZ_MAJORVER*100 + UZ_MINORVER*10 + UZ_PATCHLEVEL)));
|
|
else {
|
|
char *envptr, *getenv();
|
|
int numopts = 0;
|
|
|
|
Info(slide, 0, ((char *)slide, LoadFarString(UnzipUsageLine1v),
|
|
UZ_MAJORVER, UZ_MINORVER, UZ_PATCHLEVEL, UZ_BETALEVEL,
|
|
LoadFarStringSmall(VersionDate)));
|
|
Info(slide, 0, ((char *)slide,
|
|
LoadFarString(UnzipUsageLine2v)));
|
|
version(__G);
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptions)));
|
|
#ifdef ACORN_FTYPE_NFS
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(AcornFtypeNFS)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef ASM_CRC
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(AsmCRC)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef ASM_INFLATECODES
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(AsmInflateCodes)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef CHECK_VERSIONS
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Check_Versions)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef COPYRIGHT_CLEAN
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Copyright_Clean)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef DEBUG
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(UDebug)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef DEBUG_TIME
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(DebugTime)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef DLL
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Dll)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef DOSWILD
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(DosWild)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef LZW_CLEAN
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(LZW_Clean)));
|
|
++numopts;
|
|
#endif
|
|
#ifndef MORE
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(No_More)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef NO_ZIPINFO
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(No_ZipInfo)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef NTSD_EAS
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(NTSDExtAttrib)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef OLD_THEOS_EXTRA
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(OldTheosExtra)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef OS2_EAS
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(OS2ExtAttrib)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef QLZIP
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(SMSExFldOnUnix)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef REENTRANT
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Reentrant)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef REGARGS
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(RegArgs)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef RETURN_CODES
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Return_Codes)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef SET_DIR_ATTRIB
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(SetDirAttrib)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef TIMESTAMP
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(TimeStamp)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef UNIXBACKUP
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(UnixBackup)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef USE_EF_UT_TIME
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_EF_UT_time)));
|
|
++numopts;
|
|
#endif
|
|
#ifndef COPYRIGHT_CLEAN
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_Smith_Code)));
|
|
++numopts;
|
|
#endif
|
|
#ifndef LZW_CLEAN
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_Unshrink)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef USE_DEFLATE64
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_Deflate64)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef MULT_VOLUME
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_MultiVol)));
|
|
++numopts;
|
|
#endif
|
|
# if (defined(__DJGPP__) && (__DJGPP__ >= 2))
|
|
# ifdef USE_DJGPP_ENV
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_DJGPP_Env)));
|
|
++numopts;
|
|
# endif
|
|
# ifdef USE_DJGPP_GLOB
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_DJGPP_Glob)));
|
|
++numopts;
|
|
# endif
|
|
# endif /* __DJGPP__ && (__DJGPP__ >= 2) */
|
|
#ifdef USE_VFAT
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(Use_VFAT_support)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef USE_ZLIB
|
|
sprintf((char *)(slide+256), LoadFarStringSmall(UseZlib),
|
|
ZLIB_VERSION, zlib_version);
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
(char *)(slide+256)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef VMS_TEXT_CONV
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(VmsTextConv)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef VMSCLI
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(VmsCLI)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef VMSWILD
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(VmsWild)));
|
|
++numopts;
|
|
#endif
|
|
#ifdef WILD_STOP_AT_DIR
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(WildStopAtDir)));
|
|
++numopts;
|
|
#endif
|
|
#if CRYPT
|
|
# ifdef PASSWD_FROM_STDIN
|
|
Info(slide, 0, ((char *)slide, LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(PasswdStdin)));
|
|
# endif
|
|
Info(slide, 0, ((char *)slide, LoadFarString(Decryption),
|
|
CR_MAJORVER, CR_MINORVER, CR_BETA_VER,
|
|
LoadFarStringSmall(CryptDate)));
|
|
++numopts;
|
|
#endif /* CRYPT */
|
|
if (numopts == 0)
|
|
Info(slide, 0, ((char *)slide,
|
|
LoadFarString(CompileOptFormat),
|
|
LoadFarStringSmall(None)));
|
|
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptions)));
|
|
envptr = getenv(LoadFarStringSmall(EnvUnZip));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvUnZip),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
envptr = getenv(LoadFarStringSmall(EnvUnZip2));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvUnZip2),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
envptr = getenv(LoadFarStringSmall(EnvZipInfo));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvZipInfo),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
envptr = getenv(LoadFarStringSmall(EnvZipInfo2));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvZipInfo2),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
#ifndef __RSXNT__
|
|
#ifdef __EMX__
|
|
envptr = getenv(LoadFarStringSmall(EnvEMX));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvEMX),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
envptr = getenv(LoadFarStringSmall(EnvEMXOPT));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvEMXOPT),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
#endif /* __EMX__ */
|
|
#if (defined(__GO32__) && (!defined(__DJGPP__) || (__DJGPP__ < 2)))
|
|
envptr = getenv(LoadFarStringSmall(EnvGO32));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvGO32),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
envptr = getenv(LoadFarStringSmall(EnvGO32TMP));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvGO32TMP),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
#endif /* __GO32__ && !(__DJGPP__ >= 2) */
|
|
#endif /* !__RSXNT__ */
|
|
#ifdef RISCOS
|
|
envptr = getenv(LoadFarStringSmall(EnvUnZipExts));
|
|
Info(slide, 0, ((char *)slide, LoadFarString(EnvOptFormat),
|
|
LoadFarStringSmall(EnvUnZipExts),
|
|
(envptr == (char *)NULL || *envptr == 0)?
|
|
LoadFarStringSmall2(None) : envptr));
|
|
#endif /* RISCOS */
|
|
}
|
|
} /* end function show_version() */
|
|
|
|
#endif /* !SFX */
|
|
#endif /* !WINDLL */
|
|
|
|
|
|
// CMC this is a super-duper goto for nested error handling to bypass exit()
|
|
// use in the unzip routines, akin to what's in the zip source but for some
|
|
// reason they didn't do it for unzip (presumably because people want a zip
|
|
// dll but not an unzip dll
|
|
int unzip_exit(c)
|
|
int c;
|
|
{
|
|
longjmp(unzipdll_error_return, c);
|
|
}
|
|
|
|
const char *BOINC_RCSID_b2803595c0 = "$Id$";
|