2 * Copyright (c) 2007, Novell Inc.
4 * This program is licensed under the BSD license, read LICENSE.BSD
5 * for further information
19 #include "tools_util.h"
20 #include "repo_susetags.h"
21 #ifdef ENABLE_COMPLEX_DEPS
22 #include "pool_parserpmrichdep.h"
38 int last_found_source;
39 struct datashare *share_with;
41 Id (*dirs)[3]; /* dirid, size, nfiles */
44 char *language; /* the default language */
45 Id langcache[ID_NUM_INTERNAL]; /* cache for the default language */
48 int afilelist; /* allocated */
49 int nfilelist; /* used */
52 static char *flagtab[] = {
63 langtag(struct parsedata *pd, Id tag, const char *language)
65 if (language && *language)
66 return pool_id2langid(pd->repo->pool, tag, language, 1);
69 if (tag >= ID_NUM_INTERNAL)
70 return pool_id2langid(pd->repo->pool, tag, pd->language, 1);
71 if (!pd->langcache[tag])
72 pd->langcache[tag] = pool_id2langid(pd->repo->pool, tag, pd->language, 1);
73 return pd->langcache[tag];
78 * create and add dependency
82 adddep(Pool *pool, struct parsedata *pd, unsigned int olddeps, char *line, Id marker, char *kind)
90 /* A file dependency. Do not try to parse it */
91 id = pool_str2id(pool, line + 6, 1);
93 #ifdef ENABLE_COMPLEX_DEPS
94 else if (line[6] == '(')
96 id = pool_parserpmrichdep(pool, line + 6);
99 pd->ret = pool_error(pool, -1, "susetags: line %d: bad dependency: '%s'\n", pd->lineno, line);
106 i = split(line + 6, sp, 4); /* name, <op>, evr, ? */
107 if (i != 1 && i != 3) /* expect either 'name' or 'name' <op> 'evr' */
109 pd->ret = pool_error(pool, -1, "susetags: line %d: bad dependency: '%s'\n", pd->lineno, line);
113 id = pool_str2id(pool, join2(&pd->jd, kind, ":", sp[0]), 1);
115 id = pool_str2id(pool, sp[0], 1);
118 evrid = makeevr(pool, sp[2]);
119 for (flags = 0; flags < 6; flags++)
120 if (!strcmp(sp[1], flagtab[flags]))
124 if (!strcmp(sp[1], "<>"))
128 pd->ret = pool_error(pool, -1, "susetags: line %d: unknown relation: '%s'\n", pd->lineno, sp[1]);
132 id = pool_rel2id(pool, id, evrid, flags + 1, 1);
135 return repo_addid_dep(pd->repo, olddeps, id, marker);
145 add_source(struct parsedata *pd, char *line, Solvable *s, Id handle)
147 Pool *pool = s->repo->pool;
151 const char *evr, *sevr;
153 if (split(line, sp, 5) != 4)
155 pd->ret = pool_error(pool, -1, "susetags: line %d: bad source line '%s'\n", pd->lineno, line);
159 name = pool_str2id(pool, sp[0], 1);
160 arch = pool_str2id(pool, sp[3], 1); /* do this before id2str */
161 evr = join2(&pd->jd, sp[1], "-", sp[2]);
162 sevr = pool_id2str(pool, s->evr);
167 for (p = sevr; *p >= '0' && *p <= '9'; p++)
169 if (p != sevr && *p == ':' && p[1])
173 repodata_set_void(pd->data, handle, SOLVABLE_SOURCENAME);
175 repodata_set_id(pd->data, handle, SOLVABLE_SOURCENAME, name);
176 if (sevr && !strcmp(sevr, evr))
177 repodata_set_void(pd->data, handle, SOLVABLE_SOURCEEVR);
179 repodata_set_id(pd->data, handle, SOLVABLE_SOURCEEVR, pool_str2id(pool, evr, 1));
180 repodata_set_constantid(pd->data, handle, SOLVABLE_SOURCEARCH, arch);
185 * add a line with directory information
190 add_dirline(struct parsedata *pd, char *line)
196 if (split(line, sp, 6) != 5)
198 pd->dirs = solv_extend(pd->dirs, pd->ndirs, 1, sizeof(pd->dirs[0]), 31);
199 filesz = strtol(sp[1], 0, 0);
200 filesz += strtol(sp[2], 0, 0);
201 filenum = strtol(sp[3], 0, 0);
202 filenum += strtol(sp[4], 0, 0);
203 /* hack: we know that there's room for a / */
206 dirid = repodata_str2dir(pd->data, sp[0], 1);
208 fprintf(stderr, "%s -> %d\n", sp[0], dirid);
210 pd->dirs[pd->ndirs][0] = dirid;
211 pd->dirs[pd->ndirs][1] = filesz;
212 pd->dirs[pd->ndirs][2] = filenum;
217 set_checksum(struct parsedata *pd, Repodata *data, Id handle, Id keyname, char *line)
221 if (split(line, sp, 3) != 2)
223 pd->ret = pool_error(pd->pool, -1, "susetags: line %d: bad checksum line '%s'\n", pd->lineno, line);
226 type = solv_chksum_str2type(sp[0]);
229 pd->ret = pool_error(pd->pool, -1, "susetags: line %d: unknown checksum type: '%s'\n", pd->lineno, sp[0]);
232 if (strlen(sp[1]) != 2 * solv_chksum_len(type))
234 pd->ret = pool_error(pd->pool, -1, "susetags: line %d: bad checksum length for type %s: '%s'\n", pd->lineno, sp[0], sp[1]);
237 repodata_set_checksum(data, handle, keyname, type, sp[1]);
248 id3_cmp(const void *v1, const void *v2, void *dp)
252 return i1[0] - i2[0];
262 commit_diskusage(struct parsedata *pd, Id handle)
265 Dirpool *dp = &pd->data->dirpool;
266 /* Now sort in dirid order. This ensures that parents come before
269 solv_sort(pd->dirs, pd->ndirs, sizeof(pd->dirs[0]), id3_cmp, 0);
270 /* Substract leaf numbers from all parents to make the numbers
271 non-cumulative. This must be done post-order (i.e. all leafs
272 adjusted before parents). We ensure this by starting at the end of
273 the array moving to the start, hence seeing leafs before parents. */
274 for (i = pd->ndirs; i--;)
276 Id p = dirpool_parent(dp, pd->dirs[i][0]);
278 for (; p; p = dirpool_parent(dp, p))
281 if (pd->dirs[j][0] == p)
285 if (pd->dirs[j][1] < pd->dirs[i][1])
288 pd->dirs[j][1] -= pd->dirs[i][1];
289 if (pd->dirs[j][2] < pd->dirs[i][2])
292 pd->dirs[j][2] -= pd->dirs[i][2];
295 /* Haven't found this parent in the list, look further if
296 we maybe find the parents parent. */
303 unsigned slen = sizeof(sbuf);
304 for (i = 0; i < pd->ndirs; i++)
306 dir2str(attr, pd->dirs[i][0], &buf, &slen);
307 fprintf(stderr, "have dir %d %d %d %s\n", pd->dirs[i][0], pd->dirs[i][1], pd->dirs[i][2], buf);
312 for (i = 0; i < pd->ndirs; i++)
313 if (pd->dirs[i][1] || pd->dirs[i][2])
315 repodata_add_dirnumnum(pd->data, handle, SOLVABLE_DISKUSAGE, pd->dirs[i][0], pd->dirs[i][1], pd->dirs[i][2]);
321 /* Unfortunately "a"[0] is no constant expression in the C languages,
322 so we need to pass the four characters individually :-/ */
323 #define CTAG(a,b,c,d) ((unsigned)(((unsigned char)a) << 24) \
324 | ((unsigned char)b << 16) \
325 | ((unsigned char)c << 8) \
326 | ((unsigned char)d))
333 static inline unsigned
334 tag_from_string(char *cs)
336 unsigned char *s = (unsigned char *)cs;
337 return ((s[0] << 24) | (s[1] << 16) | (s[2] << 8) | s[3]);
343 * Parse susetags file passed in fp, fill solvables into repo
345 * susetags is key,value based
349 * for long (multi-line) values,
356 * See http://en.opensuse.org/Standards/YaST2_Repository_Metadata
357 * and http://en.opensuse.org/Standards/YaST2_Repository_Metadata/packages
358 * and http://en.opensuse.org/Standards/YaST2_Repository_Metadata/pattern
361 * All keys have 3 characters and end in ':'
365 finish_solvable(struct parsedata *pd, Solvable *s, Offset freshens)
367 Pool *pool = pd->repo->pool;
368 Id handle = s - pool->solvables;
374 for (l = 0; l < pd->nfilelist; l += strlen(pd->filelist + l) + 1)
376 char *p = strrchr(pd->filelist + l, '/');
380 did = repodata_str2dir(pd->data, pd->filelist + l, 1);
383 did = repodata_str2dir(pd->data, "/", 1);
384 repodata_add_dirstr(pd->data, handle, SOLVABLE_FILELIST, did, p);
388 /* A self provide, except for source packages. This is harmless
389 to do twice (in case we see the same package twice). */
390 if (s->name && s->arch != ARCH_SRC && s->arch != ARCH_NOSRC)
391 s->provides = repo_addid_dep(pd->repo, s->provides,
392 pool_rel2id(pool, s->name, s->evr, REL_EQ, 1), 0);
393 /* XXX This uses repo_addid_dep internally, so should also be
394 harmless to do twice. */
395 s->supplements = repo_fix_supplements(pd->repo, s->provides, s->supplements, freshens);
396 s->conflicts = repo_fix_conflicts(pd->repo, s->conflicts);
398 commit_diskusage(pd, handle);
402 joinhash_init(Repo *repo, Hashval *hmp)
404 Hashval hm = mkmask(repo->nsolvables);
405 Hashtable ht = solv_calloc(hm + 1, sizeof(*ht));
410 FOR_REPO_SOLVABLES(repo, i, s)
412 hh = HASHCHAIN_START;
415 h = HASHCHAIN_NEXT(h, hh, hm);
423 joinhash_lookup(Repo *repo, Hashtable ht, Hashval hm, Id name, Id evr, Id arch, Id start)
427 if (!name || !arch || !evr)
429 hh = HASHCHAIN_START;
433 Solvable *s = repo->pool->solvables + ht[h];
434 if (ht[h] >= start && s->name == name && s->evr == evr && s->arch == arch)
436 h = HASHCHAIN_NEXT(h, hh, hm);
442 lookup_shared_id(Repodata *data, Id p, Id keyname, Id voidid, int uninternalized)
445 r = repodata_lookup_type(data, p, keyname);
448 if (r == REPOKEY_TYPE_VOID)
450 r = repodata_lookup_id(data, p, keyname);
455 return repodata_lookup_id_uninternalized(data, p, keyname, voidid);
460 toevr(Pool *pool, struct parsedata *pd, const char *version, const char *release)
462 return makeevr(pool, !release || (release[0] == '-' && !release[1]) ?
463 version : join2(&pd->jd, version, "-", release));
470 * fp: file to read from
471 * defvendor: default vendor (0 if none)
472 * language: current language (0 if none)
477 repo_add_susetags(Repo *repo, FILE *fp, Id defvendor, const char *language, int flags)
479 Pool *pool = repo->pool;
488 int last_found_pack = 0;
489 Id first_new_pkg = 0;
494 Hashtable joinhash = 0;
495 Hashval joinhashm = 0;
498 if ((flags & (SUSETAGS_EXTEND|REPO_EXTEND_SOLVABLES)) != 0 && repo->nrepodata)
500 joinhash = joinhash_init(repo, &joinhashm);
504 data = repo_add_repodata(repo, flags);
506 memset(&pd, 0, sizeof(pd));
507 line = solv_malloc(1024);
514 pd.language = language && *language ? solv_strdup(language) : 0;
520 /* if this is a join setup the recorded share data */
526 FOR_REPODATAS(repo, i, sdata)
529 if (!repodata_has_keyname(sdata, SUSETAGS_SHARE_NAME))
531 for (p = sdata->start; p < sdata->end; p++)
534 name = lookup_shared_id(sdata, p, SUSETAGS_SHARE_NAME, pool->solvables[p].name, sdata == data);
537 evr = lookup_shared_id(sdata, p, SUSETAGS_SHARE_EVR, pool->solvables[p].evr, sdata == data);
540 arch = lookup_shared_id(sdata, p, SUSETAGS_SHARE_ARCH, pool->solvables[p].arch, sdata == data);
543 if (p - repo->start >= pd.nshare)
545 pd.share_with = solv_realloc2(pd.share_with, p - repo->start + 256, sizeof(*pd.share_with));
546 memset(pd.share_with + pd.nshare, 0, (p - repo->start + 256 - pd.nshare) * sizeof(*pd.share_with));
547 pd.nshare = p - repo->start + 256;
549 pd.share_with[p - repo->start].name = name;
550 pd.share_with[p - repo->start].evr = evr;
551 pd.share_with[p - repo->start].arch = arch;
559 * collect values in 'struct parsedata pd'
560 * then build .solv (and .attr) file
566 char *olinep; /* old line pointer */
572 if (linep - line + 16 > aline) /* (re-)alloc buffer */
574 aline = linep - line;
575 line = solv_realloc(line, aline + 512);
576 linep = line + aline;
579 if (!fgets(linep, aline - (linep - line), fp)) /* read line */
582 linep += strlen(linep);
583 if (linep == line || linep[-1] != '\n')
592 /* check for multi-line value tags (+Key:/-Key:) */
594 int is_end = (linep[-intag - keylen + 1] == '-')
595 && (linep[-1] == ':')
596 && (linep == line + 1 + intag + 1 + 1 + 1 + intag + 1 || linep[-intag - keylen] == '\n');
598 && strncmp(linep - 1 - intag, line + 1, intag))
600 pool_debug(pool, SOLV_ERROR, "susetags: Nonmatching multi-line tags: %d: '%s' '%s' %d\n", pd.lineno, linep - 1 - intag, line + 1, intag);
602 if (cummulate && !is_end)
607 if (cummulate && is_end)
609 linep[-intag - keylen + 1] = 0;
610 if (linep[-intag - keylen] == '\n')
611 linep[-intag - keylen] = 0;
615 if (!cummulate && is_end)
621 if (!cummulate && !is_end)
622 linep = line + intag + keylen;
627 if (!intag && line[0] == '+' && line[1] && line[1] != ':') /* start of +Key:/-Key: tag */
629 char *tagend = strchr(line, ':');
632 pd.ret = pool_error(pool, -1, "susetags: line %d: bad line '%s'\n", pd.lineno, line);
635 intag = tagend - (line + 1);
637 switch (tag_from_string(line)) /* check if accumulation is needed */
639 case CTAG('+', 'D', 'e', 's'):
640 case CTAG('+', 'E', 'u', 'l'):
641 case CTAG('+', 'I', 'n', 's'):
642 case CTAG('+', 'D', 'e', 'l'):
643 case CTAG('+', 'A', 'u', 't'):
644 if (line[4] == ':' || line[4] == '.')
650 line[0] = '='; /* handle lines between +Key:/-Key: as =Key: */
651 line[intag + keylen - 1] = ' ';
652 linep = line + intag + keylen;
655 if (*line == '#' || !*line)
657 if (! (line[0] && line[1] && line[2] && line[3] && (line[4] == ':' || line[4] == '.')))
663 endlang = strchr(line + 5, ':');
666 int langsize = endlang - (line + 5);
667 keylen = endlang - line - 1;
670 strncpy(line_lang, line + 5, langsize);
671 line_lang[langsize] = 0;
674 tag = tag_from_string(line);
679 =Dlt: subversion 1.6.16 1.3.1 i586
680 =Dsq: subversion 1.6.15 4.2 i586 d57b3fc86e7a2f73796e8e35b96fa86212c910
681 =Cks: SHA1 14a8410cf741856a5d70d89dab62984dba6a1ca7
682 =Loc: 1 subversion-1.6.15_1.6.16-4.2_1.3.1.i586.delta.rpm
687 case CTAG('=', 'D', 's', 'q'):
690 if (split(line + 5, sp, 5) != 5)
692 repodata_set_id(data, handle, DELTA_SEQ_NAME, pool_str2id(pool, sp[0], 1));
693 evr = toevr(pool, &pd, sp[1], sp[2]);
694 repodata_set_id(data, handle, DELTA_SEQ_EVR, evr);
695 /* repodata_set_id(data, handle, DELTA_SEQ_ARCH, pool_str2id(pool, sp[3], 1)); */
696 repodata_set_str(data, handle, DELTA_SEQ_NUM, sp[4]);
697 repodata_set_id(data, handle, DELTA_BASE_EVR, evr);
700 case CTAG('=', 'C', 'k', 's'):
701 set_checksum(&pd, data, handle, DELTA_CHECKSUM, line + 6);
703 case CTAG('=', 'L', 'o', 'c'):
705 int i = split(line + 6, sp, 3);
706 if (i != 2 && i != 3)
708 pd.ret = pool_error(pool, -1, "susetags: line %d: bad location line '%s'\n", pd.lineno, line);
711 repodata_set_deltalocation(data, handle, atoi(sp[0]), i == 3 ? sp[2] : 0, sp[1]);
714 case CTAG('=', 'S', 'i', 'z'):
715 if (split(line + 6, sp, 3) == 2)
716 repodata_set_num(data, handle, DELTA_DOWNLOADSIZE, strtoull(sp[0], 0, 10));
718 case CTAG('=', 'P', 'k', 'g'):
719 case CTAG('=', 'P', 'a', 't'):
720 case CTAG('=', 'D', 'l', 't'):
725 pool_debug(pool, SOLV_ERROR, "susetags: unknown line: %d: %s\n", pd.lineno, line);
731 * start of (next) package or pattern or delta
733 * =Pkg: <name> <version> <release> <architecture>
736 if (tag == CTAG('=', 'D', 'l', 't'))
739 finish_solvable(&pd, s, freshens);
742 if (split(line + 5, sp, 5) != 4)
744 pd.ret = pool_error(pool, -1, "susetags: line %d: bad line '%s'\n", pd.lineno, line);
747 handle = repodata_new_handle(data);
748 repodata_set_id(data, handle, DELTA_PACKAGE_NAME, pool_str2id(pool, sp[0], 1));
749 repodata_set_id(data, handle, DELTA_PACKAGE_EVR, toevr(pool, &pd, sp[1], sp[2]));
750 repodata_set_id(data, handle, DELTA_PACKAGE_ARCH, pool_str2id(pool, sp[3], 1));
751 repodata_add_flexarray(data, SOLVID_META, REPOSITORY_DELTAINFO, handle);
755 if (tag == CTAG('=', 'P', 'k', 'g')
756 || tag == CTAG('=', 'P', 'a', 't'))
758 /* If we have an old solvable, complete it by filling in some
761 finish_solvable(&pd, s, freshens);
775 if (split(line + 5, sp, 5) != 4)
777 pd.ret = pool_error(pool, -1, "susetags: line %d: bad line '%s'\n", pd.lineno, line);
785 /* data join operation. find solvable matching name/arch/evr and
788 /* we don't use the create flag here as a simple pre-check for existance */
790 name = pool_str2id(pool, join2(&pd.jd, pd.kind, ":", sp[0]), 0);
792 name = pool_str2id(pool, sp[0], 0);
793 evr = toevr(pool, &pd, sp[1], sp[2]);
794 arch = pool_str2id(pool, sp[3], 0);
797 Id start = (flags & REPO_EXTEND_SOLVABLES) ? 0 : first_new_pkg;
798 if (repo->start + last_found_pack + 1 >= start && repo->start + last_found_pack + 1 < repo->end)
800 s = pool->solvables + repo->start + last_found_pack + 1;
801 if (s->repo != repo || s->name != name || s->evr != evr || s->arch != arch)
805 s = joinhash_lookup(repo, joinhash, joinhashm, name, evr, arch, start);
807 /* do not create new packages in EXTEND_SOLVABLES mode */
808 if (!s && (flags & REPO_EXTEND_SOLVABLES) != 0)
810 /* fallthrough to package creation */
814 /* normal operation. create a new solvable. */
815 s = pool_id2solvable(pool, repo_add_solvable(repo));
817 s->name = pool_str2id(pool, join2(&pd.jd, pd.kind, ":", sp[0]), 1);
819 s->name = pool_str2id(pool, sp[0], 1);
820 s->evr = toevr(pool, &pd, sp[1], sp[2]);
821 s->arch = pool_str2id(pool, sp[3], 1);
822 s->vendor = defvendor;
824 first_new_pkg = s - pool->solvables;
827 last_found_pack = (s - pool->solvables) - repo->start;
829 handle = s - pool->solvables;
832 /* If we have no current solvable to add to, ignore all further lines
833 for it. Probably invalid input data in the second set of
835 if (indesc >= 2 && !s)
838 pool_debug(pool, SOLV_ERROR, "susetags: huh %d: %s?\n", pd.lineno, line);
844 case CTAG('=', 'P', 'r', 'v'): /* provides */
847 /* probably a filelist entry. stash it away for now */
848 int l = strlen(line + 6) + 1;
849 if (pd.nfilelist + l > pd.afilelist)
851 pd.afilelist = pd.nfilelist + l + 512;
852 pd.filelist = solv_realloc(pd.filelist, pd.afilelist);
854 memcpy(pd.filelist + pd.nfilelist, line + 6, l);
861 for (l = 0; l < pd.nfilelist; l += strlen(pd.filelist + l) + 1)
862 s->provides = repo_addid_dep(pd.repo, s->provides, pool_str2id(pool, pd.filelist + l, 1), 0);
865 s->provides = adddep(pool, &pd, s->provides, line, 0, pd.kind);
867 case CTAG('=', 'R', 'e', 'q'): /* requires */
868 s->requires = adddep(pool, &pd, s->requires, line, -SOLVABLE_PREREQMARKER, pd.kind);
870 case CTAG('=', 'P', 'r', 'q'): /* pre-requires / packages required */
873 s->requires = adddep(pool, &pd, s->requires, line, 0, 0); /* patterns: a required package */
876 s->requires = adddep(pool, &pd, s->requires, line, SOLVABLE_PREREQMARKER, 0); /* package: pre-requires */
878 case CTAG('=', 'O', 'b', 's'): /* obsoletes */
879 s->obsoletes = adddep(pool, &pd, s->obsoletes, line, 0, pd.kind);
881 case CTAG('=', 'C', 'o', 'n'): /* conflicts */
882 s->conflicts = adddep(pool, &pd, s->conflicts, line, 0, pd.kind);
884 case CTAG('=', 'R', 'e', 'c'): /* recommends */
885 s->recommends = adddep(pool, &pd, s->recommends, line, 0, pd.kind);
887 case CTAG('=', 'S', 'u', 'p'): /* supplements */
888 s->supplements = adddep(pool, &pd, s->supplements, line, 0, pd.kind);
890 case CTAG('=', 'E', 'n', 'h'): /* enhances */
891 s->enhances = adddep(pool, &pd, s->enhances, line, 0, pd.kind);
893 case CTAG('=', 'S', 'u', 'g'): /* suggests */
894 s->suggests = adddep(pool, &pd, s->suggests, line, 0, pd.kind);
896 case CTAG('=', 'F', 'r', 'e'): /* freshens */
897 freshens = adddep(pool, &pd, freshens, line, 0, pd.kind);
899 case CTAG('=', 'P', 'r', 'c'): /* packages recommended */
900 s->recommends = adddep(pool, &pd, s->recommends, line, 0, 0);
902 case CTAG('=', 'P', 's', 'g'): /* packages suggested */
903 s->suggests = adddep(pool, &pd, s->suggests, line, 0, 0);
905 case CTAG('=', 'P', 'c', 'n'): /* pattern: package conflicts */
906 s->conflicts = adddep(pool, &pd, s->conflicts, line, 0, 0);
908 case CTAG('=', 'P', 'o', 'b'): /* pattern: package obsoletes */
909 s->obsoletes = adddep(pool, &pd, s->obsoletes, line, 0, 0);
911 case CTAG('=', 'P', 'f', 'r'): /* pattern: package freshens */
912 freshens = adddep(pool, &pd, freshens, line, 0, 0);
914 case CTAG('=', 'P', 's', 'p'): /* pattern: package supplements */
915 s->supplements = adddep(pool, &pd, s->supplements, line, 0, 0);
917 case CTAG('=', 'P', 'e', 'n'): /* pattern: package enhances */
918 s->enhances = adddep(pool, &pd, s->enhances, line, 0, 0);
920 case CTAG('=', 'V', 'e', 'r'): /* - version - */
927 joinhash = joinhash_init(repo, &joinhashm);
931 case CTAG('=', 'V', 'n', 'd'): /* vendor */
932 s->vendor = pool_str2id(pool, line + 6, 1);
935 /* From here it's the attribute tags. */
936 case CTAG('=', 'G', 'r', 'p'):
937 repodata_set_poolstr(data, handle, SOLVABLE_GROUP, line + 6);
939 case CTAG('=', 'L', 'i', 'c'):
940 repodata_set_poolstr(data, handle, SOLVABLE_LICENSE, line + 6);
942 case CTAG('=', 'L', 'o', 'c'):
944 int i = split(line + 6, sp, 3);
945 if (i != 2 && i != 3)
947 pd.ret = pool_error(pool, -1, "susetags: line %d: bad location line '%s'\n", pd.lineno, line);
950 repodata_set_location(data, handle, atoi(sp[0]), i == 3 ? sp[2] : pool_id2str(pool, s->arch), sp[1]);
953 case CTAG('=', 'S', 'r', 'c'):
954 add_source(&pd, line + 6, s, handle);
956 case CTAG('=', 'S', 'i', 'z'):
957 if (split(line + 6, sp, 3) == 2)
959 repodata_set_num(data, handle, SOLVABLE_DOWNLOADSIZE, strtoull(sp[0], 0, 10));
960 repodata_set_num(data, handle, SOLVABLE_INSTALLSIZE, strtoull(sp[1], 0, 10));
963 case CTAG('=', 'T', 'i', 'm'):
965 unsigned int t = atoi(line + 6);
967 repodata_set_num(data, handle, SOLVABLE_BUILDTIME, t);
970 case CTAG('=', 'K', 'w', 'd'):
971 repodata_add_poolstr_array(data, handle, SOLVABLE_KEYWORDS, line + 6);
973 case CTAG('=', 'A', 'u', 't'):
974 repodata_set_str(data, handle, SOLVABLE_AUTHORS, line + 6);
976 case CTAG('=', 'S', 'u', 'm'):
977 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_SUMMARY, line_lang), line + 3 + keylen);
979 case CTAG('=', 'D', 'e', 's'):
980 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_DESCRIPTION, line_lang), line + 3 + keylen);
982 case CTAG('=', 'E', 'u', 'l'):
983 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_EULA, line_lang), line + 6);
985 case CTAG('=', 'I', 'n', 's'):
986 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_MESSAGEINS, line_lang), line + 6);
988 case CTAG('=', 'D', 'e', 'l'):
989 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_MESSAGEDEL, line_lang), line + 6);
991 case CTAG('=', 'V', 'i', 's'):
993 /* Accept numbers and textual bools. */
996 if (k || !strcasecmp(line + 6, "true"))
997 repodata_set_void(data, handle, SOLVABLE_ISVISIBLE);
1000 case CTAG('=', 'S', 'h', 'r'):
1003 if (split(line + 6, sp, 5) != 4)
1005 pd.ret = pool_error(pool, -1, "susetags: line %d: bad =Shr line '%s'\n", pd.lineno, line);
1008 name = pool_str2id(pool, sp[0], 1);
1009 evr = toevr(pool, &pd, sp[1], sp[2]);
1010 arch = pool_str2id(pool, sp[3], 1);
1011 if (last_found_pack >= pd.nshare)
1013 pd.share_with = solv_realloc2(pd.share_with, last_found_pack + 256, sizeof(*pd.share_with));
1014 memset(pd.share_with + pd.nshare, 0, (last_found_pack + 256 - pd.nshare) * sizeof(*pd.share_with));
1015 pd.nshare = last_found_pack + 256;
1017 pd.share_with[last_found_pack].name = name;
1018 pd.share_with[last_found_pack].evr = evr;
1019 pd.share_with[last_found_pack].arch = arch;
1020 if ((flags & SUSETAGS_RECORD_SHARES) != 0)
1022 if (s->name == name)
1023 repodata_set_void(data, handle, SUSETAGS_SHARE_NAME);
1025 repodata_set_id(data, handle, SUSETAGS_SHARE_NAME, name);
1027 repodata_set_void(data, handle, SUSETAGS_SHARE_EVR);
1029 repodata_set_id(data, handle, SUSETAGS_SHARE_EVR, evr);
1030 if (s->arch == arch)
1031 repodata_set_void(data, handle, SUSETAGS_SHARE_ARCH);
1033 repodata_set_id(data, handle, SUSETAGS_SHARE_ARCH, arch);
1037 case CTAG('=', 'D', 'i', 'r'):
1038 add_dirline(&pd, line + 6);
1040 case CTAG('=', 'C', 'a', 't'):
1041 repodata_set_poolstr(data, handle, langtag(&pd, SOLVABLE_CATEGORY, line_lang), line + 3 + keylen);
1043 case CTAG('=', 'O', 'r', 'd'):
1044 /* Order is a string not a number, so we can retroactively insert
1045 new patterns in the middle, i.e. 1 < 15 < 2. */
1046 repodata_set_str(data, handle, SOLVABLE_ORDER, line + 6);
1048 case CTAG('=', 'I', 'c', 'o'):
1049 repodata_set_str(data, handle, SOLVABLE_ICON, line + 6);
1051 case CTAG('=', 'E', 'x', 't'):
1052 repodata_add_poolstr_array(data, handle, SOLVABLE_EXTENDS, join2(&pd.jd, "pattern", ":", line + 6));
1054 case CTAG('=', 'I', 'n', 'c'):
1055 repodata_add_poolstr_array(data, handle, SOLVABLE_INCLUDES, join2(&pd.jd, "pattern", ":", line + 6));
1057 case CTAG('=', 'C', 'k', 's'):
1058 set_checksum(&pd, data, handle, SOLVABLE_CHECKSUM, line + 6);
1060 case CTAG('=', 'L', 'a', 'n'):
1061 pd.language = solv_free(pd.language);
1062 memset(pd.langcache, 0, sizeof(pd.langcache));
1064 pd.language = solv_strdup(line + 6);
1067 case CTAG('=', 'F', 'l', 's'):
1069 char *p = strrchr(line + 6, '/');
1071 /* strip trailing slash */
1072 if (p && p != line + 6 && !p[1])
1075 p = strrchr(line + 6, '/');
1080 did = repodata_str2dir(data, line + 6, 1);
1088 did = repodata_str2dir(data, "/", 1);
1089 repodata_add_dirstr(data, handle, SOLVABLE_FILELIST, did, p);
1092 case CTAG('=', 'H', 'd', 'r'):
1093 /* rpm header range */
1094 if (split(line + 6, sp, 3) == 2)
1096 /* we ignore the start value */
1097 unsigned int end = (unsigned int)atoi(sp[1]);
1099 repodata_set_num(data, handle, SOLVABLE_HEADEREND, end);
1103 case CTAG('=', 'P', 'a', 't'):
1104 case CTAG('=', 'P', 'k', 'g'):
1109 pool_debug(pool, SOLV_WARN, "susetags: unknown line: %d: %s\n", pd.lineno, line);
1117 finish_solvable(&pd, s, freshens);
1118 solv_free(pd.filelist);
1120 /* Shared attributes
1121 * (e.g. multiple binaries built from same source)
1128 map_init(&keyidmap, data->nkeys);
1129 for (i = 1; i < data->nkeys; i++)
1131 Id keyname = data->keys[i].name;
1132 if (keyname == SOLVABLE_INSTALLSIZE || keyname == SOLVABLE_DISKUSAGE || keyname == SOLVABLE_FILELIST)
1134 if (keyname == SOLVABLE_MEDIADIR || keyname == SOLVABLE_MEDIAFILE || keyname == SOLVABLE_MEDIANR)
1136 if (keyname == SOLVABLE_DOWNLOADSIZE || keyname == SOLVABLE_CHECKSUM)
1138 if (keyname == SOLVABLE_SOURCENAME || keyname == SOLVABLE_SOURCEARCH || keyname == SOLVABLE_SOURCEEVR)
1140 if (keyname == SOLVABLE_PKGID || keyname == SOLVABLE_HDRID || keyname == SOLVABLE_LEADSIGID)
1142 if (keyname == SUSETAGS_SHARE_NAME || keyname == SUSETAGS_SHARE_EVR || keyname == SUSETAGS_SHARE_ARCH)
1144 MAPSET(&keyidmap, i);
1147 for (i = 0; i < pd.nshare; i++)
1150 Solvable *found = 0;
1151 if (!pd.share_with[i].name)
1153 for (n = repo->start, nn = repo->start + last_found; n < repo->end; n++, nn++)
1155 if (nn >= repo->end)
1157 found = pool->solvables + nn;
1158 if (found->repo == repo
1159 && found->name == pd.share_with[i].name
1160 && found->evr == pd.share_with[i].evr
1161 && found->arch == pd.share_with[i].arch)
1163 last_found = nn - repo->start;
1168 repodata_merge_some_attrs(data, repo->start + i, repo->start + last_found, &keyidmap, 0);
1170 free(pd.share_with);
1171 map_free(&keyidmap);
1174 solv_free(joinhash);
1175 repodata_free_dircache(data);
1176 if (!(flags & REPO_NO_INTERNALIZE))
1177 repodata_internalize(data);
1179 solv_free(pd.language);
1181 join_freemem(&pd.jd);