From 0b0e6bc987da4fd88a7854ebb12bde705e92c428 Mon Sep 17 00:00:00 2001 From: Perberos Date: Thu, 1 Dec 2011 21:51:44 -0300 Subject: moving from https://github.com/perberos/mate-desktop-environment --- capplets/common/gtkrc-utils.c | 256 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 256 insertions(+) create mode 100644 capplets/common/gtkrc-utils.c (limited to 'capplets/common/gtkrc-utils.c') diff --git a/capplets/common/gtkrc-utils.c b/capplets/common/gtkrc-utils.c new file mode 100644 index 00000000..be03faa5 --- /dev/null +++ b/capplets/common/gtkrc-utils.c @@ -0,0 +1,256 @@ +/* + * Copyright (C) 2007 The MATE Foundation + * Written by Thomas Wood + * Jens Granseuer + * All Rights Reserved + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License along + * with this program; if not, write to the Free Software Foundation, Inc., + * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. + */ + +#ifdef HAVE_CONFIG_H +#include +#endif + +#include +#include +#include +#include +#include +#include + +#define INCLUDE_SYMBOL ((gpointer) 1) +#define ENGINE_SYMBOL ((gpointer) 2) +#define COLOR_SCHEME_SYMBOL ((gpointer) 3) + +gchar* gtkrc_find_named(const gchar* name) +{ + /* find the gtkrc of the named theme + * taken from gtkrc.c (gtk_rc_parse_named) + */ + gchar* path = NULL; + const gchar* home_dir; + const gchar* subpath = "gtk-2.0" G_DIR_SEPARATOR_S "gtkrc"; + + /* First look in the users home directory + */ + home_dir = g_get_home_dir(); + + if (home_dir) + { + path = g_build_filename(home_dir, ".themes", name, subpath, NULL); + + if (!g_file_test (path, G_FILE_TEST_EXISTS)) + { + g_free (path); + path = NULL; + } + } + + if (!path) + { + gchar* theme_dir = gtk_rc_get_theme_dir(); + path = g_build_filename(theme_dir, name, subpath, NULL); + g_free(theme_dir); + + if (!g_file_test(path, G_FILE_TEST_EXISTS)) + { + g_free (path); + path = NULL; + } + } + + return path; + +} + +void gtkrc_get_details(gchar* filename, GSList** engines, GSList** symbolic_colors) +{ + gint file = -1; + GSList* files = NULL; + GSList* read_files = NULL; + GTokenType token; + GScanner *scanner = g_scanner_new (NULL); + + g_scanner_scope_add_symbol (scanner, 0, "include", INCLUDE_SYMBOL); + + if (engines != NULL) + { + g_scanner_scope_add_symbol (scanner, 0, "engine", ENGINE_SYMBOL); + } + + files = g_slist_prepend (files, g_strdup (filename)); + + while (files != NULL) + { + filename = files->data; + files = g_slist_delete_link (files, files); + + if (filename == NULL) + continue; + + if (g_slist_find_custom (read_files, filename, (GCompareFunc) strcmp)) + { + g_warning ("Recursion in the gtkrc detected!"); + g_free (filename); + continue; /* skip this file since we've done it before... */ + } + + read_files = g_slist_prepend (read_files, filename); + + file = g_open (filename, O_RDONLY); + if (file == -1) + { + g_warning ("Could not open file \"%s\"", filename); + } + else + { + g_scanner_input_file (scanner, file); + while ((token = g_scanner_get_next_token (scanner)) != G_TOKEN_EOF) + { + GTokenType string_token; + if (token == '@') + { + if (symbolic_colors == NULL) + continue; + token = g_scanner_get_next_token (scanner); + if (token != G_TOKEN_IDENTIFIER) + continue; + if (!g_slist_find_custom (*symbolic_colors, scanner->value.v_identifier, (GCompareFunc) strcmp)) + *symbolic_colors = g_slist_append (*symbolic_colors, g_strdup (scanner->value.v_identifier)); + continue; + } + + if (token != G_TOKEN_SYMBOL) + continue; + + if (scanner->value.v_symbol == INCLUDE_SYMBOL) + { + string_token = g_scanner_get_next_token (scanner); + if (string_token != G_TOKEN_STRING) + continue; + if (g_path_is_absolute (scanner->value.v_string)) + { + files = g_slist_prepend (files, g_strdup (scanner->value.v_string)); + } + else + { + gchar *basedir = g_path_get_dirname (filename); + files = g_slist_prepend (files, g_build_path (G_DIR_SEPARATOR_S, basedir, scanner->value.v_string, NULL)); + g_free (basedir); + } + } + else if (scanner->value.v_symbol == ENGINE_SYMBOL) + { + string_token = g_scanner_get_next_token (scanner); + if (string_token != G_TOKEN_STRING || scanner->value.v_string[0] == '\0') + continue; + if (!g_slist_find_custom (*engines, scanner->value.v_string, (GCompareFunc) strcmp)) + *engines = g_slist_append (*engines, g_strdup (scanner->value.v_string)); + } + + } + close (file); + } + } + + g_slist_foreach (read_files, (GFunc) g_free, NULL); + g_slist_free (read_files); + + g_scanner_destroy (scanner); +} + + +gchar * +gtkrc_get_color_scheme (const gchar *gtkrc_file) +{ + gint file = -1; + gchar *result = NULL; + GSList *files = NULL; + GSList *read_files = NULL; + GTokenType token; + GScanner *scanner = gtk_rc_scanner_new (); + + g_scanner_scope_add_symbol (scanner, 0, "include", INCLUDE_SYMBOL); + g_scanner_scope_add_symbol (scanner, 0, "gtk_color_scheme", COLOR_SCHEME_SYMBOL); + g_scanner_scope_add_symbol (scanner, 0, "gtk-color-scheme", COLOR_SCHEME_SYMBOL); + + files = g_slist_prepend (files, g_strdup (gtkrc_file)); + while (files != NULL) + { + gchar *filename = files->data; + files = g_slist_delete_link (files, files); + + if (filename == NULL) + continue; + + if (g_slist_find_custom (read_files, filename, (GCompareFunc) strcmp)) + { + g_warning ("Recursion in the gtkrc detected!"); + g_free (filename); + continue; /* skip this file since we've done it before... */ + } + + read_files = g_slist_prepend (read_files, filename); + + file = g_open (filename, O_RDONLY); + if (file == -1) + { + g_warning ("Could not open file \"%s\"", filename); + } + else + { + g_scanner_input_file (scanner, file); + while ((token = g_scanner_get_next_token (scanner)) != G_TOKEN_EOF) + { + if (GINT_TO_POINTER (token) == COLOR_SCHEME_SYMBOL) + { + if (g_scanner_get_next_token (scanner) == '=') + { + token = g_scanner_get_next_token (scanner); + if (token == G_TOKEN_STRING) + { + g_free (result); + result = g_strdup (scanner->value.v_string); + } + } + } + } + close (file); + } + } + + g_slist_foreach (read_files, (GFunc) g_free, NULL); + g_slist_free (read_files); + + g_scanner_destroy (scanner); + return result; +} + +gchar* gtkrc_get_color_scheme_for_theme(const gchar* theme_name) +{ + /* try to find the color scheme from the gtkrc */ + gchar* gtkrc_file; + gchar* scheme = NULL; + + gtkrc_file = gtkrc_find_named(theme_name); + + if (gtkrc_file) + { + scheme = gtkrc_get_color_scheme(gtkrc_file); + g_free(gtkrc_file); + } + + return scheme; +} -- cgit v1.2.1