Reimplement state handling in rpm_by functions
[platform/upstream/libsolv.git] / tools / dumpsolv.c
1 /*
2  * Copyright (c) 2007, Novell Inc.
3  *
4  * This program is licensed under the BSD license, read LICENSE.BSD
5  * for further information
6  */
7
8 #include <stdio.h>
9 #include <stdlib.h>
10 #include <unistd.h>
11 #include <string.h>
12
13 static int with_attr = 0;
14
15 #include "pool.h"
16 #include "repo_solv.h"
17
18 static int dump_repoattrs_cb(void *vcbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv);
19
20 static void
21 dump_repodata(Repo *repo)
22 {
23   unsigned i;
24   Repodata *data;
25   if (repo->nrepodata == 0)
26     return;
27   printf("repo contains %d repodata sections:\n", repo->nrepodata - 1);
28   FOR_REPODATAS(repo, i, data)
29     {
30       unsigned int j;
31       printf("\nrepodata %d has %d keys, %d schemata\n", i, data->nkeys - 1, data->nschemata - 1);
32       for (j = 1; j < data->nkeys; j++)
33         printf("  %s (type %s size %d storage %d)\n", pool_id2str(repo->pool, data->keys[j].name), pool_id2str(repo->pool, data->keys[j].type), data->keys[j].size, data->keys[j].storage);
34       if (data->localpool)
35         printf("  localpool has %d strings, size is %d\n", data->spool.nstrings, data->spool.sstrings);
36       if (data->dirpool.ndirs)
37         printf("  localpool has %d directories\n", data->dirpool.ndirs);
38       printf("\n");
39       repodata_search(data, SOLVID_META, 0, SEARCH_ARRAYSENTINEL|SEARCH_SUB, dump_repoattrs_cb, 0);
40     }
41   printf("\n");
42 }
43
44 #if 0
45 static void
46 printids(Repo *repo, char *kind, Offset ido)
47 {
48   Pool *pool = repo->pool;
49   Id id, *ids;
50   if (!ido)
51     return;
52   printf("%s:\n", kind);
53   ids = repo->idarraydata + ido;
54   while((id = *ids++) != 0)
55     printf("  %s\n", pool_dep2str(pool, id));
56 }
57 #endif
58
59 int
60 dump_attr(Repo *repo, Repodata *data, Repokey *key, KeyValue *kv)
61 {
62   const char *keyname;
63   KeyValue *kvp;
64   int indent = 0;
65
66   keyname = pool_id2str(repo->pool, key->name);
67   for (kvp = kv; (kvp = kvp->parent) != 0; indent += 2)
68     printf("  ");
69   switch(key->type)
70     {
71     case REPOKEY_TYPE_ID:
72       if (data && data->localpool)
73         kv->str = stringpool_id2str(&data->spool, kv->id);
74       else
75         kv->str = pool_dep2str(repo->pool, kv->id);
76       printf("%s: %s\n", keyname, kv->str);
77       break;
78     case REPOKEY_TYPE_CONSTANTID:
79       printf("%s: %s\n", keyname, pool_dep2str(repo->pool, kv->id));
80       break;
81     case REPOKEY_TYPE_IDARRAY:
82       if (!kv->entry)
83         printf("%s:\n%*s", keyname, indent, "");
84       if (data && data->localpool)
85         printf("  %s\n", stringpool_id2str(&data->spool, kv->id));
86       else
87         printf("  %s\n", pool_dep2str(repo->pool, kv->id));
88       break;
89     case REPOKEY_TYPE_STR:
90       printf("%s: %s\n", keyname, kv->str);
91       break;
92     case REPOKEY_TYPE_MD5:
93     case REPOKEY_TYPE_SHA1:
94     case REPOKEY_TYPE_SHA256:
95       printf("%s: %s (%s)\n", keyname, repodata_chk2str(data, key->type, (unsigned char *)kv->str), pool_id2str(repo->pool, key->type));
96       break;
97     case REPOKEY_TYPE_VOID:
98       printf("%s: (void)\n", keyname);
99       break;
100     case REPOKEY_TYPE_U32:
101     case REPOKEY_TYPE_CONSTANT:
102       printf("%s: %u\n", keyname, kv->num);
103       break;
104     case REPOKEY_TYPE_NUM:
105       printf("%s: %llu\n", keyname, SOLV_KV_NUM64(kv));
106       break;
107     case REPOKEY_TYPE_BINARY:
108       if (kv->num)
109         printf("%s: %02x..%02x len %u\n", keyname, (unsigned char)kv->str[0], (unsigned char)kv->str[kv->num - 1], kv->num);
110       else
111         printf("%s: len 0\n", keyname);
112       break;
113     case REPOKEY_TYPE_DIRNUMNUMARRAY:
114       if (!kv->entry)
115         printf("%s:\n%*s", keyname, indent, "");
116       printf("  %s %u %u\n", repodata_dir2str(data, kv->id, 0), kv->num, kv->num2);
117       break;
118     case REPOKEY_TYPE_DIRSTRARRAY:
119       if (!kv->entry)
120         printf("%s:\n%*s", keyname, indent, "");
121       printf("  %s\n", repodata_dir2str(data, kv->id, kv->str));
122       break;
123     case REPOKEY_TYPE_FIXARRAY:
124     case REPOKEY_TYPE_FLEXARRAY:
125       if (!kv->entry)
126         printf("%s:\n", keyname);
127       else
128         printf("\n");
129       break;
130     default:
131       printf("%s: ?\n", keyname);
132       break;
133     }
134   return 0;
135 }
136
137 #if 1
138 static int
139 dump_repoattrs_cb(void *vcbdata, Solvable *s, Repodata *data, Repokey *key, KeyValue *kv)
140 {
141   if (key->name == REPOSITORY_SOLVABLES)
142     return SEARCH_NEXT_SOLVABLE;
143   return dump_attr(data->repo, data, key, kv);
144 }
145 #endif
146
147 /*
148  * dump all attributes for Id <p>
149  */
150
151 void
152 dump_repoattrs(Repo *repo, Id p)
153 {
154 #if 0
155   repo_search(repo, p, 0, 0, SEARCH_ARRAYSENTINEL|SEARCH_SUB, dump_repoattrs_cb, 0);
156 #else
157   Dataiterator di;
158   dataiterator_init(&di, repo->pool, repo, p, 0, 0, SEARCH_ARRAYSENTINEL|SEARCH_SUB);
159   while (dataiterator_step(&di))
160     dump_attr(repo, di.data, di.key, &di.kv);
161 #endif
162 }
163
164 #if 0
165 void
166 dump_some_attrs(Repo *repo, Solvable *s)
167 {
168   const char *summary = 0;
169   unsigned int medianr = -1, downloadsize = -1;
170   unsigned int time = -1;
171   summary = repo_lookup_str(s, SOLVABLE_SUMMARY);
172   medianr = repo_lookup_num(s, SOLVABLE_MEDIANR);
173   downloadsize = repo_lookup_num (s, SOLVABLE_DOWNLOADSIZE);
174   time = repo_lookup_num(s, SOLVABLE_BUILDTIME);
175   printf ("  XXX %d %d %u %s\n", medianr, downloadsize, time, summary);
176 }
177 #endif
178
179
180 static int
181 loadcallback(Pool *pool, Repodata *data, void *vdata)
182 {
183   FILE *fp = 0;
184   int r;
185   const char *location;
186
187   location = repodata_lookup_str(data, SOLVID_META, REPOSITORY_LOCATION);
188   if (!location || !with_attr)
189     return 0;
190   fprintf (stderr, "[Loading SOLV file %s]\n", location);
191   fp = fopen (location, "r");
192   if (!fp)
193     {
194       perror(location);
195       return 0;
196     }
197   r = repo_add_solv(data->repo, fp, REPO_USE_LOADING|REPO_LOCALPOOL);
198   fclose(fp);
199   return !r ? 1 : 0;
200 }
201
202
203 static void
204 usage(int status)
205 {
206   fprintf( stderr, "\nUsage:\n"
207            "dumpsolv [-a] [<solvfile>]\n"
208            "  -a  read attributes.\n"
209            );
210   exit(status);
211 }
212
213 #if 0
214 static void
215 tryme (Repo *repo, Id p, Id keyname, const char *match, int flags)
216 {
217   Dataiterator di;
218   dataiterator_init(&di, repo, p, keyname, match, flags);
219   while (dataiterator_step(&di))
220     {
221       switch (di.key->type)
222         {
223           case REPOKEY_TYPE_ID:
224           case REPOKEY_TYPE_IDARRAY:
225               if (di.data && di.data->localpool)
226                 di.kv.str = stringpool_id2str(&di.data->spool, di.kv.id);
227               else
228                 di.kv.str = pool_id2str(repo->pool, di.kv.id);
229               break;
230           case REPOKEY_TYPE_STR:
231           case REPOKEY_TYPE_DIRSTRARRAY:
232               break;
233           default:
234               di.kv.str = 0;
235         }
236       fprintf (stdout, "found: %d:%s %d %s %d %d %d\n",
237                di.solvid,
238                pool_id2str(repo->pool, di.key->name),
239                di.kv.id,
240                di.kv.str, di.kv.num, di.kv.num2, di.kv.eof);
241     }
242 }
243 #endif
244
245 int main(int argc, char **argv)
246 {
247   Repo *repo;
248   Pool *pool;
249   int c, i, j, n;
250   Solvable *s;
251   
252   pool = pool_create();
253   pool_setdebuglevel(pool, 1);
254   pool_setloadcallback(pool, loadcallback, 0);
255
256   while ((c = getopt(argc, argv, "ha")) >= 0)
257     {
258       switch(c)
259         {
260         case 'h':
261           usage(0);
262           break;
263         case 'a':
264           with_attr = 1;
265           break;
266         default:
267           usage(1);
268           break;
269         }
270     }
271   for (; optind < argc; optind++)
272     {
273       if (freopen(argv[optind], "r", stdin) == 0)
274         {
275           perror(argv[optind]);
276           exit(1);
277         }
278       repo = repo_create(pool, argv[optind]);
279       if (repo_add_solv(repo, stdin, 0))
280         printf("could not read repository: %s\n", pool_errstr(pool));
281     }
282   if (!pool->urepos)
283     {
284       repo = repo_create(pool, argc != 1 ? argv[1] : "<stdin>");
285       if (repo_add_solv(repo, stdin, 0))
286         printf("could not read repository: %s\n", pool_errstr(pool));
287     }
288   printf("pool contains %d strings, %d rels, string size is %d\n", pool->ss.nstrings, pool->nrels, pool->ss.sstrings);
289
290 #if 0
291 {
292   Dataiterator di;
293   dataiterator_init(&di, repo, -1, 0, "oo", DI_SEARCHSUB|SEARCH_SUBSTRING);
294   while (dataiterator_step(&di))
295     dump_attr(di.repo, di.data, di.key, &di.kv);
296   exit(0);
297 }
298 #endif
299
300   n = 0;
301   FOR_REPOS(j, repo)
302     {
303       dump_repodata(repo);
304
305       printf("repo %d contains %d solvables\n", j, repo->nsolvables);
306       printf("repo start: %d end: %d\n", repo->start, repo->end);
307       FOR_REPO_SOLVABLES(repo, i, s)
308         {
309           n++;
310           printf("\n");
311           printf("solvable %d (%d):\n", n, i);
312 #if 0
313           if (s->name || s->evr || s->arch)
314             printf("name: %s %s %s\n", pool_id2str(pool, s->name), pool_id2str(pool, s->evr), pool_id2str(pool, s->arch));
315           if (s->vendor)
316             printf("vendor: %s\n", pool_id2str(pool, s->vendor));
317           printids(repo, "provides", s->provides);
318           printids(repo, "obsoletes", s->obsoletes);
319           printids(repo, "conflicts", s->conflicts);
320           printids(repo, "requires", s->requires);
321           printids(repo, "recommends", s->recommends);
322           printids(repo, "suggests", s->suggests);
323           printids(repo, "supplements", s->supplements);
324           printids(repo, "enhances", s->enhances);
325           if (repo->rpmdbid)
326             printf("rpmdbid: %u\n", repo->rpmdbid[i - repo->start]);
327 #endif
328           dump_repoattrs(repo, i);
329 #if 0
330           dump_some_attrs(repo, s);
331 #endif
332         }
333 #if 0
334       tryme(repo, 0, SOLVABLE_MEDIANR, 0, 0);
335       printf("\n");
336       tryme(repo, 0, 0, 0, 0);
337       printf("\n");
338       tryme(repo, 0, 0, "*y*e*", SEARCH_GLOB);
339 #endif
340     }
341 #if 0
342   printf ("\nSearchresults:\n");
343   Dataiterator di;
344   dataiterator_init(&di, pool, 0, 0, 0, "3", SEARCH_SUB | SEARCH_SUBSTRING | SEARCH_FILES);
345   /* int count = 0; */
346   while (dataiterator_step(&di))
347     {
348       printf("%d:", di.solvid);
349       dump_attr(repo, di.data, di.key, &di.kv);
350       /*if (di.solvid == 4 && count++ == 0)
351         dataiterator_jump_to_solvable(&di, pool->solvables + 3);*/
352       /* dataiterator_skip_attribute(&di); */
353       /* dataiterator_skip_solvable(&di); */
354       /* dataiterator_skip_repo(&di); */
355     }
356 #endif
357   pool_free(pool);
358   exit(0);
359 }