GtkSourceStyleManager
Yevgen Muntyan
parent
7786784903
commit
e58b1691d5
|
|
@ -0,0 +1,456 @@
|
|||
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8; coding: utf-8 -*-
|
||||
* gtksourcestylemanager.c
|
||||
*
|
||||
* Copyright (C) 2003 - Paolo Maggi <paolo.maggi@polito.it>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Library 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 Library General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Library General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
*/
|
||||
|
||||
#include "gtksourcestylemanager.h"
|
||||
#include "gtksourceview-marshal.h"
|
||||
#include <string.h>
|
||||
|
||||
#define SCHEME_FILE_SUFFIX ".styles"
|
||||
#define SOURCEVIEW_DIR "gtksourceview-2.0"
|
||||
#define STYLES_DIR "styles"
|
||||
|
||||
|
||||
struct _GtkSourceStyleManagerPrivate
|
||||
{
|
||||
GSList *schemes;
|
||||
GSList *dirs;
|
||||
gboolean need_reload;
|
||||
};
|
||||
|
||||
enum {
|
||||
CHANGED,
|
||||
N_SIGNALS
|
||||
};
|
||||
|
||||
static guint signals[N_SIGNALS];
|
||||
|
||||
G_DEFINE_TYPE (GtkSourceStyleManager, gtk_source_style_manager, G_TYPE_OBJECT)
|
||||
|
||||
|
||||
static void gtk_source_style_manager_finalize (GObject *object);
|
||||
|
||||
|
||||
static void
|
||||
gtk_source_style_manager_class_init (GtkSourceStyleManagerClass *klass)
|
||||
{
|
||||
GObjectClass *object_class = G_OBJECT_CLASS (klass);
|
||||
|
||||
object_class->finalize = gtk_source_style_manager_finalize;
|
||||
|
||||
signals[CHANGED] = g_signal_new ("changed",
|
||||
G_OBJECT_CLASS_TYPE (object_class),
|
||||
G_SIGNAL_RUN_LAST,
|
||||
G_STRUCT_OFFSET (GtkSourceStyleManagerClass, changed),
|
||||
NULL, NULL,
|
||||
_gtksourceview_marshal_VOID__VOID,
|
||||
G_TYPE_NONE, 0);
|
||||
}
|
||||
|
||||
static void
|
||||
gtk_source_style_manager_init (GtkSourceStyleManager *mgr)
|
||||
{
|
||||
mgr->priv = g_new0 (GtkSourceStyleManagerPrivate, 1);
|
||||
mgr->priv->schemes = NULL;
|
||||
mgr->priv->dirs = NULL;
|
||||
mgr->priv->need_reload = TRUE;
|
||||
}
|
||||
|
||||
static void
|
||||
gtk_source_style_manager_finalize (GObject *object)
|
||||
{
|
||||
GtkSourceStyleManager *mgr;
|
||||
GSList *schemes;
|
||||
|
||||
mgr = GTK_SOURCE_STYLE_MANAGER (object);
|
||||
|
||||
schemes = mgr->priv->schemes;
|
||||
mgr->priv->schemes = NULL;
|
||||
g_slist_foreach (schemes, (GFunc) g_object_unref, NULL);
|
||||
g_slist_free (schemes);
|
||||
g_slist_foreach (mgr->priv->dirs, (GFunc) g_free, NULL);
|
||||
g_slist_free (mgr->priv->dirs);
|
||||
g_free (mgr->priv);
|
||||
|
||||
G_OBJECT_CLASS (gtk_source_style_manager_parent_class)->finalize (object);
|
||||
}
|
||||
|
||||
GtkSourceStyleManager *
|
||||
gtk_source_style_manager_new (void)
|
||||
{
|
||||
return g_object_new (GTK_TYPE_SOURCE_STYLE_MANAGER, NULL);
|
||||
}
|
||||
|
||||
static GSList *
|
||||
build_file_listing (const gchar *directory,
|
||||
GSList *filenames)
|
||||
{
|
||||
GDir *dir;
|
||||
const gchar *name;
|
||||
|
||||
dir = g_dir_open (directory, 0, NULL);
|
||||
|
||||
if (dir == NULL)
|
||||
return filenames;
|
||||
|
||||
while ((name = g_dir_read_name (dir)) != NULL)
|
||||
{
|
||||
gchar *full_path = g_build_filename (directory, name, NULL);
|
||||
|
||||
if (!g_file_test (full_path, G_FILE_TEST_IS_DIR) &&
|
||||
g_str_has_suffix (name, SCHEME_FILE_SUFFIX))
|
||||
{
|
||||
filenames = g_slist_prepend (filenames, full_path);
|
||||
}
|
||||
else
|
||||
{
|
||||
g_free (full_path);
|
||||
}
|
||||
}
|
||||
|
||||
g_dir_close (dir);
|
||||
|
||||
return filenames;
|
||||
}
|
||||
|
||||
static GSList *
|
||||
get_scheme_files (GtkSourceStyleManager *mgr)
|
||||
{
|
||||
gchar **dirs;
|
||||
guint n_dirs;
|
||||
guint i;
|
||||
GSList *files = NULL;
|
||||
|
||||
gtk_source_style_manager_get_search_path (mgr, &dirs, &n_dirs);
|
||||
|
||||
for (i = 0; i < n_dirs; ++i)
|
||||
files = build_file_listing (dirs[i], files);
|
||||
|
||||
g_strfreev (dirs);
|
||||
return files;
|
||||
}
|
||||
|
||||
static gboolean
|
||||
build_reference_chain (GtkSourceStyleScheme *scheme,
|
||||
GHashTable *hash,
|
||||
GSList **ret)
|
||||
{
|
||||
GSList *chain;
|
||||
gboolean retval = TRUE;
|
||||
|
||||
chain = g_slist_prepend (NULL, scheme);
|
||||
|
||||
while (TRUE)
|
||||
{
|
||||
GtkSourceStyleScheme *parent_scheme;
|
||||
const gchar *parent_id;
|
||||
|
||||
parent_id = _gtk_source_style_scheme_get_parent_id (scheme);
|
||||
|
||||
if (parent_id == NULL)
|
||||
break;
|
||||
|
||||
parent_scheme = g_hash_table_lookup (hash, parent_id);
|
||||
|
||||
if (parent_scheme == NULL)
|
||||
{
|
||||
g_warning ("unknown parent scheme %s in scheme %s",
|
||||
parent_id, gtk_source_style_scheme_get_id (scheme));
|
||||
retval = FALSE;
|
||||
break;
|
||||
}
|
||||
else if (g_slist_find (chain, parent_scheme) != NULL)
|
||||
{
|
||||
g_warning ("reference cycle in scheme %s", parent_id);
|
||||
retval = FALSE;
|
||||
break;
|
||||
}
|
||||
else
|
||||
{
|
||||
_gtk_source_style_scheme_set_parent (scheme, parent_scheme);
|
||||
}
|
||||
|
||||
chain = g_slist_prepend (chain, parent_scheme);
|
||||
scheme = parent_scheme;
|
||||
}
|
||||
|
||||
*ret = chain;
|
||||
return retval;
|
||||
}
|
||||
|
||||
static GSList *
|
||||
check_parents (GSList *schemes,
|
||||
GHashTable *hash)
|
||||
{
|
||||
GSList *to_check;
|
||||
|
||||
to_check = g_slist_copy (schemes);
|
||||
|
||||
while (to_check != NULL)
|
||||
{
|
||||
GSList *chain;
|
||||
gboolean valid;
|
||||
|
||||
valid = build_reference_chain (to_check->data, hash, &chain);
|
||||
|
||||
while (chain != NULL)
|
||||
{
|
||||
GtkSourceStyleScheme *scheme = chain->data;
|
||||
to_check = g_slist_remove (to_check, scheme);
|
||||
|
||||
if (!valid)
|
||||
{
|
||||
schemes = g_slist_remove (schemes, scheme);
|
||||
g_hash_table_remove (hash, gtk_source_style_scheme_get_id (scheme));
|
||||
g_object_unref (scheme);
|
||||
}
|
||||
|
||||
chain = g_slist_delete_link (chain, chain);
|
||||
}
|
||||
}
|
||||
|
||||
return schemes;
|
||||
}
|
||||
|
||||
void
|
||||
gtk_source_style_manager_reload (GtkSourceStyleManager *mgr)
|
||||
{
|
||||
GHashTable *schemes_hash;
|
||||
GSList *schemes;
|
||||
GSList *files;
|
||||
GtkSourceStyleScheme *def_scheme;
|
||||
|
||||
g_return_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (mgr));
|
||||
|
||||
schemes = mgr->priv->schemes;
|
||||
mgr->priv->schemes = NULL;
|
||||
g_slist_foreach (schemes, (GFunc) g_object_unref, NULL);
|
||||
g_slist_free (schemes);
|
||||
|
||||
files = get_scheme_files (mgr);
|
||||
schemes_hash = g_hash_table_new_full (g_str_hash, g_str_equal, g_free, g_object_unref);
|
||||
def_scheme = _gtk_source_style_scheme_default_new ();
|
||||
schemes = g_slist_prepend (NULL, def_scheme);
|
||||
g_hash_table_insert (schemes_hash, g_strdup (gtk_source_style_scheme_get_id (def_scheme)),
|
||||
g_object_ref (def_scheme));
|
||||
|
||||
while (files != NULL)
|
||||
{
|
||||
GtkSourceStyleScheme *scheme;
|
||||
gchar *filename = files->data;
|
||||
|
||||
files = g_slist_delete_link (files, files);
|
||||
|
||||
scheme = _gtk_source_style_scheme_new_from_file (filename);
|
||||
|
||||
if (scheme != NULL)
|
||||
{
|
||||
const gchar *id = gtk_source_style_scheme_get_id (scheme);
|
||||
GtkSourceStyleScheme *old;
|
||||
|
||||
old = g_hash_table_lookup (schemes_hash, id);
|
||||
|
||||
if (old != NULL)
|
||||
schemes = g_slist_remove (schemes, old);
|
||||
|
||||
schemes = g_slist_prepend (schemes, scheme);
|
||||
g_hash_table_insert (schemes_hash, g_strdup (id), g_object_ref (scheme));
|
||||
}
|
||||
|
||||
g_free (filename);
|
||||
}
|
||||
|
||||
schemes = check_parents (schemes, schemes_hash);
|
||||
g_hash_table_destroy (schemes_hash);
|
||||
|
||||
mgr->priv->schemes = schemes;
|
||||
mgr->priv->need_reload = FALSE;
|
||||
g_signal_emit (mgr, signals[CHANGED], 0);
|
||||
}
|
||||
|
||||
void
|
||||
gtk_source_style_manager_set_search_path (GtkSourceStyleManager *mgr,
|
||||
gchar **path,
|
||||
gint n_elements)
|
||||
{
|
||||
int i;
|
||||
|
||||
g_return_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (mgr));
|
||||
g_return_if_fail (path != NULL || n_elements == 0);
|
||||
|
||||
if (n_elements < 0)
|
||||
n_elements = g_strv_length (path);
|
||||
|
||||
g_slist_foreach (mgr->priv->dirs, (GFunc) g_free, NULL);
|
||||
mgr->priv->dirs = NULL;
|
||||
|
||||
for (i = 0; i < n_elements; ++i)
|
||||
mgr->priv->dirs = g_slist_prepend (mgr->priv->dirs, g_strdup (path[i]));
|
||||
|
||||
mgr->priv->dirs = g_slist_reverse (mgr->priv->dirs);
|
||||
mgr->priv->need_reload = TRUE;
|
||||
}
|
||||
|
||||
void
|
||||
gtk_source_style_manager_get_search_path (GtkSourceStyleManager *mgr,
|
||||
gchar ***path,
|
||||
guint *n_elements)
|
||||
{
|
||||
guint n, i;
|
||||
GSList *l;
|
||||
|
||||
g_return_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (mgr));
|
||||
g_return_if_fail (path != NULL);
|
||||
|
||||
if (mgr->priv->dirs == NULL)
|
||||
{
|
||||
const gchar * const *xdg_dirs;
|
||||
|
||||
mgr->priv->dirs = g_slist_prepend (NULL,
|
||||
g_build_filename (g_get_user_config_dir (),
|
||||
SOURCEVIEW_DIR,
|
||||
STYLES_DIR,
|
||||
NULL));
|
||||
|
||||
for (xdg_dirs = g_get_system_data_dirs (); xdg_dirs && *xdg_dirs; ++xdg_dirs)
|
||||
mgr->priv->dirs = g_slist_prepend (mgr->priv->dirs,
|
||||
g_build_filename (*xdg_dirs,
|
||||
SOURCEVIEW_DIR,
|
||||
STYLES_DIR,
|
||||
NULL));
|
||||
|
||||
mgr->priv->dirs = g_slist_reverse (mgr->priv->dirs);
|
||||
}
|
||||
|
||||
n = g_slist_length (mgr->priv->dirs);
|
||||
*path = g_new0 (char*, n + 1);
|
||||
|
||||
for (i = 0, l = mgr->priv->dirs; l != NULL; ++i, l = l->next)
|
||||
(*path)[i] = g_strdup (l->data);
|
||||
|
||||
if (n_elements != NULL)
|
||||
*n_elements = n;
|
||||
}
|
||||
|
||||
void
|
||||
gtk_source_style_manager_append_search_path (GtkSourceStyleManager *manager,
|
||||
const gchar *directory)
|
||||
{
|
||||
char **dirs, **new_dirs;
|
||||
guint n_dirs;
|
||||
|
||||
g_return_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (manager));
|
||||
g_return_if_fail (directory != NULL);
|
||||
|
||||
gtk_source_style_manager_get_search_path (manager, &dirs, &n_dirs);
|
||||
new_dirs = g_new (char*, n_dirs + 2);
|
||||
|
||||
if (n_dirs)
|
||||
memcpy (new_dirs, dirs, n_dirs * sizeof(char*));
|
||||
|
||||
new_dirs[n_dirs] = (char*) directory;
|
||||
new_dirs[n_dirs + 1] = NULL;
|
||||
|
||||
gtk_source_style_manager_set_search_path (manager, new_dirs, n_dirs + 1);
|
||||
|
||||
g_strfreev (dirs);
|
||||
g_free (new_dirs);
|
||||
}
|
||||
|
||||
void
|
||||
gtk_source_style_manager_prepend_search_path (GtkSourceStyleManager *manager,
|
||||
const gchar *directory)
|
||||
{
|
||||
char **dirs, **new_dirs;
|
||||
guint n_dirs;
|
||||
|
||||
g_return_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (manager));
|
||||
g_return_if_fail (directory != NULL);
|
||||
|
||||
gtk_source_style_manager_get_search_path (manager, &dirs, &n_dirs);
|
||||
new_dirs = g_new (char*, n_dirs + 2);
|
||||
|
||||
if (n_dirs)
|
||||
memcpy (new_dirs + 1, dirs, n_dirs * sizeof(char*));
|
||||
|
||||
new_dirs[0] = (char*) directory;
|
||||
new_dirs[n_dirs + 1] = NULL;
|
||||
|
||||
gtk_source_style_manager_set_search_path (manager, new_dirs, n_dirs + 1);
|
||||
|
||||
g_strfreev (dirs);
|
||||
g_free (new_dirs);
|
||||
}
|
||||
|
||||
// gboolean
|
||||
// gtk_source_style_manager_add_scheme (GtkSourceStyleManager *manager,
|
||||
// const gchar *filename)
|
||||
// {
|
||||
// GtkSourceStyleScheme *scheme;
|
||||
//
|
||||
// g_return_val_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (manager), FALSE);
|
||||
// g_return_val_if_fail (filename != NULL, FALSE);
|
||||
//
|
||||
// scheme = _gtk_source_style_scheme_new_from_file (filename);
|
||||
//
|
||||
// if (scheme == NULL)
|
||||
// return FALSE;
|
||||
//
|
||||
// /* ??? */
|
||||
// }
|
||||
|
||||
static void
|
||||
reload_if_needed (GtkSourceStyleManager *mgr)
|
||||
{
|
||||
if (mgr->priv->need_reload)
|
||||
gtk_source_style_manager_reload (mgr);
|
||||
}
|
||||
|
||||
GSList *
|
||||
gtk_source_style_manager_list_schemes (GtkSourceStyleManager *mgr)
|
||||
{
|
||||
GSList *list;
|
||||
|
||||
g_return_val_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (mgr), NULL);
|
||||
|
||||
reload_if_needed (mgr);
|
||||
|
||||
list = g_slist_copy (mgr->priv->schemes);
|
||||
g_slist_foreach (list, (GFunc) g_object_ref, NULL);
|
||||
|
||||
return list;
|
||||
}
|
||||
|
||||
GtkSourceStyleScheme *
|
||||
gtk_source_style_manager_get_scheme (GtkSourceStyleManager *mgr,
|
||||
const gchar *scheme_id)
|
||||
{
|
||||
GSList *l;
|
||||
|
||||
g_return_val_if_fail (GTK_IS_SOURCE_STYLE_MANAGER (mgr), NULL);
|
||||
g_return_val_if_fail (scheme_id != NULL, NULL);
|
||||
|
||||
reload_if_needed (mgr);
|
||||
|
||||
for (l = mgr->priv->schemes; l != NULL; l = l->next)
|
||||
if (!strcmp (scheme_id, gtk_source_style_scheme_get_id (l->data)))
|
||||
return l->data;
|
||||
|
||||
return NULL;
|
||||
}
|
||||
|
|
@ -0,0 +1,89 @@
|
|||
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8; coding: utf-8 -*-
|
||||
* gtksourcestylemanager.h
|
||||
*
|
||||
* Copyright (C) 2003 - Paolo Maggi <paolo.maggi@polito.it>
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Library 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 Library General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Library General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
||||
*/
|
||||
|
||||
#ifndef __GTK_SOURCE_STYLE_MANAGER_H__
|
||||
#define __GTK_SOURCE_STYLE_MANAGER_H__
|
||||
|
||||
#include <gtksourceview/gtksourcestylescheme.h>
|
||||
|
||||
G_BEGIN_DECLS
|
||||
|
||||
#define GTK_TYPE_SOURCE_STYLE_MANAGER (gtk_source_style_manager_get_type ())
|
||||
#define GTK_SOURCE_STYLE_MANAGER(obj) (GTK_CHECK_CAST ((obj), GTK_TYPE_SOURCE_STYLE_MANAGER, GtkSourceStyleManager))
|
||||
#define GTK_SOURCE_STYLE_MANAGER_CLASS(klass) (GTK_CHECK_CLASS_CAST ((klass), GTK_TYPE_SOURCE_STYLE_MANAGER, GtkSourceStyleManagerClass))
|
||||
#define GTK_IS_SOURCE_STYLE_MANAGER(obj) (GTK_CHECK_TYPE ((obj), GTK_TYPE_SOURCE_STYLE_MANAGER))
|
||||
#define GTK_IS_SOURCE_STYLE_MANAGER_CLASS(klass) (GTK_CHECK_CLASS_TYPE ((klass), GTK_TYPE_SOURCE_STYLE_MANAGER))
|
||||
|
||||
|
||||
typedef struct _GtkSourceStyleManager GtkSourceStyleManager;
|
||||
typedef struct _GtkSourceStyleManagerClass GtkSourceStyleManagerClass;
|
||||
typedef struct _GtkSourceStyleManagerPrivate GtkSourceStyleManagerPrivate;
|
||||
|
||||
struct _GtkSourceStyleManager
|
||||
{
|
||||
GObject parent;
|
||||
|
||||
GtkSourceStyleManagerPrivate *priv;
|
||||
};
|
||||
|
||||
struct _GtkSourceStyleManagerClass
|
||||
{
|
||||
GObjectClass parent_class;
|
||||
|
||||
void (*changed) (GtkSourceStyleManager *mgr);
|
||||
};
|
||||
|
||||
|
||||
GType gtk_source_style_manager_get_type (void) G_GNUC_CONST;
|
||||
|
||||
GtkSourceStyleManager *gtk_source_style_manager_new (void);
|
||||
|
||||
void gtk_source_style_manager_set_search_path (GtkSourceStyleManager *manager,
|
||||
gchar **path,
|
||||
gint n_elements);
|
||||
void gtk_source_style_manager_get_search_path (GtkSourceStyleManager *manager,
|
||||
gchar ***path,
|
||||
guint *n_elements);
|
||||
|
||||
void gtk_source_style_manager_append_search_path (GtkSourceStyleManager *manager,
|
||||
const gchar *path);
|
||||
void gtk_source_style_manager_prepend_search_path (GtkSourceStyleManager *manager,
|
||||
const gchar *path);
|
||||
|
||||
void gtk_source_style_manager_reload (GtkSourceStyleManager *manager);
|
||||
|
||||
/* Do we need to add a GError? I don't think so, we can print a warning message on the terminal */
|
||||
gboolean gtk_source_style_manager_add_scheme (GtkSourceStyleManager *manager,
|
||||
const gchar *filename);
|
||||
|
||||
/* Newly allocated list of schemes (to free: unref each one and call g_slist_free) */
|
||||
GSList *gtk_source_style_manager_list_schemes (GtkSourceStyleManager *manager);
|
||||
|
||||
GtkSourceStyleScheme *gtk_source_style_manager_get_scheme (GtkSourceStyleManager *manager,
|
||||
const gchar *scheme_id);
|
||||
|
||||
GtkSourceStyleScheme *gtk_source_style_manager_get_default_scheme (GtkSourceStyleManager *manager);
|
||||
void gtk_source_style_manager_set_default_scheme (GtkSourceStyleManager *manager,
|
||||
GtkSourceStyleScheme *scheme);
|
||||
|
||||
G_END_DECLS
|
||||
|
||||
#endif /* __GTK_SOURCE_STYLE_MANAGER_H__ */
|
||||
|
||||
Loading…
Reference in New Issue