ext/repo_products.c

   1 /*
   2  * repo_products.c
   3  *
   4  * Parses all files below 'proddir'
   5  * See http://en.opensuse.org/Product_Management/Code11
   6  *
   7  *
   8  * Copyright (c) 2008, Novell Inc.
   9  *
  10  * This program is licensed under the BSD license, read LICENSE.BSD
  11  * for further information
  12  */
  13
  14 #include <sys/types.h>
  15 #include <sys/stat.h>
  16 #include <unistd.h>
  17 #include <limits.h>
  18 #include <fcntl.h>
  19 #include <ctype.h>
  20 #include <stdio.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <assert.h>
  24 #include <dirent.h>
  25 #include <expat.h>
  26
  27 #include "pool.h"
  28 #include "repo.h"
  29 #include "util.h"
  30 #define DISABLE_SPLIT
  31 #include "tools_util.h"
  32 #include "repo_content.h"
  33 #include "repo_zyppdb.h"
  34 #include "repo_releasefile_products.h"
  35
  36
  37 //#define DUMPOUT 0
  38
  39 enum state {
  40   STATE_START,           // 0
  41   STATE_PRODUCT,         // 1
  42   STATE_VENDOR,          // 2
  43   STATE_NAME,            // 3
  44   STATE_VERSION,         // 4
  45   STATE_RELEASE,         // 5
  46   STATE_ARCH,            // 6
  47   STATE_SUMMARY,         // 7
  48   STATE_SHORTSUMMARY,
  49   STATE_DESCRIPTION,     // 8
  50   STATE_UPDATEREPOKEY,   // 9 should go away
  51   STATE_CPEID,         // 9
  52   STATE_URLS,            // 10
  53   STATE_URL,             // 11
  54   STATE_RUNTIMECONFIG,   // 12
  55   STATE_LINGUAS,         // 13
  56   STATE_LANG,            // 14
  57   STATE_REGISTER,        // 15
  58   STATE_TARGET,          // 16
  59   STATE_REGRELEASE,      // 18
  60   STATE_PRODUCTLINE,     // 19
  61   NUMSTATES              // 0
  62 };
  63
  64 struct stateswitch {
  65   enum state from;
  66   char *ename;
  67   enum state to;
  68   int docontent;
  69 };
  70
  71 /* !! must be sorted by first column !! */
  72 static struct stateswitch stateswitches[] = {
  73   { STATE_START,     "product",       STATE_PRODUCT,       0 },
  74   { STATE_PRODUCT,   "vendor",        STATE_VENDOR,        1 },
  75   { STATE_PRODUCT,   "name",          STATE_NAME,          1 },
  76   { STATE_PRODUCT,   "version",       STATE_VERSION,       1 },
  77   { STATE_PRODUCT,   "release",       STATE_RELEASE,       1 },
  78   { STATE_PRODUCT,   "arch",          STATE_ARCH,          1 },
  79   { STATE_PRODUCT,   "productline",   STATE_PRODUCTLINE,   1 },
  80   { STATE_PRODUCT,   "summary",       STATE_SUMMARY,       1 },
  81   { STATE_PRODUCT,   "shortsummary",  STATE_SHORTSUMMARY,  1 },
  82   { STATE_PRODUCT,   "description",   STATE_DESCRIPTION,   1 },
  83   { STATE_PRODUCT,   "register",      STATE_REGISTER,      0 },
  84   { STATE_PRODUCT,   "urls",          STATE_URLS,          0 },
  85   { STATE_PRODUCT,   "runtimeconfig", STATE_RUNTIMECONFIG, 0 },
  86   { STATE_PRODUCT,   "linguas",       STATE_LINGUAS,       0 },
  87   { STATE_PRODUCT,   "updaterepokey", STATE_UPDATEREPOKEY, 1 },
  88   { STATE_PRODUCT,   "cpeid",         STATE_CPEID,         1 },
  89   { STATE_URLS,      "url",           STATE_URL,           1 },
  90   { STATE_LINGUAS,   "lang",          STATE_LANG,          0 },
  91   { STATE_REGISTER,  "target",        STATE_TARGET,        1 },
  92   { STATE_REGISTER,  "release",       STATE_REGRELEASE,    1 },
  93   { NUMSTATES }
  94 };
  95
  96 struct parsedata {
  97   const char *filename;
  98   const char *basename;
  99   int depth;
 100   enum state state;
 101   int statedepth;
 102   char *content;
 103   int lcontent;
 104   int acontent;
 105   int docontent;
 106   Pool *pool;
 107   Repo *repo;
 108   Repodata *data;
 109
 110   struct stateswitch *swtab[NUMSTATES];
 111   enum state sbtab[NUMSTATES];
 112
 113   const char *tmplang;
 114
 115   const char *tmpvers;
 116   const char *tmprel;
 117   const char *tmpurltype;
 118
 119   unsigned int ctime;
 120
 121   Solvable *solvable;
 122   Id handle;
 123
 124   ino_t baseproduct;
 125   ino_t currentproduct;
 126   int productscheme;
 127
 128   Id langcache[ID_NUM_INTERNAL];
 129 };
 130
 131
 132 /*
 133  * find_attr
 134  * find value for xml attribute
 135  * I: txt, name of attribute
 136  * I: atts, list of key/value attributes
 137  * I: dup, strdup it
 138  * O: pointer to value of matching key, or NULL
 139  *
 140  */
 141
 142 static inline const char *
 143 find_attr(const char *txt, const char **atts, int dup)
 144 {
 145   for (; *atts; atts += 2)
 146     {
 147       if (!strcmp(*atts, txt))
 148         return dup ? strdup(atts[1]) : atts[1];
 149     }
 150   return 0;
 151 }
 152
 153
 154 /*
 155  * create localized tag
 156  */
 157
 158 static Id
 159 langtag(struct parsedata *pd, Id tag, const char *language)
 160 {
 161   if (language && !language[0])
 162     language = 0;
 163   if (!language || tag >= ID_NUM_INTERNAL)
 164     return pool_id2langid(pd->repo->pool, tag, language, 1);
 165   if (!pd->langcache[tag])
 166     pd->langcache[tag] = pool_id2langid(pd->repo->pool, tag, language, 1);
 167   return pd->langcache[tag];
 168 }
 169
 170
 171 /*
 172  * XML callback: startElement
 173  */
 174
 175 static void XMLCALL
 176 startElement(void *userData, const char *name, const char **atts)
 177 {
 178   struct parsedata *pd = userData;
 179   Pool *pool = pd->pool;
 180   Solvable *s = pd->solvable;
 181   struct stateswitch *sw;
 182
 183 #if 0
 184       fprintf(stderr, "start: [%d]%s\n", pd->state, name);
 185 #endif
 186   if (pd->depth != pd->statedepth)
 187     {
 188       pd->depth++;
 189       return;
 190     }
 191
 192   pd->depth++;
 193   if (!pd->swtab[pd->state])    /* no statetable -> no substates */
 194     {
 195 #if 0
 196       fprintf(stderr, "into unknown: %s (from: %d)\n", name, pd->state);
 197 #endif
 198       return;
 199     }
 200   for (sw = pd->swtab[pd->state]; sw->from == pd->state; sw++)  /* find name in statetable */
 201     if (!strcmp(sw->ename, name))
 202       break;
 203
 204   if (sw->from != pd->state)
 205     {
 206 #if 0
 207       fprintf(stderr, "into unknown: %s (from: %d)\n", name, pd->state);
 208 #endif
 209       return;
 210     }
 211   pd->state = sw->to;
 212   pd->docontent = sw->docontent;
 213   pd->statedepth = pd->depth;
 214   pd->lcontent = 0;
 215   *pd->content = 0;
 216
 217   switch(pd->state)
 218     {
 219     case STATE_PRODUCT:
 220       /* parse 'schemeversion' and store in global variable */
 221       {
 222         const char * scheme = find_attr("schemeversion", atts, 0);
 223         pd->productscheme = (scheme && *scheme) ? atoi(scheme) : -1;
 224       }
 225       if (!s)
 226         {
 227           s = pd->solvable = pool_id2solvable(pool, repo_add_solvable(pd->repo));
 228           pd->handle = s - pool->solvables;
 229         }
 230       break;
 231
 232       /* <summary lang="xy">... */
 233     case STATE_SUMMARY:
 234       pd->tmplang = find_attr("lang", atts, 1);
 235       break;
 236     case STATE_DESCRIPTION:
 237       pd->tmplang = find_attr("lang", atts, 1);
 238       break;
 239     case STATE_URL:
 240       pd->tmpurltype = find_attr("name", atts, 1);
 241       break;
 242     default:
 243       break;
 244     }
 245 }
 246
 247
 248 static void XMLCALL
 249 endElement(void *userData, const char *name)
 250 {
 251   struct parsedata *pd = userData;
 252   Solvable *s = pd->solvable;
 253
 254 #if 0
 255       fprintf(stderr, "end: [%d]%s\n", pd->state, name);
 256 #endif
 257   if (pd->depth != pd->statedepth)
 258     {
 259       pd->depth--;
 260 #if 0
 261       fprintf(stderr, "back from unknown %d %d %d\n", pd->state, pd->depth, pd->statedepth);
 262 #endif
 263       return;
 264     }
 265
 266   pd->depth--;
 267   pd->statedepth--;
 268
 269   switch (pd->state)
 270     {
 271     case STATE_PRODUCT:
 272       /* product done, finish solvable */
 273       if (pd->ctime)
 274         repodata_set_num(pd->data, pd->handle, SOLVABLE_INSTALLTIME, pd->ctime);
 275
 276       if (pd->basename)
 277         repodata_set_str(pd->data, pd->handle, PRODUCT_REFERENCEFILE, pd->basename);
 278
 279       /* this is where <productsdir>/baseproduct points to */
 280       if (pd->currentproduct == pd->baseproduct)
 281         repodata_set_str(pd->data, pd->handle, PRODUCT_TYPE, "base");
 282
 283       if (pd->tmprel)
 284         {
 285           if (pd->tmpvers)
 286             s->evr = makeevr(pd->pool, join2(pd->tmpvers, "-", pd->tmprel));
 287           else
 288             {
 289               fprintf(stderr, "Seen <release> but no <version>\n");
 290             }
 291         }
 292       else if (pd->tmpvers)
 293         s->evr = makeevr(pd->pool, pd->tmpvers); /* just version, no release */
 294       pd->tmpvers = sat_free((void *)pd->tmpvers);
 295       pd->tmprel = sat_free((void *)pd->tmprel);
 296       if (!s->arch)
 297         s->arch = ARCH_NOARCH;
 298       if (!s->evr)
 299         s->evr = ID_EMPTY;
 300       if (s->name && s->arch != ARCH_SRC && s->arch != ARCH_NOSRC)
 301         s->provides = repo_addid_dep(pd->repo, s->provides, rel2id(pd->pool, s->name, s->evr, REL_EQ, 1), 0);
 302       pd->solvable = 0;
 303       break;
 304     case STATE_VENDOR:
 305       s->vendor = str2id(pd->pool, pd->content, 1);
 306       break;
 307     case STATE_NAME:
 308       s->name = str2id(pd->pool, join2("product", ":", pd->content), 1);
 309       break;
 310     case STATE_VERSION:
 311       pd->tmpvers = strdup(pd->content);
 312       break;
 313     case STATE_RELEASE:
 314       pd->tmprel = strdup(pd->content);
 315       break;
 316     case STATE_ARCH:
 317       s->arch = str2id(pd->pool, pd->content, 1);
 318       break;
 319     case STATE_PRODUCTLINE:
 320       repodata_set_str(pd->data, pd->handle, PRODUCT_PRODUCTLINE, pd->content);
 321     break;
 322     case STATE_UPDATEREPOKEY:
 323       /** obsolete **/
 324       break;
 325     case STATE_SUMMARY:
 326       repodata_set_str(pd->data, pd->handle, langtag(pd, SOLVABLE_SUMMARY, pd->tmplang), pd->content);
 327       pd->tmplang = sat_free((void *)pd->tmplang);
 328       break;
 329     case STATE_SHORTSUMMARY:
 330       repodata_set_str(pd->data, pd->handle, PRODUCT_SHORTLABEL, pd->content);
 331       break;
 332     case STATE_DESCRIPTION:
 333       repodata_set_str(pd->data, pd->handle, langtag(pd, SOLVABLE_DESCRIPTION, pd->tmplang), pd->content );
 334       pd->tmplang = sat_free((void *)pd->tmplang);
 335       break;
 336     case STATE_URL:
 337       if (pd->tmpurltype)
 338         {
 339           repodata_add_poolstr_array(pd->data, pd->handle, PRODUCT_URL, pd->content);
 340           repodata_add_idarray(pd->data, pd->handle, PRODUCT_URL_TYPE, str2id(pd->pool, pd->tmpurltype, 1));
 341         }
 342       pd->tmpurltype = sat_free((void *)pd->tmpurltype);
 343       break;
 344     case STATE_TARGET:
 345       repodata_set_str(pd->data, pd->handle, PRODUCT_REGISTER_TARGET, pd->content);
 346       break;
 347     case STATE_REGRELEASE:
 348       repodata_set_str(pd->data, pd->handle, PRODUCT_REGISTER_RELEASE, pd->content);
 349       break;
 350     case STATE_CPEID:
 351       if (pd->content)
 352         repodata_set_str(pd->data, pd->handle, SOLVABLE_CPEID, pd->content);
 353     default:
 354       break;
 355     }
 356
 357   pd->state = pd->sbtab[pd->state];
 358   pd->docontent = 0;
 359
 360 #if 0
 361       fprintf(stderr, "end: [%s] -> %d\n", name, pd->state);
 362 #endif
 363 }
 364
 365
 366 static void XMLCALL
 367 characterData(void *userData, const XML_Char *s, int len)
 368 {
 369   struct parsedata *pd = userData;
 370   int l;
 371   char *c;
 372   if (!pd->docontent)
 373     return;
 374   l = pd->lcontent + len + 1;
 375   if (l > pd->acontent)
 376     {
 377       pd->content = sat_realloc(pd->content, l + 256);
 378       pd->acontent = l + 256;
 379     }
 380   c = pd->content + pd->lcontent;
 381   pd->lcontent += len;
 382   while (len-- > 0)
 383     *c++ = *s++;
 384   *c = 0;
 385 }
 386
 387 #define BUFF_SIZE 8192
 388
 389
 390 /*
 391  * add single product to repo
 392  *
 393  */
 394
 395 static void
 396 add_code11_product(struct parsedata *pd, FILE *fp)
 397 {
 398   char buf[BUFF_SIZE];
 399   int l;
 400   struct stat st;
 401
 402   if (!fstat(fileno(fp), &st))
 403     {
 404       pd->currentproduct = st.st_ino;
 405       pd->ctime = (unsigned int)st.st_ctime;
 406     }
 407   else
 408     {
 409       pd->currentproduct = pd->baseproduct + 1; /* make it != baseproduct if stat fails */
 410       perror("fstat");
 411       pd->ctime = 0;
 412     }
 413
 414   XML_Parser parser = XML_ParserCreate(NULL);
 415   XML_SetUserData(parser, pd);
 416   XML_SetElementHandler(parser, startElement, endElement);
 417   XML_SetCharacterDataHandler(parser, characterData);
 418
 419   for (;;)
 420     {
 421       l = fread(buf, 1, sizeof(buf), fp);
 422       if (XML_Parse(parser, buf, l, l == 0) == XML_STATUS_ERROR)
 423         {
 424           pool_debug(pd->pool, SAT_ERROR, "%s: %s at line %u:%u\n", pd->filename, XML_ErrorString(XML_GetErrorCode(parser)), (unsigned int)XML_GetCurrentLineNumber(parser), (unsigned int)XML_GetCurrentColumnNumber(parser));
 425           pool_debug(pd->pool, SAT_ERROR, "skipping this product\n");
 426           XML_ParserFree(parser);
 427           return;
 428         }
 429       if (l == 0)
 430         break;
 431     }
 432   XML_ParserFree(parser);
 433 }
 434
 435
 436 void
 437 repo_add_code11_products(Repo *repo, const char *dirpath, int flags)
 438 {
 439   Repodata *data;
 440   struct parsedata pd;
 441   struct stateswitch *sw;
 442   DIR *dir;
 443   int i;
 444
 445   data = repo_add_repodata(repo, flags);
 446
 447   memset(&pd, 0, sizeof(pd));
 448   pd.repo = repo;
 449   pd.pool = repo->pool;
 450   pd.data = data;
 451
 452   pd.content = sat_malloc(256);
 453   pd.acontent = 256;
 454
 455   for (i = 0, sw = stateswitches; sw->from != NUMSTATES; i++, sw++)
 456     {
 457       if (!pd.swtab[sw->from])
 458         pd.swtab[sw->from] = sw;
 459       pd.sbtab[sw->to] = sw->from;
 460     }
 461
 462   dir = opendir(dirpath);
 463   if (dir)
 464     {
 465       struct dirent *entry;
 466       struct stat st;
 467       char *fullpath;
 468
 469       /* check for <productsdir>/baseproduct on code11 and remember its target inode */
 470       if (stat(join2(dirpath, "/", "baseproduct"), &st) == 0) /* follow symlink */
 471         pd.baseproduct = st.st_ino;
 472       else
 473         pd.baseproduct = 0;
 474
 475       while ((entry = readdir(dir)))
 476         {
 477           int len = strlen(entry->d_name);
 478           if (len <= 5 || strcmp(entry->d_name + len - 5, ".prod") != 0)
 479             continue;
 480           fullpath = join2(dirpath, "/", entry->d_name);
 481           FILE *fp = fopen(fullpath, "r");
 482           if (!fp)
 483             {
 484               perror(fullpath);
 485               continue;
 486             }
 487           pd.filename = fullpath;
 488           pd.basename = entry->d_name;
 489           add_code11_product(&pd, fp);
 490           fclose(fp);
 491         }
 492       closedir(dir);
 493     }
 494   sat_free((void *)pd.tmplang);
 495   sat_free(pd.content);
 496   join_freemem();
 497
 498   if (!(flags & REPO_NO_INTERNALIZE))
 499     repodata_internalize(data);
 500 }
 501
 502
 503 /******************************************************************************************/
 504
 505
 506 /*
 507  * read all installed products
 508  *
 509  * try proddir (reading all .xml files from this directory) first
 510  * if not available, assume non-code11 layout and parse /etc/xyz-release
 511  *
 512  * parse each one as a product
 513  */
 514
 515 /* Oh joy! Three parsers for the price of one! */
 516
 517 void
 518 repo_add_products(Repo *repo, const char *proddir, const char *root, int flags)
 519 {
 520   const char *fullpath;
 521   DIR *dir;
 522
 523   dir = opendir(proddir);
 524   if (dir)
 525     {
 526       /* assume code11 stype products */
 527       closedir(dir);
 528       repo_add_code11_products(repo, proddir, flags);
 529       return;
 530     }
 531
 532   /* code11 didn't work, try old zyppdb */
 533   fullpath = root ? join2(root, "", "/var/lib/zypp/db/products") : "/var/lib/zypp/db/products";
 534   dir = opendir(fullpath);
 535   if (dir)
 536     {
 537       closedir(dir);
 538       /* assume code10 style products */
 539       repo_add_zyppdb_products(repo, fullpath, flags);
 540       join_freemem();
 541       return;
 542     }
 543
 544   /* code11 didn't work, try -release files parsing */
 545   fullpath = root ? join2(root, "", "/etc") : "/etc";
 546   dir = opendir(fullpath);
 547   if (dir)
 548     {
 549       closedir(dir);
 550       repo_add_releasefile_products(repo, fullpath, flags);
 551       join_freemem();
 552       return;
 553     }
 554
 555   /* no luck. print an error message in case the root argument is wrong */
 556   perror(fullpath);
 557   join_freemem();
 558
 559   /* the least we can do... */
 560   if (!(flags & REPO_NO_INTERNALIZE) && (flags & REPO_REUSE_REPODATA) != 0)
 561     repodata_internalize(repo_last_repodata(repo));
 562 }
 563
 564 /* EOF */