gio/gsettings-tool.c

   1 /*
   2  * Copyright © 2010 Codethink Limited
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the licence, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  *
  19  * Author: Ryan Lortie <desrt@desrt.ca>
  20  */
  21
  22 #include "config.h"
  23
  24 #include <gio/gio.h>
  25 #include <gi18n.h>
  26 #include <locale.h>
  27 #include <string.h>
  28 #include <stdlib.h>
  29
  30 #ifdef G_OS_WIN32
  31 #include "glib/glib-private.h"
  32 #endif
  33
  34 static GSettingsSchemaSource   *global_schema_source;
  35 static GSettings               *global_settings;
  36 static GSettingsSchema         *global_schema;
  37 static GSettingsSchemaKey      *global_schema_key;
  38 const gchar                    *global_key;
  39 const gchar                    *global_value;
  40
  41 static gboolean
  42 is_relocatable_schema (GSettingsSchema *schema)
  43 {
  44   return g_settings_schema_get_path (schema) == NULL;
  45 }
  46
  47 static gboolean
  48 check_relocatable_schema (GSettingsSchema *schema,
  49                           const gchar     *schema_id)
  50 {
  51   if (schema == NULL)
  52     {
  53       g_printerr (_("No such schema '%s'\n"), schema_id);
  54       return FALSE;
  55     }
  56
  57   if (!is_relocatable_schema (schema))
  58     {
  59       g_printerr (_("Schema '%s' is not relocatable "
  60                     "(path must not be specified)\n"),
  61                   schema_id);
  62       return FALSE;
  63     }
  64
  65   return TRUE;
  66 }
  67
  68 static gboolean
  69 check_schema (GSettingsSchema *schema,
  70               const gchar *schema_id)
  71 {
  72   if (schema == NULL)
  73     {
  74       g_printerr (_("No such schema '%s'\n"), schema_id);
  75       return FALSE;
  76     }
  77
  78   if (is_relocatable_schema (schema))
  79     {
  80       g_printerr (_("Schema '%s' is relocatable "
  81                     "(path must be specified)\n"),
  82                   schema_id);
  83       return FALSE;
  84     }
  85
  86   return TRUE;
  87 }
  88
  89 static gboolean
  90 check_path (const gchar *path)
  91 {
  92   if (path[0] == '\0')
  93     {
  94       g_printerr (_("Empty path given.\n"));
  95       return FALSE;
  96     }
  97
  98   if (path[0] != '/')
  99     {
 100       g_printerr (_("Path must begin with a slash (/)\n"));
 101       return FALSE;
 102     }
 103
 104   if (!g_str_has_suffix (path, "/"))
 105     {
 106       g_printerr (_("Path must end with a slash (/)\n"));
 107       return FALSE;
 108     }
 109
 110   if (strstr (path, "//"))
 111     {
 112       g_printerr (_("Path must not contain two adjacent slashes (//)\n"));
 113       return FALSE;
 114     }
 115
 116   return TRUE;
 117 }
 118
 119 static void
 120 output_list (gchar **list)
 121 {
 122   gint i;
 123
 124   for (i = 0; list[i]; i++)
 125     g_print ("%s\n", list[i]);
 126 }
 127
 128 static void
 129 gsettings_print_version (void)
 130 {
 131   g_print ("%d.%d.%d\n", glib_major_version, glib_minor_version,
 132            glib_micro_version);
 133 }
 134
 135 static void
 136 gsettings_list_schemas (void)
 137 {
 138   gchar **schemas;
 139
 140   g_settings_schema_source_list_schemas (global_schema_source, TRUE, &schemas, NULL);
 141   output_list (schemas);
 142   g_strfreev (schemas);
 143 }
 144
 145 static void
 146 gsettings_list_relocatable_schemas (void)
 147 {
 148   gchar **schemas;
 149
 150   g_settings_schema_source_list_schemas (global_schema_source, TRUE, NULL, &schemas);
 151   output_list (schemas);
 152   g_strfreev (schemas);
 153 }
 154
 155 static void
 156 gsettings_list_keys (void)
 157 {
 158   gchar **keys;
 159
 160   keys = g_settings_list_keys (global_settings);
 161   output_list (keys);
 162   g_strfreev (keys);
 163 }
 164
 165 static void
 166 gsettings_list_children (void)
 167 {
 168   gchar **children;
 169   gint max = 0;
 170   gint i;
 171
 172   children = g_settings_list_children (global_settings);
 173   for (i = 0; children[i]; i++)
 174     if (strlen (children[i]) > max)
 175       max = strlen (children[i]);
 176
 177   for (i = 0; children[i]; i++)
 178     {
 179       GSettings *child;
 180       GSettingsSchema *schema;
 181       gchar *path;
 182
 183       child = g_settings_get_child (global_settings, children[i]);
 184       g_object_get (child,
 185                     "settings-schema", &schema,
 186                     "path", &path,
 187                     NULL);
 188
 189       if (g_settings_schema_get_path (schema) != NULL)
 190         g_print ("%-*s   %s\n", max, children[i], g_settings_schema_get_id (schema));
 191       else
 192         g_print ("%-*s   %s:%s\n", max, children[i], g_settings_schema_get_id (schema), path);
 193
 194       g_object_unref (child);
 195       g_settings_schema_unref (schema);
 196       g_free (path);
 197     }
 198
 199   g_strfreev (children);
 200 }
 201
 202 static void
 203 enumerate (GSettings *settings)
 204 {
 205   gchar **keys;
 206   gchar *schema;
 207   gint i;
 208
 209   g_object_get (settings, "schema-id", &schema, NULL);
 210
 211   keys = g_settings_list_keys (settings);
 212   for (i = 0; keys[i]; i++)
 213     {
 214       GVariant *value;
 215       gchar *printed;
 216
 217       value = g_settings_get_value (settings, keys[i]);
 218       printed = g_variant_print (value, TRUE);
 219       g_print ("%s %s %s\n", schema, keys[i], printed);
 220       g_variant_unref (value);
 221       g_free (printed);
 222     }
 223
 224   g_free (schema);
 225   g_strfreev (keys);
 226 }
 227
 228 static void
 229 list_recursively (GSettings *settings)
 230 {
 231   gchar **children;
 232   gint i;
 233
 234   enumerate (settings);
 235   children = g_settings_list_children (settings);
 236   for (i = 0; children[i]; i++)
 237     {
 238       GSettings *child;
 239
 240       child = g_settings_get_child (settings, children[i]);
 241       list_recursively (child);
 242       g_object_unref (child);
 243     }
 244
 245   g_strfreev (children);
 246 }
 247
 248 static void
 249 gsettings_list_recursively (void)
 250 {
 251   if (global_settings)
 252     {
 253       list_recursively (global_settings);
 254     }
 255   else
 256     {
 257       gchar **schemas;
 258       gint i;
 259
 260       g_settings_schema_source_list_schemas (global_schema_source, TRUE, &schemas, NULL);
 261
 262       for (i = 0; schemas[i]; i++)
 263         {
 264           GSettings *settings;
 265
 266           settings = g_settings_new (schemas[i]);
 267           list_recursively (settings);
 268           g_object_unref (settings);
 269         }
 270
 271       g_strfreev (schemas);
 272     }
 273 }
 274
 275 static void
 276 gsettings_range (void)
 277 {
 278   GVariant *range, *detail;
 279   const gchar *type;
 280
 281   range = g_settings_schema_key_get_range (global_schema_key);
 282   g_variant_get (range, "(&sv)", &type, &detail);
 283
 284   if (strcmp (type, "type") == 0)
 285     g_print ("type %s\n", g_variant_get_type_string (detail) + 1);
 286
 287   else if (strcmp (type, "range") == 0)
 288     {
 289       GVariant *min, *max;
 290       gchar *smin, *smax;
 291
 292       g_variant_get (detail, "(**)", &min, &max);
 293       smin = g_variant_print (min, FALSE);
 294       smax = g_variant_print (max, FALSE);
 295
 296       g_print ("range %s %s %s\n",
 297                g_variant_get_type_string (min), smin, smax);
 298       g_variant_unref (min);
 299       g_variant_unref (max);
 300       g_free (smin);
 301       g_free (smax);
 302     }
 303
 304   else if (strcmp (type, "enum") == 0 || strcmp (type, "flags") == 0)
 305     {
 306       GVariantIter iter;
 307       GVariant *item;
 308
 309       g_print ("%s\n", type);
 310
 311       g_variant_iter_init (&iter, detail);
 312       while (g_variant_iter_loop (&iter, "*", &item))
 313         {
 314           gchar *printed;
 315
 316           printed = g_variant_print (item, FALSE);
 317           g_print ("%s\n", printed);
 318           g_free (printed);
 319         }
 320     }
 321
 322   g_variant_unref (detail);
 323   g_variant_unref (range);
 324 }
 325
 326 static void
 327 gsettings_get (void)
 328 {
 329   GVariant *value;
 330   gchar *printed;
 331
 332   value = g_settings_get_value (global_settings, global_key);
 333   printed = g_variant_print (value, TRUE);
 334   g_print ("%s\n", printed);
 335   g_variant_unref (value);
 336   g_free (printed);
 337 }
 338
 339 static void
 340 gsettings_reset (void)
 341 {
 342   g_settings_reset (global_settings, global_key);
 343   g_settings_sync ();
 344 }
 345
 346 static void
 347 reset_all_keys (GSettings *settings)
 348 {
 349   gchar **keys;
 350   gint i;
 351
 352   keys = g_settings_list_keys (settings);
 353   for (i = 0; keys[i]; i++)
 354     {
 355       g_settings_reset (settings, keys[i]);
 356     }
 357
 358   g_strfreev (keys);
 359 }
 360
 361 static void
 362 gsettings_reset_recursively (void)
 363 {
 364   gchar **children;
 365   gint i;
 366
 367   g_settings_delay (global_settings);
 368
 369   reset_all_keys (global_settings);
 370   children = g_settings_list_children (global_settings);
 371   for (i = 0; children[i]; i++)
 372     {
 373       GSettings *child;
 374       child = g_settings_get_child (global_settings, children[i]);
 375
 376       reset_all_keys (child);
 377
 378       g_object_unref (child);
 379     }
 380
 381   g_strfreev (children);
 382
 383   g_settings_apply (global_settings);
 384   g_settings_sync ();
 385 }
 386
 387 static void
 388 gsettings_writable (void)
 389 {
 390   g_print ("%s\n",
 391            g_settings_is_writable (global_settings, global_key) ?
 392            "true" : "false");
 393 }
 394
 395 static void
 396 value_changed (GSettings   *settings,
 397                const gchar *key,
 398                gpointer     user_data)
 399 {
 400   GVariant *value;
 401   gchar *printed;
 402
 403   value = g_settings_get_value (settings, key);
 404   printed = g_variant_print (value, TRUE);
 405   g_print ("%s: %s\n", key, printed);
 406   g_variant_unref (value);
 407   g_free (printed);
 408 }
 409
 410 static void
 411 gsettings_monitor (void)
 412 {
 413   if (global_key)
 414     {
 415       gchar *name;
 416
 417       name = g_strdup_printf ("changed::%s", global_key);
 418       g_signal_connect (global_settings, name, G_CALLBACK (value_changed), NULL);
 419     }
 420   else
 421     g_signal_connect (global_settings, "changed", G_CALLBACK (value_changed), NULL);
 422
 423   g_main_loop_run (g_main_loop_new (NULL, FALSE));
 424 }
 425
 426 static void
 427 gsettings_set (void)
 428 {
 429   const GVariantType *type;
 430   GError *error = NULL;
 431   GVariant *new;
 432   gchar *freeme = NULL;
 433
 434   type = g_settings_schema_key_get_value_type (global_schema_key);
 435
 436   new = g_variant_parse (type, global_value, NULL, NULL, &error);
 437
 438   /* If that didn't work and the type is string then we should assume
 439    * that the user is just trying to set a string directly and forgot
 440    * the quotes (or had them consumed by the shell).
 441    *
 442    * If the user started with a quote then we assume that some deeper
 443    * problem is at play and we want the failure in that case.
 444    *
 445    * Consider:
 446    *
 447    *   gsettings set x.y.z key "'i don't expect this to work'"
 448    *
 449    * Note that we should not just add quotes and try parsing again, but
 450    * rather assume that the user is providing us with a bare string.
 451    * Assume we added single quotes, then consider this case:
 452    *
 453    *   gsettings set x.y.z key "i'd expect this to work"
 454    *
 455    * A similar example could be given for double quotes.
 456    *
 457    * Avoid that whole mess by just using g_variant_new_string().
 458    */
 459   if (new == NULL &&
 460       g_variant_type_equal (type, G_VARIANT_TYPE_STRING) &&
 461       global_value[0] != '\'' && global_value[0] != '"')
 462     {
 463       g_clear_error (&error);
 464       new = g_variant_new_string (global_value);
 465     }
 466
 467   if (new == NULL)
 468     {
 469       g_printerr ("%s\n", error->message);
 470       exit (1);
 471     }
 472
 473   if (!g_settings_schema_key_range_check (global_schema_key, new))
 474     {
 475       g_printerr (_("The provided value is outside of the valid range\n"));
 476       g_variant_unref (new);
 477       exit (1);
 478     }
 479
 480   if (!g_settings_set_value (global_settings, global_key, new))
 481     {
 482       g_printerr (_("The key is not writable\n"));
 483       exit (1);
 484     }
 485
 486   g_settings_sync ();
 487
 488   g_free (freeme);
 489 }
 490
 491 static int
 492 gsettings_help (gboolean     requested,
 493                 const gchar *command)
 494 {
 495   const gchar *description;
 496   const gchar *synopsis;
 497   GString *string;
 498
 499   string = g_string_new (NULL);
 500
 501   if (command == NULL)
 502     ;
 503
 504   else if (strcmp (command, "help") == 0)
 505     {
 506       description = _("Print help");
 507       synopsis = "[COMMAND]";
 508     }
 509
 510   else if (strcmp (command, "--version") == 0)
 511     {
 512       description = _("Print version information and exit");
 513       synopsis = "";
 514     }
 515
 516   else if (strcmp (command, "list-schemas") == 0)
 517     {
 518       description = _("List the installed (non-relocatable) schemas");
 519       synopsis = "";
 520     }
 521
 522   else if (strcmp (command, "list-relocatable-schemas") == 0)
 523     {
 524       description = _("List the installed relocatable schemas");
 525       synopsis = "";
 526     }
 527
 528   else if (strcmp (command, "list-keys") == 0)
 529     {
 530       description = _("List the keys in SCHEMA");
 531       synopsis = N_("SCHEMA[:PATH]");
 532     }
 533
 534   else if (strcmp (command, "list-children") == 0)
 535     {
 536       description = _("List the children of SCHEMA");
 537       synopsis = N_("SCHEMA[:PATH]");
 538     }
 539
 540   else if (strcmp (command, "list-recursively") == 0)
 541     {
 542       description = _("List keys and values, recursively\n"
 543                       "If no SCHEMA is given, list all keys\n");
 544       synopsis = N_("[SCHEMA[:PATH]]");
 545     }
 546
 547   else if (strcmp (command, "get") == 0)
 548     {
 549       description = _("Get the value of KEY");
 550       synopsis = N_("SCHEMA[:PATH] KEY");
 551     }
 552
 553   else if (strcmp (command, "range") == 0)
 554     {
 555       description = _("Query the range of valid values for KEY");
 556       synopsis = N_("SCHEMA[:PATH] KEY");
 557     }
 558
 559   else if (strcmp (command, "set") == 0)
 560     {
 561       description = _("Set the value of KEY to VALUE");
 562       synopsis = N_("SCHEMA[:PATH] KEY VALUE");
 563     }
 564
 565   else if (strcmp (command, "reset") == 0)
 566     {
 567       description = _("Reset KEY to its default value");
 568       synopsis = N_("SCHEMA[:PATH] KEY");
 569     }
 570
 571   else if (strcmp (command, "reset-recursively") == 0)
 572     {
 573       description = _("Reset all keys in SCHEMA to their defaults");
 574       synopsis = N_("SCHEMA[:PATH]");
 575     }
 576
 577   else if (strcmp (command, "writable") == 0)
 578     {
 579       description = _("Check if KEY is writable");
 580       synopsis = N_("SCHEMA[:PATH] KEY");
 581     }
 582
 583   else if (strcmp (command, "monitor") == 0)
 584     {
 585       description = _("Monitor KEY for changes.\n"
 586                     "If no KEY is specified, monitor all keys in SCHEMA.\n"
 587                     "Use ^C to stop monitoring.\n");
 588       synopsis = N_("SCHEMA[:PATH] [KEY]");
 589     }
 590   else
 591     {
 592       g_string_printf (string, _("Unknown command %s\n\n"), command);
 593       requested = FALSE;
 594       command = NULL;
 595     }
 596
 597   if (command == NULL)
 598     {
 599       g_string_append (string,
 600       _("Usage:\n"
 601         "  gsettings --version\n"
 602         "  gsettings [--schemadir SCHEMADIR] COMMAND [ARGS...]\n"
 603         "\n"
 604         "Commands:\n"
 605         "  help                      Show this information\n"
 606         "  list-schemas              List installed schemas\n"
 607         "  list-relocatable-schemas  List relocatable schemas\n"
 608         "  list-keys                 List keys in a schema\n"
 609         "  list-children             List children of a schema\n"
 610         "  list-recursively          List keys and values, recursively\n"
 611         "  range                     Queries the range of a key\n"
 612         "  get                       Get the value of a key\n"
 613         "  set                       Set the value of a key\n"
 614         "  reset                     Reset the value of a key\n"
 615         "  reset-recursively         Reset all values in a given schema\n"
 616         "  writable                  Check if a key is writable\n"
 617         "  monitor                   Watch for changes\n"
 618         "\n"
 619         "Use 'gsettings help COMMAND' to get detailed help.\n\n"));
 620     }
 621   else
 622     {
 623       g_string_append_printf (string, _("Usage:\n  gsettings [--schemadir SCHEMADIR] %s %s\n\n%s\n\n"),
 624                               command, synopsis[0] ? _(synopsis) : "", description);
 625
 626       g_string_append (string, _("Arguments:\n"));
 627
 628       g_string_append (string,
 629                        _("  SCHEMADIR A directory to search for additional schemas\n"));
 630
 631       if (strstr (synopsis, "[COMMAND]"))
 632         g_string_append (string,
 633                        _("  COMMAND   The (optional) command to explain\n"));
 634
 635       else if (strstr (synopsis, "SCHEMA"))
 636         g_string_append (string,
 637                        _("  SCHEMA    The name of the schema\n"
 638                          "  PATH      The path, for relocatable schemas\n"));
 639
 640       if (strstr (synopsis, "[KEY]"))
 641         g_string_append (string,
 642                        _("  KEY       The (optional) key within the schema\n"));
 643
 644       else if (strstr (synopsis, "KEY"))
 645         g_string_append (string,
 646                        _("  KEY       The key within the schema\n"));
 647
 648       if (strstr (synopsis, "VALUE"))
 649         g_string_append (string,
 650                        _("  VALUE     The value to set\n"));
 651
 652       g_string_append (string, "\n");
 653     }
 654
 655   if (requested)
 656     g_print ("%s", string->str);
 657   else
 658     g_printerr ("%s\n", string->str);
 659
 660   g_string_free (string, TRUE);
 661
 662   return requested ? 0 : 1;
 663 }
 664
 665
 666 int
 667 main (int argc, char **argv)
 668 {
 669   void (* function) (void);
 670
 671 #ifdef G_OS_WIN32
 672   gchar *tmp;
 673 #endif
 674
 675   setlocale (LC_ALL, "");
 676   textdomain (GETTEXT_PACKAGE);
 677
 678 #ifdef G_OS_WIN32
 679   tmp = _glib_get_locale_dir ();
 680   bindtextdomain (GETTEXT_PACKAGE, tmp);
 681   g_free (tmp);
 682 #else
 683   bindtextdomain (GETTEXT_PACKAGE, GLIB_LOCALE_DIR);
 684 #endif
 685
 686 #ifdef HAVE_BIND_TEXTDOMAIN_CODESET
 687   bind_textdomain_codeset (GETTEXT_PACKAGE, "UTF-8");
 688 #endif
 689
 690   if (argc < 2)
 691     return gsettings_help (FALSE, NULL);
 692
 693   global_schema_source = g_settings_schema_source_ref (g_settings_schema_source_get_default ());
 694
 695   if (argc > 3 && g_str_equal (argv[1], "--schemadir"))
 696     {
 697       GSettingsSchemaSource *parent = global_schema_source;
 698       GError *error = NULL;
 699
 700       global_schema_source = g_settings_schema_source_new_from_directory (argv[2], parent, FALSE, &error);
 701       g_settings_schema_source_unref (parent);
 702
 703       if (global_schema_source == NULL)
 704         {
 705           g_printerr (_("Could not load schemas from %s: %s\n"), argv[2], error->message);
 706           g_clear_error (&error);
 707
 708           return 1;
 709         }
 710
 711       /* shift remaining arguments (not correct wrt argv[0], but doesn't matter) */
 712       argv = argv + 2;
 713       argc -= 2;
 714     }
 715
 716   if (strcmp (argv[1], "help") == 0)
 717     return gsettings_help (TRUE, argv[2]);
 718
 719   else if (argc == 2 && strcmp (argv[1], "--version") == 0)
 720     function = gsettings_print_version;
 721
 722   else if (argc == 2 && strcmp (argv[1], "list-schemas") == 0)
 723     function = gsettings_list_schemas;
 724
 725   else if (argc == 2 && strcmp (argv[1], "list-relocatable-schemas") == 0)
 726     function = gsettings_list_relocatable_schemas;
 727
 728   else if (argc == 3 && strcmp (argv[1], "list-keys") == 0)
 729     function = gsettings_list_keys;
 730
 731   else if (argc == 3 && strcmp (argv[1], "list-children") == 0)
 732     function = gsettings_list_children;
 733
 734   else if ((argc == 2 || argc == 3) && strcmp (argv[1], "list-recursively") == 0)
 735     function = gsettings_list_recursively;
 736
 737   else if (argc == 4 && strcmp (argv[1], "range") == 0)
 738     function = gsettings_range;
 739
 740   else if (argc == 4 && strcmp (argv[1], "get") == 0)
 741     function = gsettings_get;
 742
 743   else if (argc == 5 && strcmp (argv[1], "set") == 0)
 744     function = gsettings_set;
 745
 746   else if (argc == 4 && strcmp (argv[1], "reset") == 0)
 747     function = gsettings_reset;
 748
 749   else if (argc == 3 && strcmp (argv[1], "reset-recursively") == 0)
 750     function = gsettings_reset_recursively;
 751
 752   else if (argc == 4 && strcmp (argv[1], "writable") == 0)
 753     function = gsettings_writable;
 754
 755   else if ((argc == 3 || argc == 4) && strcmp (argv[1], "monitor") == 0)
 756     function = gsettings_monitor;
 757
 758   else
 759     return gsettings_help (FALSE, argv[1]);
 760
 761   if (argc > 2)
 762     {
 763       gchar **parts;
 764
 765       if (argv[2][0] == '\0')
 766         {
 767           g_printerr (_("Empty schema name given\n"));
 768           return 1;
 769         }
 770
 771       parts = g_strsplit (argv[2], ":", 2);
 772
 773       global_schema = g_settings_schema_source_lookup (global_schema_source, parts[0], TRUE);
 774       if (parts[1])
 775         {
 776           if (!check_relocatable_schema (global_schema, parts[0]) || !check_path (parts[1]))
 777             return 1;
 778
 779           global_settings = g_settings_new_full (global_schema, NULL, parts[1]);
 780         }
 781       else
 782         {
 783           if (!check_schema (global_schema, parts[0]))
 784             return 1;
 785
 786           global_settings = g_settings_new_full (global_schema, NULL, NULL);
 787         }
 788
 789       g_strfreev (parts);
 790     }
 791
 792   if (argc > 3)
 793     {
 794       if (!g_settings_schema_has_key (global_schema, argv[3]))
 795         {
 796           g_printerr (_("No such key '%s'\n"), argv[3]);
 797           return 1;
 798         }
 799
 800       global_key = argv[3];
 801       global_schema_key = g_settings_schema_get_key (global_schema, global_key);
 802     }
 803
 804   if (argc > 4)
 805     global_value = argv[4];
 806
 807   (* function) ();
 808
 809
 810   g_clear_pointer (&global_schema_source, g_settings_schema_source_unref);
 811   g_clear_pointer (&global_schema_key, g_settings_schema_key_unref);
 812   g_clear_pointer (&global_schema, g_settings_schema_unref);
 813   g_clear_object (&global_settings);
 814
 815   return 0;
 816 }