message_box.cpp

Go to the documentation of this file.

#ifndef MESSAGE_BOX_IMPLEMENTATION_FILE
#define MESSAGE_BOX_IMPLEMENTATION_FILE

/*****************************************************************************\
*                                                                             *
*  Name   : message_box                                                       *
*  Author : Chris Koeritz                                                     *
*                                                                             *
*******************************************************************************
* Copyright (c) 1991-$now By Author.  This program is free software; you can  *
* redistribute it and/or modify it under the terms of the GNU General Public  *
* License as published by the Free Software Foundation; either version 2 of   *
* the License or (at your option) any later version.  This is online at:      *
*     http://www.fsf.org/copyleft/gpl.html                                    *
* Please send any updates to: fred@gruntose.com                               *
\*****************************************************************************/

// Methods:
//
//   show_help:
//
//     This is connected to the help button in a help message_box.  When the
//     button is hit, then this causes a help box to be displayed.
//
//   setup_information_box,
//   setup_warning_box,
//   setup_help_box,
//   setup_proceed_box:
//
//     These functions create and display their kind of message_box boxes.
//

#include "message_box.h"

#include <basis/function.h>
#include <basis/guards.h>
#include <wp_passive/argument_list.h>
#include <wp_passive/color.h>
#include <wp_passive/system_string.h>
#include <wp_passive/wp_implementation.h>

#include <X11/Composite.h>
#include <Xm/MessageB.h>

message_box::message_box(manager &root, const c_point &origin,
   message_box_kinds kind, const char *message, const char *second_message,
   const color &foreground, const color &background)
: worker(root, c_rectangle(origin, origin), NIL, foreground, background),
  _kind(kind), _message(message), _second_message(second_message),
  last_hit(0), extra_help_box(NIL) {}

message_box::~message_box()
{
  XtRemoveCallback(self(), XmNokCallback, XtCallbackProc(message_box_callback),
     XtPointer(this));
  XtRemoveCallback(self(), XmNcancelCallback,
     XtCallbackProc(message_box_callback), XtPointer(this));
  XtRemoveCallback(self(), XmNhelpCallback,
     XtCallbackProc(message_box_callback), XtPointer(this));
  if (extra_help_box) delete extra_help_box;
}

void message_box::draw()
{
  if (!visible()) {
    // set up the box
    switch (_kind) {
      case PROCEED: setup_proceed_box(); break;
      case INFORMATION: setup_information_box(); break;
      case WARNING: setup_warning_box(); break;
      case HELP: setup_help_box(); break;
    }
    hookup_callbacks();
    color f = foreground(); color b = background();
    set_foreground(f); set_background(b);
    worker::draw();
    root().apply(self());
  }
}

void message_box::button_event(int but)
{
  FUNCDEF("button_event");
  LOG(isprintf("message_box: button hit=%d", but));
}

#ifdef __XWINDOWS__

void message_box::setup_proceed_box()
{
  {
    argument_list wargs;
    wargs.add(XmNautoUnmanage, int(0));
    wargs.add(XmNokLabelString, window_string(system_string("Yes")));
    wargs.add(XmNcancelLabelString, window_string(system_string("No")));
    wargs.add(XmNhelpLabelString, window_string(system_string("Cancel")));
    wargs.add(XmNborderWidth, 2);
    system_string xmstr(_message);
    wargs.add(XmNmessageString, window_string(xmstr));
    self(XmCreateMessageBox
        (parent(), (char *)"Proceed?", wargs.generate(), wargs.number()));
  }
}

void message_box::setup_information_box()
{
  {
    argument_list wargs;
    wargs.add(XmNautoUnmanage, int(0));
    system_string xmstr(_message);
    wargs.add(XmNmessageString, window_string(xmstr));
    self(XmCreateMessageDialog
        (parent(), (char *)"Information", wargs.generate(), wargs.number()));
    XtUnmanageChild(XmMessageBoxGetChild(self(), XmDIALOG_CANCEL_BUTTON));
    XtUnmanageChild(XmMessageBoxGetChild(self(), XmDIALOG_HELP_BUTTON));
  }  
  {
    window_handle label = XmMessageBoxGetChild(self(), XmDIALOG_MESSAGE_LABEL);
    argument_list wargs;
    wargs.add(XmNalignment, XtArgVal(XmALIGNMENT_BEGINNING));
    wargs.apply(label);
  }
}

void message_box::setup_warning_box()
{
  {
    argument_list wargs;
    wargs.add(XmNautoUnmanage, int(0));
    wargs.add(XmNokLabelString, window_string(system_string("Yes")));
    wargs.add(XmNhelpLabelString, window_string(system_string("Cancel")));
    system_string xmstr(_message);
    wargs.add(XmNmessageString, window_string(xmstr));
    self(XmCreateWarningDialog
        (parent(), (char *)"Warning!", wargs.generate(), wargs.number()));
    XtUnmanageChild(XmMessageBoxGetChild(self(), XmDIALOG_CANCEL_BUTTON));
  }
  {
    window_handle label = XmMessageBoxGetChild(self(), XmDIALOG_MESSAGE_LABEL);
    argument_list wargs;
    wargs.add(XmNalignment, XtArgVal(XmALIGNMENT_BEGINNING));
    wargs.apply(label);
  }
}

void message_box::setup_help_box()
{
  {
    argument_list wargs;
    wargs.add(XmNautoUnmanage, int(0));
    system_string xmstr(_message);
    wargs.add(XmNmessageString, window_string(xmstr));
    self(XmCreateMessageDialog
        (parent(), (char *)"Help Is Available", wargs.generate(), wargs.number()));
  }
  XtUnmanageChild(XmMessageBoxGetChild(self(), XmDIALOG_CANCEL_BUTTON));
  {
    window_handle label = XmMessageBoxGetChild(self(), XmDIALOG_MESSAGE_LABEL);
    argument_list wargs;
    wargs.add(XmNalignment, XtArgVal(XmALIGNMENT_BEGINNING));
    wargs.apply(label);
  }
}

void message_box::message_box_callback(window_handle formal(w),
    message_box *the_box,
    XmAnyCallbackStruct *call_data)
{
  switch (call_data->reason) {
    case XmCR_OK: the_box->last_hit = 0; break;
//    case XmNhelpCallback: the_box->last_hit = 1; break;
    case XmCR_HELP: the_box->last_hit = 1; break;
    case XmCR_CANCEL: the_box->last_hit = 2; break;
    default:
      non_continuable_error("message_box", "message_box_callback",
          "unknown reason for callback");
  }
  switch (the_box->_kind) {
  case HELP:
    if (the_box->last_hit == 1) {
      the_box->last_hit = HELP_HELP;
      the_box->show_help();
    }
    break;
  case PROCEED:
    if (the_box->last_hit == 1) the_box->last_hit = PROCEED_CANCEL;
    else if (the_box->last_hit == 2) the_box->last_hit = PROCEED_NO;
    break;
  case INFORMATION:
    break;
  case WARNING:
    if (the_box->last_hit == 1) the_box->last_hit = WARNING_CANCEL;
    break;
  }
  the_box->button_event(the_box->last_hit);
  the_box->erase();
}

void message_box::hookup_callbacks()
{
  XtAddCallback
    (self(), XmNokCallback, XtCallbackProc(message_box_callback),
     XtPointer(this));
  XtAddCallback
    (self(), XmNcancelCallback, XtCallbackProc(message_box_callback),
     XtPointer(this));
  XtAddCallback
    (self(), XmNhelpCallback, XtCallbackProc(message_box_callback),
     XtPointer(this));
}

void message_box::show_help()
{
  {
    color f = foreground(); color b = background();
    if (extra_help_box) delete extra_help_box;
    extra_help_box = new message_box(root(), drawable::origin(),
       INFORMATION, _second_message.s(), (const char *)NIL, f, b);
    extra_help_box->draw();
  }
}

#elif defined(OS_2)
#elif defined(MS_WINDOWS)
#endif


#endif //MESSAGE_BOX_IMPLEMENTATION_FILE

---