about_dialog.c

Go to the documentation of this file.

#include <stdio.h>

#include <Xm/Xm.h>
#include <Xm/MwmUtil.h> 
#include <Xm/PushB.h>
#include <Xm/BulletinB.h>
#include <Xm/Frame.h>
#include <Xm/Label.h>
#include <Xm/DrawingA.h>

#include "../../config.h"
#include "util.h"
#include "about_dialog.h"


/* local variables */
static Widget about_dialog;


static void
on_about_dialog_close_button_clicked (Widget w, XtPointer client_data, XtPointer call_data)   
{
        XtUnmanageChild (about_dialog);
}


static void
on_about_dialog_credits_button_clicked (Widget w, XtPointer client_data, XtPointer call_data)   
{
}


static void
on_about_dialog_license_button_clicked (Widget w, XtPointer client_data, XtPointer call_data)   
{
}


void
create_about_dialog (Widget parent)
{
        Widget about_dialog_drawing_area;
        Widget about_dialog_frame;
        Widget about_dialog_credits_button;
        Widget about_dialog_license_button;
        Widget about_dialog_close_button;
        Widget about_dialog_label;
        Arg args[10];
        XmString xmstrings[10];
        XmFontList fontlist;

        /* Create a BulletinBoard type dialog. */
        XtSetArg (args[0], XmNtitle, "About pcb-lfpw");
        XtSetArg (args[1], XmNdeleteResponse, XmDO_NOTHING);
        XtSetArg (args[2], XmNmwmFunctions,
                MWM_FUNC_RESIZE |
                MWM_FUNC_MOVE |
                MWM_FUNC_MINIMIZE |
                MWM_FUNC_MAXIMIZE);
        XtSetArg (args[3], XmNbackground, get_pixel (parent, "gray"));
        about_dialog = XmCreateBulletinBoardDialog
                (
                        parent,
                        "about_dialog",
                        args,
                        4
                );
        /* Create a drawing area. */
        XtSetArg (args[0], XmNbackground, get_pixel (parent, "gray"));
        about_dialog_drawing_area = XtCreateManagedWidget
                (
                        "about_dialog_drawing_area",
                        xmDrawingAreaWidgetClass,
                        about_dialog,
                        args,
                        1
                );
        /* Create a frame around the drawing area. */
        XtSetArg (args[0], XmNshadowThickness, 5);
        XtSetArg (args[1], XmNshadowType, XmSHADOW_OUT);
        about_dialog_frame = XtCreateManagedWidget
                (
                        "about_dialog_frame",
                        xmFrameWidgetClass,
                        about_dialog_drawing_area,
                        args,
                        2);
        /* Create a "Credits" button. */
        XtSetArg (args[0], XmNforeground, get_pixel (parent, "black"));
        XtSetArg (args[1], XmNbackground, get_pixel (parent, "gray"));
        fontlist = get_fontlist (parent, "-adobe-helvetica-bold-r-normal--14-140-75-75-p-82-iso8859-1");
        XtSetArg (args[2], XmNfontList, fontlist);
        xmstrings[0] = XmStringCreateSimple ("Credits");
        XtSetArg (args[3], XmNlabelString, xmstrings[0]);
        XtSetArg (args[4], XmNshowAsDefault, 1);
        XtSetArg (args[5], XmNy, 200);
        XtSetArg (args[6], XmNx, 155);
        about_dialog_credits_button = XtCreateManagedWidget
                (
                        "about_dialog_credits_button",
                        xmPushButtonWidgetClass,
                        about_dialog_drawing_area,
                        args,
                        7
                );
        XtAddCallback (about_dialog_credits_button, XmNactivateCallback, 
                on_about_dialog_credits_button_clicked, NULL);
        XmStringFree (xmstrings[0]);
        XmFontListFree (fontlist);
        /* Create a "License" button. */
        XtSetArg (args[0], XmNforeground, get_pixel (parent, "black"));
        XtSetArg (args[1], XmNbackground, get_pixel (parent, "gray"));
        fontlist = get_fontlist (parent, "-adobe-helvetica-bold-r-normal--14-140-75-75-p-82-iso8859-1");
        XtSetArg (args[2], XmNfontList, fontlist);
        xmstrings[0] = XmStringCreateSimple ("License");
        XtSetArg (args[3], XmNlabelString, xmstrings[0]);
        XtSetArg (args[4], XmNshowAsDefault, 1);
        XtSetArg (args[5], XmNy, 200);
        XtSetArg (args[6], XmNx, 155);
        about_dialog_license_button = XtCreateManagedWidget
                (
                        "about_dialog_license_button",
                        xmPushButtonWidgetClass,
                        about_dialog_drawing_area,
                        args,
                        7
                );
        XtAddCallback (about_dialog_license_button, XmNactivateCallback, 
                on_about_dialog_license_button_clicked, NULL);
        XmStringFree (xmstrings[0]);
        XmFontListFree (fontlist);
        /* Create a "Close" button. */
        XtSetArg (args[0], XmNforeground, get_pixel (parent, "black"));
        XtSetArg (args[1], XmNbackground, get_pixel (parent, "gray"));
        fontlist = get_fontlist (parent, "-adobe-helvetica-bold-r-normal--14-140-75-75-p-82-iso8859-1");
        XtSetArg (args[2], XmNfontList, fontlist);
        xmstrings[0] = XmStringCreateSimple ("Close");
        XtSetArg (args[3], XmNlabelString, xmstrings[0]);
        XtSetArg (args[4], XmNshowAsDefault, 1);
        XtSetArg (args[5], XmNy, 200);
        XtSetArg (args[6], XmNx, 155);
        about_dialog_close_button = XtCreateManagedWidget
                (
                        "about_dialog_close_button",
                        xmPushButtonWidgetClass,
                        about_dialog_drawing_area,
                        args,
                        7
                );
        XtAddCallback (about_dialog_close_button, XmNactivateCallback,
                on_about_dialog_close_button_clicked, NULL);
        XmStringFree (xmstrings[0]);
        XmFontListFree (fontlist);
        /* Create the about dialog text label. */
        XtSetArg (args[0], XmNalignment, XmALIGNMENT_BEGINNING);
        XtSetArg (args[1], XmNtraversalOn, False);
        XtSetArg (args[2], XmNmarginHeight, 10);
        XtSetArg (args[3], XmNmarginWidth, 10);
        XtSetArg (args[4], XmNrecomputeSize, True);
        XtSetArg (args[5], XmNforeground, get_pixel (parent, "black"));
        XtSetArg (args[6], XmNbackground, get_pixel (parent, "gray"));
        xmstrings[0] = create_about_dialog_xmstring ();
        XtSetArg (args[7], XmNlabelString, xmstrings[0]);
        fontlist = get_fontlist (parent, "-adobe-helvetica-medium-r-normal--14-140-75-75-p-77-iso8859-1");
        XtSetArg (args[8], XmNfontList, fontlist);
        about_dialog_label = XtCreateManagedWidget
                (
                        "about_dialog_label",
                        xmLabelWidgetClass,
                        about_dialog_frame,
                        args,
                        9
                );
        XmStringFree (xmstrings[0]);
        XmFontListFree (fontlist);
}


static XmString
create_about_dialog_xmstring ()
{
        XmString xms;
        XmString nxt;
        XmString lst;

        lst = XmStringCreateLtoR ("\npcb-lfpw - pcb footprintwizard\n", XmSTRING_DEFAULT_CHARSET);
        nxt = XmStringCreateLtoR ("        Version: ", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (lst, nxt);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR (VERSION, XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\n", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\npcb-lfpw is a program for the creation of\n", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\nfootprint files to be used by the pcb layout\n", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\napplication.\n", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\nFurther information about pcb-lfpw ", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("can be found at:\n", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        nxt = xms;
        lst = XmStringCreateLtoR ("\nhttp://www.xs4all.nl/~ljh4timm/pcb-fpw/pcb-fpw.html", XmSTRING_DEFAULT_CHARSET);
        xms = XmStringConcat (xms, lst);
        XmStringFree (lst);
        XmStringFree (nxt);
        return (xms);
}


/* EOF */