Graphics Plus/Graphics Plus.iso/amiga/gui/x/xfig.lha/src/x11/w_msgpanel.c

C/C++ Source or Header | 1993-07-26 | 5.7 KB | 212 lines

/*
 * FIG : Facility for Interactive Generation of figures
 * Copyright (c) 1985 by Supoj Sutanthavibul
 *
 * "Permission to use, copy, modify, distribute, and sell this software and its
 * documentation for any purpose is hereby granted without fee, provided that
 * the above copyright notice appear in all copies and that both the copyright
 * notice and this permission notice appear in supporting documentation.
 * No representations are made about the suitability of this software for
 * any purpose.  It is provided "as is" without express or implied warranty."
 */

#include "fig.h"
#include "figx.h"
#include "resources.h"
#include "object.h"
#include "mode.h"
#include "paintop.h"
#include "u_elastic.h"
#include "w_canvas.h"
#include "w_drawprim.h"
#include "w_util.h"
#include "w_setup.h"
#include <varargs.h>

/********************* EXPORTS *******************/

int        put_msg();
int        init_msgreceiving();

/************************  LOCAL ******************/

#define        BUF_SIZE        128
static char    prompt[BUF_SIZE];

DeclareStaticArgs(12);

int
init_msg(tool, filename)
    TOOL        tool;
    char       *filename;
{
    /* first make a form to put the two widgets in */
    FirstArg(XtNwidth, MSGFORM_WD);
    NextArg(XtNheight, MSGFORM_HT);
    NextArg(XtNfromVert, cmd_panel);
    NextArg(XtNvertDistance, -INTERNAL_BW);
    NextArg(XtNdefaultDistance, 0);
    NextArg(XtNborderWidth, 0);
    msg_form = XtCreateManagedWidget("msg_form", formWidgetClass, tool,
                      Args, ArgCount);
    /* setup the file name widget first */
    FirstArg(XtNresizable, True);
    NextArg(XtNfont, bold_font);
    NextArg(XtNlabel, (filename!=NULL? filename: DEF_NAME));
    NextArg(XtNtop, XtChainTop);
    NextArg(XtNbottom, XtChainTop);
    NextArg(XtNborderWidth, INTERNAL_BW);
    name_panel = XtCreateManagedWidget("file_name", labelWidgetClass, msg_form,
                      Args, ArgCount);
    /* now the message panel */
    FirstArg(XtNfont, roman_font);
    NextArg(XtNstring, "\0");
    NextArg(XtNfromHoriz, name_panel);
    NextArg(XtNhorizDistance, -INTERNAL_BW);
    NextArg(XtNtop, XtChainTop);
    NextArg(XtNbottom, XtChainTop);
    NextArg(XtNborderWidth, INTERNAL_BW);
    NextArg(XtNdisplayCaret, False);
    msg_panel = XtCreateManagedWidget("message", asciiTextWidgetClass, msg_form,
                      Args, ArgCount);
}

setup_msg()
{
    Dimension ht;

    /* set the height of the message panel to the height of the file name panel */
    XtUnmanageChild(msg_panel);
    FirstArg(XtNheight, &ht);
    GetValues(name_panel);
    FirstArg(XtNheight, ht);
    SetValues(msg_panel);
    /* set the MSGFORM_HT variable so the mouse panel can be resized to fit */
    MSGFORM_HT = ht;
    XtManageChild(msg_panel);
    if (msg_win == 0)
    msg_win = XtWindow(msg_panel);
    XDefineCursor(tool_d, msg_win, null_cursor);
}

/*
 * Update the current filename in the name_panel widget (it will resize
 * automatically) and resize the msg_panel widget to fit in the remaining
 * space, by getting the width of the command panel and subtract the new
 * width of the name_panel to get the new width of the message panel
 */
update_cur_filename(newname)
    char    *newname;
{
    Dimension namwid;

    XtUnmanageChild(msg_form);
    XtUnmanageChild(msg_panel);
    XtUnmanageChild(name_panel);
    strcpy(cur_filename,newname);


    FirstArg(XtNlabel, newname);
    SetValues(name_panel);
    /* get the new size of the name_panel */
    FirstArg(XtNwidth, &namwid);
    GetValues(name_panel);
    MSGPANEL_WD = MSGFORM_WD-namwid;
    /* resize the message panel to fit with the new width of the name panel */
    FirstArg(XtNwidth, MSGPANEL_WD);
    SetValues(msg_panel);
    XtManageChild(msg_panel);
    XtManageChild(name_panel);

    /* now resize the whole form */
    FirstArg(XtNwidth, MSGFORM_WD);
    SetValues(msg_form);
    XtManageChild(msg_form);
}

/* VARARGS1 */
int put_msg(va_alist) va_dcl
{
    va_list ap;
    char *format;

    va_start(ap);
    format = va_arg(ap, char *);
    vsprintf(prompt, format, ap );
    va_end(ap);
    FirstArg(XtNstring, prompt);
    SetValues(msg_panel);
}

clear_message()
{
    FirstArg(XtNstring, "\0");
    SetValues(msg_panel);
}

boxsize_msg()
{
    float dx, dy;

    dx = (float) abs(cur_x - fix_x) /
        (float)(appres.INCHES? PIX_PER_INCH: PIX_PER_CM);
    dy = (float) abs(cur_y - fix_y) /
        (float)(appres.INCHES? PIX_PER_INCH: PIX_PER_CM);
    put_msg("Width = %.2f, Length = %.2f %s",
        dx*appres.user_scale, dy*appres.user_scale, cur_fig_units);
}

length_msg(type)
int type;
{
    altlength_msg(type, fix_x, fix_y);
}

/*
** In typical usage, point fx,fy is the fixed point.
** Distance will be measured from it to cur_x,cur_y.
*/

altlength_msg(type, fx, fy)
int type;
{
    float len,dx,dy;

    dx = cur_x - fx;
    dy = cur_y - fy;
    len = (float)(sqrt((double)dx*(double)dx + (double)dy*(double)dy)/
        (double)(appres.INCHES? PIX_PER_INCH: PIX_PER_CM));
    put_msg("%s = %.2f %s", (type==MSG_RADIUS? "Radius":
                (type==MSG_DIAM? "Diameter": "Length")),
        len*appres.user_scale, cur_fig_units);
}

/*
** In typical usage, point x3,y3 is the one that is moving,
** the other two are fixed.  Distances will be measured from
** points 1 -> 3 and 2 -> 3.
*/

length_msg2(x1,y1,x2,y2,x3,y3)
int x1,y1,x2,y2,x3,y3;
{
    float len1,len2,dx1,dy1,dx2,dy2;

    len1=len2=0.0;
    if (x1 != -999) {
        dx1 = x3 - x1;
        dy1 = y3 - y1;
        len1 = (float)(sqrt((double)dx1*(double)dx1 + (double)dy1*(double)dy1)/
        (double)(appres.INCHES? PIX_PER_INCH: PIX_PER_CM));
    }
    if (x2 != -999) {
        dx2 = x3 - x2;
        dy2 = y3 - y2;
        len2 = (float)(sqrt((double)dx2*(double)dx2 + (double)dy2*(double)dy2)/
        (double)(appres.INCHES? PIX_PER_INCH: PIX_PER_CM));
    }
    put_msg("Length 1 = %.2f, Length 2 = %.2f %s",
        len1*appres.user_scale, len2*appres.user_scale, cur_fig_units);
}