src/ui/gui/message-dialog.c

   1 /*
   2    PSPPIRE --- A Graphical User Interface for PSPP
   3    Copyright (C) 2004,2005  Free Software Foundation
   4    Written by John Darrington
   5
   6    This program is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as published by
   8    the Free Software Foundation; either version 2 of the License, or
   9    (at your option) any later version.
  10
  11    This program is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with this program; if not, write to the Free Software
  18    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  19    02110-1301, USA.
  20 */
  21
  22
  23 #include <stdio.h>
  24 #include <stdarg.h>
  25
  26 #include <config.h>
  27 #include <libpspp/message.h>
  28 #include "message-dialog.h"
  29 #include "progname.h"
  30
  31
  32 #include <gtk/gtk.h>
  33 #include <glade/glade.h>
  34
  35 #include "helper.h"
  36
  37 extern GladeXML *xml;
  38
  39 #define _(A) A
  40
  41
  42 void
  43 vmsg(int klass, const char *fmt, va_list args)
  44 {
  45   gchar *msg = 0;
  46   gchar *text = g_strdup_vprintf (fmt, args);
  47
  48   GtkWindow *parent ;
  49   GtkWidget *dialog ;
  50
  51   gint message_type;
  52
  53   switch (klass)
  54     {
  55     case SE:
  56     case DE:
  57     case ME:
  58       message_type = GTK_MESSAGE_ERROR;
  59       break;
  60     case SW:
  61     case DW:
  62     case MW:
  63       message_type = GTK_MESSAGE_WARNING;
  64       break;
  65     case SM:
  66     case MM:
  67     default:
  68       message_type = GTK_MESSAGE_INFO;
  69       break;
  70     };
  71
  72   switch (klass)
  73     {
  74     case SE:
  75     case SW:
  76     case SM:
  77       msg = g_strdup(_("Script Error"));
  78       break;
  79
  80     case DE:
  81     case DW:
  82       msg = g_strdup(_("Data File Error"));
  83       break;
  84
  85     case ME:
  86     case MW:
  87     case MM:
  88     default:
  89       msg = g_strdup(_("PSPP Error"));
  90       break;
  91     };
  92
  93   parent = GTK_WINDOW(get_widget_assert(xml, "data_editor"));
  94
  95   dialog = gtk_message_dialog_new(parent,
  96                                   GTK_DIALOG_MODAL,
  97                                   message_type,
  98                                   GTK_BUTTONS_CLOSE,
  99                                   msg);
 100
 101   gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog), text);
 102
 103   g_free(text);
 104   g_free(msg);
 105
 106   gtk_window_set_transient_for(GTK_WINDOW(dialog), parent);
 107
 108   gtk_dialog_run(GTK_DIALOG(dialog));
 109
 110   gtk_widget_destroy (dialog);
 111
 112 }
 113
 114
 115 void
 116 msg(int klass, const char *fmt, ...)
 117 {
 118   va_list ap;
 119   va_start(ap, fmt);
 120   vmsg(klass, fmt, ap);
 121   va_end(ap);
 122 }
 123
 124
 125 void
 126 err_vmsg (const struct error *e, const char *format, va_list args)
 127 {
 128   vmsg(e->class, format, args);
 129 }
 130
 131
 132 void
 133 err_assert_fail(const char *expr, const char *file, int line)
 134 {
 135   msg(ME, "Assertion failed: %s:%d; (%s)\n",file,line,expr);
 136 }
 137
 138 /* Writes MESSAGE formatted with printf, to stderr, if the
 139    verbosity level is at least LEVEL. */
 140 void
 141 verbose_msg (int level, const char *format, ...)
 142 {
 143   /* Do nothing for now. */
 144 }
 145
 146 /* FIXME: This is a stub .
 147  * A temporary workaround until getl.c is rearranged
 148  */
 149 void
 150 err_location (struct file_locator *f)
 151 {
 152         f->file_name = 0;
 153         f->line_number = -1;
 154 }
 155