8 #include <glib/gstdio.h>
12 static GtkTextBuffer *info_buffer;
13 static GtkTextBuffer *source_buffer;
15 static gchar *current_file = NULL;
26 typedef struct _CallbackData CallbackData;
38 get_democodedir (void)
40 static char *result = NULL;
44 result = g_win32_get_package_installation_directory (NULL, NULL);
46 result = "unknown-location";
48 result = g_strconcat (result, "\\share\\gtk-2.0\\demo", NULL);
54 #define DEMOCODEDIR get_democodedir ()
60 * @base: base filename
61 * @err: location to store error, or %NULL.
63 * Looks for @base first in the current directory, then in the
64 * location GTK+ where it will be installed on make install,
65 * returns the first file found.
67 * Return value: the filename, if found or %NULL
70 demo_find_file (const char *base,
73 g_return_val_if_fail (err == NULL || *err == NULL, NULL);
75 if (g_file_test ("gtk-logo-rgb.gif", G_FILE_TEST_EXISTS) &&
76 g_file_test (base, G_FILE_TEST_EXISTS))
77 return g_strdup (base);
80 char *filename = g_build_filename (DEMOCODEDIR, base, NULL);
81 if (!g_file_test (filename, G_FILE_TEST_EXISTS))
83 g_set_error (err, G_FILE_ERROR, G_FILE_ERROR_NOENT,
84 "Cannot find demo data file \"%s\"", base);
93 window_closed_cb (GtkWidget *window, gpointer data)
95 CallbackData *cbdata = data;
99 gtk_tree_model_get_iter (cbdata->model, &iter, cbdata->path);
100 gtk_tree_model_get (GTK_TREE_MODEL (cbdata->model), &iter,
101 STYLE_COLUMN, &style,
103 if (style == PANGO_STYLE_ITALIC)
104 gtk_tree_store_set (GTK_TREE_STORE (cbdata->model), &iter,
105 STYLE_COLUMN, PANGO_STYLE_NORMAL,
108 gtk_tree_path_free (cbdata->path);
113 read_line (FILE *stream, GString *str)
117 #ifdef HAVE_FLOCKFILE
121 g_string_truncate (str, 0);
127 #ifdef HAVE_FLOCKFILE
128 c = getc_unlocked (stream);
143 #ifdef HAVE_FLOCKFILE
144 int next_c = getc_unlocked (stream);
146 int next_c = getc (stream);
149 if (!(next_c == EOF ||
150 (c == '\r' && next_c == '\n') ||
151 (c == '\n' && next_c == '\r')))
152 ungetc (next_c, stream);
157 g_string_append_c (str, c);
163 #ifdef HAVE_FLOCKFILE
164 funlockfile (stream);
171 /* Stupid syntax highlighting.
173 * No regex was used in the making of this highlighting.
174 * It should only work for simple cases. This is good, as
175 * that's all we should have in the demos.
177 /* This code should not be used elsewhere, except perhaps as an example of how
178 * to iterate through a text buffer.
185 static gchar *tokens[] =
192 static gchar *types[] =
226 "GtkColorSelection ",
240 static gchar *control[] =
254 parse_chars (gchar *text,
263 /* Handle comments first */
264 if (*state == STATE_IN_COMMENT)
266 *end_ptr = strstr (text, "*/");
270 *state = STATE_NORMAL;
279 /* check for comment */
280 if (!strncmp (text, "/*", 2))
282 *end_ptr = strstr (text, "*/");
286 *state = STATE_IN_COMMENT;
291 /* check for preprocessor defines */
292 if (*text == '#' && start)
295 *tag = "preprocessor";
300 if (start && * text != '\t' && *text != ' ' && *text != '{' && *text != '}')
302 if (strstr (text, "("))
304 *end_ptr = strstr (text, "(");
309 /* check for types */
310 for (i = 0; types[i] != NULL; i++)
311 if (!strncmp (text, types[i], strlen (types[i])))
313 *end_ptr = text + strlen (types[i]);
318 /* check for control */
319 for (i = 0; control[i] != NULL; i++)
320 if (!strncmp (text, control[i], strlen (control[i])))
322 *end_ptr = text + strlen (control[i]);
327 /* check for string */
330 gint maybe_escape = FALSE;
334 while (**end_ptr != '\000')
336 if (**end_ptr == '\"' && !maybe_escape)
341 if (**end_ptr == '\\')
344 maybe_escape = FALSE;
350 /* not at the start of a tag. Find the next one. */
351 for (i = 0; tokens[i] != NULL; i++)
353 next_token = strstr (text, tokens[i]);
357 *end_ptr = (*end_ptr<next_token)?*end_ptr:next_token;
359 *end_ptr = next_token;
363 for (i = 0; types[i] != NULL; i++)
365 next_token = strstr (text, types[i]);
369 *end_ptr = (*end_ptr<next_token)?*end_ptr:next_token;
371 *end_ptr = next_token;
375 for (i = 0; control[i] != NULL; i++)
377 next_token = strstr (text, control[i]);
381 *end_ptr = (*end_ptr<next_token)?*end_ptr:next_token;
383 *end_ptr = next_token;
388 /* While not as cool as c-mode, this will do as a quick attempt at highlighting */
392 GtkTextIter start_iter, next_iter, tmp_iter;
395 gchar *start_ptr, *end_ptr;
398 state = STATE_NORMAL;
400 gtk_text_buffer_get_iter_at_offset (source_buffer, &start_iter, 0);
402 next_iter = start_iter;
403 while (gtk_text_iter_forward_line (&next_iter))
405 gboolean start = TRUE;
406 start_ptr = text = gtk_text_iter_get_text (&start_iter, &next_iter);
410 parse_chars (start_ptr, &end_ptr, &state, &tag, start);
415 tmp_iter = start_iter;
416 gtk_text_iter_forward_chars (&tmp_iter, end_ptr - start_ptr);
420 tmp_iter = next_iter;
423 gtk_text_buffer_apply_tag_by_name (source_buffer, tag, &start_iter, &tmp_iter);
425 start_iter = tmp_iter;
431 start_iter = next_iter;
436 load_file (const gchar *filename)
439 GtkTextIter start, end;
442 GString *buffer = g_string_new (NULL);
444 gboolean in_para = 0;
446 if (current_file && !strcmp (current_file, filename))
448 g_string_free (buffer, TRUE);
452 g_free (current_file);
453 current_file = g_strdup (filename);
455 gtk_text_buffer_get_bounds (info_buffer, &start, &end);
456 gtk_text_buffer_delete (info_buffer, &start, &end);
458 gtk_text_buffer_get_bounds (source_buffer, &start, &end);
459 gtk_text_buffer_delete (source_buffer, &start, &end);
461 full_filename = demo_find_file (filename, &err);
464 g_warning ("%s", err->message);
469 file = g_fopen (full_filename, "r");
472 g_warning ("Cannot open %s: %s\n", full_filename, g_strerror (errno));
474 g_free (full_filename);
479 gtk_text_buffer_get_iter_at_offset (info_buffer, &start, 0);
480 while (read_line (file, buffer))
482 gchar *p = buffer->str;
490 while (*p == '/' || *p == '*' || g_ascii_isspace (*p))
493 while (*r != '/' && strlen (r))
498 while (q > p && g_ascii_isspace (*(q - 1)))
503 int len_chars = g_utf8_pointer_to_offset (p, q);
507 g_assert (strlen (p) >= q - p);
508 gtk_text_buffer_insert (info_buffer, &end, p, q - p);
511 gtk_text_iter_backward_chars (&start, len_chars);
512 gtk_text_buffer_apply_tag_by_name (info_buffer, "title", &start, &end);
521 /* Reading body of info section */
522 while (g_ascii_isspace (*p))
524 if (*p == '*' && *(p + 1) == '/')
526 gtk_text_buffer_get_iter_at_offset (source_buffer, &start, 0);
533 while (*p == '*' || g_ascii_isspace (*p))
537 while (g_ascii_isspace (*(p + len - 1)))
543 gtk_text_buffer_insert (info_buffer, &start, " ", 1);
545 g_assert (strlen (p) >= len);
546 gtk_text_buffer_insert (info_buffer, &start, p, len);
551 gtk_text_buffer_insert (info_buffer, &start, "\n", 1);
558 /* Skipping blank lines */
559 while (g_ascii_isspace (*p))
571 /* Reading program body */
572 gtk_text_buffer_insert (source_buffer, &start, p, -1);
573 gtk_text_buffer_insert (source_buffer, &start, "\n", 1);
580 g_string_free (buffer, TRUE);
584 row_activated_cb (GtkTreeView *tree_view,
586 GtkTreeViewColumn *column)
594 model = gtk_tree_view_get_model (tree_view);
596 gtk_tree_model_get_iter (model, &iter, path);
597 gtk_tree_model_get (GTK_TREE_MODEL (model),
600 STYLE_COLUMN, &style,
605 gtk_tree_store_set (GTK_TREE_STORE (model),
607 STYLE_COLUMN, (style == PANGO_STYLE_ITALIC ? PANGO_STYLE_NORMAL : PANGO_STYLE_ITALIC),
609 window = (func) (gtk_widget_get_toplevel (GTK_WIDGET (tree_view)));
613 CallbackData *cbdata;
615 cbdata = g_new (CallbackData, 1);
616 cbdata->model = model;
617 cbdata->path = gtk_tree_path_copy (path);
619 g_signal_connect (window, "destroy",
620 G_CALLBACK (window_closed_cb), cbdata);
626 selection_cb (GtkTreeSelection *selection,
630 GValue value = {0, };
632 if (! gtk_tree_selection_get_selected (selection, NULL, &iter))
635 gtk_tree_model_get_value (model, &iter,
638 if (g_value_get_string (&value))
639 load_file (g_value_get_string (&value));
640 g_value_unset (&value);
644 create_text (GtkTextBuffer **buffer,
647 GtkWidget *scrolled_window;
648 GtkWidget *text_view;
649 PangoFontDescription *font_desc;
651 scrolled_window = gtk_scrolled_window_new (NULL, NULL);
652 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
653 GTK_POLICY_AUTOMATIC,
654 GTK_POLICY_AUTOMATIC);
655 gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (scrolled_window),
658 text_view = gtk_text_view_new ();
660 *buffer = gtk_text_buffer_new (NULL);
661 gtk_text_view_set_buffer (GTK_TEXT_VIEW (text_view), *buffer);
662 gtk_text_view_set_editable (GTK_TEXT_VIEW (text_view), FALSE);
663 gtk_text_view_set_cursor_visible (GTK_TEXT_VIEW (text_view), FALSE);
665 gtk_container_add (GTK_CONTAINER (scrolled_window), text_view);
669 font_desc = pango_font_description_from_string ("monospace");
670 gtk_widget_modify_font (text_view, font_desc);
671 pango_font_description_free (font_desc);
673 gtk_text_view_set_wrap_mode (GTK_TEXT_VIEW (text_view),
678 /* Make it a bit nicer for text. */
679 gtk_text_view_set_wrap_mode (GTK_TEXT_VIEW (text_view),
681 gtk_text_view_set_pixels_above_lines (GTK_TEXT_VIEW (text_view),
683 gtk_text_view_set_pixels_below_lines (GTK_TEXT_VIEW (text_view),
687 return scrolled_window;
693 GtkTreeSelection *selection;
694 GtkCellRenderer *cell;
695 GtkWidget *tree_view;
696 GtkTreeViewColumn *column;
699 GtkWidget *box, *label, *scrolled_window;
701 Demo *d = testgtk_demos;
703 model = gtk_tree_store_new (NUM_COLUMNS, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_POINTER, G_TYPE_INT);
704 tree_view = gtk_tree_view_new ();
705 gtk_tree_view_set_model (GTK_TREE_VIEW (tree_view), GTK_TREE_MODEL (model));
706 selection = gtk_tree_view_get_selection (GTK_TREE_VIEW (tree_view));
708 gtk_tree_selection_set_mode (GTK_TREE_SELECTION (selection),
709 GTK_SELECTION_BROWSE);
710 gtk_widget_set_size_request (tree_view, 200, -1);
712 /* this code only supports 1 level of children. If we
713 * want more we probably have to use a recursing function.
717 Demo *children = d->children;
719 gtk_tree_store_append (GTK_TREE_STORE (model), &iter, NULL);
721 gtk_tree_store_set (GTK_TREE_STORE (model),
723 TITLE_COLUMN, d->title,
724 FILENAME_COLUMN, d->filename,
725 FUNC_COLUMN, d->func,
726 STYLE_COLUMN, PANGO_STYLE_NORMAL,
734 while (children->title)
736 GtkTreeIter child_iter;
738 gtk_tree_store_append (GTK_TREE_STORE (model), &child_iter, &iter);
740 gtk_tree_store_set (GTK_TREE_STORE (model),
742 TITLE_COLUMN, children->title,
743 FILENAME_COLUMN, children->filename,
744 FUNC_COLUMN, children->func,
745 STYLE_COLUMN, PANGO_STYLE_NORMAL,
752 cell = gtk_cell_renderer_text_new ();
754 column = gtk_tree_view_column_new_with_attributes ("Widget (double click for demo)",
756 "text", TITLE_COLUMN,
757 "style", STYLE_COLUMN,
760 gtk_tree_view_append_column (GTK_TREE_VIEW (tree_view),
761 GTK_TREE_VIEW_COLUMN (column));
763 gtk_tree_model_get_iter_first (GTK_TREE_MODEL (model), &iter);
764 gtk_tree_selection_select_iter (GTK_TREE_SELECTION (selection), &iter);
766 g_signal_connect (selection, "changed", G_CALLBACK (selection_cb), model);
767 g_signal_connect (tree_view, "row_activated", G_CALLBACK (row_activated_cb), model);
769 gtk_tree_view_collapse_all (GTK_TREE_VIEW (tree_view));
770 gtk_tree_view_set_headers_visible (GTK_TREE_VIEW (tree_view), FALSE);
772 scrolled_window = gtk_scrolled_window_new (NULL, NULL);
773 gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
775 GTK_POLICY_AUTOMATIC);
776 gtk_container_add (GTK_CONTAINER (scrolled_window), tree_view);
778 label = gtk_label_new ("Widget (double click for demo)");
780 box = gtk_notebook_new ();
781 gtk_notebook_append_page (GTK_NOTEBOOK (box), scrolled_window, label);
783 gtk_widget_grab_focus (tree_view);
789 setup_default_icon (void)
798 filename = demo_find_file ("gtk-logo-rgb.gif", &err);
801 pixbuf = gdk_pixbuf_new_from_file (filename, &err);
805 /* Ignoring this error (passing NULL instead of &err above)
806 * would probably be reasonable for most apps. We're just
813 dialog = gtk_message_dialog_new (NULL, 0,
816 "Failed to read icon file: %s",
820 g_signal_connect (dialog, "response",
821 G_CALLBACK (gtk_widget_destroy), NULL);
827 GdkPixbuf *transparent;
829 /* The gtk-logo-rgb icon has a white background, make it transparent */
830 transparent = gdk_pixbuf_add_alpha (pixbuf, TRUE, 0xff, 0xff, 0xff);
833 list = g_list_append (list, transparent);
834 gtk_window_set_default_icon_list (list);
836 g_object_unref (pixbuf);
837 g_object_unref (transparent);
842 main (int argc, char **argv)
850 /* Most code in gtk-demo is intended to be exemplary, but not
851 * these few lines, which are just a hack so gtk-demo will work
852 * in the GTK tree without installing it.
854 if (g_file_test ("../../gdk-pixbuf/libpixbufloader-pnm.la",
857 g_setenv ("GDK_PIXBUF_MODULE_FILE", "../../gdk-pixbuf/gdk-pixbuf.loaders", TRUE);
858 g_setenv ("GTK_IM_MODULE_FILE", "../../modules/input/gtk.immodules", TRUE);
860 /* -- End of hack -- */
862 gtk_init (&argc, &argv);
864 setup_default_icon ();
866 window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
867 gtk_window_set_title (GTK_WINDOW (window), "GTK+ Code Demos");
868 g_signal_connect (window, "destroy",
869 G_CALLBACK (gtk_main_quit), NULL);
871 hbox = gtk_hbox_new (FALSE, 0);
872 gtk_container_add (GTK_CONTAINER (window), hbox);
874 tree = create_tree ();
875 gtk_box_pack_start (GTK_BOX (hbox), tree, FALSE, FALSE, 0);
877 notebook = gtk_notebook_new ();
878 gtk_box_pack_start (GTK_BOX (hbox), notebook, TRUE, TRUE, 0);
880 gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
881 create_text (&info_buffer, FALSE),
882 gtk_label_new_with_mnemonic ("_Info"));
884 gtk_notebook_append_page (GTK_NOTEBOOK (notebook),
885 create_text (&source_buffer, TRUE),
886 gtk_label_new_with_mnemonic ("_Source"));
888 tag = gtk_text_buffer_create_tag (info_buffer, "title",
892 tag = gtk_text_buffer_create_tag (source_buffer, "comment",
893 "foreground", "DodgerBlue",
895 tag = gtk_text_buffer_create_tag (source_buffer, "type",
896 "foreground", "ForestGreen",
898 tag = gtk_text_buffer_create_tag (source_buffer, "string",
899 "foreground", "RosyBrown",
900 "weight", PANGO_WEIGHT_BOLD,
902 tag = gtk_text_buffer_create_tag (source_buffer, "control",
903 "foreground", "purple",
905 tag = gtk_text_buffer_create_tag (source_buffer, "preprocessor",
906 "style", PANGO_STYLE_OBLIQUE,
907 "foreground", "burlywood4",
909 tag = gtk_text_buffer_create_tag (source_buffer, "function",
910 "weight", PANGO_WEIGHT_BOLD,
911 "foreground", "DarkGoldenrod4",
914 gtk_window_set_default_size (GTK_WINDOW (window), 600, 400);
915 gtk_widget_show_all (window);
918 load_file (testgtk_demos[0].filename);