Subversion Repositories SvarDOS

Rev

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

Rev 1958 Rev 1959
Line 28... Line 28...
28
#include <stdio.h>    /* printf() */
28
#include <stdio.h>    /* printf() */
29
#include <stdlib.h>   /* malloc() and friends */
29
#include <stdlib.h>   /* malloc() and friends */
30
#include <string.h>   /* strcasecmp() */
30
#include <string.h>   /* strcasecmp() */
31
 
31
 
32
#include "svarlang.lib/svarlang.h"
32
#include "svarlang.lib/svarlang.h"
-
 
33
#include "healthck.h"
33
#include "crc32.h"
34
#include "crc32.h"
34
#include "helpers.h"
35
#include "helpers.h"
35
#include "kprintf.h"
36
#include "kprintf.h"
36
#include "libunzip.h"
37
#include "libunzip.h"
37
#include "pkginst.h"
38
#include "pkginst.h"
Line 45... Line 46...
45
  ACTION_INSTALL,
46
  ACTION_INSTALL,
46
  ACTION_UPDATE,
47
  ACTION_UPDATE,
47
  ACTION_REMOVE,
48
  ACTION_REMOVE,
48
  ACTION_LISTFILES,
49
  ACTION_LISTFILES,
49
  ACTION_LISTLOCAL,
50
  ACTION_LISTLOCAL,
50
  ACTION_CHECKHEALTH,
51
  ACTION_HEALTHCHECK,
51
  ACTION_UNZIP,
52
  ACTION_UNZIP,
52
  ACTION_LISTZIP,
53
  ACTION_LISTZIP,
53
  ACTION_CRC32,
54
  ACTION_CRC32,
54
  ACTION_HELP
55
  ACTION_HELP
55
};
56
};
Line 65... Line 66...
65
  puts(svarlang_str(1, 20)); /* "pkg install package.svp */
66
  puts(svarlang_str(1, 20)); /* "pkg install package.svp */
66
  puts(svarlang_str(1, 21)); /* "pkg update package.svp" */
67
  puts(svarlang_str(1, 21)); /* "pkg update package.svp" */
67
  puts(svarlang_str(1, 22)); /* "pkg del package" */
68
  puts(svarlang_str(1, 22)); /* "pkg del package" */
68
  puts(svarlang_str(1, 23)); /* "pkg listfiles package" */
69
  puts(svarlang_str(1, 23)); /* "pkg listfiles package" */
69
  puts(svarlang_str(1, 24)); /* "pkg listlocal [filter]" */
70
  puts(svarlang_str(1, 24)); /* "pkg listlocal [filter]" */
70
  puts(svarlang_str(1, 25)); /* "pkg checkhealth [pkg]" */
71
  puts(svarlang_str(1, 25)); /* "pkg healthcheck [pkg]" */
71
  puts(svarlang_str(1, 27)); /* "pkg unzip file.zip" */
72
  puts(svarlang_str(1, 27)); /* "pkg unzip file.zip" */
72
  puts(svarlang_str(1, 29)); /* "pkg listzip file.zip" */
73
  puts(svarlang_str(1, 29)); /* "pkg listzip file.zip" */
73
  puts(svarlang_str(1, 28)); /* "pkg crc32 file" */
74
  puts(svarlang_str(1, 28)); /* "pkg crc32 file" */
74
  puts("");
75
  puts("");
75
  puts(svarlang_str(1, 40)); /* "PKG is published under the MIT license." */
76
  puts(svarlang_str(1, 40)); /* "PKG is published under the MIT license." */
Line 88... Line 89...
88
    return(ACTION_REMOVE);
89
    return(ACTION_REMOVE);
89
  } else if ((argc == 3) && (strcasecmp(argv[1], "listfiles") == 0)) {
90
  } else if ((argc == 3) && (strcasecmp(argv[1], "listfiles") == 0)) {
90
    return(ACTION_LISTFILES);
91
    return(ACTION_LISTFILES);
91
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "listlocal") == 0)) {
92
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "listlocal") == 0)) {
92
    return(ACTION_LISTLOCAL);
93
    return(ACTION_LISTLOCAL);
93
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "checkhealth") == 0)) {
94
  } else if ((argc >= 2) && (argc <= 3) && (strcasecmp(argv[1], "healthcheck") == 0)) {
94
    return(ACTION_CHECKHEALTH);
95
    return(ACTION_HEALTHCHECK);
95
  } else if ((argc == 3) && (strcasecmp(argv[1], "unzip") == 0)) {
96
  } else if ((argc == 3) && (strcasecmp(argv[1], "unzip") == 0)) {
96
    return(ACTION_UNZIP);
97
    return(ACTION_UNZIP);
97
  } else if ((argc == 3) && (strcasecmp(argv[1], "listzip") == 0)) {
98
  } else if ((argc == 3) && (strcasecmp(argv[1], "listzip") == 0)) {
98
    return(ACTION_LISTZIP);
99
    return(ACTION_LISTZIP);
99
  } else if ((argc == 3) && (strcasecmp(argv[1], "crc32") == 0)) {
100
  } else if ((argc == 3) && (strcasecmp(argv[1], "crc32") == 0)) {
Line 209... Line 210...
209
      res = listfilesofpkg(argv[2], dosdir);
210
      res = listfilesofpkg(argv[2], dosdir);
210
      break;
211
      break;
211
    case ACTION_LISTLOCAL:
212
    case ACTION_LISTLOCAL:
212
      res = showinstalledpkgs((argc == 3)?argv[2]:NULL, dosdir);
213
      res = showinstalledpkgs((argc == 3)?argv[2]:NULL, dosdir);
213
      break;
214
      break;
214
    case ACTION_CHECKHEALTH:
215
    case ACTION_HEALTHCHECK:
215
      puts("NOT IMPLEMENTED YET");
216
      res = healthcheck((argc == 3)?argv[2]:NULL, dosdir);
216
      res = 1;
-
 
217
      break;
217
      break;
218
    default:
218
    default:
219
      res = showhelp();
219
      res = showhelp();
220
      break;
220
      break;
221
  }
221
  }