summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c')
-rw-r--r--Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c98
1 files changed, 0 insertions, 98 deletions
diff --git a/Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c b/Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c
deleted file mode 100644
index 52237235698..00000000000
--- a/Build/source/texk/web2c/luatexdir/zziplib/bins/zzip.c
+++ /dev/null
@@ -1,98 +0,0 @@
-/*
- * Copyright (c) 2003 Guido Draheim <guidod@gmx.de>
- * Use freely under the restrictions of the ZLIB license.
- *
- * This file is used as an example to clarify zzip api usage.
- * (the write-api is work in progress, beware)
- */
-
-#define _ZZIP_WRITE_SOURCE
-
-#include <zzip/zzip.h>
-#include <stdio.h>
-#include <string.h>
-
-#ifdef ZZIP_HAVE_UNISTD_H
-#include <unistd.h>
-#endif
-#ifdef ZZIP_HAVE_IO_H
-#include <io.h>
-#endif
-
-#ifndef O_BINARY
-#define O_BINARY 0
-#endif
-
-static const char usage[] =
-{
- "zzip <dir> files... \n"
- " - zzip the files into a zip area."
-};
-
-int
-main (int argc, char ** argv)
-{
- int argn;
- int exitcode = 0;
- ZZIP_DIR * dir;
-
- if (argc <= 1 || ! strcmp (argv[1], "--help"))
- {
- printf (usage);
- return 0;
- }
- if (! strcmp (argv[1], "--version"))
- {
- printf (__FILE__" version "ZZIP_PACKAGE" "ZZIP_VERSION"\n");
- return 0;
- }
-
- dir = zzip_dir_creat(argv[1], 0755);
- if (! dir)
- {
- fprintf (stderr, "did not creat %s: \n", argv[1]);
- perror(argv[1]);
- if (1)
- return 1;
- else
- fprintf (stderr, "(ignored)\n");
- }
-
- for (argn=2; argn < argc; argn++)
- {
- int input = open (argv[argn], O_RDONLY);
- if (input == -1)
- {
- perror (argv[argn]);
- continue;
- }
- else
- {
- char buf[17]; zzip_ssize_t n;
- ZZIP_FILE* output = zzip_file_creat (dir, argv[argn], 0755);
- if (! output)
- {
- fprintf (stderr, "|did not open %s: \n", argv[argn]);
- fprintf (stderr, "|%s: %s\n", argv[argn],
- zzip_strerror_of(dir));
- continue;
- }
-
- while ((n = read (input, buf, 16)))
- {
- zzip_write (output, buf, n);
- }
- zzip_close (output);
- }
- close (input);
- }
- zzip_closedir(dir);
-
- return exitcode;
-}
-
-/*
- * Local variables:
- * c-file-style: "stroustrup"
- * End:
- */