1 /* pkg_parse.c - the opkg package management system 2 3 Copyright (C) 2009 Ubiq Technologies <graham.gower@gmail.com> 4 5 Steven M. Ayer 6 Copyright (C) 2002 Compaq Computer Corporation 7 8 This program is free software; you can redistribute it and/or 9 modify it under the terms of the GNU General Public License as 10 published by the Free Software Foundation; either version 2, or (at 11 your option) any later version. 12 13 This program is distributed in the hope that it will be useful, but 14 WITHOUT ANY WARRANTY; without even the implied warranty of 15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 16 General Public License for more details. 17 */ 18 19 #include <stdio.h> 20 #include <ctype.h> 21 #include <unistd.h> 22 23 #include "pkg.h" 24 #include "opkg_utils.h" 25 #include "pkg_parse.h" 26 #include "pkg_depends.h" 27 #include "libbb/libbb.h" 28 29 #include "file_util.h" 30 #include "parse_util.h" 31 32 static void parse_status(pkg_t * pkg, const char *sstr) 33 { 34 char sw_str[64], sf_str[64], ss_str[64]; 35 36 if (sscanf(sstr, "Status: %63s %63s %63s", sw_str, sf_str, ss_str) != 3) { 37 opkg_msg(ERROR, "Failed to parse Status line for %s\n", 38 pkg->name); 39 return; 40 } 41 42 pkg->state_want = pkg_state_want_from_str(sw_str); 43 pkg->state_flag |= pkg_state_flag_from_str(sf_str); 44 pkg->state_status = pkg_state_status_from_str(ss_str); 45 } 46 47 static void parse_conffiles(pkg_t * pkg, const char *cstr) 48 { 49 conffile_list_t *cl; 50 char file_name[1024], md5sum[85]; 51 52 if (sscanf(cstr, "%1023s %84s", file_name, md5sum) != 2) { 53 opkg_msg(ERROR, "Failed to parse Conffiles line for %s\n", 54 pkg->name); 55 return; 56 } 57 58 cl = pkg_get_ptr(pkg, PKG_CONFFILES); 59 60 if (cl) 61 conffile_list_append(cl, file_name, md5sum); 62 } 63 64 int parse_version(pkg_t * pkg, const char *vstr) 65 { 66 char *colon, *dup, *rev; 67 68 if (strncmp(vstr, "Version:", 8) == 0) 69 vstr += 8; 70 71 while (*vstr && isspace(*vstr)) 72 vstr++; 73 74 colon = strchr(vstr, ':'); 75 if (colon) { 76 errno = 0; 77 pkg_set_int(pkg, PKG_EPOCH, strtoul(vstr, NULL, 10)); 78 if (errno) { 79 opkg_perror(ERROR, "%s: invalid epoch", pkg->name); 80 } 81 vstr = ++colon; 82 } 83 84 85 dup = xstrdup(vstr); 86 rev = strrchr(dup, '-'); 87 88 if (rev) { 89 *rev++ = '\0'; 90 pkg_set_string(pkg, PKG_REVISION, rev); 91 } 92 93 pkg_set_string(pkg, PKG_VERSION, dup); 94 free(dup); 95 96 return 0; 97 } 98 99 static char *parse_architecture(pkg_t *pkg, const char *str) 100 { 101 const char *s = str; 102 const char *e; 103 104 while (isspace(*s)) 105 s++; 106 107 e = s + strlen(s); 108 109 while (e > s && isspace(*e)) 110 e--; 111 112 return pkg_set_architecture(pkg, s, e - s); 113 } 114 115 static void parse_alternatives(pkg_t *pkg, char *list) 116 { 117 char *item, *tok; 118 struct pkg_alternatives *pkg_alts; 119 struct pkg_alternative **alts; 120 int nalts; 121 122 pkg_alts = pkg_get_ptr(pkg, PKG_ALTERNATIVES); 123 if (!pkg_alts) { 124 nalts = 0; 125 alts = NULL; 126 } else { 127 nalts = pkg_alts->nalts; 128 alts = pkg_alts->alts; 129 } 130 131 for (item = strtok_r(list, ",", &tok); 132 item; 133 item = strtok_r(NULL, ",", &tok)) { 134 enum pkg_alternative_field i; 135 char *val, *tok1; 136 /* the assignment was intended to quash the -Wmaybe-uninitialized warnings */ 137 int prio = prio; 138 char *path = path, *altpath = altpath; 139 140 for (i = PAF_PRIO, val = strtok_r(item, ":", &tok1); 141 val && i < __PAF_MAX; 142 val = strtok_r(NULL, ":", &tok1), i++) { 143 switch (i) { 144 case PAF_PRIO: 145 prio = atoi(val); 146 break; 147 case PAF_PATH: 148 path = val; 149 break; 150 case PAF_ALTPATH: 151 altpath = val; 152 break; 153 default: 154 break; 155 } 156 } 157 if (!val && i == __PAF_MAX) { 158 char *_path, *_altpath; 159 struct pkg_alternative *alt; 160 161 /* 162 * - path must be absolute 163 * - altpath must be non-empty 164 */ 165 if (path[0] != '/' || !altpath[0]) 166 continue; 167 168 alt = calloc_a(sizeof(*alt), 169 &_path, strlen(path) + 1, 170 &_altpath, strlen(altpath) + 1); 171 if (!alt) 172 continue; 173 strcpy(_path, path); 174 strcpy(_altpath, altpath); 175 alt->prio = prio; 176 alt->path = _path; 177 alt->altpath = _altpath; 178 alts = xrealloc(alts, sizeof(*alts) * (nalts + 1)); 179 alts[nalts++] = alt; 180 } 181 } 182 183 if (nalts > 0) { 184 if (!pkg_alts) 185 pkg_alts = xmalloc(sizeof(*pkg_alts)); 186 pkg_alts->nalts = nalts; 187 pkg_alts->alts = alts; 188 pkg_set_ptr(pkg, PKG_ALTERNATIVES, pkg_alts); 189 } 190 } 191 192 int pkg_parse_line(void *ptr, char *line, uint mask) 193 { 194 pkg_t *pkg = (pkg_t *) ptr; 195 abstract_pkg_t *ab_pkg = NULL; 196 conffile_list_t *cl; 197 198 /* these flags are a bit hackish... */ 199 static int reading_conffiles = 0, reading_description = 0; 200 static char *description = NULL; 201 int ret = 0; 202 203 /* Exclude globally masked fields. */ 204 mask |= conf->pfm; 205 206 /* Flip the semantics of the mask. */ 207 mask ^= PFM_ALL; 208 209 switch (*line) { 210 case 'A': 211 if ((mask & PFM_ABIVERSION) && is_field("ABIVersion", line)) 212 pkg_set_string(pkg, PKG_ABIVERSION, line + strlen("ABIVersion") + 1); 213 else if ((mask & PFM_ALTERNATIVES) && is_field("Alternatives", line)) 214 parse_alternatives(pkg, line + strlen("Alternatives") + 1); 215 else if ((mask & PFM_ARCHITECTURE) && is_field("Architecture", line)) 216 parse_architecture(pkg, line + strlen("Architecture") + 1); 217 else if ((mask & PFM_AUTO_INSTALLED) 218 && is_field("Auto-Installed", line)) { 219 char *tmp = parse_simple("Auto-Installed", line); 220 if (strcmp(tmp, "yes") == 0) 221 pkg->auto_installed = 1; 222 free(tmp); 223 } 224 break; 225 226 case 'C': 227 if ((mask & PFM_CONFFILES) && is_field("Conffiles", line)) { 228 reading_conffiles = 1; 229 reading_description = 0; 230 231 cl = xcalloc(1, sizeof(*cl)); 232 conffile_list_init(cl); 233 pkg_set_ptr(pkg, PKG_CONFFILES, cl); 234 235 goto dont_reset_flags; 236 } else if ((mask & PFM_CONFLICTS) 237 && is_field("Conflicts", line)) 238 parse_deplist(pkg, CONFLICTS, line + strlen("Conflicts") + 1); 239 break; 240 241 case 'D': 242 if ((mask & PFM_DESCRIPTION) && is_field("Description", line)) { 243 description = parse_simple("Description", line); 244 reading_conffiles = 0; 245 reading_description = 1; 246 goto dont_reset_flags; 247 } else if ((mask & PFM_DEPENDS) && is_field("Depends", line)) 248 parse_deplist(pkg, DEPEND, line + strlen("Depends") + 1); 249 break; 250 251 case 'E': 252 if ((mask & PFM_ESSENTIAL) && is_field("Essential", line)) { 253 char *tmp = parse_simple("Essential", line); 254 if (strcmp(tmp, "yes") == 0) 255 pkg->essential = 1; 256 free(tmp); 257 } 258 break; 259 260 case 'F': 261 if ((mask & PFM_FILENAME) && is_field("Filename", line)) 262 pkg_set_string(pkg, PKG_FILENAME, line + strlen("Filename") + 1); 263 break; 264 265 case 'I': 266 if ((mask & PFM_INSTALLED_SIZE) 267 && is_field("Installed-Size", line)) { 268 pkg_set_int(pkg, PKG_INSTALLED_SIZE, strtoul(line + strlen("Installed-Size") + 1, NULL, 0)); 269 } else if ((mask & PFM_INSTALLED_TIME) 270 && is_field("Installed-Time", line)) { 271 pkg_set_int(pkg, PKG_INSTALLED_TIME, strtoul(line + strlen("Installed-Time") + 1, NULL, 0)); 272 } 273 break; 274 275 case 'M': 276 if ((mask & PFM_MD5SUM) && (is_field("MD5sum:", line) || is_field("MD5Sum:", line))) 277 pkg_set_md5(pkg, line + strlen("MD5sum") + 1); 278 else if ((mask & PFM_MAINTAINER) 279 && is_field("Maintainer", line)) 280 pkg_set_string(pkg, PKG_MAINTAINER, line + strlen("Maintainer") + 1); 281 break; 282 283 case 'P': 284 if ((mask & PFM_PACKAGE) && is_field("Package", line)) { 285 pkg->name = parse_simple("Package", line); 286 ab_pkg = abstract_pkg_fetch_by_name(pkg->name); 287 288 if (ab_pkg && (ab_pkg->state_flag & SF_NEED_DETAIL)) { 289 if (!(pkg->state_flag & SF_NEED_DETAIL)) { 290 opkg_msg(DEBUG, "propagating abpkg flag to pkg %s\n", pkg->name); 291 pkg->state_flag |= SF_NEED_DETAIL; 292 } 293 } 294 } 295 else if ((mask & PFM_PRIORITY) && is_field("Priority", line)) 296 pkg_set_string(pkg, PKG_PRIORITY, line + strlen("Priority") + 1); 297 else if ((mask & PFM_PROVIDES) && is_field("Provides", line)) 298 parse_providelist(pkg, line + strlen("Provides") + 1); 299 else if ((mask & PFM_PRE_DEPENDS) 300 && is_field("Pre-Depends", line)) 301 parse_deplist(pkg, PREDEPEND, line + strlen("Pre-Depends") + 1); 302 break; 303 304 case 'R': 305 if ((mask & PFM_RECOMMENDS) && is_field("Recommends", line)) 306 parse_deplist(pkg, RECOMMEND, line + strlen("Recommends") + 1); 307 else if ((mask & PFM_REPLACES) && is_field("Replaces", line)) 308 parse_replacelist(pkg, line + strlen("Replaces") + 1); 309 break; 310 311 case 'S': 312 if ((mask & PFM_SECTION) && is_field("Section", line)) 313 pkg_set_string(pkg, PKG_SECTION, line + strlen("Section") + 1); 314 else if ((mask & PFM_SHA256SUM) && is_field("SHA256sum", line)) 315 pkg_set_sha256(pkg, line + strlen("SHA256sum") + 1); 316 else if ((mask & PFM_SIZE) && is_field("Size", line)) { 317 pkg_set_int(pkg, PKG_SIZE, strtoul(line + strlen("Size") + 1, NULL, 0)); 318 } else if ((mask & PFM_SOURCE) && is_field("Source", line)) 319 pkg_set_string(pkg, PKG_SOURCE, line + strlen("Source") + 1); 320 else if ((mask & PFM_STATUS) && is_field("Status", line)) 321 parse_status(pkg, line); 322 else if ((mask & PFM_SUGGESTS) && is_field("Suggests", line)) 323 parse_deplist(pkg, SUGGEST, line + strlen("Suggests") + 1); 324 break; 325 326 case 'T': 327 if ((mask & PFM_TAGS) && is_field("Tags", line)) 328 pkg_set_string(pkg, PKG_TAGS, line + strlen("Tags") + 1); 329 break; 330 331 case 'V': 332 if ((mask & PFM_VERSION) && is_field("Version", line)) 333 parse_version(pkg, line); 334 break; 335 336 case ' ': 337 if ((mask & PFM_DESCRIPTION) && reading_description) { 338 size_t len = (description ? strlen(description) : 0) 339 + (isatty(1) ? 1 : 0) + strlen(line) + 1; 340 341 description = description ? xrealloc(description, len) 342 : xcalloc(len, 1); 343 344 if (isatty(1)) 345 strcat(description, "\n"); 346 347 strcat(description, line); 348 goto dont_reset_flags; 349 } else if ((mask & PFM_CONFFILES) && reading_conffiles) { 350 parse_conffiles(pkg, line); 351 goto dont_reset_flags; 352 } 353 354 /* FALLTHROUGH */ 355 default: 356 /* For package lists, signifies end of package. */ 357 if (line_is_blank(line)) { 358 ret = 1; 359 break; 360 } 361 } 362 363 if (reading_description && description) { 364 pkg_set_string(pkg, PKG_DESCRIPTION, description); 365 free(description); 366 reading_description = 0; 367 description = NULL; 368 } 369 370 reading_conffiles = 0; 371 372 dont_reset_flags: 373 374 return ret; 375 } 376 377 int pkg_parse_from_stream(pkg_t * pkg, FILE * fp, uint mask) 378 { 379 int ret; 380 char *buf; 381 const size_t len = 4096; 382 383 buf = xmalloc(len); 384 ret = 385 parse_from_stream_nomalloc(pkg_parse_line, pkg, fp, mask, &buf, 386 len); 387 free(buf); 388 389 if (pkg->name == NULL) { 390 /* probably just a blank line */ 391 ret = 1; 392 } 393 394 return ret; 395 } 396
This page was automatically generated by LXR 0.3.1. • OpenWrt