Change license from GPLv2+ to GPLv3+.
[pspp-builds.git] / src / ui / gui / message-dialog.c
1 /* PSPPIRE - a graphical user interface for PSPP.
2    Copyright (C) 2004, 2005 Free Software Foundation, Inc.
3
4    This program is free software: you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation, either version 3 of the License, or
7    (at your option) any later version.
8
9    This program 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
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>. */
16
17
18 #include <stdio.h>
19 #include <stdarg.h>
20
21 #include <config.h>
22 #include <gettext.h>
23 #define _(msgid) gettext (msgid)
24 #define N_(msgid) msgid
25
26 #include <libpspp/message.h>
27 #include <libpspp/msg-locator.h>
28 #include "message-dialog.h"
29 #include "progname.h"
30
31
32 #include <gtk/gtk.h>
33 #include <glade/glade.h>
34 #include <glib.h>
35
36 #include "helper.h"
37
38 static void enqueue_msg (const struct msg *m);
39
40
41 static GQueue *message_queue;
42
43
44 void
45 message_dialog_init (struct source_stream *ss)
46 {
47   message_queue = g_queue_new ();
48   msg_init (ss, enqueue_msg);
49 }
50
51 void
52 message_dialog_done (void)
53 {
54   msg_done ();
55   g_queue_free (message_queue);
56 }
57
58 static gboolean
59 dequeue_message (gpointer data)
60 {
61   struct msg * m ;
62
63   /* If a pointer grab is in effect, then the combination of that, and
64      a modal dialog box, will cause an impossible situation.
65      So don't pop it up just yet.
66   */
67   if ( gdk_pointer_is_grabbed ())
68     return TRUE;
69
70   m = g_queue_pop_tail (message_queue);
71
72   if ( m )
73     {
74       popup_message (m);
75       msg_destroy (m);
76       return TRUE;
77     }
78
79   return FALSE;
80 }
81
82 static void
83 enqueue_msg (const struct msg *msg)
84 {
85   struct msg *m = msg_dup (msg);
86
87   g_queue_push_head (message_queue, m);
88
89   g_idle_add (dequeue_message, 0);
90 }
91
92
93 void
94 popup_message (const struct msg *m)
95 {
96   GtkWidget *dialog;
97   gchar *location = NULL;
98
99   gint message_type;
100   const char *msg;
101
102   switch (m->severity)
103     {
104     case MSG_ERROR:
105       message_type = GTK_MESSAGE_ERROR;
106       break;
107     case MSG_WARNING:
108       message_type = GTK_MESSAGE_WARNING;
109       break;
110     case MSG_NOTE:
111     default:
112       message_type = GTK_MESSAGE_INFO;
113       break;
114     };
115
116   switch (m->category)
117     {
118     case MSG_SYNTAX:
119       msg = _("Script Error");
120       break;
121
122     case MSG_DATA:
123       msg = _("Data File Error");
124       break;
125
126     case MSG_GENERAL:
127     default:
128       msg = _("PSPP Error");
129       break;
130     };
131
132   dialog = gtk_message_dialog_new ( NULL,
133                                   GTK_DIALOG_MODAL,
134                                   message_type,
135                                   GTK_BUTTONS_CLOSE,
136                                   msg);
137   if ( m->where.line_number != -1)
138     {
139       location = g_strdup_printf (_("%s (line %d)"),
140                                   m->where.file_name ? m->where.file_name : "",
141                                   m->where.line_number);
142     }
143   else
144     {
145       location = g_strdup_printf (_("%s"),
146                                   m->where.file_name ? m->where.file_name : "");    }
147
148   gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog),
149                                             _("%s %s"),
150                                             location,
151                                             m->text);
152   g_free (location);
153
154   gtk_window_set_keep_above (GTK_WINDOW (dialog), TRUE);
155
156   gtk_dialog_run (GTK_DIALOG (dialog));
157
158   gtk_widget_destroy (dialog);
159 }
160