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