Take advantage of new dynamic string macros.
[mgLib] / msg.c
1 /* -*-c-*-
2 *
3 * $Id: msg.c,v 1.7 1999/05/21 22:08:20 mdw Exp $
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 /*----- Revision history --------------------------------------------------*
31 *
32 * $Log: msg.c,v $
33 * Revision 1.7 1999/05/21 22:08:20 mdw
34 * Take advantage of new dynamic string macros.
35 *
36 * Revision 1.6 1999/05/06 19:51:48 mdw
37 * Reformatted the LGPL notice a little bit.
38 *
39 * Revision 1.5 1999/05/05 18:52:45 mdw
40 * Change licensing conditions to LGPL.
41 *
42 * Revision 1.4 1999/04/29 20:48:13 mdw
43 * Add documentation for `msg'.
44 *
45 * Revision 1.3 1999/03/25 23:36:10 mdw
46 * Compile to nothing in absence of GTK, for the benefit of parent packages
47 * which contain non-GTK-dependent parts.
48 *
49 * Revision 1.2 1998/12/15 23:48:06 mdw
50 * Use `dstr_putf' for formatting, rather than `sprintf'.
51 *
52 * Revision 1.1 1998/12/11 09:44:21 mdw
53 * Initial version.
54 *
55 */
56
57 #ifdef HAVE_GTK
58
59 /*----- Header files ------------------------------------------------------*/
60
61 #include <stdarg.h>
62 #include <stdio.h>
63 #include <stdlib.h>
64 #include <string.h>
65
66 #include <gtk/gtk.h>
67
68 #include <mLib/alloc.h>
69 #include <mLib/dstr.h>
70
71 #include "cancel.h"
72 #include "mdwfocus.h"
73 #include "msg.h"
74
75 /*----- Static variables --------------------------------------------------*/
76
77 static int reply;
78 static int creply;
79
80 /*----- Main code ---------------------------------------------------------*/
81
82 /* --- @msg@ --- *
83 *
84 * Arguments: @char *buttons@ = the button strings to display
85 * @char *msg@ = the message skeleton string
86 *
87 * Returns: Index of the button selected.
88 *
89 * Use: Displays a message to the user in a nice dialogue box and
90 * returns the index of the button selected.
91 *
92 * The @msg@ argument is a @printf@-style format string, which
93 * contains the message to actually be shown. The @buttons@
94 * argument is a comma-separated list of buttons to be drawn,
95 * from right to left. A button name can be preceded with `:'
96 * to indicate that it's the default, or `~' if it's the
97 * `cancel' button. The return value is the zero-based index
98 * of the button selected.
99 */
100
101 static int close(GtkWidget *w, gpointer p)
102 {
103 reply = creply;
104 gtk_main_quit();
105 return (1);
106 }
107
108 static void click(GtkWidget *w, gpointer p)
109 {
110 reply = (int)p;
111 gtk_main_quit();
112 }
113
114 int msg(const char *buttons, const char *msg, ...)
115 {
116 GtkWidget *dbox, *w;
117
118 /* --- Make most of the dialogue box --- */
119
120 dbox = gtk_dialog_new();
121 gtk_signal_connect(GTK_OBJECT(dbox), "delete_event",
122 GTK_SIGNAL_FUNC(close), 0);
123 gtk_box_set_homogeneous(GTK_BOX(GTK_DIALOG(dbox)->action_area), 0);
124
125 /* --- Set up the message string --- */
126
127 {
128 dstr d = DSTR_INIT;
129 va_list ap;
130
131 va_start(ap, msg);
132 dstr_vputf(&d, msg, ap);
133 va_end(ap);
134 w = gtk_label_new(d.buf);
135 gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dbox)->vbox), w, 1, 1, 0);
136 gtk_window_position(GTK_WINDOW(dbox), GTK_WIN_POS_MOUSE);
137 gtk_widget_show(w);
138 gtk_misc_set_padding(GTK_MISC(w), 16, 16);
139 dstr_destroy(&d);
140 }
141
142 /* --- Set up the buttons --- */
143
144 {
145 char *p = xstrdup(buttons);
146 unsigned f = 0;
147 int i = 0;
148
149 enum {
150 f_ok = 1,
151 f_cancel = 2,
152 f_mdwfocus = 4
153 };
154
155 if (*p == '!') {
156 f |= f_mdwfocus;
157 p++;
158 }
159
160 creply = -1;
161
162 for (p = strtok(p, ","); p; p = strtok(0, ","), i++) {
163 unsigned ff = 0;
164 if (*p == ':') {
165 ff |= f_ok;
166 p++;
167 }
168 if (*p == '~') {
169 ff |= f_cancel;
170 creply = i;
171 p++;
172 }
173 w = gtk_button_new_with_label(p);
174 GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
175 gtk_box_pack_end(GTK_BOX(GTK_DIALOG(dbox)->action_area), w, 0, 0, 0);
176 gtk_signal_connect(GTK_OBJECT(w), "clicked",
177 GTK_SIGNAL_FUNC(click), (gpointer)i);
178 if (ff & f_ok)
179 gtk_widget_grab_default(w);
180 if (ff & f_cancel)
181 cancel(GTK_WINDOW(dbox), w);
182 gtk_widget_show(w);
183 }
184 free(p);
185
186 /* --- Preflight checklist --- */
187
188 gtk_widget_realize(dbox);
189 if (f & f_mdwfocus)
190 mdwfocus(dbox);
191
192 }
193
194 /* --- Ready --- */
195
196 gtk_grab_add(GTK_WIDGET(dbox));
197 gtk_widget_show(dbox);
198 gtk_main();
199 gtk_grab_remove(GTK_WIDGET(dbox));
200 gtk_widget_destroy(dbox);
201 return (reply);
202 }
203
204 /*----- That's all, folks -------------------------------------------------*/
205
206 #else
207 int mgLib_msg = 0;
208 #endif