gst/gstregistrychunks.c

   1 /* GStreamer
   2  * Copyright (C) 2006 Josep Torra <josep@fluendo.com>
   3  *               2006 Mathieu Garcia <matthieu@fluendo.com>
   4  *               2006,2007 Stefan Kost <ensonic@users.sf.net>
   5  *               2008 Sebastian Dröge <slomo@circular-chaos.org>
   6  *               2008 Jan Schmidt <jan.schmidt@sun.com>
   7  *
   8  * gstregistrychunks.c: GstRegistryChunk helper for serialising/deserialising
   9  * plugin entries and features.
  10  *
  11  * This library is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU Library General Public
  13  * License as published by the Free Software Foundation; either
  14  * version 2 of the License, or (at your option) any later version.
  15  *
  16  * This library is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  19  * Library General Public License for more details.
  20  *
  21  * You should have received a copy of the GNU Library General Public
  22  * License along with this library; if not, write to the
  23  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  24  * Boston, MA 02111-1307, USA.
  25  */
  26
  27 #ifdef HAVE_CONFIG_H
  28 #  include "config.h"
  29 #endif
  30
  31 #include <gst/gst_private.h>
  32 #include <gst/gstconfig.h>
  33 #include <gst/gstelement.h>
  34 #include <gst/gsttypefind.h>
  35 #include <gst/gsttypefindfactory.h>
  36 #include <gst/gsturi.h>
  37 #include <gst/gstinfo.h>
  38 #include <gst/gstenumtypes.h>
  39 #include <gst/gstpadtemplate.h>
  40
  41 #include <gst/gstregistrychunks.h>
  42
  43 #define GST_CAT_DEFAULT GST_CAT_REGISTRY
  44
  45 /* count string length, but return -1 if we hit the eof */
  46 static gint
  47 _strnlen (const gchar * str, gint maxlen)
  48 {
  49   gint len = 0;
  50
  51   while (G_LIKELY (len < maxlen)) {
  52     if (G_UNLIKELY (str[len] == '\0'))
  53       return len;
  54     len++;
  55   }
  56   return -1;
  57 }
  58
  59 /* Macros */
  60 #define unpack_element(inptr, outptr, element, endptr, error_label) G_STMT_START{ \
  61   if (inptr + sizeof(element) > endptr) { \
  62     GST_ERROR ("Failed reading element " G_STRINGIFY (element)  \
  63         ". Have %d bytes need %" G_GSSIZE_FORMAT, \
  64         (int) (endptr - inptr), sizeof(element)); \
  65     goto error_label; \
  66   } \
  67   outptr = (element *) inptr; \
  68   inptr += sizeof (element); \
  69 }G_STMT_END
  70
  71 #define unpack_const_string(inptr, outptr, endptr, error_label) G_STMT_START{\
  72   gint _len = _strnlen (inptr, (endptr-inptr)); \
  73   if (_len == -1) \
  74     goto error_label; \
  75   outptr = g_intern_string ((const gchar *)inptr); \
  76   inptr += _len + 1; \
  77 }G_STMT_END
  78
  79 #define unpack_string(inptr, outptr, endptr, error_label)  G_STMT_START{\
  80   gint _len = _strnlen (inptr, (endptr-inptr)); \
  81   if (_len == -1) \
  82     goto error_label; \
  83   outptr = g_memdup ((gconstpointer)inptr, _len + 1); \
  84   inptr += _len + 1; \
  85 }G_STMT_END
  86
  87 #define unpack_string_nocopy(inptr, outptr, endptr, error_label)  G_STMT_START{\
  88   gint _len = _strnlen (inptr, (endptr-inptr)); \
  89   if (_len == -1) \
  90     goto error_label; \
  91   outptr = (const gchar *)inptr; \
  92   inptr += _len + 1; \
  93 }G_STMT_END
  94
  95 #define ALIGNMENT            (sizeof (void *))
  96 #define alignment(_address)  (gsize)_address%ALIGNMENT
  97 #define align(_ptr)          _ptr += (( alignment(_ptr) == 0) ? 0 : ALIGNMENT-alignment(_ptr))
  98
  99 void
 100 _priv_gst_registry_chunk_free (GstRegistryChunk * chunk)
 101 {
 102   if (!(chunk->flags & GST_REGISTRY_CHUNK_FLAG_CONST)) {
 103     if ((chunk->flags & GST_REGISTRY_CHUNK_FLAG_MALLOC))
 104       g_free (chunk->data);
 105     else
 106       g_slice_free1 (chunk->size, chunk->data);
 107   }
 108   g_slice_free (GstRegistryChunk, chunk);
 109 }
 110
 111 /*
 112  * gst_registry_chunks_save_const_string:
 113  *
 114  * Store a const string in a binary chunk.
 115  *
 116  * Returns: %TRUE for success
 117  */
 118 inline static gboolean
 119 gst_registry_chunks_save_const_string (GList ** list, const gchar * str)
 120 {
 121   GstRegistryChunk *chunk;
 122
 123   if (G_UNLIKELY (str == NULL)) {
 124     GST_ERROR ("unexpected NULL string in plugin or plugin feature data");
 125     str = "";
 126   }
 127
 128   chunk = g_slice_new (GstRegistryChunk);
 129   chunk->data = (gpointer) str;
 130   chunk->size = strlen ((gchar *) chunk->data) + 1;
 131   chunk->flags = GST_REGISTRY_CHUNK_FLAG_CONST;
 132   chunk->align = FALSE;
 133   *list = g_list_prepend (*list, chunk);
 134   return TRUE;
 135 }
 136
 137 /*
 138  * gst_registry_chunks_save_string:
 139  *
 140  * Store a string in a binary chunk.
 141  *
 142  * Returns: %TRUE for success
 143  */
 144 inline static gboolean
 145 gst_registry_chunks_save_string (GList ** list, gchar * str)
 146 {
 147   GstRegistryChunk *chunk;
 148
 149   chunk = g_slice_new (GstRegistryChunk);
 150   chunk->data = str;
 151   chunk->size = strlen ((gchar *) chunk->data) + 1;
 152   chunk->flags = GST_REGISTRY_CHUNK_FLAG_MALLOC;
 153   chunk->align = FALSE;
 154   *list = g_list_prepend (*list, chunk);
 155   return TRUE;
 156 }
 157
 158 /*
 159  * gst_registry_chunks_save_data:
 160  *
 161  * Store some data in a binary chunk.
 162  *
 163  * Returns: the initialized chunk
 164  */
 165 inline static GstRegistryChunk *
 166 gst_registry_chunks_make_data (gpointer data, gulong size)
 167 {
 168   GstRegistryChunk *chunk;
 169
 170   chunk = g_slice_new (GstRegistryChunk);
 171   chunk->data = data;
 172   chunk->size = size;
 173   chunk->flags = GST_REGISTRY_CHUNK_FLAG_NONE;
 174   chunk->align = TRUE;
 175   return chunk;
 176 }
 177
 178
 179 /*
 180  * gst_registry_chunks_save_pad_template:
 181  *
 182  * Store pad_templates in binary chunks.
 183  *
 184  * Returns: %TRUE for success
 185  */
 186 static gboolean
 187 gst_registry_chunks_save_pad_template (GList ** list,
 188     GstStaticPadTemplate * template)
 189 {
 190   GstRegistryChunkPadTemplate *pt;
 191   GstRegistryChunk *chk;
 192
 193   pt = g_slice_new (GstRegistryChunkPadTemplate);
 194   chk =
 195       gst_registry_chunks_make_data (pt, sizeof (GstRegistryChunkPadTemplate));
 196
 197   pt->presence = template->presence;
 198   pt->direction = template->direction;
 199
 200   /* pack pad template strings */
 201   gst_registry_chunks_save_const_string (list,
 202       (gchar *) (template->static_caps.string));
 203   gst_registry_chunks_save_const_string (list, template->name_template);
 204
 205   *list = g_list_prepend (*list, chk);
 206
 207   return TRUE;
 208 }
 209
 210 /*
 211  * gst_registry_chunks_save_feature:
 212  *
 213  * Store features in binary chunks.
 214  *
 215  * Returns: %TRUE for success
 216  */
 217 static gboolean
 218 gst_registry_chunks_save_feature (GList ** list, GstPluginFeature * feature)
 219 {
 220   const gchar *type_name = g_type_name (G_OBJECT_TYPE (feature));
 221   GstRegistryChunkPluginFeature *pf = NULL;
 222   GstRegistryChunk *chk = NULL;
 223   GList *walk;
 224
 225   if (!type_name) {
 226     GST_ERROR ("NULL feature type_name, aborting.");
 227     return FALSE;
 228   }
 229
 230   if (GST_IS_ELEMENT_FACTORY (feature)) {
 231     GstRegistryChunkElementFactory *ef;
 232     GstElementFactory *factory = GST_ELEMENT_FACTORY (feature);
 233
 234     /* Initialize with zeroes because of struct padding and
 235      * valgrind complaining about copying unitialized memory
 236      */
 237     ef = g_slice_new0 (GstRegistryChunkElementFactory);
 238     chk =
 239         gst_registry_chunks_make_data (ef,
 240         sizeof (GstRegistryChunkElementFactory));
 241     ef->npadtemplates = ef->ninterfaces = ef->nuriprotocols = 0;
 242     pf = (GstRegistryChunkPluginFeature *) ef;
 243
 244     /* save interfaces */
 245     for (walk = factory->interfaces; walk;
 246         walk = g_list_next (walk), ef->ninterfaces++) {
 247       gst_registry_chunks_save_const_string (list, (gchar *) walk->data);
 248     }
 249     GST_DEBUG ("Feature %s: saved %d interfaces %d pad templates",
 250         GST_OBJECT_NAME (feature), ef->ninterfaces, ef->npadtemplates);
 251
 252     /* save uritypes */
 253     if (GST_URI_TYPE_IS_VALID (factory->uri_type)) {
 254       if (factory->uri_protocols && *factory->uri_protocols) {
 255         GstRegistryChunk *subchk;
 256         gchar **protocol;
 257
 258         subchk =
 259             gst_registry_chunks_make_data (&factory->uri_type,
 260             sizeof (factory->uri_type));
 261         subchk->flags = GST_REGISTRY_CHUNK_FLAG_CONST;
 262
 263         protocol = factory->uri_protocols;
 264         while (*protocol) {
 265           gst_registry_chunks_save_const_string (list, *protocol++);
 266           ef->nuriprotocols++;
 267         }
 268         *list = g_list_prepend (*list, subchk);
 269         GST_DEBUG ("Saved %d UriTypes", ef->nuriprotocols);
 270       } else {
 271         g_warning ("GStreamer feature '%s' is URI handler but does not provide"
 272             " any protocols it can handle", GST_OBJECT_NAME (feature));
 273       }
 274     }
 275
 276     /* save pad-templates */
 277     for (walk = factory->staticpadtemplates; walk;
 278         walk = g_list_next (walk), ef->npadtemplates++) {
 279       GstStaticPadTemplate *template = walk->data;
 280
 281       if (!gst_registry_chunks_save_pad_template (list, template)) {
 282         GST_ERROR ("Can't fill pad template, aborting.");
 283         goto fail;
 284       }
 285     }
 286
 287     /* pack element metadata strings */
 288     gst_registry_chunks_save_string (list,
 289         gst_structure_to_string (factory->metadata));
 290   } else if (GST_IS_TYPE_FIND_FACTORY (feature)) {
 291     GstRegistryChunkTypeFindFactory *tff;
 292     GstTypeFindFactory *factory = GST_TYPE_FIND_FACTORY (feature);
 293     gchar *str;
 294
 295     /* Initialize with zeroes because of struct padding and
 296      * valgrind complaining about copying unitialized memory
 297      */
 298     tff = g_slice_new0 (GstRegistryChunkTypeFindFactory);
 299     chk =
 300         gst_registry_chunks_make_data (tff,
 301         sizeof (GstRegistryChunkTypeFindFactory));
 302     tff->nextensions = 0;
 303     pf = (GstRegistryChunkPluginFeature *) tff;
 304
 305     /* save extensions */
 306     if (factory->extensions) {
 307       while (factory->extensions[tff->nextensions]) {
 308         gst_registry_chunks_save_const_string (list,
 309             factory->extensions[tff->nextensions++]);
 310       }
 311     }
 312     /* save caps */
 313     if (factory->caps) {
 314       /* we copy the caps here so we can simplify them before saving. This
 315        * is a lot faster when loading them later on */
 316       GstCaps *copy = gst_caps_copy (factory->caps);
 317
 318       gst_caps_do_simplify (copy);
 319       str = gst_caps_to_string (copy);
 320       gst_caps_unref (copy);
 321       gst_registry_chunks_save_string (list, str);
 322     } else {
 323       gst_registry_chunks_save_const_string (list, "");
 324     }
 325   } else if (GST_IS_INDEX_FACTORY (feature)) {
 326     GstIndexFactory *factory = GST_INDEX_FACTORY (feature);
 327
 328     pf = g_slice_new (GstRegistryChunkPluginFeature);
 329     chk =
 330         gst_registry_chunks_make_data (pf,
 331         sizeof (GstRegistryChunkPluginFeature));
 332
 333     /* pack element factory strings */
 334     gst_registry_chunks_save_const_string (list, factory->longdesc);
 335   } else {
 336     GST_WARNING ("unhandled feature type '%s'", type_name);
 337   }
 338
 339   if (pf) {
 340     pf->rank = feature->rank;
 341     *list = g_list_prepend (*list, chk);
 342
 343     /* pack plugin feature strings */
 344     gst_registry_chunks_save_const_string (list, GST_OBJECT_NAME (feature));
 345     gst_registry_chunks_save_const_string (list, (gchar *) type_name);
 346
 347     return TRUE;
 348   }
 349
 350   /* Errors */
 351 fail:
 352   g_free (chk);
 353   g_free (pf);
 354   return FALSE;
 355 }
 356
 357 static gboolean
 358 gst_registry_chunks_save_plugin_dep (GList ** list, GstPluginDep * dep)
 359 {
 360   GstRegistryChunkDep *ed;
 361   GstRegistryChunk *chk;
 362   gchar **s;
 363
 364   ed = g_slice_new (GstRegistryChunkDep);
 365   chk = gst_registry_chunks_make_data (ed, sizeof (GstRegistryChunkDep));
 366
 367   ed->flags = dep->flags;
 368   ed->n_env_vars = 0;
 369   ed->n_paths = 0;
 370   ed->n_names = 0;
 371
 372   ed->env_hash = dep->env_hash;
 373   ed->stat_hash = dep->stat_hash;
 374
 375   for (s = dep->env_vars; s != NULL && *s != NULL; ++s, ++ed->n_env_vars)
 376     gst_registry_chunks_save_string (list, g_strdup (*s));
 377
 378   for (s = dep->paths; s != NULL && *s != NULL; ++s, ++ed->n_paths)
 379     gst_registry_chunks_save_string (list, g_strdup (*s));
 380
 381   for (s = dep->names; s != NULL && *s != NULL; ++s, ++ed->n_names)
 382     gst_registry_chunks_save_string (list, g_strdup (*s));
 383
 384   *list = g_list_prepend (*list, chk);
 385
 386   GST_LOG ("Saved external plugin dependency");
 387   return TRUE;
 388 }
 389
 390 /*
 391  * _priv_gst_registry_chunks_save_plugin:
 392  *
 393  * Adapt a GstPlugin to our GstRegistryChunkPluginElement structure, and
 394  * prepend it as a GstRegistryChunk in the provided list.
 395  *
 396  */
 397 gboolean
 398 _priv_gst_registry_chunks_save_plugin (GList ** list, GstRegistry * registry,
 399     GstPlugin * plugin)
 400 {
 401   GstRegistryChunkPluginElement *pe;
 402   GstRegistryChunk *chk;
 403   GList *plugin_features = NULL;
 404   GList *walk;
 405
 406   pe = g_slice_new (GstRegistryChunkPluginElement);
 407   chk =
 408       gst_registry_chunks_make_data (pe,
 409       sizeof (GstRegistryChunkPluginElement));
 410
 411   pe->file_size = plugin->file_size;
 412   pe->file_mtime = plugin->file_mtime;
 413   pe->nfeatures = 0;
 414   pe->n_deps = 0;
 415
 416   /* pack external deps */
 417   for (walk = plugin->priv->deps; walk != NULL; walk = walk->next) {
 418     if (!gst_registry_chunks_save_plugin_dep (list, walk->data)) {
 419       GST_ERROR ("Could not save external plugin dependency, aborting.");
 420       goto fail;
 421     }
 422     ++pe->n_deps;
 423   }
 424
 425   /* pack plugin features */
 426   plugin_features =
 427       gst_registry_get_feature_list_by_plugin (registry, plugin->desc.name);
 428   for (walk = plugin_features; walk; walk = g_list_next (walk), pe->nfeatures++) {
 429     GstPluginFeature *feature = GST_PLUGIN_FEATURE (walk->data);
 430
 431     if (!gst_registry_chunks_save_feature (list, feature)) {
 432       GST_ERROR ("Can't fill plugin feature, aborting.");
 433       goto fail;
 434     }
 435   }
 436
 437   gst_plugin_feature_list_free (plugin_features);
 438
 439   /* pack cache data */
 440   if (plugin->priv->cache_data) {
 441     gchar *cache_str = gst_structure_to_string (plugin->priv->cache_data);
 442     gst_registry_chunks_save_string (list, cache_str);
 443   } else {
 444     gst_registry_chunks_save_const_string (list, "");
 445   }
 446
 447   /* pack plugin element strings */
 448   gst_registry_chunks_save_const_string (list,
 449       (plugin->desc.release_datetime) ? plugin->desc.release_datetime : "");
 450   gst_registry_chunks_save_const_string (list, plugin->desc.origin);
 451   gst_registry_chunks_save_const_string (list, plugin->desc.package);
 452   gst_registry_chunks_save_const_string (list, plugin->desc.source);
 453   gst_registry_chunks_save_const_string (list, plugin->desc.license);
 454   gst_registry_chunks_save_const_string (list, plugin->desc.version);
 455   gst_registry_chunks_save_const_string (list, plugin->filename);
 456   gst_registry_chunks_save_const_string (list, plugin->desc.description);
 457   gst_registry_chunks_save_const_string (list, plugin->desc.name);
 458
 459   *list = g_list_prepend (*list, chk);
 460
 461   GST_DEBUG ("Found %d features in plugin \"%s\"", pe->nfeatures,
 462       plugin->desc.name);
 463   return TRUE;
 464
 465   /* Errors */
 466 fail:
 467   gst_plugin_feature_list_free (plugin_features);
 468   g_free (chk);
 469   g_free (pe);
 470   return FALSE;
 471 }
 472
 473 /*
 474  * gst_registry_chunks_load_pad_template:
 475  *
 476  * Make a new GstStaticPadTemplate from current GstRegistryChunkPadTemplate
 477  * structure.
 478  *
 479  * Returns: new GstStaticPadTemplate
 480  */
 481 static gboolean
 482 gst_registry_chunks_load_pad_template (GstElementFactory * factory, gchar ** in,
 483     gchar * end)
 484 {
 485   GstRegistryChunkPadTemplate *pt;
 486   GstStaticPadTemplate *template = NULL;
 487
 488   align (*in);
 489   GST_DEBUG ("Reading/casting for GstRegistryChunkPadTemplate at address %p",
 490       *in);
 491   unpack_element (*in, pt, GstRegistryChunkPadTemplate, end, fail);
 492
 493   template = g_slice_new (GstStaticPadTemplate);
 494   template->presence = pt->presence;
 495   template->direction = pt->direction;
 496   template->static_caps.caps.mini_object.refcount = 0;
 497
 498   /* unpack pad template strings */
 499   unpack_const_string (*in, template->name_template, end, fail);
 500   unpack_const_string (*in, template->static_caps.string, end, fail);
 501
 502   __gst_element_factory_add_static_pad_template (factory, template);
 503   GST_DEBUG ("Added pad_template %s", template->name_template);
 504
 505   return TRUE;
 506 fail:
 507   GST_INFO ("Reading pad template failed");
 508   if (template)
 509     g_slice_free (GstStaticPadTemplate, template);
 510   return FALSE;
 511 }
 512
 513 /*
 514  * gst_registry_chunks_load_feature:
 515  *
 516  * Make a new GstPluginFeature from current binary plugin feature structure
 517  *
 518  * Returns: new GstPluginFeature
 519  */
 520 static gboolean
 521 gst_registry_chunks_load_feature (GstRegistry * registry, gchar ** in,
 522     gchar * end, GstPlugin * plugin)
 523 {
 524   GstRegistryChunkPluginFeature *pf = NULL;
 525   GstPluginFeature *feature = NULL;
 526   const gchar *const_str, *type_name;
 527   const gchar *feature_name;
 528   const gchar *plugin_name;
 529   gchar *str;
 530   GType type;
 531   guint i;
 532
 533   plugin_name = plugin->desc.name;
 534
 535   /* unpack plugin feature strings */
 536   unpack_string_nocopy (*in, type_name, end, fail);
 537
 538   if (G_UNLIKELY (!type_name)) {
 539     GST_ERROR ("No feature type name");
 540     return FALSE;
 541   }
 542
 543   /* unpack more plugin feature strings */
 544   unpack_string_nocopy (*in, feature_name, end, fail);
 545
 546   GST_DEBUG ("Plugin '%s' feature '%s' typename : '%s'", plugin_name,
 547       feature_name, type_name);
 548
 549   if (G_UNLIKELY (!(type = g_type_from_name (type_name)))) {
 550     GST_ERROR ("Unknown type from typename '%s' for plugin '%s'", type_name,
 551         plugin_name);
 552     return FALSE;
 553   }
 554   if (G_UNLIKELY ((feature = g_object_newv (type, 0, NULL)) == NULL)) {
 555     GST_ERROR ("Can't create feature from type");
 556     return FALSE;
 557   }
 558   gst_plugin_feature_set_name (feature, feature_name);
 559
 560   if (G_UNLIKELY (!GST_IS_PLUGIN_FEATURE (feature))) {
 561     GST_ERROR ("typename : '%s' is not a plugin feature", type_name);
 562     goto fail;
 563   }
 564
 565   if (GST_IS_ELEMENT_FACTORY (feature)) {
 566     GstRegistryChunkElementFactory *ef;
 567     guint n;
 568     GstElementFactory *factory = GST_ELEMENT_FACTORY_CAST (feature);
 569     gchar *str;
 570     const gchar *meta_data_str;
 571
 572     align (*in);
 573     GST_LOG ("Reading/casting for GstRegistryChunkElementFactory at address %p",
 574         *in);
 575     unpack_element (*in, ef, GstRegistryChunkElementFactory, end, fail);
 576     pf = (GstRegistryChunkPluginFeature *) ef;
 577
 578     /* unpack element factory strings */
 579     unpack_string_nocopy (*in, meta_data_str, end, fail);
 580     if (meta_data_str && *meta_data_str) {
 581       factory->metadata = gst_structure_from_string (meta_data_str, NULL);
 582       if (!factory->metadata) {
 583         GST_ERROR
 584             ("Error when trying to deserialize structure for metadata '%s'",
 585             meta_data_str);
 586         goto fail;
 587       }
 588     }
 589     n = ef->npadtemplates;
 590     GST_DEBUG ("Element factory : npadtemplates=%d", n);
 591
 592     /* load pad templates */
 593     for (i = 0; i < n; i++) {
 594       if (G_UNLIKELY (!gst_registry_chunks_load_pad_template (factory, in,
 595                   end))) {
 596         GST_ERROR ("Error while loading binary pad template");
 597         goto fail;
 598       }
 599     }
 600
 601     /* load uritypes */
 602     if (G_UNLIKELY ((n = ef->nuriprotocols))) {
 603       GST_DEBUG ("Reading %d UriTypes at address %p", n, *in);
 604
 605       align (*in);
 606       factory->uri_type = *((guint *) * in);
 607       *in += sizeof (factory->uri_type);
 608       /*unpack_element(*in, &factory->uri_type, factory->uri_type, end, fail); */
 609
 610       factory->uri_protocols = g_new0 (gchar *, n + 1);
 611       for (i = 0; i < n; i++) {
 612         unpack_string (*in, str, end, fail);
 613         factory->uri_protocols[i] = str;
 614       }
 615     }
 616     /* load interfaces */
 617     if (G_UNLIKELY ((n = ef->ninterfaces))) {
 618       GST_DEBUG ("Reading %d Interfaces at address %p", n, *in);
 619       for (i = 0; i < n; i++) {
 620         unpack_string_nocopy (*in, const_str, end, fail);
 621         __gst_element_factory_add_interface (factory, const_str);
 622       }
 623     }
 624   } else if (GST_IS_TYPE_FIND_FACTORY (feature)) {
 625     GstRegistryChunkTypeFindFactory *tff;
 626     GstTypeFindFactory *factory = GST_TYPE_FIND_FACTORY (feature);
 627
 628     align (*in);
 629     GST_DEBUG
 630         ("Reading/casting for GstRegistryChunkPluginFeature at address %p",
 631         *in);
 632     unpack_element (*in, tff, GstRegistryChunkTypeFindFactory, end, fail);
 633     pf = (GstRegistryChunkPluginFeature *) tff;
 634
 635     /* load typefinder caps */
 636     unpack_string_nocopy (*in, const_str, end, fail);
 637     if (const_str != NULL && *const_str != '\0')
 638       factory->caps = gst_caps_from_string (const_str);
 639     else
 640       factory->caps = NULL;
 641
 642     /* load extensions */
 643     if (tff->nextensions) {
 644       GST_DEBUG ("Reading %d Typefind extensions at address %p",
 645           tff->nextensions, *in);
 646       factory->extensions = g_new0 (gchar *, tff->nextensions + 1);
 647       /* unpack in reverse order to maintain the correct order */
 648       for (i = tff->nextensions; i > 0; i--) {
 649         unpack_string (*in, str, end, fail);
 650         factory->extensions[i - 1] = str;
 651       }
 652     }
 653   } else if (GST_IS_INDEX_FACTORY (feature)) {
 654     GstIndexFactory *factory = GST_INDEX_FACTORY (feature);
 655
 656     align (*in);
 657     GST_DEBUG
 658         ("Reading/casting for GstRegistryChunkPluginFeature at address %p",
 659         *in);
 660     unpack_element (*in, pf, GstRegistryChunkPluginFeature, end, fail);
 661
 662     /* unpack index factory strings */
 663     unpack_string (*in, factory->longdesc, end, fail);
 664   } else {
 665     GST_WARNING ("unhandled factory type : %s", G_OBJECT_TYPE_NAME (feature));
 666     goto fail;
 667   }
 668
 669   feature->rank = pf->rank;
 670
 671   feature->plugin_name = plugin_name;
 672   feature->plugin = plugin;
 673   g_object_add_weak_pointer ((GObject *) plugin,
 674       (gpointer *) & feature->plugin);
 675
 676   gst_registry_add_feature (registry, feature);
 677   GST_DEBUG ("Added feature %s, plugin %p %s", GST_OBJECT_NAME (feature),
 678       plugin, plugin_name);
 679
 680   return TRUE;
 681
 682   /* Errors */
 683 fail:
 684   GST_INFO ("Reading plugin feature failed");
 685   if (feature) {
 686     if (GST_IS_OBJECT (feature))
 687       gst_object_unref (feature);
 688     else
 689       g_object_unref (feature);
 690   }
 691   return FALSE;
 692 }
 693
 694 static gchar **
 695 gst_registry_chunks_load_plugin_dep_strv (gchar ** in, gchar * end, guint n)
 696 {
 697   gchar **arr;
 698
 699   if (n == 0)
 700     return NULL;
 701
 702   arr = g_new0 (gchar *, n + 1);
 703   while (n > 0) {
 704     unpack_string (*in, arr[n - 1], end, fail);
 705     --n;
 706   }
 707   return arr;
 708 fail:
 709   GST_INFO ("Reading plugin dependency strings failed");
 710   return NULL;
 711 }
 712
 713 static gboolean
 714 gst_registry_chunks_load_plugin_dep (GstPlugin * plugin, gchar ** in,
 715     gchar * end)
 716 {
 717   GstPluginDep *dep;
 718   GstRegistryChunkDep *d;
 719   gchar **s;
 720
 721   align (*in);
 722   GST_LOG_OBJECT (plugin, "Unpacking GstRegistryChunkDep from %p", *in);
 723   unpack_element (*in, d, GstRegistryChunkDep, end, fail);
 724
 725   dep = g_slice_new (GstPluginDep);
 726
 727   dep->env_hash = d->env_hash;
 728   dep->stat_hash = d->stat_hash;
 729
 730   dep->flags = d->flags;
 731
 732   dep->names = gst_registry_chunks_load_plugin_dep_strv (in, end, d->n_names);
 733   dep->paths = gst_registry_chunks_load_plugin_dep_strv (in, end, d->n_paths);
 734   dep->env_vars =
 735       gst_registry_chunks_load_plugin_dep_strv (in, end, d->n_env_vars);
 736
 737   plugin->priv->deps = g_list_append (plugin->priv->deps, dep);
 738
 739   GST_DEBUG_OBJECT (plugin, "Loaded external plugin dependency from registry: "
 740       "env_hash: %08x, stat_hash: %08x", dep->env_hash, dep->stat_hash);
 741   for (s = dep->env_vars; s != NULL && *s != NULL; ++s)
 742     GST_LOG_OBJECT (plugin, " evar: %s", *s);
 743   for (s = dep->paths; s != NULL && *s != NULL; ++s)
 744     GST_LOG_OBJECT (plugin, " path: %s", *s);
 745   for (s = dep->names; s != NULL && *s != NULL; ++s)
 746     GST_LOG_OBJECT (plugin, " name: %s", *s);
 747
 748   return TRUE;
 749 fail:
 750   GST_INFO ("Reading plugin dependency failed");
 751   return FALSE;
 752 }
 753
 754
 755 /*
 756  * _priv_gst_registry_chunks_load_plugin:
 757  *
 758  * Make a new GstPlugin from current GstRegistryChunkPluginElement structure
 759  * and add it to the GstRegistry. Return an offset to the next
 760  * GstRegistryChunkPluginElement structure.
 761  */
 762 gboolean
 763 _priv_gst_registry_chunks_load_plugin (GstRegistry * registry, gchar ** in,
 764     gchar * end, GstPlugin ** out_plugin)
 765 {
 766 #ifndef GST_DISABLE_GST_DEBUG
 767   gchar *start = *in;
 768 #endif
 769   GstRegistryChunkPluginElement *pe;
 770   const gchar *cache_str = NULL;
 771   GstPlugin *plugin = NULL;
 772   guint i, n;
 773
 774   align (*in);
 775   GST_LOG ("Reading/casting for GstRegistryChunkPluginElement at address %p",
 776       *in);
 777   unpack_element (*in, pe, GstRegistryChunkPluginElement, end, fail);
 778
 779   plugin = g_object_newv (GST_TYPE_PLUGIN, 0, NULL);
 780
 781   /* TODO: also set GST_PLUGIN_FLAG_CONST */
 782   plugin->flags |= GST_PLUGIN_FLAG_CACHED;
 783   plugin->file_mtime = pe->file_mtime;
 784   plugin->file_size = pe->file_size;
 785
 786   /* unpack plugin element strings */
 787   unpack_const_string (*in, plugin->desc.name, end, fail);
 788   unpack_const_string (*in, plugin->desc.description, end, fail);
 789   unpack_string (*in, plugin->filename, end, fail);
 790   unpack_const_string (*in, plugin->desc.version, end, fail);
 791   unpack_const_string (*in, plugin->desc.license, end, fail);
 792   unpack_const_string (*in, plugin->desc.source, end, fail);
 793   unpack_const_string (*in, plugin->desc.package, end, fail);
 794   unpack_const_string (*in, plugin->desc.origin, end, fail);
 795   unpack_const_string (*in, plugin->desc.release_datetime, end, fail);
 796
 797   GST_LOG ("read strings for name='%s'", plugin->desc.name);
 798   GST_LOG ("  desc.description='%s'", plugin->desc.description);
 799   GST_LOG ("  filename='%s'", plugin->filename);
 800   GST_LOG ("  desc.version='%s'", plugin->desc.version);
 801   GST_LOG ("  desc.license='%s'", plugin->desc.license);
 802   GST_LOG ("  desc.source='%s'", plugin->desc.source);
 803   GST_LOG ("  desc.package='%s'", plugin->desc.package);
 804   GST_LOG ("  desc.origin='%s'", plugin->desc.origin);
 805   GST_LOG ("  desc.datetime=%s", plugin->desc.release_datetime);
 806
 807   if (plugin->desc.release_datetime[0] == '\0')
 808     plugin->desc.release_datetime = NULL;
 809
 810   /* unpack cache data */
 811   unpack_string_nocopy (*in, cache_str, end, fail);
 812   if (cache_str != NULL && *cache_str != '\0')
 813     plugin->priv->cache_data = gst_structure_from_string (cache_str, NULL);
 814
 815   /* If the license string is 'BLACKLIST', mark this as a blacklisted
 816    * plugin */
 817   if (strcmp (plugin->desc.license, "BLACKLIST") == 0)
 818     plugin->flags |= GST_PLUGIN_FLAG_BLACKLISTED;
 819
 820   plugin->basename = g_path_get_basename (plugin->filename);
 821
 822   /* Takes ownership of plugin */
 823   gst_registry_add_plugin (registry, plugin);
 824   n = pe->nfeatures;
 825   GST_DEBUG ("Added plugin '%s' plugin with %d features from binary registry",
 826       plugin->desc.name, n);
 827
 828   /* Load plugin features */
 829   for (i = 0; i < n; i++) {
 830     if (G_UNLIKELY (!gst_registry_chunks_load_feature (registry, in, end,
 831                 plugin))) {
 832       GST_ERROR ("Error while loading binary feature for plugin '%s'",
 833           GST_STR_NULL (plugin->desc.name));
 834       gst_registry_remove_plugin (registry, plugin);
 835       goto fail;
 836     }
 837   }
 838
 839   /* Load external plugin dependencies */
 840   for (i = 0; i < pe->n_deps; ++i) {
 841     if (G_UNLIKELY (!gst_registry_chunks_load_plugin_dep (plugin, in, end))) {
 842       GST_ERROR_OBJECT (plugin, "Could not read external plugin dependency "
 843           "for plugin '%s'", GST_STR_NULL (plugin->desc.name));
 844       gst_registry_remove_plugin (registry, plugin);
 845       goto fail;
 846     }
 847   }
 848
 849   if (out_plugin)
 850     *out_plugin = plugin;
 851
 852   return TRUE;
 853
 854   /* Errors */
 855 fail:
 856   GST_INFO ("Reading plugin failed after %u bytes", (guint) (end - start));
 857   return FALSE;
 858 }
 859
 860 void
 861 _priv_gst_registry_chunks_save_global_header (GList ** list,
 862     GstRegistry * registry, guint32 filter_env_hash)
 863 {
 864   GstRegistryChunkGlobalHeader *hdr;
 865   GstRegistryChunk *chk;
 866
 867   hdr = g_slice_new (GstRegistryChunkGlobalHeader);
 868   chk = gst_registry_chunks_make_data (hdr,
 869       sizeof (GstRegistryChunkGlobalHeader));
 870
 871   hdr->filter_env_hash = filter_env_hash;
 872
 873   *list = g_list_prepend (*list, chk);
 874
 875   GST_LOG ("Saved global header (filter_env_hash=0x%08x)", filter_env_hash);
 876 }
 877
 878 gboolean
 879 _priv_gst_registry_chunks_load_global_header (GstRegistry * registry,
 880     gchar ** in, gchar * end, guint32 * filter_env_hash)
 881 {
 882   GstRegistryChunkGlobalHeader *hdr;
 883
 884   align (*in);
 885   GST_LOG ("Reading/casting for GstRegistryChunkGlobalHeader at %p", *in);
 886   unpack_element (*in, hdr, GstRegistryChunkGlobalHeader, end, fail);
 887   *filter_env_hash = hdr->filter_env_hash;
 888   return TRUE;
 889
 890   /* Errors */
 891 fail:
 892   GST_WARNING ("Reading global header failed");
 893   return FALSE;
 894 }