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