motif_l/m_prompt.c

   1 /*-
   2  * Copyright (c) 1996
   3  *      Rob Zimmermann.  All rights reserved.
   4  * Copyright (c) 1996
   5  *      Keith Bostic.  All rights reserved.
   6  *
   7  * See the LICENSE file for redistribution information.
   8  */
   9
  10 #include "config.h"
  11
  12 #ifndef lint
  13 static const char sccsid[] = "$Id: m_prompt.c,v 8.8 2003/11/05 17:10:00 skimo Exp $ (Berkeley) $Date: 2003/11/05 17:10:00 $";
  14 #endif /* not lint */
  15
  16 #include <sys/types.h>
  17 #include <sys/queue.h>
  18
  19 #include <X11/X.h>
  20 #include <X11/Intrinsic.h>
  21 #include <Xm/MessageB.h>
  22
  23 #include <bitstring.h>
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27
  28 #undef LOCK_SUCCESS
  29 #include "../common/common.h"
  30 #include "../ipc/ip.h"
  31 #include "m_motif.h"
  32
  33 \f
  34 void    vi_fatal_message(Widget parent, String str)
  35 {
  36     Widget      db = XmCreateErrorDialog( parent, "Fatal", NULL, 0 );
  37     XmString    msg = XmStringCreateSimple( str );
  38
  39     XtVaSetValues( XtParent(db),
  40                    XmNtitle,            "Fatal",
  41                    0
  42                    );
  43     XtVaSetValues( db,
  44                    XmNmessageString,    msg,
  45                    0
  46                    );
  47     XtAddCallback( XtParent(db), XmNpopdownCallback, __vi_cancel_cb, 0 );
  48
  49     XtUnmanageChild( XmMessageBoxGetChild( db, XmDIALOG_CANCEL_BUTTON ) );
  50     XtUnmanageChild( XmMessageBoxGetChild( db, XmDIALOG_HELP_BUTTON ) );
  51
  52     __vi_modal_dialog( db );
  53
  54     exit(0);
  55 }
  56
  57 \f
  58 void    vi_info_message(Widget parent, String str)
  59 {
  60     static      Widget  db = NULL;
  61     XmString    msg = XmStringCreateSimple( str );
  62
  63     if ( db == NULL )
  64         db = XmCreateInformationDialog( parent, "Information", NULL, 0 );
  65
  66     XtVaSetValues( XtParent(db),
  67                    XmNtitle,            "Information",
  68                    0
  69                    );
  70     XtVaSetValues( db,
  71                    XmNmessageString,    msg,
  72                    0
  73                    );
  74     XtAddCallback( XtParent(db), XmNpopdownCallback, __vi_cancel_cb, 0 );
  75
  76     XtUnmanageChild( XmMessageBoxGetChild( db, XmDIALOG_CANCEL_BUTTON ) );
  77     XtUnmanageChild( XmMessageBoxGetChild( db, XmDIALOG_HELP_BUTTON ) );
  78
  79     __vi_modal_dialog( db );
  80 }