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"
32 struct parsedata_common common;
33 int last_found_source;
34 struct datashare *share_with;
36 Id (*dirs)[3]; // dirid, size, nfiles
38 Id langcache[ID_NUM_INTERNAL];
42 static char *flagtab[] = {
53 langtag(struct parsedata *pd, Id tag, const char *language)
55 if (language && !language[0])
57 if (!language || tag >= ID_NUM_INTERNAL)
58 return pool_id2langid(pd->repo->pool, tag, language, 1);
59 return pool_id2langid(pd->repo->pool, tag, language, 1);
60 if (!pd->langcache[tag])
61 pd->langcache[tag] = pool_id2langid(pd->repo->pool, tag, language, 1);
62 return pd->langcache[tag];
67 * create and add dependency
71 adddep(Pool *pool, struct parsedata *pd, unsigned int olddeps, char *line, Id marker, char *kind)
79 /* A file dependency. Do not try to parse it */
80 id = pool_str2id(pool, line + 6, 1);
84 i = split(line + 6, sp, 4); /* name, <op>, evr, ? */
85 if (i != 1 && i != 3) /* expect either 'name' or 'name' <op> 'evr' */
87 pool_debug(pool, SOLV_FATAL, "susetags: bad dependency line: %d: %s\n", pd->lineno, line);
91 id = pool_str2id(pool, join2(kind, ":", sp[0]), 1);
93 id = pool_str2id(pool, sp[0], 1);
96 evrid = makeevr(pool, sp[2]);
97 for (flags = 0; flags < 6; flags++)
98 if (!strcmp(sp[1], flagtab[flags]))
102 pool_debug(pool, SOLV_FATAL, "susetags: unknown relation in %d: '%s'\n", pd->lineno, sp[1]);
105 id = pool_rel2id(pool, id, evrid, flags + 1, 1);
108 return repo_addid_dep(pd->repo, olddeps, id, marker);
118 add_source(struct parsedata *pd, char *line, Solvable *s, Id handle)
120 Repo *repo = s->repo;
121 Pool *pool = repo->pool;
127 if (split(line, sp, 5) != 4)
129 pool_debug(pool, SOLV_FATAL, "susetags: bad source line: %d: %s\n", pd->lineno, line);
133 name = pool_str2id(pool, sp[0], 1);
134 evr = makeevr(pool, join2(sp[1], "-", sp[2]));
135 arch = pool_str2id(pool, sp[3], 1);
136 /* XXX: could record a dep here, depends on where we want to store the data */
138 repodata_set_void(pd->data, handle, SOLVABLE_SOURCENAME);
140 repodata_set_id(pd->data, handle, SOLVABLE_SOURCENAME, name);
142 repodata_set_void(pd->data, handle, SOLVABLE_SOURCEEVR);
144 repodata_set_id(pd->data, handle, SOLVABLE_SOURCEEVR, evr);
145 repodata_set_constantid(pd->data, handle, SOLVABLE_SOURCEARCH, arch);
150 * add a line with directory information
155 add_dirline(struct parsedata *pd, char *line)
161 if (split(line, sp, 6) != 5)
163 pd->dirs = solv_extend(pd->dirs, pd->ndirs, 1, sizeof(pd->dirs[0]), 31);
164 filesz = strtol(sp[1], 0, 0);
165 filesz += strtol(sp[2], 0, 0);
166 filenum = strtol(sp[3], 0, 0);
167 filenum += strtol(sp[4], 0, 0);
168 /* hack: we know that there's room for a / */
171 dirid = repodata_str2dir(pd->data, sp[0], 1);
173 fprintf(stderr, "%s -> %d\n", sp[0], dirid);
175 pd->dirs[pd->ndirs][0] = dirid;
176 pd->dirs[pd->ndirs][1] = filesz;
177 pd->dirs[pd->ndirs][2] = filenum;
182 set_checksum(struct parsedata *pd, Repodata *data, Id handle, Id keyname, char *line)
186 if (split(line, sp, 3) != 2)
188 pool_debug(pd->repo->pool, SOLV_FATAL, "susetags: bad checksum line: %d: %s\n", pd->lineno, line);
191 type = solv_chksum_str2type(sp[0]);
194 pool_debug(pd->repo->pool, SOLV_FATAL, "susetags: unknown checksum type: %d: %s\n", pd->lineno, sp[0]);
197 if (strlen(sp[1]) != 2 * solv_chksum_len(type))
199 pool_debug(pd->repo->pool, SOLV_FATAL, "susetags: bad checksum length: %d: for %s: %s\n", pd->lineno, sp[0], sp[1]);
202 repodata_set_checksum(data, handle, keyname, type, sp[1]);
206 set_delta_location(Repodata *data, Id handle, int medianr, char *dir, char *file)
208 Pool *pool = data->repo->pool;
214 if ((dir = strrchr(file, '/')) != 0)
225 if (l >= 2 && dir[0] == '.' && dir[1] == '/' && (l == 2 || dir[2] != '/'))
230 if (l == 1 && dir[0] == '.')
233 repodata_set_id(data, handle, DELTA_LOCATION_DIR, pool_strn2id(pool, dir, l, 1));
234 if ((p = strrchr(file, '.')) != 0)
237 if ((op = strrchr(file, '.')) != 0)
242 if (!strcmp(p + 1, "delta.rpm") && (op = strrchr(file, '.')) != 0)
249 repodata_set_id(data, handle, DELTA_LOCATION_SUFFIX, pool_str2id(pool, p + 1, 1));
251 if ((p = strrchr(file, '-')) != 0)
254 if ((op = strrchr(file, '-')) != 0)
260 repodata_set_id(data, handle, DELTA_LOCATION_EVR, pool_str2id(pool, p + 1, 1));
262 repodata_set_id(data, handle, DELTA_LOCATION_NAME, pool_str2id(pool, file, 1));
274 id3_cmp(const void *v1, const void *v2, void *dp)
278 return i1[0] - i2[0];
288 commit_diskusage(struct parsedata *pd, Id handle)
291 Dirpool *dp = &pd->data->dirpool;
292 /* Now sort in dirid order. This ensures that parents come before
295 solv_sort(pd->dirs, pd->ndirs, sizeof(pd->dirs[0]), id3_cmp, 0);
296 /* Substract leaf numbers from all parents to make the numbers
297 non-cumulative. This must be done post-order (i.e. all leafs
298 adjusted before parents). We ensure this by starting at the end of
299 the array moving to the start, hence seeing leafs before parents. */
300 for (i = pd->ndirs; i--;)
302 unsigned p = dirpool_parent(dp, pd->dirs[i][0]);
304 for (; p; p = dirpool_parent(dp, p))
307 if (pd->dirs[j][0] == p)
311 if (pd->dirs[j][1] < pd->dirs[i][1])
314 pd->dirs[j][1] -= pd->dirs[i][1];
315 if (pd->dirs[j][2] < pd->dirs[i][2])
318 pd->dirs[j][2] -= pd->dirs[i][2];
321 /* Haven't found this parent in the list, look further if
322 we maybe find the parents parent. */
329 unsigned slen = sizeof(sbuf);
330 for (i = 0; i < pd->ndirs; i++)
332 dir2str(attr, pd->dirs[i][0], &buf, &slen);
333 fprintf(stderr, "have dir %d %d %d %s\n", pd->dirs[i][0], pd->dirs[i][1], pd->dirs[i][2], buf);
338 for (i = 0; i < pd->ndirs; i++)
339 if (pd->dirs[i][1] || pd->dirs[i][2])
341 repodata_add_dirnumnum(pd->data, handle, SOLVABLE_DISKUSAGE, pd->dirs[i][0], pd->dirs[i][1], pd->dirs[i][2]);
347 /* Unfortunately "a"[0] is no constant expression in the C languages,
348 so we need to pass the four characters individually :-/ */
349 #define CTAG(a,b,c,d) ((unsigned)(((unsigned char)a) << 24) \
350 | ((unsigned char)b << 16) \
351 | ((unsigned char)c << 8) \
352 | ((unsigned char)d))
359 static inline unsigned
360 tag_from_string(char *cs)
362 unsigned char *s = (unsigned char *)cs;
363 return ((s[0] << 24) | (s[1] << 16) | (s[2] << 8) | s[3]);
369 * Parse susetags file passed in fp, fill solvables into repo
371 * susetags is key,value based
375 * for long (multi-line) values,
382 * See http://en.opensuse.org/Standards/YaST2_Repository_Metadata
383 * and http://en.opensuse.org/Standards/YaST2_Repository_Metadata/packages
384 * and http://en.opensuse.org/Standards/YaST2_Repository_Metadata/pattern
387 * All keys have 3 characters and end in ':'
391 finish_solvable(struct parsedata *pd, Solvable *s, Id handle, Offset freshens)
393 Pool *pool = pd->repo->pool;
396 /* move file provides to filelist */
397 /* relies on the fact that rpm inserts self-provides at the end */
398 if (s->provides && (pd->flags & REPO_EXTEND_SOLVABLES) == 0)
400 Id *p, *lastreal, did;
401 const char *str, *sp;
402 lastreal = pd->repo->idarraydata + s->provides;
403 for (p = lastreal; *p; p++)
406 for (p = lastreal; *p; p++)
408 str = pool_id2str(pool, *p);
414 for (p = lastreal; *p; p++)
418 str = pool_id2str(pool, *p);
419 sp = strrchr(str, '/');
420 /* Need to copy filename now, before we add string that could
421 realloc the stringspace (and hence invalidate str). */
423 if (strlen(fname) >= 128)
424 fname = solv_strdup(fname);
427 memcpy(fname_buf, fname, strlen(fname) + 1);
432 char *sdup = solv_strdup(str);
434 did = repodata_str2dir(pd->data, sdup, 1);
440 strncpy(sdup, str, sp - str);
442 did = repodata_str2dir(pd->data, sdup, 1);
445 did = repodata_str2dir(pd->data, "/", 1);
446 repodata_add_dirstr(pd->data, handle, SOLVABLE_FILELIST, did, fname);
447 if (fname != fname_buf)
454 /* A self provide, except for source packages. This is harmless
455 to do twice (in case we see the same package twice). */
456 if (s->name && s->arch != ARCH_SRC && s->arch != ARCH_NOSRC)
457 s->provides = repo_addid_dep(pd->repo, s->provides,
458 pool_rel2id(pool, s->name, s->evr, REL_EQ, 1), 0);
459 /* XXX This uses repo_addid_dep internally, so should also be
460 harmless to do twice. */
461 s->supplements = repo_fix_supplements(pd->repo, s->provides, s->supplements, freshens);
462 s->conflicts = repo_fix_conflicts(pd->repo, s->conflicts);
464 commit_diskusage(pd, handle);
468 joinhash_init(Repo *repo, Hashmask *hmp)
470 Hashmask hm = mkmask(repo->nsolvables);
471 Hashtable ht = solv_calloc(hm + 1, sizeof(*ht));
476 FOR_REPO_SOLVABLES(repo, i, s)
478 hh = HASHCHAIN_START;
481 h = HASHCHAIN_NEXT(h, hh, hm);
489 joinhash_lookup(Repo *repo, Hashtable ht, Hashmask hm, Id name, Id evr, Id arch)
493 if (!name || !arch || !evr)
495 hh = HASHCHAIN_START;
499 Solvable *s = repo->pool->solvables + ht[h];
500 if (s->name == name && s->evr == evr && s->arch == arch)
502 h = HASHCHAIN_NEXT(h, hh, hm);
508 lookup_shared_id(Repodata *data, Id p, Id keyname, Id voidid, int uninternalized)
511 r = repodata_lookup_type(data, p, keyname);
514 if (r == REPOKEY_TYPE_VOID)
516 r = repodata_lookup_id(data, p, keyname);
520 if (uninternalized && data->attrs)
522 Id *ap = data->attrs[p - data->start];
527 if (data->keys[*ap].name != keyname)
529 if (data->keys[*ap].type == REPOKEY_TYPE_VOID)
531 if (data->keys[*ap].type == REPOKEY_TYPE_ID)
542 * fp: file to read from
543 * defvendor: default vendor (0 if none)
544 * language: current language (0 if none)
549 repo_add_susetags(Repo *repo, FILE *fp, Id defvendor, const char *language, int flags)
551 Pool *pool = repo->pool;
560 int last_found_pack = 0;
565 Hashtable joinhash = 0;
566 Hashmask joinhashm = 0;
569 if ((flags & (SUSETAGS_EXTEND|REPO_EXTEND_SOLVABLES)) != 0 && repo->nrepodata)
571 joinhash = joinhash_init(repo, &joinhashm);
575 data = repo_add_repodata(repo, flags);
577 memset(&pd, 0, sizeof(pd));
581 pd.repo = pd.common.repo = repo;
583 pd.common.pool = pool;
590 /* if this is a join setup the recorded share data */
596 FOR_REPODATAS(repo, i, sdata)
599 if (!repodata_has_keyname(sdata, SUSETAGS_SHARE_NAME))
601 for (p = sdata->start; p < sdata->end; p++)
604 name = lookup_shared_id(sdata, p, SUSETAGS_SHARE_NAME, pool->solvables[p].name, sdata == data);
607 evr = lookup_shared_id(sdata, p, SUSETAGS_SHARE_EVR, pool->solvables[p].evr, sdata == data);
610 arch = lookup_shared_id(sdata, p, SUSETAGS_SHARE_ARCH, pool->solvables[p].arch, sdata == data);
613 if (p - repo->start >= pd.nshare)
615 pd.share_with = solv_realloc2(pd.share_with, p - repo->start + 256, sizeof(*pd.share_with));
616 memset(pd.share_with + pd.nshare, 0, (p - repo->start + 256 - pd.nshare) * sizeof(*pd.share_with));
617 pd.nshare = p - repo->start + 256;
619 pd.share_with[p - repo->start].name = name;
620 pd.share_with[p - repo->start].evr = evr;
621 pd.share_with[p - repo->start].arch = arch;
629 * collect values in 'struct parsedata pd'
630 * then build .solv (and .attr) file
636 char *olinep; /* old line pointer */
639 if (linep - line + 16 > aline) /* (re-)alloc buffer */
641 aline = linep - line;
642 line = realloc(line, aline + 512);
643 linep = line + aline;
646 if (!fgets(linep, aline - (linep - line), fp)) /* read line */
649 linep += strlen(linep);
650 if (linep == line || linep[-1] != '\n')
659 /* check for multi-line value tags (+Key:/-Key:) */
661 int is_end = (linep[-intag - keylen + 1] == '-')
662 && (linep[-1] == ':')
663 && (linep == line + 1 + intag + 1 + 1 + 1 + intag + 1 || linep[-intag - keylen] == '\n');
665 && strncmp(linep - 1 - intag, line + 1, intag))
667 pool_debug(pool, SOLV_ERROR, "susetags: Nonmatching multi-line tags: %d: '%s' '%s' %d\n", pd.lineno, linep - 1 - intag, line + 1, intag);
669 if (cummulate && !is_end)
674 if (cummulate && is_end)
676 linep[-intag - keylen + 1] = 0;
677 if (linep[-intag - keylen] == '\n')
678 linep[-intag - keylen] = 0;
682 if (!cummulate && is_end)
688 if (!cummulate && !is_end)
689 linep = line + intag + keylen;
694 if (!intag && line[0] == '+' && line[1] && line[1] != ':') /* start of +Key:/-Key: tag */
696 char *tagend = strchr(line, ':');
699 pool_debug(pool, SOLV_FATAL, "susetags: bad line: %d: %s\n", pd.lineno, line);
702 intag = tagend - (line + 1);
704 switch (tag_from_string(line)) /* check if accumulation is needed */
706 case CTAG('+', 'D', 'e', 's'):
707 case CTAG('+', 'E', 'u', 'l'):
708 case CTAG('+', 'I', 'n', 's'):
709 case CTAG('+', 'D', 'e', 'l'):
710 case CTAG('+', 'A', 'u', 't'):
711 if (line[4] == ':' || line[4] == '.')
717 line[0] = '='; /* handle lines between +Key:/-Key: as =Key: */
718 line[intag + keylen - 1] = ' ';
719 linep = line + intag + keylen;
722 if (*line == '#' || !*line)
724 if (! (line[0] && line[1] && line[2] && line[3] && (line[4] == ':' || line[4] == '.')))
729 endlang = strchr(line + 5, ':');
732 keylen = endlang - line - 1;
733 strncpy(line_lang, line + 5, 5);
734 line_lang[endlang - line - 5] = 0;
739 tag = tag_from_string(line);
744 =Dlt: subversion 1.6.16 1.3.1 i586
745 =Dsq: subversion 1.6.15 4.2 i586 d57b3fc86e7a2f73796e8e35b96fa86212c910
746 =Cks: SHA1 14a8410cf741856a5d70d89dab62984dba6a1ca7
747 =Loc: 1 subversion-1.6.15_1.6.16-4.2_1.3.1.i586.delta.rpm
752 case CTAG('=', 'D', 's', 'q'):
755 if (split(line + 5, sp, 5) != 5)
757 repodata_set_id(data, handle, DELTA_SEQ_NAME, pool_str2id(pool, sp[0], 1));
758 evr = makeevr(pool, join2(sp[1], "-", sp[2]));
759 repodata_set_id(data, handle, DELTA_SEQ_EVR, evr);
760 /* repodata_set_id(data, handle, DELTA_SEQ_ARCH, pool_str2id(pool, sp[3], 1)); */
761 repodata_set_str(data, handle, DELTA_SEQ_NUM, sp[4]);
762 repodata_set_id(data, handle, DELTA_BASE_EVR, evr);
765 case CTAG('=', 'C', 'k', 's'):
766 set_checksum(&pd, data, handle, DELTA_CHECKSUM, line + 6);
768 case CTAG('=', 'L', 'o', 'c'):
770 int i = split(line + 6, sp, 3);
771 if (i != 2 && i != 3)
773 pool_debug(pool, SOLV_FATAL, "susetags: bad location line: %d: %s\n", pd.lineno, line);
776 set_delta_location(data, handle, atoi(sp[0]), i == 3 ? sp[2] : 0, sp[1]);
779 case CTAG('=', 'S', 'i', 'z'):
780 if (split(line + 6, sp, 3) == 2)
781 repodata_set_num(data, handle, DELTA_DOWNLOADSIZE, (unsigned int)(atoi(sp[0]) + 1023) / 1024);
783 case CTAG('=', 'P', 'k', 'g'):
784 case CTAG('=', 'P', 'a', 't'):
785 case CTAG('=', 'D', 'l', 't'):
790 pool_debug(pool, SOLV_ERROR, "susetags: unknown line: %d: %s\n", pd.lineno, line);
796 * start of (next) package or pattern or delta
798 * =Pkg: <name> <version> <release> <architecture>
801 if (tag == CTAG('=', 'D', 'l', 't'))
804 finish_solvable(&pd, s, handle, freshens);
807 if (split(line + 5, sp, 5) != 4)
809 pool_debug(pool, SOLV_FATAL, "susetags: bad line: %d: %s\n", pd.lineno, line);
812 handle = repodata_new_handle(data);
813 repodata_set_id(data, handle, DELTA_PACKAGE_NAME, pool_str2id(pool, sp[0], 1));
814 repodata_set_id(data, handle, DELTA_PACKAGE_EVR, makeevr(pool, join2(sp[1], "-", sp[2])));
815 repodata_set_id(data, handle, DELTA_PACKAGE_ARCH, pool_str2id(pool, sp[3], 1));
816 repodata_add_flexarray(data, SOLVID_META, REPOSITORY_DELTAINFO, handle);
820 if (tag == CTAG('=', 'P', 'k', 'g')
821 || tag == CTAG('=', 'P', 'a', 't'))
823 /* If we have an old solvable, complete it by filling in some
826 finish_solvable(&pd, s, handle, freshens);
840 if (split(line + 5, sp, 5) != 4)
842 pool_debug(pool, SOLV_FATAL, "susetags: bad line: %d: %s\n", pd.lineno, line);
850 /* data join operation. find solvable matching name/arch/evr and
853 /* we don't use the create flag here as a simple pre-check for existance */
855 name = pool_str2id(pool, join2(pd.kind, ":", sp[0]), 0);
857 name = pool_str2id(pool, sp[0], 0);
858 evr = makeevr(pool, join2(sp[1], "-", sp[2]));
859 arch = pool_str2id(pool, sp[3], 0);
862 if (repo->start + last_found_pack + 1 < repo->end)
864 s = pool->solvables + repo->start + last_found_pack + 1;
865 if (s->repo != repo || s->name != name || s->evr != evr || s->arch != arch)
869 s = joinhash_lookup(repo, joinhash, joinhashm, name, evr, arch);
871 if (!s && (flags & REPO_EXTEND_SOLVABLES) != 0)
873 /* fallthrough to package creation */
877 /* normal operation. create a new solvable. */
878 s = pool_id2solvable(pool, repo_add_solvable(repo));
880 s->name = pool_str2id(pool, join2(pd.kind, ":", sp[0]), 1);
882 s->name = pool_str2id(pool, sp[0], 1);
883 s->evr = makeevr(pool, join2(sp[1], "-", sp[2]));
884 s->arch = pool_str2id(pool, sp[3], 1);
885 s->vendor = defvendor;
888 last_found_pack = (s - pool->solvables) - repo->start;
890 handle = s - pool->solvables;
893 /* If we have no current solvable to add to, ignore all further lines
894 for it. Probably invalid input data in the second set of
896 if (indesc >= 2 && !s)
899 pool_debug(pool, SOLV_ERROR, "susetags: huh %d: %s?\n", pd.lineno, line);
905 case CTAG('=', 'P', 'r', 'v'): /* provides */
906 s->provides = adddep(pool, &pd, s->provides, line, 0, pd.kind);
908 case CTAG('=', 'R', 'e', 'q'): /* requires */
909 s->requires = adddep(pool, &pd, s->requires, line, -SOLVABLE_PREREQMARKER, pd.kind);
911 case CTAG('=', 'P', 'r', 'q'): /* pre-requires / packages required */
914 s->requires = adddep(pool, &pd, s->requires, line, 0, 0); /* patterns: a required package */
917 s->requires = adddep(pool, &pd, s->requires, line, SOLVABLE_PREREQMARKER, 0); /* package: pre-requires */
919 case CTAG('=', 'O', 'b', 's'): /* obsoletes */
920 s->obsoletes = adddep(pool, &pd, s->obsoletes, line, 0, pd.kind);
922 case CTAG('=', 'C', 'o', 'n'): /* conflicts */
923 s->conflicts = adddep(pool, &pd, s->conflicts, line, 0, pd.kind);
925 case CTAG('=', 'R', 'e', 'c'): /* recommends */
926 s->recommends = adddep(pool, &pd, s->recommends, line, 0, pd.kind);
928 case CTAG('=', 'S', 'u', 'p'): /* supplements */
929 s->supplements = adddep(pool, &pd, s->supplements, line, 0, pd.kind);
931 case CTAG('=', 'E', 'n', 'h'): /* enhances */
932 s->enhances = adddep(pool, &pd, s->enhances, line, 0, pd.kind);
934 case CTAG('=', 'S', 'u', 'g'): /* suggests */
935 s->suggests = adddep(pool, &pd, s->suggests, line, 0, pd.kind);
937 case CTAG('=', 'F', 'r', 'e'): /* freshens */
938 freshens = adddep(pool, &pd, freshens, line, 0, pd.kind);
940 case CTAG('=', 'P', 'r', 'c'): /* packages recommended */
941 s->recommends = adddep(pool, &pd, s->recommends, line, 0, 0);
943 case CTAG('=', 'P', 's', 'g'): /* packages suggested */
944 s->suggests = adddep(pool, &pd, s->suggests, line, 0, 0);
946 case CTAG('=', 'P', 'c', 'n'): /* pattern: package conflicts */
947 s->conflicts = adddep(pool, &pd, s->conflicts, line, 0, 0);
949 case CTAG('=', 'P', 'o', 'b'): /* pattern: package obsoletes */
950 s->obsoletes = adddep(pool, &pd, s->obsoletes, line, 0, 0);
952 case CTAG('=', 'P', 'f', 'r'): /* pattern: package freshens */
953 freshens = adddep(pool, &pd, freshens, line, 0, 0);
955 case CTAG('=', 'P', 's', 'p'): /* pattern: package supplements */
956 s->supplements = adddep(pool, &pd, s->supplements, line, 0, 0);
958 case CTAG('=', 'P', 'e', 'n'): /* pattern: package enhances */
959 s->enhances = adddep(pool, &pd, s->enhances, line, 0, 0);
961 case CTAG('=', 'V', 'e', 'r'): /* - version - */
968 joinhash = joinhash_init(repo, &joinhashm);
972 case CTAG('=', 'V', 'n', 'd'): /* vendor */
973 s->vendor = pool_str2id(pool, line + 6, 1);
976 /* From here it's the attribute tags. */
977 case CTAG('=', 'G', 'r', 'p'):
978 repodata_set_poolstr(data, handle, SOLVABLE_GROUP, line + 6);
980 case CTAG('=', 'L', 'i', 'c'):
981 repodata_set_poolstr(data, handle, SOLVABLE_LICENSE, line + 6);
983 case CTAG('=', 'L', 'o', 'c'):
985 int i = split(line + 6, sp, 3);
986 if (i != 2 && i != 3)
988 pool_debug(pool, SOLV_FATAL, "susetags: bad location line: %d: %s\n", pd.lineno, line);
991 repodata_set_location(data, handle, atoi(sp[0]), i == 3 ? sp[2] : pool_id2str(pool, s->arch), sp[1]);
994 case CTAG('=', 'S', 'r', 'c'):
995 add_source(&pd, line + 6, s, handle);
997 case CTAG('=', 'S', 'i', 'z'):
998 if (split(line + 6, sp, 3) == 2)
1000 repodata_set_num(data, handle, SOLVABLE_DOWNLOADSIZE, (unsigned int)(atoi(sp[0]) + 1023) / 1024);
1001 repodata_set_num(data, handle, SOLVABLE_INSTALLSIZE, (unsigned int)(atoi(sp[1]) + 1023) / 1024);
1004 case CTAG('=', 'T', 'i', 'm'):
1006 unsigned int t = atoi(line + 6);
1008 repodata_set_num(data, handle, SOLVABLE_BUILDTIME, t);
1011 case CTAG('=', 'K', 'w', 'd'):
1012 repodata_add_poolstr_array(data, handle, SOLVABLE_KEYWORDS, line + 6);
1014 case CTAG('=', 'A', 'u', 't'):
1015 repodata_set_str(data, handle, SOLVABLE_AUTHORS, line + 6);
1017 case CTAG('=', 'S', 'u', 'm'):
1018 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_SUMMARY, language ? language : line_lang), line + 3 + keylen );
1020 case CTAG('=', 'D', 'e', 's'):
1021 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_DESCRIPTION, language ? language : line_lang), line + 3 + keylen );
1023 case CTAG('=', 'E', 'u', 'l'):
1024 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_EULA, language), line + 6);
1026 case CTAG('=', 'I', 'n', 's'):
1027 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_MESSAGEINS, language), line + 6);
1029 case CTAG('=', 'D', 'e', 'l'):
1030 repodata_set_str(data, handle, langtag(&pd, SOLVABLE_MESSAGEDEL, language), line + 6);
1032 case CTAG('=', 'V', 'i', 's'):
1034 /* Accept numbers and textual bools. */
1037 if (k || !strcasecmp(line + 6, "true"))
1038 repodata_set_void(data, handle, SOLVABLE_ISVISIBLE );
1041 case CTAG('=', 'S', 'h', 'r'):
1044 if (split(line + 6, sp, 5) != 4)
1046 pool_debug(pool, SOLV_FATAL, "susetags: bad =Shr line: %s\n", line + 6);
1049 name = pool_str2id(pool, sp[0], 1);
1050 evr = makeevr(pool, join2(sp[1], "-", sp[2]));
1051 arch = pool_str2id(pool, sp[3], 1);
1052 if (last_found_pack >= pd.nshare)
1054 pd.share_with = solv_realloc2(pd.share_with, last_found_pack + 256, sizeof(*pd.share_with));
1055 memset(pd.share_with + pd.nshare, 0, (last_found_pack + 256 - pd.nshare) * sizeof(*pd.share_with));
1056 pd.nshare = last_found_pack + 256;
1058 pd.share_with[last_found_pack].name = name;
1059 pd.share_with[last_found_pack].evr = evr;
1060 pd.share_with[last_found_pack].arch = arch;
1061 if ((flags & SUSETAGS_RECORD_SHARES) != 0)
1063 if (s->name == name)
1064 repodata_set_void(data, handle, SUSETAGS_SHARE_NAME);
1066 repodata_set_id(data, handle, SUSETAGS_SHARE_NAME, name);
1068 repodata_set_void(data, handle, SUSETAGS_SHARE_EVR);
1070 repodata_set_id(data, handle, SUSETAGS_SHARE_EVR, evr);
1071 if (s->arch == arch)
1072 repodata_set_void(data, handle, SUSETAGS_SHARE_ARCH);
1074 repodata_set_id(data, handle, SUSETAGS_SHARE_ARCH, arch);
1078 case CTAG('=', 'D', 'i', 'r'):
1079 add_dirline(&pd, line + 6);
1081 case CTAG('=', 'C', 'a', 't'):
1082 repodata_set_poolstr(data, handle, langtag(&pd, SOLVABLE_CATEGORY, line_lang), line + 3 + keylen);
1084 case CTAG('=', 'O', 'r', 'd'):
1085 /* Order is a string not a number, so we can retroactively insert
1086 new patterns in the middle, i.e. 1 < 15 < 2. */
1087 repodata_set_str(data, handle, SOLVABLE_ORDER, line + 6);
1089 case CTAG('=', 'I', 'c', 'o'):
1090 repodata_set_str(data, handle, SOLVABLE_ICON, line + 6);
1092 case CTAG('=', 'E', 'x', 't'):
1093 repodata_add_poolstr_array(data, handle, SOLVABLE_EXTENDS, join2("pattern", ":", line + 6));
1095 case CTAG('=', 'I', 'n', 'c'):
1096 repodata_add_poolstr_array(data, handle, SOLVABLE_INCLUDES, join2("pattern", ":", line + 6));
1098 case CTAG('=', 'C', 'k', 's'):
1099 set_checksum(&pd, data, handle, SOLVABLE_CHECKSUM, line + 6);
1101 case CTAG('=', 'L', 'a', 'n'):
1102 language = solv_strdup(line + 6);
1105 case CTAG('=', 'F', 'l', 's'):
1107 char *p = strrchr(line + 6, '/');
1109 if (p && p != line + 6 && !p[1])
1112 p = strrchr(line + 6, '/');
1117 did = repodata_str2dir(data, line + 6, 1);
1125 did = repodata_str2dir(data, "/", 1);
1126 repodata_add_dirstr(data, handle, SOLVABLE_FILELIST, did, p);
1129 case CTAG('=', 'H', 'd', 'r'):
1130 /* rpm header range */
1131 if (split(line + 6, sp, 3) == 2)
1133 /* we ignore the start value */
1134 unsigned int end = (unsigned int)atoi(sp[1]);
1136 repodata_set_num(data, handle, SOLVABLE_HEADEREND, end);
1140 case CTAG('=', 'P', 'a', 't'):
1141 case CTAG('=', 'P', 'k', 'g'):
1145 pool_debug(pool, SOLV_ERROR, "susetags: unknown line: %d: %s\n", pd.lineno, line);
1152 finish_solvable(&pd, s, handle, freshens);
1154 /* Shared attributes
1155 * (e.g. multiple binaries built from same source)
1162 map_init(&keyidmap, data->nkeys);
1163 for (i = 1; i < data->nkeys; i++)
1165 Id keyname = data->keys[i].name;
1166 if (keyname == SOLVABLE_INSTALLSIZE || keyname == SOLVABLE_DISKUSAGE || keyname == SOLVABLE_FILELIST)
1168 if (keyname == SOLVABLE_MEDIADIR || keyname == SOLVABLE_MEDIAFILE || keyname == SOLVABLE_MEDIANR)
1170 if (keyname == SOLVABLE_DOWNLOADSIZE || keyname == SOLVABLE_CHECKSUM)
1172 if (keyname == SOLVABLE_SOURCENAME || keyname == SOLVABLE_SOURCEARCH || keyname == SOLVABLE_SOURCEEVR)
1174 if (keyname == SOLVABLE_PKGID || keyname == SOLVABLE_HDRID || keyname == SOLVABLE_LEADSIGID)
1176 if (keyname == SUSETAGS_SHARE_NAME || keyname == SUSETAGS_SHARE_EVR || keyname == SUSETAGS_SHARE_ARCH)
1178 MAPSET(&keyidmap, i);
1181 for (i = 0; i < pd.nshare; i++)
1184 Solvable *found = 0;
1185 if (!pd.share_with[i].name)
1187 for (n = repo->start, nn = repo->start + last_found; n < repo->end; n++, nn++)
1189 if (nn >= repo->end)
1191 found = pool->solvables + nn;
1192 if (found->repo == repo
1193 && found->name == pd.share_with[i].name
1194 && found->evr == pd.share_with[i].evr
1195 && found->arch == pd.share_with[i].arch)
1197 last_found = nn - repo->start;
1202 repodata_merge_some_attrs(data, repo->start + i, repo->start + last_found, &keyidmap, 0);
1204 free(pd.share_with);
1205 map_free(&keyidmap);
1208 solv_free(joinhash);
1209 if (!(flags & REPO_NO_INTERNALIZE))
1210 repodata_internalize(data);
1213 free(pd.common.tmp);