* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
- * License along with this library; if not, write to the
- * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
- * Boston, MA 02111-1307, USA.
+ * License along with this library; if not, see <http://www.gnu.org/licenses/>.
*/
#include "config.h"
/**
* SECTION:gsettingsschema
- * @short_description: introspecting and controlling the loading of
- * GSettings schemas
+ * @short_description: Introspecting and controlling the loading
+ * of GSettings schemas
+ * @include: gio/gio.h
*
* The #GSettingsSchemaSource and #GSettingsSchema APIs provide a
* mechanism for advanced control over the loading of schemas and a
*
* Consider the following example:
*
- * |[
+ * |[<!-- language="C" -->
* typedef struct
* {
* ...
* ships a gschemas.compiled file as part of itself, and then simply do
* the following:
*
- * |[
+ * |[<!-- language="C" -->
* {
* GSettings *settings;
* gint some_value;
**/
struct _GSettingsSchema
{
+ GSettingsSchemaSource *source;
const gchar *gettext_domain;
const gchar *path;
GQuark *items;
GvdbTable *table;
gchar *id;
+ GSettingsSchema *extends;
+
gint ref_count;
};
struct _GSettingsSchemaSource
{
GSettingsSchemaSource *parent;
+ gchar *directory;
GvdbTable *table;
+ GHashTable **text_tables;
gint ref_count;
};
static GSettingsSchemaSource *schema_sources;
-static void
-prepend_schema_table (GvdbTable *table)
-{
- GSettingsSchemaSource *source;
-
- /* we steal the reference from 'schema_sources' for our ->parent */
- source = g_slice_new (GSettingsSchemaSource);
- source->parent = schema_sources;
- source->table = table;
- source->ref_count = 1;
-
- schema_sources = source;
-}
-
/**
* g_settings_schema_source_ref:
* @source: a #GSettingsSchemaSource
if (source->parent)
g_settings_schema_source_unref (source->parent);
gvdb_table_unref (source->table);
+ g_free (source->directory);
+
+ if (source->text_tables)
+ {
+ g_hash_table_unref (source->text_tables[0]);
+ g_hash_table_unref (source->text_tables[1]);
+ g_free (source->text_tables);
+ }
g_slice_free (GSettingsSchemaSource, source);
}
* This function is not required for normal uses of #GSettings but it
* may be useful to authors of plugin management systems.
*
- * The directory should contain a file called
- * <filename>gschemas.compiled</filename> as produced by
- * <command>glib-compile-schemas</command>.
+ * The directory should contain a file called `gschemas.compiled` as
+ * produced by the [glib-compile-schemas][glib-compile-schemas] tool.
*
- * If @trusted is %TRUE then <filename>gschemas.compiled</filename> is
- * trusted not to be corrupted. This assumption has a performance
- * advantage, but can result in crashes or inconsistent behaviour in the
- * case of a corrupted file. Generally, you should set @trusted to
- * %TRUE for files installed by the system and to %FALSE for files in
- * the home directory.
+ * If @trusted is %TRUE then `gschemas.compiled` is trusted not to be
+ * corrupted. This assumption has a performance advantage, but can result
+ * in crashes or inconsistent behaviour in the case of a corrupted file.
+ * Generally, you should set @trusted to %TRUE for files installed by the
+ * system and to %FALSE for files in the home directory.
*
* If @parent is non-%NULL then there are two effects.
*
* source, the lookup will recurse to the parent.
*
* Second, any references to other schemas specified within this
- * source (ie: <literal>child</literal> or <literal>extends</literal>)
- * references may be resolved from the @parent.
+ * source (ie: `child` or `extends`) references may be resolved
+ * from the @parent.
*
* For this second reason, except in very unusual situations, the
* @parent should probably be given as the default schema source, as
return NULL;
source = g_slice_new (GSettingsSchemaSource);
+ source->directory = g_strdup (directory);
source->parent = parent ? g_settings_schema_source_ref (parent) : NULL;
+ source->text_tables = NULL;
source->table = table;
source->ref_count = 1;
}
static void
+try_prepend_dir (const gchar *directory)
+{
+ GSettingsSchemaSource *source;
+
+ source = g_settings_schema_source_new_from_directory (directory, schema_sources, TRUE, NULL);
+
+ /* If we successfully created it then prepend it to the global list */
+ if (source != NULL)
+ schema_sources = source;
+}
+
+static void
initialise_schema_sources (void)
{
static gsize initialised;
while (i--)
{
- gchar *filename;
- GvdbTable *table;
-
- filename = g_build_filename (dirs[i], "glib-2.0", "schemas", "gschemas.compiled", NULL);
- table = gvdb_table_new (filename, TRUE, NULL);
-
- if (table != NULL)
- prepend_schema_table (table);
+ gchar *dirname;
- g_free (filename);
+ dirname = g_build_filename (dirs[i], "glib-2.0", "schemas", NULL);
+ try_prepend_dir (dirname);
+ g_free (dirname);
}
if ((path = g_getenv ("GSETTINGS_SCHEMA_DIR")) != NULL)
- {
- gchar *filename;
- GvdbTable *table;
-
- filename = g_build_filename (path, "gschemas.compiled", NULL);
- table = gvdb_table_new (filename, TRUE, NULL);
-
- if (table != NULL)
- prepend_schema_table (table);
-
- g_free (filename);
- }
+ try_prepend_dir (path);
g_once_init_leave (&initialised, TRUE);
}
*
* The returned source may actually consist of multiple schema sources
* from different directories, depending on which directories were given
- * in <envar>XDG_DATA_DIRS</envar> and
- * <envar>GSETTINGS_SCHEMA_DIR</envar>. For this reason, all lookups
- * performed against the default source should probably be done
+ * in `XDG_DATA_DIRS` and `GSETTINGS_SCHEMA_DIR`. For this reason, all
+ * lookups performed against the default source should probably be done
* recursively.
*
* Returns: (transfer none): the default schema source
*
* If the schema isn't found, %NULL is returned.
*
- * Returns: (transfer full): a new #GSettingsSchema
+ * Returns: (nullable) (transfer full): a new #GSettingsSchema
*
* Since: 2.32
**/
{
GSettingsSchema *schema;
GvdbTable *table;
+ const gchar *extends;
g_return_val_if_fail (source != NULL, NULL);
g_return_val_if_fail (schema_id != NULL, NULL);
return NULL;
schema = g_slice_new0 (GSettingsSchema);
+ schema->source = g_settings_schema_source_ref (source);
schema->ref_count = 1;
schema->id = g_strdup (schema_id);
schema->table = table;
if (schema->gettext_domain)
bind_textdomain_codeset (schema->gettext_domain, "UTF-8");
+ extends = g_settings_schema_get_string (schema, ".extends");
+ if (extends)
+ {
+ schema->extends = g_settings_schema_source_lookup (source, extends, TRUE);
+ if (schema->extends == NULL)
+ g_warning ("Schema '%s' extends schema '%s' but we could not find it", schema_id, extends);
+ }
+
return schema;
}
-static gboolean
-steal_item (gpointer key,
- gpointer value,
- gpointer user_data)
+typedef struct
+{
+ GHashTable *summaries;
+ GHashTable *descriptions;
+ GSList *gettext_domain;
+ GSList *schema_id;
+ GSList *key_name;
+ GString *string;
+} TextTableParseInfo;
+
+static const gchar *
+get_attribute_value (GSList *list)
{
- gchar ***ptr = user_data;
+ GSList *node;
- *(*ptr)++ = (gchar *) key;
+ for (node = list; node; node = node->next)
+ if (node->data)
+ return node->data;
- return TRUE;
+ return NULL;
}
-static const gchar * const *non_relocatable_schema_list;
-static const gchar * const *relocatable_schema_list;
-static gsize schema_lists_initialised;
+static void
+pop_attribute_value (GSList **list)
+{
+ gchar *top;
+
+ top = (*list)->data;
+ *list = g_slist_remove (*list, top);
+
+ g_free (top);
+}
static void
-ensure_schema_lists (void)
+push_attribute_value (GSList **list,
+ const gchar *value)
{
- if (g_once_init_enter (&schema_lists_initialised))
+ *list = g_slist_prepend (*list, g_strdup (value));
+}
+
+static void
+start_element (GMarkupParseContext *context,
+ const gchar *element_name,
+ const gchar **attribute_names,
+ const gchar **attribute_values,
+ gpointer user_data,
+ GError **error)
+{
+ TextTableParseInfo *info = user_data;
+ const gchar *gettext_domain = NULL;
+ const gchar *schema_id = NULL;
+ const gchar *key_name = NULL;
+ gint i;
+
+ for (i = 0; attribute_names[i]; i++)
{
- GSettingsSchemaSource *source;
- GHashTable *single, *reloc;
- const gchar **ptr;
- gchar **list;
- gint i;
+ if (g_str_equal (attribute_names[i], "gettext-domain"))
+ gettext_domain = attribute_values[i];
+ else if (g_str_equal (attribute_names[i], "id"))
+ schema_id = attribute_values[i];
+ else if (g_str_equal (attribute_names[i], "name"))
+ key_name = attribute_values[i];
+ }
- initialise_schema_sources ();
+ push_attribute_value (&info->gettext_domain, gettext_domain);
+ push_attribute_value (&info->schema_id, schema_id);
+ push_attribute_value (&info->key_name, key_name);
- /* We use hash tables to avoid duplicate listings for schemas that
- * appear in more than one file.
- */
- single = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
- reloc = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+ if (info->string)
+ {
+ g_string_free (info->string, TRUE);
+ info->string = NULL;
+ }
+
+ if (g_str_equal (element_name, "summary") || g_str_equal (element_name, "description"))
+ info->string = g_string_new (NULL);
+}
+
+static gchar *
+normalise_whitespace (const gchar *orig)
+{
+ /* We normalise by the same rules as in intltool:
+ *
+ * sub cleanup {
+ * s/^\s+//;
+ * s/\s+$//;
+ * s/\s+/ /g;
+ * return $_;
+ * }
+ *
+ * $message = join "\n\n", map &cleanup, split/\n\s*\n+/, $message;
+ *
+ * Where \s is an ascii space character.
+ *
+ * We aim for ease of implementation over efficiency -- this code is
+ * not run in normal applications.
+ */
+ static GRegex *cleanup[3];
+ static GRegex *splitter;
+ gchar **lines;
+ gchar *result;
+ gint i;
+
+ if (g_once_init_enter (&splitter))
+ {
+ GRegex *s;
+
+ cleanup[0] = g_regex_new ("^\\s+", 0, 0, 0);
+ cleanup[1] = g_regex_new ("\\s+$", 0, 0, 0);
+ cleanup[2] = g_regex_new ("\\s+", 0, 0, 0);
+ s = g_regex_new ("\\n\\s*\\n+", 0, 0, 0);
+
+ g_once_init_leave (&splitter, s);
+ }
+
+ lines = g_regex_split (splitter, orig, 0);
+ for (i = 0; lines[i]; i++)
+ {
+ gchar *a, *b, *c;
+
+ a = g_regex_replace_literal (cleanup[0], lines[i], -1, 0, "", 0, 0);
+ b = g_regex_replace_literal (cleanup[1], a, -1, 0, "", 0, 0);
+ c = g_regex_replace_literal (cleanup[2], b, -1, 0, " ", 0, 0);
+ g_free (lines[i]);
+ g_free (a);
+ g_free (b);
+ lines[i] = c;
+ }
+
+ result = g_strjoinv ("\n\n", lines);
+ g_strfreev (lines);
+
+ return result;
+}
- for (source = schema_sources; source; source = source->parent)
+static void
+end_element (GMarkupParseContext *context,
+ const gchar *element_name,
+ gpointer user_data,
+ GError **error)
+{
+ TextTableParseInfo *info = user_data;
+
+ pop_attribute_value (&info->gettext_domain);
+ pop_attribute_value (&info->schema_id);
+ pop_attribute_value (&info->key_name);
+
+ if (info->string)
+ {
+ GHashTable *source_table = NULL;
+ const gchar *gettext_domain;
+ const gchar *schema_id;
+ const gchar *key_name;
+
+ gettext_domain = get_attribute_value (info->gettext_domain);
+ schema_id = get_attribute_value (info->schema_id);
+ key_name = get_attribute_value (info->key_name);
+
+ if (g_str_equal (element_name, "summary"))
+ source_table = info->summaries;
+ else if (g_str_equal (element_name, "description"))
+ source_table = info->descriptions;
+
+ if (source_table && schema_id && key_name)
{
- list = gvdb_table_list (source->table, "");
+ GHashTable *schema_table;
+ gchar *normalised;
- /* empty schema cache file? */
- if (list == NULL)
- continue;
+ schema_table = g_hash_table_lookup (source_table, schema_id);
- for (i = 0; list[i]; i++)
+ if (schema_table == NULL)
{
- if (!g_hash_table_lookup (single, list[i]) &&
- !g_hash_table_lookup (reloc, list[i]))
- {
- GvdbTable *table;
+ schema_table = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_free);
+ g_hash_table_insert (source_table, g_strdup (schema_id), schema_table);
+ }
- table = gvdb_table_get_table (source->table, list[i]);
- g_assert (table != NULL);
+ normalised = normalise_whitespace (info->string->str);
- if (gvdb_table_has_value (table, ".path"))
- g_hash_table_insert (single, g_strdup (list[i]), NULL);
- else
- g_hash_table_insert (reloc, g_strdup (list[i]), NULL);
+ if (gettext_domain)
+ {
+ gchar *translated;
- gvdb_table_unref (table);
- }
+ translated = g_strdup (g_dgettext (gettext_domain, normalised));
+ g_free (normalised);
+ normalised = translated;
}
- g_strfreev (list);
+ g_hash_table_insert (schema_table, g_strdup (key_name), normalised);
}
- ptr = g_new (const gchar *, g_hash_table_size (single) + 1);
- non_relocatable_schema_list = ptr;
- g_hash_table_foreach_steal (single, steal_item, &ptr);
- g_hash_table_unref (single);
- *ptr = NULL;
+ g_string_free (info->string, TRUE);
+ info->string = NULL;
+ }
+}
+
+static void
+text (GMarkupParseContext *context,
+ const gchar *text,
+ gsize text_len,
+ gpointer user_data,
+ GError **error)
+{
+ TextTableParseInfo *info = user_data;
- ptr = g_new (const gchar *, g_hash_table_size (reloc) + 1);
- relocatable_schema_list = ptr;
- g_hash_table_foreach_steal (reloc, steal_item, &ptr);
- g_hash_table_unref (reloc);
- *ptr = NULL;
+ if (info->string)
+ g_string_append_len (info->string, text, text_len);
+}
- g_once_init_leave (&schema_lists_initialised, TRUE);
+static void
+parse_into_text_tables (const gchar *directory,
+ GHashTable *summaries,
+ GHashTable *descriptions)
+{
+ GMarkupParser parser = { start_element, end_element, text };
+ TextTableParseInfo info = { summaries, descriptions };
+ const gchar *basename;
+ GDir *dir;
+
+ dir = g_dir_open (directory, 0, NULL);
+ while ((basename = g_dir_read_name (dir)))
+ {
+ gchar *filename;
+ gchar *contents;
+ gsize size;
+
+ filename = g_build_filename (directory, basename, NULL);
+ if (g_file_get_contents (filename, &contents, &size, NULL))
+ {
+ GMarkupParseContext *context;
+
+ context = g_markup_parse_context_new (&parser, G_MARKUP_TREAT_CDATA_AS_TEXT, &info, NULL);
+ if (g_markup_parse_context_parse (context, contents, size, NULL))
+ g_markup_parse_context_end_parse (context, NULL);
+ g_markup_parse_context_free (context);
+
+ /* Clean up dangling stuff in case there was an error. */
+ g_slist_free_full (info.gettext_domain, g_free);
+ g_slist_free_full (info.schema_id, g_free);
+ g_slist_free_full (info.key_name, g_free);
+
+ info.gettext_domain = NULL;
+ info.schema_id = NULL;
+ info.key_name = NULL;
+
+ if (info.string)
+ {
+ g_string_free (info.string, TRUE);
+ info.string = NULL;
+ }
+
+ g_free (contents);
+ }
+
+ g_free (filename);
+ }
+}
+
+static GHashTable **
+g_settings_schema_source_get_text_tables (GSettingsSchemaSource *source)
+{
+ if (g_once_init_enter (&source->text_tables))
+ {
+ GHashTable **text_tables;
+
+ text_tables = g_new (GHashTable *, 2);
+ text_tables[0] = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, (GDestroyNotify) g_hash_table_unref);
+ text_tables[1] = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, (GDestroyNotify) g_hash_table_unref);
+
+ if (source->directory)
+ parse_into_text_tables (source->directory, text_tables[0], text_tables[1]);
+
+ g_once_init_leave (&source->text_tables, text_tables);
}
+
+ return source->text_tables;
}
/**
- * g_settings_list_schemas:
+ * g_settings_schema_source_list_schemas:
+ * @source: a #GSettingsSchemaSource
+ * @recursive: if we should recurse
+ * @non_relocatable: (out) (transfer full) (array zero-terminated=1): the
+ * list of non-relocatable schemas
+ * @relocatable: (out) (transfer full) (array zero-terminated=1): the list
+ * of relocatable schemas
+ *
+ * Lists the schemas in a given source.
+ *
+ * If @recursive is %TRUE then include parent sources. If %FALSE then
+ * only include the schemas from one source (ie: one directory). You
+ * probably want %TRUE.
*
- * Gets a list of the #GSettings schemas installed on the system. The
- * returned list is exactly the list of schemas for which you may call
- * g_settings_new() without adverse effects.
+ * Non-relocatable schemas are those for which you can call
+ * g_settings_new(). Relocatable schemas are those for which you must
+ * use g_settings_new_with_path().
*
- * This function does not list the schemas that do not provide their own
- * paths (ie: schemas for which you must use
- * g_settings_new_with_path()). See
- * g_settings_list_relocatable_schemas() for that.
+ * Do not call this function from normal programs. This is designed for
+ * use by database editors, commandline tools, etc.
+ *
+ * Since: 2.40
+ **/
+void
+g_settings_schema_source_list_schemas (GSettingsSchemaSource *source,
+ gboolean recursive,
+ gchar ***non_relocatable,
+ gchar ***relocatable)
+{
+ GHashTable *single, *reloc;
+ GSettingsSchemaSource *s;
+
+ /* We use hash tables to avoid duplicate listings for schemas that
+ * appear in more than one file.
+ */
+ single = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+ reloc = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+
+ for (s = source; s; s = s->parent)
+ {
+ gchar **list;
+ gint i;
+
+ list = gvdb_table_list (s->table, "");
+
+ /* empty schema cache file? */
+ if (list == NULL)
+ continue;
+
+ for (i = 0; list[i]; i++)
+ {
+ if (!g_hash_table_lookup (single, list[i]) &&
+ !g_hash_table_lookup (reloc, list[i]))
+ {
+ GvdbTable *table;
+
+ table = gvdb_table_get_table (s->table, list[i]);
+ g_assert (table != NULL);
+
+ if (gvdb_table_has_value (table, ".path"))
+ g_hash_table_insert (single, g_strdup (list[i]), NULL);
+ else
+ g_hash_table_insert (reloc, g_strdup (list[i]), NULL);
+
+ gvdb_table_unref (table);
+ }
+ }
+
+ g_strfreev (list);
+
+ /* Only the first source if recursive not requested */
+ if (!recursive)
+ break;
+ }
+
+ if (non_relocatable)
+ {
+ *non_relocatable = (gchar **) g_hash_table_get_keys_as_array (single, NULL);
+ g_hash_table_steal_all (single);
+ }
+
+ if (relocatable)
+ {
+ *relocatable = (gchar **) g_hash_table_get_keys_as_array (reloc, NULL);
+ g_hash_table_steal_all (reloc);
+ }
+
+ g_hash_table_unref (single);
+ g_hash_table_unref (reloc);
+}
+
+static gchar **non_relocatable_schema_list;
+static gchar **relocatable_schema_list;
+static gsize schema_lists_initialised;
+
+static void
+ensure_schema_lists (void)
+{
+ if (g_once_init_enter (&schema_lists_initialised))
+ {
+ initialise_schema_sources ();
+
+ g_settings_schema_source_list_schemas (schema_sources, TRUE,
+ &non_relocatable_schema_list,
+ &relocatable_schema_list);
+
+ g_once_init_leave (&schema_lists_initialised, TRUE);
+ }
+}
+
+/**
+ * g_settings_list_schemas:
*
* Returns: (element-type utf8) (transfer none): a list of #GSettings
* schemas that are available. The list must not be modified or
* freed.
*
* Since: 2.26
+ *
+ * Deprecated:2.40: Use g_settings_schema_source_list_schemas() instead.
+ * If you used g_settings_list_schemas() to check for the presence of
+ * a particular schema, use g_settings_schema_source_lookup() instead
+ * of your whole loop.
**/
const gchar * const *
g_settings_list_schemas (void)
{
ensure_schema_lists ();
- return non_relocatable_schema_list;
+ return (const gchar **) non_relocatable_schema_list;
}
/**
* g_settings_list_relocatable_schemas:
*
- * Gets a list of the relocatable #GSettings schemas installed on the
- * system. These are schemas that do not provide their own path. It is
- * usual to instantiate these schemas directly, but if you want to you
- * can use g_settings_new_with_path() to specify the path.
- *
- * The output of this function, taken together with the output of
- * g_settings_list_schemas() represents the complete list of all
- * installed schemas.
- *
* Returns: (element-type utf8) (transfer none): a list of relocatable
* #GSettings schemas that are available. The list must not be
* modified or freed.
*
* Since: 2.28
+ *
+ * Deprecated:2.40: Use g_settings_schema_source_list_schemas() instead
**/
const gchar * const *
g_settings_list_relocatable_schemas (void)
{
ensure_schema_lists ();
- return relocatable_schema_list;
+ return (const gchar **) relocatable_schema_list;
}
/**
{
if (g_atomic_int_dec_and_test (&schema->ref_count))
{
+ if (schema->extends)
+ g_settings_schema_unref (schema->extends);
+
+ g_settings_schema_source_unref (schema->source);
gvdb_table_unref (schema->table);
g_free (schema->items);
g_free (schema->id);
g_settings_schema_get_value (GSettingsSchema *schema,
const gchar *key)
{
+ GSettingsSchema *s = schema;
GVariantIter *iter;
GVariant *value;
- value = gvdb_table_get_raw_value (schema->table, key);
+ g_return_val_if_fail (schema != NULL, NULL);
+
+ for (s = schema; s; s = s->extends)
+ if ((value = gvdb_table_get_raw_value (s->table, key)))
+ break;
if G_UNLIKELY (value == NULL || !g_variant_is_of_type (value, G_VARIANT_TYPE_TUPLE))
g_error ("Settings schema '%s' does not contain a key named '%s'", schema->id, key);
return schema->gettext_domain;
}
+/**
+ * g_settings_schema_has_key:
+ * @schema: a #GSettingsSchema
+ * @name: the name of a key
+ *
+ * Checks if @schema has a key named @name.
+ *
+ * Returns: %TRUE if such a key exists
+ *
+ * Since: 2.40
+ **/
gboolean
g_settings_schema_has_key (GSettingsSchema *schema,
const gchar *key)
g_settings_schema_list (GSettingsSchema *schema,
gint *n_items)
{
- gint i, j;
-
if (schema->items == NULL)
{
- gchar **list;
+ GSettingsSchema *s;
+ GHashTableIter iter;
+ GHashTable *items;
+ gpointer name;
gint len;
+ gint i;
+
+ items = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, NULL);
+
+ for (s = schema; s; s = s->extends)
+ {
+ gchar **list;
+
+ list = gvdb_table_list (s->table, "");
- list = gvdb_table_list (schema->table, "");
- len = list ? g_strv_length (list) : 0;
+ if (list)
+ {
+ for (i = 0; list[i]; i++)
+ g_hash_table_add (items, list[i]); /* transfer ownership */
+
+ g_free (list); /* free container only */
+ }
+ }
+
+ /* Do a first pass to eliminate child items that do not map to
+ * valid schemas (ie: ones that would crash us if we actually
+ * tried to create them).
+ */
+ g_hash_table_iter_init (&iter, items);
+ while (g_hash_table_iter_next (&iter, &name, NULL))
+ if (g_str_has_suffix (name, "/"))
+ {
+ GSettingsSchemaSource *source;
+ GVariant *child_schema;
+ GvdbTable *child_table;
+
+ child_schema = gvdb_table_get_raw_value (schema->table, name);
+ if (!child_schema)
+ continue;
+
+ child_table = NULL;
+
+ for (source = schema_sources; source; source = source->parent)
+ if ((child_table = gvdb_table_get_table (source->table, g_variant_get_string (child_schema, NULL))))
+ break;
+
+ g_variant_unref (child_schema);
+
+ /* Schema is not found -> remove it from the list */
+ if (child_table == NULL)
+ {
+ g_hash_table_iter_remove (&iter);
+ continue;
+ }
+
+ /* Make sure the schema is relocatable or at the
+ * expected path
+ */
+ if (gvdb_table_has_value (child_table, ".path"))
+ {
+ GVariant *path;
+ gchar *expected;
+ gboolean same;
+
+ path = gvdb_table_get_raw_value (child_table, ".path");
+ expected = g_strconcat (schema->path, name, NULL);
+ same = g_str_equal (expected, g_variant_get_string (path, NULL));
+ g_variant_unref (path);
+ g_free (expected);
+
+ /* Schema is non-relocatable and did not have the
+ * expected path -> remove it from the list
+ */
+ if (!same)
+ g_hash_table_iter_remove (&iter);
+ }
+
+ gvdb_table_unref (child_table);
+ }
+ /* Now create the list */
+ len = g_hash_table_size (items);
schema->items = g_new (GQuark, len);
- j = 0;
+ i = 0;
+ g_hash_table_iter_init (&iter, items);
- for (i = 0; i < len; i++)
- if (list[i][0] != '.')
- schema->items[j++] = g_quark_from_string (list[i]);
- schema->n_items = j;
+ while (g_hash_table_iter_next (&iter, &name, NULL))
+ schema->items[i++] = g_quark_from_string (name);
+ schema->n_items = i;
+ g_assert (i == len);
- g_strfreev (list);
+ g_hash_table_unref (items);
}
*n_items = schema->n_items;
return g_variant_is_of_type (value, key->type);
}
-gboolean
-g_settings_schema_key_range_check (GSettingsSchemaKey *key,
- GVariant *value)
-{
- if (key->minimum == NULL && key->strinfo == NULL)
- return TRUE;
-
- if (g_variant_is_container (value))
- {
- gboolean ok = TRUE;
- GVariantIter iter;
- GVariant *child;
-
- g_variant_iter_init (&iter, value);
- while (ok && (child = g_variant_iter_next_value (&iter)))
- {
- ok = g_settings_schema_key_range_check (key, child);
- g_variant_unref (child);
- }
-
- return ok;
- }
-
- if (key->minimum)
- {
- return g_variant_compare (key->minimum, value) <= 0 &&
- g_variant_compare (value, key->maximum) <= 0;
- }
-
- return strinfo_is_string_valid (key->strinfo, key->strinfo_length,
- g_variant_get_string (value, NULL));
-}
-
GVariant *
g_settings_schema_key_range_fixup (GSettingsSchemaKey *key,
GVariant *value)
return target ? g_variant_ref_sink (g_variant_new_string (target)) : NULL;
}
-
GVariant *
g_settings_schema_key_get_translated_default (GSettingsSchemaKey *key)
{
if (value == NULL)
{
- g_warning ("Failed to parse translated string `%s' for "
- "key `%s' in schema `%s': %s", key->unparsed, key->name,
+ g_warning ("Failed to parse translated string '%s' for "
+ "key '%s' in schema '%s': %s", key->unparsed, key->name,
g_settings_schema_get_id (key->schema), error->message);
g_warning ("Using untranslated default instead.");
g_error_free (error);
else if (!g_settings_schema_key_range_check (key, value))
{
- g_warning ("Translated default `%s' for key `%s' in schema `%s' "
+ g_warning ("Translated default '%s' for key '%s' in schema '%s' "
"is outside of valid range", key->unparsed, key->name,
g_settings_schema_get_id (key->schema));
g_variant_unref (value);
return g_variant_builder_end (&builder);
}
+
+G_DEFINE_BOXED_TYPE (GSettingsSchemaKey, g_settings_schema_key, g_settings_schema_key_ref, g_settings_schema_key_unref)
+
+/**
+ * g_settings_schema_key_ref:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Increase the reference count of @key, returning a new reference.
+ *
+ * Returns: a new reference to @key
+ *
+ * Since: 2.40
+ **/
+GSettingsSchemaKey *
+g_settings_schema_key_ref (GSettingsSchemaKey *key)
+{
+ g_return_val_if_fail (key != NULL, NULL);
+
+ g_atomic_int_inc (&key->ref_count);
+
+ return key;
+}
+
+/**
+ * g_settings_schema_key_unref:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Decrease the reference count of @key, possibly freeing it.
+ *
+ * Since: 2.40
+ **/
+void
+g_settings_schema_key_unref (GSettingsSchemaKey *key)
+{
+ g_return_if_fail (key != NULL);
+
+ if (g_atomic_int_dec_and_test (&key->ref_count))
+ {
+ g_settings_schema_key_clear (key);
+
+ g_slice_free (GSettingsSchemaKey, key);
+ }
+}
+
+/**
+ * g_settings_schema_get_key:
+ * @schema: a #GSettingsSchema
+ * @name: the name of a key
+ *
+ * Gets the key named @name from @schema.
+ *
+ * It is a programmer error to request a key that does not exist. See
+ * g_settings_schema_list_keys().
+ *
+ * Returns: (transfer full): the #GSettingsSchemaKey for @name
+ *
+ * Since: 2.40
+ **/
+GSettingsSchemaKey *
+g_settings_schema_get_key (GSettingsSchema *schema,
+ const gchar *name)
+{
+ GSettingsSchemaKey *key;
+
+ g_return_val_if_fail (schema != NULL, NULL);
+ g_return_val_if_fail (name != NULL, NULL);
+
+ key = g_slice_new (GSettingsSchemaKey);
+ g_settings_schema_key_init (key, schema, name);
+ key->ref_count = 1;
+
+ return key;
+}
+
+/**
+ * g_settings_schema_key_get_summary:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Gets the summary for @key.
+ *
+ * If no summary has been provided in the schema for @key, returns
+ * %NULL.
+ *
+ * The summary is a short description of the purpose of the key; usually
+ * one short sentence. Summaries can be translated and the value
+ * returned from this function is is the current locale.
+ *
+ * This function is slow. The summary and description information for
+ * the schemas is not stored in the compiled schema database so this
+ * function has to parse all of the source XML files in the schema
+ * directory.
+ *
+ * Returns: the summary for @key, or %NULL
+ *
+ * Since: 2.34
+ **/
+const gchar *
+g_settings_schema_key_get_summary (GSettingsSchemaKey *key)
+{
+ GHashTable **text_tables;
+ GHashTable *summaries;
+
+ text_tables = g_settings_schema_source_get_text_tables (key->schema->source);
+ summaries = g_hash_table_lookup (text_tables[0], key->schema->id);
+
+ return summaries ? g_hash_table_lookup (summaries, key->name) : NULL;
+}
+
+/**
+ * g_settings_schema_key_get_description:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Gets the description for @key.
+ *
+ * If no description has been provided in the schema for @key, returns
+ * %NULL.
+ *
+ * The description can be one sentence to several paragraphs in length.
+ * Paragraphs are delimited with a double newline. Descriptions can be
+ * translated and the value returned from this function is is the
+ * current locale.
+ *
+ * This function is slow. The summary and description information for
+ * the schemas is not stored in the compiled schema database so this
+ * function has to parse all of the source XML files in the schema
+ * directory.
+ *
+ * Returns: the description for @key, or %NULL
+ *
+ * Since: 2.34
+ **/
+const gchar *
+g_settings_schema_key_get_description (GSettingsSchemaKey *key)
+{
+ GHashTable **text_tables;
+ GHashTable *descriptions;
+
+ text_tables = g_settings_schema_source_get_text_tables (key->schema->source);
+ descriptions = g_hash_table_lookup (text_tables[1], key->schema->id);
+
+ return descriptions ? g_hash_table_lookup (descriptions, key->name) : NULL;
+}
+
+/**
+ * g_settings_schema_key_get_value_type:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Gets the #GVariantType of @key.
+ *
+ * Returns: (transfer none): the type of @key
+ *
+ * Since: 2.40
+ **/
+const GVariantType *
+g_settings_schema_key_get_value_type (GSettingsSchemaKey *key)
+{
+ g_return_val_if_fail (key, NULL);
+
+ return key->type;
+}
+
+/**
+ * g_settings_schema_key_get_default_value:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Gets the default value for @key.
+ *
+ * Note that this is the default value according to the schema. System
+ * administrator defaults and lockdown are not visible via this API.
+ *
+ * Returns: (transfer full): the default value for the key
+ *
+ * Since: 2.40
+ **/
+GVariant *
+g_settings_schema_key_get_default_value (GSettingsSchemaKey *key)
+{
+ GVariant *value;
+
+ g_return_val_if_fail (key, NULL);
+
+ value = g_settings_schema_key_get_translated_default (key);
+
+ if (!value)
+ value = g_variant_ref (key->default_value);
+
+ return value;
+}
+
+/**
+ * g_settings_schema_key_get_range:
+ * @key: a #GSettingsSchemaKey
+ *
+ * Queries the range of a key.
+ *
+ * This function will return a #GVariant that fully describes the range
+ * of values that are valid for @key.
+ *
+ * The type of #GVariant returned is `(sv)`. The string describes
+ * the type of range restriction in effect. The type and meaning of
+ * the value contained in the variant depends on the string.
+ *
+ * If the string is `'type'` then the variant contains an empty array.
+ * The element type of that empty array is the expected type of value
+ * and all values of that type are valid.
+ *
+ * If the string is `'enum'` then the variant contains an array
+ * enumerating the possible values. Each item in the array is
+ * a possible valid value and no other values are valid.
+ *
+ * If the string is `'flags'` then the variant contains an array. Each
+ * item in the array is a value that may appear zero or one times in an
+ * array to be used as the value for this key. For example, if the
+ * variant contained the array `['x', 'y']` then the valid values for
+ * the key would be `[]`, `['x']`, `['y']`, `['x', 'y']` and
+ * `['y', 'x']`.
+ *
+ * Finally, if the string is `'range'` then the variant contains a pair
+ * of like-typed values -- the minimum and maximum permissible values
+ * for this key.
+ *
+ * This information should not be used by normal programs. It is
+ * considered to be a hint for introspection purposes. Normal programs
+ * should already know what is permitted by their own schema. The
+ * format may change in any way in the future -- but particularly, new
+ * forms may be added to the possibilities described above.
+ *
+ * You should free the returned value with g_variant_unref() when it is
+ * no longer needed.
+ *
+ * Returns: (transfer full): a #GVariant describing the range
+ *
+ * Since: 2.40
+ **/
+GVariant *
+g_settings_schema_key_get_range (GSettingsSchemaKey *key)
+{
+ const gchar *type;
+ GVariant *range;
+
+ if (key->minimum)
+ {
+ range = g_variant_new ("(**)", key->minimum, key->maximum);
+ type = "range";
+ }
+ else if (key->strinfo)
+ {
+ range = strinfo_enumerate (key->strinfo, key->strinfo_length);
+ type = key->is_flags ? "flags" : "enum";
+ }
+ else
+ {
+ range = g_variant_new_array (key->type, NULL, 0);
+ type = "type";
+ }
+
+ return g_variant_ref_sink (g_variant_new ("(sv)", type, range));
+}
+
+/**
+ * g_settings_schema_key_range_check:
+ * @key: a #GSettingsSchemaKey
+ * @value: the value to check
+ *
+ * Checks if the given @value is of the correct type and within the
+ * permitted range for @key.
+ *
+ * It is a programmer error if @value is not of the correct type -- you
+ * must check for this first.
+ *
+ * Returns: %TRUE if @value is valid for @key
+ *
+ * Since: 2.40
+ **/
+gboolean
+g_settings_schema_key_range_check (GSettingsSchemaKey *key,
+ GVariant *value)
+{
+ if (key->minimum == NULL && key->strinfo == NULL)
+ return TRUE;
+
+ if (g_variant_is_container (value))
+ {
+ gboolean ok = TRUE;
+ GVariantIter iter;
+ GVariant *child;
+
+ g_variant_iter_init (&iter, value);
+ while (ok && (child = g_variant_iter_next_value (&iter)))
+ {
+ ok = g_settings_schema_key_range_check (key, child);
+ g_variant_unref (child);
+ }
+
+ return ok;
+ }
+
+ if (key->minimum)
+ {
+ return g_variant_compare (key->minimum, value) <= 0 &&
+ g_variant_compare (value, key->maximum) <= 0;
+ }
+
+ return strinfo_is_string_valid (key->strinfo, key->strinfo_length,
+ g_variant_get_string (value, NULL));
+}