debian: Fix package sections.
[mgLib] / msg.c
1 /* -*-c-*-
2 *
3 * $Id$
4 *
5 * Display a message and get an answer
6 *
7 * (c) 1998 Straylight/Edgeware
8 */
9
10 /*----- Licensing notice --------------------------------------------------*
11 *
12 * This file is part of the mgLib GTK utilities library.
13 *
14 * mgLib is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU Library General Public License as
16 * published by the Free Software Foundation; either version 2 of the
17 * License, or (at your option) any later version.
18 *
19 * mgLib is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU Library General Public License for more details.
23 *
24 * You should have received a copy of the GNU Library General Public
25 * License along with mgLib; if not, write to the Free
26 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
27 * MA 02111-1307, USA.
28 */
29
30 /*----- Header files ------------------------------------------------------*/
31
32 #include <stdarg.h>
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <string.h>
36
37 #include <gtk/gtk.h>
38
39 #include <mLib/alloc.h>
40 #include <mLib/dstr.h>
41
42 #include "cancel.h"
43 #include "mdwfocus.h"
44 #include "msg.h"
45
46 /*----- Static variables --------------------------------------------------*/
47
48 static int reply;
49 static int creply;
50
51 /*----- Main code ---------------------------------------------------------*/
52
53 /* --- @msg@ --- *
54 *
55 * Arguments: @const char *title@ = the title for the message box
56 * @const char *buttons@ = the button strings to display
57 * @const char *msg@ = the message skeleton string
58 *
59 * Returns: Index of the button selected.
60 *
61 * Use: Displays a message to the user in a nice dialogue box and
62 * returns the index of the button selected.
63 *
64 * The @msg@ argument is a @printf@-style format string, which
65 * contains the message to actually be shown. The @buttons@
66 * argument is a comma-separated list of buttons to be drawn,
67 * from right to left. A button name can be preceded with `:'
68 * to indicate that it's the default, or `~' if it's the
69 * `cancel' button. The return value is the zero-based index
70 * of the button selected.
71 */
72
73 static int close(GtkWidget *w, gpointer p)
74 {
75 reply = creply;
76 gtk_main_quit();
77 return (1);
78 }
79
80 static void click(GtkWidget *w, gpointer p)
81 {
82 reply = (int)p;
83 gtk_main_quit();
84 }
85
86 int msg(const char *title, const char *buttons, const char *msg, ...)
87 {
88 GtkWidget *dbox, *w;
89
90 /* --- Make most of the dialogue box --- */
91
92 dbox = gtk_dialog_new();
93 gtk_window_set_title(GTK_WINDOW(dbox), title);
94 gtk_signal_connect(GTK_OBJECT(dbox), "delete_event",
95 GTK_SIGNAL_FUNC(close), 0);
96 gtk_box_set_homogeneous(GTK_BOX(GTK_DIALOG(dbox)->action_area), 0);
97
98 /* --- Set up the message string --- */
99
100 {
101 dstr d = DSTR_INIT;
102 va_list ap;
103
104 va_start(ap, msg);
105 dstr_vputf(&d, msg, &ap);
106 va_end(ap);
107 w = gtk_label_new(d.buf);
108 gtk_label_set_justify(GTK_LABEL(w), GTK_JUSTIFY_LEFT);
109 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dbox)->vbox), w, 1, 1, 0);
110 gtk_window_position(GTK_WINDOW(dbox), GTK_WIN_POS_MOUSE);
111 gtk_widget_show(w);
112 gtk_misc_set_padding(GTK_MISC(w), 16, 16);
113 dstr_destroy(&d);
114 }
115
116 /* --- Set up the buttons --- */
117
118 {
119 char *p = xstrdup(buttons);
120 unsigned f = 0;
121 int i = 0;
122
123 #define f_ok 1u
124 #define f_cancel 2u
125 #define f_mdwfocus 4u
126
127 if (*p == '!') {
128 f |= f_mdwfocus;
129 p++;
130 }
131
132 creply = -1;
133
134 for (p = strtok(p, ","); p; p = strtok(0, ","), i++) {
135 unsigned ff = 0;
136 if (*p == ':') {
137 ff |= f_ok;
138 p++;
139 }
140 if (*p == '~') {
141 ff |= f_cancel;
142 creply = i;
143 p++;
144 }
145 w = gtk_button_new_with_label(p);
146 GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
147 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(dbox)->action_area), w, 0, 0, 0);
148 gtk_signal_connect(GTK_OBJECT(w), "clicked",
149 GTK_SIGNAL_FUNC(click), (gpointer)i);
150 if (ff & f_ok)
151 gtk_widget_grab_default(w);
152 if (ff & f_cancel)
153 cancel(GTK_WINDOW(dbox), w);
154 gtk_widget_show(w);
155 }
156 xfree(p);
157
158 /* --- Preflight checklist --- */
159
160 gtk_widget_realize(dbox);
161 if (f & f_mdwfocus)
162 mdwfocus(dbox);
163
164 #undef f_ok
165 #undef f_cancel
166 #undef f_mdwfocus
167 }
168
169 /* --- Ready --- */
170
171 gtk_grab_add(GTK_WIDGET(dbox));
172 gtk_widget_show(dbox);
173 gtk_main();
174 gtk_grab_remove(GTK_WIDGET(dbox));
175 gtk_widget_destroy(dbox);
176 return (reply);
177 }
178
179 /*----- That's all, folks -------------------------------------------------*/