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