chiark - git - mdw - mgLib/blob - msg.c

   1 /* -*-c-*-
   2  *
   3  * $Id: msg.c,v 1.3 1999/03/25 23:36:10 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 General Public License as published by
  16  * the Free Software Foundation; either version 2 of the License, or
  17  * (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 General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with mgLib; if not, write to the Free Software Foundation,
  26  * 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.3  1999/03/25 23:36:10  mdw
  33  * Compile to nothing in absence of GTK, for the benefit of parent packages
  34  * which contain non-GTK-dependent parts.
  35  *
  36  * Revision 1.2  1998/12/15 23:48:06  mdw
  37  * Use `dstr_putf' for formatting, rather than `sprintf'.
  38  *
  39  * Revision 1.1  1998/12/11 09:44:21  mdw
  40  * Initial version.
  41  *
  42  */
  43
  44 #ifdef HAVE_GTK
  45
  46 /*----- Header files ------------------------------------------------------*/
  47
  48 #include <stdarg.h>
  49 #include <stdio.h>
  50 #include <stdlib.h>
  51 #include <string.h>
  52
  53 #include <gtk/gtk.h>
  54
  55 #include <mLib/alloc.h>
  56 #include <mLib/dstr.h>
  57
  58 #include "cancel.h"
  59 #include "mdwfocus.h"
  60 #include "msg.h"
  61
  62 /*----- Static variables --------------------------------------------------*/
  63
  64 static int reply;
  65 static int creply;
  66
  67 /*----- Main code ---------------------------------------------------------*/
  68
  69 /* --- @msg@ --- *
  70  *
  71  * Arguments:   @char *buttons@ = the button strings to display
  72  *              @char *msg@ = the message skeleton string
  73  *
  74  * Returns:     Index of the button selected.
  75  *
  76  * Use:         Displays a message to the user in a nice dialogue box and
  77  *              returns the index of the button selected.
  78  */
  79
  80 static int close(GtkWidget *w, gpointer p)
  81 {
  82   reply = creply;
  83   gtk_main_quit();
  84   return (1);
  85 }
  86
  87 static void click(GtkWidget *w, gpointer p)
  88 {
  89   reply = (int)p;
  90   gtk_main_quit();
  91 }
  92
  93 int msg(const char *buttons, const char *msg, ...)
  94 {
  95   GtkWidget *dbox, *w;
  96
  97   /* --- Make most of the dialogue box --- */
  98
  99   dbox = gtk_dialog_new();
 100   gtk_signal_connect(GTK_OBJECT(dbox), "delete_event",
 101                      GTK_SIGNAL_FUNC(close), 0);
 102   gtk_box_set_homogeneous(GTK_BOX(GTK_DIALOG(dbox)->action_area), 0);
 103
 104   /* --- Set up the message string --- */
 105
 106   {
 107     dstr d;
 108     va_list ap;
 109
 110     va_start(ap, msg);
 111     dstr_create(&d);
 112     dstr_vputf(&d, msg, ap);
 113     va_end(ap);
 114     w = gtk_label_new(d.buf);
 115     gtk_box_pack_start(GTK_BOX(GTK_DIALOG(dbox)->vbox), w, 1, 1, 0);
 116     gtk_window_position(GTK_WINDOW(dbox), GTK_WIN_POS_MOUSE);
 117     gtk_widget_show(w);
 118     gtk_misc_set_padding(GTK_MISC(w), 16, 16);
 119     dstr_destroy(&d);
 120   }
 121
 122   /* --- Set up the buttons --- */
 123
 124   {
 125     char *p = xstrdup(buttons);
 126     unsigned f = 0;
 127     int i = 0;
 128
 129     enum {
 130       f_ok = 1,
 131       f_cancel = 2,
 132       f_mdwfocus = 4
 133     };
 134
 135     if (*p == '!') {
 136       f |= f_mdwfocus;
 137       p++;
 138     }
 139
 140     creply = -1;
 141
 142     for (p = strtok(p, ","); p; p = strtok(0, ","), i++) {
 143       unsigned ff = 0;
 144       if (*p == ':') {
 145         ff |= f_ok;
 146         p++;
 147       }
 148       if (*p == '~') {
 149         ff |= f_cancel;
 150         creply = i;
 151         p++;
 152       }
 153       w = gtk_button_new_with_label(p);
 154       GTK_WIDGET_SET_FLAGS(w, GTK_CAN_DEFAULT);
 155       gtk_box_pack_end(GTK_BOX(GTK_DIALOG(dbox)->action_area), w, 0, 0, 0);
 156       gtk_signal_connect(GTK_OBJECT(w), "clicked",
 157                          GTK_SIGNAL_FUNC(click), (gpointer)i);
 158       if (ff & f_ok)
 159         gtk_widget_grab_default(w);
 160       if (ff & f_cancel)
 161         cancel(GTK_WINDOW(dbox), w);
 162       gtk_widget_show(w);
 163     }
 164     free(p);
 165
 166     /* --- Preflight checklist --- */
 167
 168     gtk_widget_realize(dbox);
 169     if (f & f_mdwfocus)
 170       mdwfocus(dbox);
 171
 172   }
 173
 174   /* --- Ready --- */
 175
 176   gtk_grab_add(GTK_WIDGET(dbox));
 177   gtk_widget_show(dbox);
 178   gtk_main();
 179   gtk_grab_remove(GTK_WIDGET(dbox));
 180   gtk_widget_destroy(dbox);
 181   return (reply);
 182 }
 183
 184 /*----- That's all, folks -------------------------------------------------*/
 185
 186 #else
 187   int mgLib_msg = 0;
 188 #endif