Subversion Repositories SvarDOS

Rev

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