Subversion Repositories SvarDOS

Rev

Rev 1889 | Rev 1965 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
296 mateuszvis 1 
/*
2 
 * simple unzip tool that unzips the content of a zip archive to current directory
1889 mateusz.vi 3 
 * if listonly is set to a non-zero value then unzip() only lists the files
296 mateuszvis 4 
 * returns 0 on success
5 
 *
6 
 * this file is part of pkg (SvarDOS)
1889 mateusz.vi 7 
 * copyright (C) 2021-2024 Mateusz Viste
296 mateuszvis 8 
 */
9 
 
10 
#include <stdio.h>
11 
 
12 
#include "fileexst.h"
13 
#include "helpers.h"
14 
#include "kprintf.h"
15 
#include "libunzip.h"
613 mateuszvis 16 
#include "svarlang.lib\svarlang.h"
296 mateuszvis 17 
 
18 
#include "unzip.h"
19 
 
20 
 
1889 mateusz.vi 21 
int unzip(const char *zipfile, unsigned char listonly) {
296 mateuszvis 22 
  struct ziplist *zlist, *znode;
23 
  FILE *fd;
24 
  int r = 0;
25 
 
26 
  fd = fopen(zipfile, "rb");
27 
  if (fd == NULL) {
1963 mateusz.vi 28 
    outputnl(svarlang_str(10, 1)); /* "ERROR: Failed to open the archive file" */
296 mateuszvis 29 
    return(1);
30 
  }
31 
 
32 
  zlist = zip_listfiles(fd);
33 
  if (zlist == NULL) {
1963 mateusz.vi 34 
    outputnl(svarlang_str(10, 2)); /* "ERROR: Invalid ZIP archive" */
296 mateuszvis 35 
    fclose(fd);
36 
    return(-1);
37 
  }
38 
 
1889 mateusz.vi 39 
  if (listonly != 0) {
40 
    /* just list the files inside the archive */
41 
    for (znode = zlist; znode != NULL; znode = znode->nextfile) {
1963 mateusz.vi 42 
      outputnl(znode->filename);
296 mateuszvis 43 
    }
1889 mateusz.vi 44 
  } else {
45 
    /* examine the list of zipped files - make sure that no file currently
46 
     * exists and that files are neither encrypted nor compressed with an
47 
     * unsupported method */
48 
    for (znode = zlist; znode != NULL; znode = znode->nextfile) {
49 
      int zres;
50 
      /* convert slash to backslash, print filename and create the directories path */
51 
      slash2backslash(znode->filename);
52 
      printf("%s ", znode->filename);
53 
      mkpath(znode->filename);
54 
      /* if a dir, we good already */
55 
      if (znode->flags == ZIP_FLAG_ISADIR) goto OK;
56 
      /* file already exists? */
57 
      if (fileexists(znode->filename) != 0) {
1963 mateusz.vi 58 
        outputnl(svarlang_str(10, 3)); /* "ERROR: File already exists" */
1889 mateusz.vi 59 
        r = 1;
60 
        continue;
61 
      }
62 
      /* uncompress */
63 
      zres = zip_unzip(fd, znode, znode->filename);
64 
      if (zres != 0) {
65 
        kitten_printf(10, 4, "ERROR: unzip failure (%d)", zres);
1963 mateusz.vi 66 
        outputnl("");
1889 mateusz.vi 67 
        continue;
68 
      }
69 
      OK:
1963 mateusz.vi 70 
      outputnl(svarlang_str(10, 0)); /* "OK" */
296 mateuszvis 71 
    }
72 
  }
73 
 
74 
  zip_freelist(&zlist);
75 
  fclose(fd);
76 
  return(r);
77 
}