Subversion Repositories SvarDOS

Rev

Rev 1880 | Rev 1892 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1880 Rev 1889
Line 46... Line 46...
46 
  ACTION_UPDATE,
 46 
  ACTION_UPDATE,
47 
  ACTION_REMOVE,
 47 
  ACTION_REMOVE,
48 
  ACTION_LISTFILES,
 48 
  ACTION_LISTFILES,
49 
  ACTION_LISTLOCAL,
 49 
  ACTION_LISTLOCAL,
50 
  ACTION_UNZIP,
 50 
  ACTION_UNZIP,
- 
 
 51 
  ACTION_LISTZIP,
51 
  ACTION_CRC32,
 52 
  ACTION_CRC32,
52 
  ACTION_HELP
 53 
  ACTION_HELP
53 
};
 54 
};
54 
 
 55 
 
55 
 
 56 
 
Line 62... Line 63...
62 
  puts(svarlang_str(1, 21)); /* "       pkg update package.svp" */
 63 
  puts(svarlang_str(1, 21)); /* "       pkg update package.svp" */
63 
  puts(svarlang_str(1, 22)); /* "       pkg remove package" */
 64 
  puts(svarlang_str(1, 22)); /* "       pkg remove package" */
64 
  puts(svarlang_str(1, 23)); /* "       pkg listfiles package" */
 65 
  puts(svarlang_str(1, 23)); /* "       pkg listfiles package" */
65 
  puts(svarlang_str(1, 24)); /* "       pkg listlocal [filter]" */
 66 
  puts(svarlang_str(1, 24)); /* "       pkg listlocal [filter]" */
66 
  puts(svarlang_str(1, 27)); /* "       pkg unzip file.zip" */
 67 
  puts(svarlang_str(1, 27)); /* "       pkg unzip file.zip" */
- 
 
 68 
  puts(svarlang_str(1, 29)); /* "       pkg listzip file.zip" */
67 
  puts(svarlang_str(1, 28)); /* "       pkg crc32 file" */
 69 
  puts(svarlang_str(1, 28)); /* "       pkg crc32 file" */
68 
  puts("");
 70 
  puts("");
69 
  puts(svarlang_str(1, 40)); /* "PKG is published under the MIT license." */
 71 
  puts(svarlang_str(1, 40)); /* "PKG is published under the MIT license." */
70 
  puts(svarlang_str(1, 41)); /* "It is configured through %DOSDIR%\CFG\PKG.CFG" */
 72 
  puts(svarlang_str(1, 41)); /* "It is configured through %DOSDIR%\CFG\PKG.CFG" */
71 
  return(1);
 73 
  return(1);
Line 84... Line 86...
84 
    return(ACTION_LISTFILES);
 86 
    return(ACTION_LISTFILES);
85 
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "listlocal") == 0)) {
 87 
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "listlocal") == 0)) {
86 
    return(ACTION_LISTLOCAL);
 88 
    return(ACTION_LISTLOCAL);
87 
  } else if ((argc == 3) && (strcasecmp(argv[1], "unzip") == 0)) {
 89 
  } else if ((argc == 3) && (strcasecmp(argv[1], "unzip") == 0)) {
88 
    return(ACTION_UNZIP);
 90 
    return(ACTION_UNZIP);
- 
 
 91 
  } else if ((argc == 3) && (strcasecmp(argv[1], "listzip") == 0)) {
- 
 
 92 
    return(ACTION_LISTZIP);
89 
  } else if ((argc == 3) && (strcasecmp(argv[1], "crc32") == 0)) {
 93 
  } else if ((argc == 3) && (strcasecmp(argv[1], "crc32") == 0)) {
90 
    return(ACTION_CRC32);
 94 
    return(ACTION_CRC32);
91 
  } else {
 95 
  } else {
92 
    return(ACTION_HELP);
 96 
    return(ACTION_HELP);
93 
  }
 97 
  }
Line 162... Line 166...
162 
  action = parsearg(argc, argv);
 166 
  action = parsearg(argc, argv);
163 
  switch (action) {
 167 
  switch (action) {
164 
    case ACTION_HELP:
 168 
    case ACTION_HELP:
165 
      res = showhelp();
 169 
      res = showhelp();
166 
      goto GAMEOVER;
 170 
      goto GAMEOVER;
167 
      break;
 - 
 
168 
    case ACTION_UNZIP:
 171 
    case ACTION_UNZIP:
169 
      res = unzip(argv[2]);
 172 
      res = unzip(argv[2], 0);
- 
 
 173 
      goto GAMEOVER;
- 
 
 174 
    case ACTION_LISTZIP:
- 
 
 175 
      res = unzip(argv[2], 1);
170 
      goto GAMEOVER;
 176 
      goto GAMEOVER;
171 
      break;
 - 
 
172 
    case ACTION_CRC32:
 177 
    case ACTION_CRC32:
173 
      res = crcfile(argv[2]);
 178 
      res = crcfile(argv[2]);
174 
      goto GAMEOVER;
 179 
      goto GAMEOVER;
175 
      break;
 - 
 
176 
  }
 180 
  }
177 
 
 181 
 
178 
  /* read the DOSDIR environment variable */
 182 
  /* read the DOSDIR environment variable */
179 
  dosdir = getenv("DOSDIR");
 183 
  dosdir = getenv("DOSDIR");
180 
  if (dosdir == NULL) {
 184 
  if (dosdir == NULL) {