Imported Upstream version 0.7.12
[platform/upstream/libsolv.git] / ext / repo_autopattern.c
index 0272f02..bbc90cb 100644 (file)
@@ -5,6 +5,9 @@
  * for further information
  */
 
+#define _GNU_SOURCE
+#define _XOPEN_SOURCE
+#include <time.h>
 #include <sys/types.h>
 #include <sys/stat.h>
 #include <stdio.h>
@@ -55,6 +58,57 @@ unescape(char *p)
   *q = 0;
 }
 
+static time_t
+datestr2timestamp(const char *date)
+{
+  const char *p; 
+  struct tm tm; 
+
+  if (!date || !*date)
+    return 0;
+  for (p = date; *p >= '0' && *p <= '9'; p++)
+    ;   
+  if (!*p)
+    return atoi(date);
+  memset(&tm, 0, sizeof(tm));
+  p = strptime(date, "%F%T", &tm);
+  if (!p)
+    {   
+      memset(&tm, 0, sizeof(tm));
+      p = strptime(date, "%F", &tm);
+      if (!p || *p) 
+        return 0;
+    }   
+  return timegm(&tm);
+}
+
+/* we just look at the repodata keys and do not iterate
+ * over the solvables, because iterating would mean a
+ * load of stub repodata areas */
+static void
+find_langkeys(Repo *repo, Id keyname, Queue *q)
+{
+  Pool *pool = repo->pool;
+  int rid;
+  int i;
+  const char *keyname_str;
+  size_t keyname_len;
+
+  keyname_str = pool_id2str(pool, keyname);
+  keyname_len = strlen(keyname_str);
+  queue_empty(q);
+  for (rid = 1; rid < repo->nrepodata; rid++)
+    {
+      Repodata *data = repo_id2repodata(repo, rid);
+      for (i = 1; i < data->nkeys; i++)
+       {
+         const char *s = pool_id2str(pool, data->keys[i].name);
+         if (!strncmp(s, keyname_str, keyname_len) && s[keyname_len] == ':')
+           queue_pushunique(q, data->keys[i].name);
+       }
+    }
+}
+
 int
 repo_add_autopattern(Repo *repo, int flags)
 {
@@ -67,14 +121,20 @@ repo_add_autopattern(Repo *repo, int flags)
   Id pattern_id, product_id;
   Id autopattern_id = 0, autoproduct_id = 0;
   int i, j;
+  Queue categorykeys;
 
   queue_init(&patq);
   queue_init(&patq2);
   queue_init(&prdq);
   queue_init(&prdq2);
 
-  pattern_id = pool_str2id(pool, "pattern()", 9);
-  product_id = pool_str2id(pool, "product()", 9);
+  if (repo == pool->installed)
+    flags |= ADD_NO_AUTOPRODUCTS;      /* no auto products for installed repos */
+
+  pattern_id = pool_str2id(pool, "pattern()", 1);
+  product_id = pool_str2id(pool, "product()", 1);
+
+  queue_init(&categorykeys);
   FOR_REPO_SOLVABLES(repo, p, s)
     {
       const char *n = pool_id2str(pool, s->name);
@@ -102,17 +162,38 @@ repo_add_autopattern(Repo *repo, int flags)
                  continue;
                if (rd->name == pattern_id)
                  {
+                   const char *evrstr = pool_id2str(pool, rd->evr);
+                   if (evrstr[0] == '.')       /* hack to allow provides that do not create a pattern */
+                     continue;
+                   if (patq2.count && patq2.elements[patq2.count - 2] == p)
+                     {
+                       /* hmm, two provides. choose by evrstr */
+                       if (strcmp(evrstr, pool_id2str(pool, patq2.elements[patq2.count - 1])) >= 0)
+                         continue;
+                       patq2.count -= 2;
+                     }
                    queue_push2(&patq2, p, rd->evr);
-                   break;
                  }
                if (rd->name == product_id)
                  {
+                   const char *evrstr = pool_id2str(pool, rd->evr);
+                   if (prdq2.count && prdq2.elements[prdq2.count - 2] == p)
+                     {
+                       /* hmm, two provides. choose by evrstr */
+                       if (strcmp(evrstr, pool_id2str(pool, prdq2.elements[prdq2.count - 1])) >= 0)
+                         continue;
+                       prdq2.count -= 2;
+                     }
                    queue_push2(&prdq2, p, rd->evr);
-                   break;
                  }
              }
        }
     }
+  if (patq2.count)
+    {
+      find_langkeys(repo, SOLVABLE_CATEGORY, &categorykeys);
+      queue_unshift(&categorykeys, SOLVABLE_CATEGORY);
+    }
   for (i = 0; i < patq2.count; i += 2)
     {
       const char *pn = 0;
@@ -219,15 +300,28 @@ repo_add_autopattern(Repo *repo, int flags)
            repodata_set_str(data, s2 - pool->solvables, SOLVABLE_ICON, newname);
          else if (!strcmp(pn, "pattern-order()") && evr)
            repodata_set_str(data, s2 - pool->solvables, SOLVABLE_ORDER, newname);
-         else if (!strcmp(pn, "pattern-visible()") && !evr)
-           repodata_set_void(data, s2 - pool->solvables, SOLVABLE_ISVISIBLE);
+         else if (!strcmp(pn, "pattern-visible()"))
+           {
+             if (!evr)
+               repodata_set_void(data, s2 - pool->solvables, SOLVABLE_ISVISIBLE);
+             else
+               repodata_set_str(data, s2 - pool->solvables, SOLVABLE_ISVISIBLE, newname);
+           }
+       }
+      /* also try to copy the pattern category from the solvable */
+      for (j = 0; j < categorykeys.count; j++)
+       {
+         Id catkey = categorykeys.elements[j];
+         if ((str = solvable_lookup_str(s, catkey)) != 0)
+           repodata_set_str(data, s2 - pool->solvables, catkey, str);
        }
     }
   queue_free(&patq);
   queue_free(&patq2);
+  queue_free(&categorykeys);
 
-  if (repo == pool->installed)
-    queue_empty(&prdq2);       /* no auto products for installed repos */
+  if ((flags & ADD_NO_AUTOPRODUCTS) != 0)
+    queue_empty(&prdq2);
 
   for (i = 0; i < prdq2.count; i += 2)
     {
@@ -329,12 +423,27 @@ repo_add_autopattern(Repo *repo, int flags)
            }
          if (!strcmp(pn, "product-label()") && evr)
            repodata_set_str(data, s2 - pool->solvables, PRODUCT_SHORTLABEL, newname);
+         else if (!strcmp(pn, "product-register-target()") && evr)
+           repodata_set_str(data, s2 - pool->solvables, PRODUCT_REGISTER_TARGET, newname);
+         else if (!strcmp(pn, "product-register-flavor()") && evr)
+           repodata_set_str(data, s2 - pool->solvables, PRODUCT_REGISTER_FLAVOR, newname);
          else if (!strcmp(pn, "product-type()") && evr)
            repodata_set_str(data, s2 - pool->solvables, PRODUCT_TYPE, newname);
          else if (!strcmp(pn, "product-cpeid()") && evr)
            repodata_set_str(data, s2 - pool->solvables, SOLVABLE_CPEID, newname);
          else if (!strcmp(pn, "product-flags()") && evr)
            repodata_add_poolstr_array(data, s2 - pool->solvables, PRODUCT_FLAGS, newname);
+         else if (!strcmp(pn, "product-updates-repoid()") && evr)
+           {
+             Id h = repodata_new_handle(data);
+             repodata_set_str(data, h, PRODUCT_UPDATES_REPOID, newname);
+             repodata_add_flexarray(data, s2 - pool->solvables, PRODUCT_UPDATES, h);
+           }
+         else if (!strcmp(pn, "product-endoflife()"))
+           {
+             /* FATE#320699: Support tri-state product-endoflife (tag absent, present but nodate(0), present + date) */
+             repodata_set_num(data, s2 - pool->solvables, PRODUCT_ENDOFLIFE,(evr ? datestr2timestamp(newname) : 0) );
+           }
          else if (!strncmp(pn, "product-url(", 12) && evr && pn[12] && pn[13] && strlen(pn + 12) < 32)
            {
              char type[34];