chiark - git - mdw - mgLib/blob - 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