Subversion Repositories SvarDOS

Rev

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

Rev 725 Rev 875
Line 38... Line 38...
38
#include "svarlang.lib\svarlang.h"
38
#include "svarlang.lib\svarlang.h"
39
 
39
 
40
#include "../../pkg/trunk/lsm.h"
40
#include "../../pkg/trunk/lsm.h"
41
 
41
 
42
 
42
 
43
#define PVER "20220216"
43
#define PVER "20220218"
44
#define PDATE "2021-2022"
44
#define PDATE "2021-2022"
45
 
45
 
46
#define HOSTADDR "svardos.org"
46
#define HOSTADDR "svardos.org"
47
 
47
 
48
 
48
 
Line 78... Line 78...
78
  putsnls(1, 0);  /* "pkgnet is the SvarDOS package downloader" */
78
  putsnls(1, 0);  /* "pkgnet is the SvarDOS package downloader" */
79
  puts("");
79
  puts("");
80
  putsnls(1, 1);  /* "usage:  pkgnet search <term>" */
80
  putsnls(1, 1);  /* "usage:  pkgnet search <term>" */
81
  putsnls(1, 2);  /* "        pkgnet pull <package>" */
81
  putsnls(1, 2);  /* "        pkgnet pull <package>" */
82
  putsnls(1, 3);  /* "        pkgnet pull <package>-<version>" */
82
  putsnls(1, 3);  /* "        pkgnet pull <package>-<version>" */
-
 
83
  putsnls(1, 4);  /* "        pkgnet pullsrc <package>" */
-
 
84
  putsnls(1, 5);  /* "        pkgnet pullsrc <package>-<version>" */
83
  putsnls(1, 6);  /* "        pkgnet checkup" */
85
  putsnls(1, 6);  /* "        pkgnet checkup" */
84
  puts("");
86
  puts("");
85
  putsnls(1, 7);  /* "actions:" */
87
  putsnls(1, 7);  /* "actions:" */
86
  puts("");
88
  puts("");
87
  putsnls(1, 8);  /* "search   - asks remote repository for the list of matching packages" */
89
  putsnls(1, 8);  /* "search   - asks remote repository for the list of matching packages" */
Line 101... Line 103...
101
  *outfname = 0;
103
  *outfname = 0;
102
  *url = 0;
104
  *url = 0;
103
  *ispost = 0;
105
  *ispost = 0;
104
  if ((argc == 3) && (strcasecmp(argv[1], "search") == 0)) {
106
  if ((argc == 3) && (strcasecmp(argv[1], "search") == 0)) {
105
    sprintf(url, "/repo/?a=search&p=%s&lang=%s", argv[2], lang);
107
    sprintf(url, "/repo/?a=search&p=%s&lang=%s", argv[2], lang);
106
  } else if ((argc == 3) && (strcasecmp(argv[1], "pull") == 0)) {
108
  } else if ((argc == 3) && ((strcasecmp(argv[1], "pull") == 0) || (strcasecmp(argv[1], "pullsrc") == 0))) {
107
    unsigned short i;
109
    unsigned short i;
108
    sprintf(url, "/repo/?a=pull&p=%s&lang=%s", argv[2], lang);
-
 
109
    /* copy argv[2] into outfname, but stop at first '-' or null terminator
110
    /* copy argv[2] into outfname, but stop at first '-' or null terminator
110
     * this trims any '-version' part in filename to respect 8+3 */
111
     * this trims any '-version' part in filename to respect 8+3 */
111
    for (i = 0; (argv[2][i] != 0) && (argv[2][i] != '-') && (i < 8); i++) {
112
    for (i = 0; (argv[2][i] != 0) && (argv[2][i] != '-') && (i < 8); i++) {
112
      outfname[i] = argv[2][i];
113
      outfname[i] = argv[2][i];
113
    }
114
    }
114
    /* add the svp extension to filename */
115
    /* add the extension (svp or zip) to filename and compute url */
-
 
116
    if (strcasecmp(argv[1], "pull") == 0) {
-
 
117
      sprintf(url, "/repo/?a=pull&p=%s&lang=%s", argv[2], lang);
115
    strcpy(outfname + i, ".svp");
118
      strcpy(outfname + i, ".svp");
-
 
119
    } else {
-
 
120
      sprintf(url, "/repo/?a=pullsrc&p=%s&lang=%s", argv[2], lang);
-
 
121
      strcpy(outfname + i, ".zip");
-
 
122
    }
116
  } else if ((argc == 2) && (strcasecmp(argv[1], "checkup") == 0)) {
123
  } else if ((argc == 2) && (strcasecmp(argv[1], "checkup") == 0)) {
117
    sprintf(url, "/repo/?a=checkup&lang=%s", lang);
124
    sprintf(url, "/repo/?a=checkup&lang=%s", lang);
118
    *ispost = 1;
125
    *ispost = 1;
119
  } else {
126
  } else {
120
    help();
127
    help();