/***************************************************************************
* Copyright (C) 1994 Charles P. Peterson *
* 4007 Enchanted Sun, San Antonio, Texas 78244-1254 *
* Email: Charles_P_Peterson@fcircus.sat.tx.us *
* *
* This is free software with NO WARRANTY. *
* See gfft.c, or run program itself, for details. *
* Support is available for a fee. *
***************************************************************************
*
* Program: gfft--General FFT analysis
* File: wbcopyrt.c
* Purpose: copyright dialog requester
* Author: Charles Peterson (CPP)
* History: 11-Feb-1994 CPP; Created.
* 10-Jul-1994 CPP (0.76); Fixed "fast click" bug
* 14-Dec-94 CPP (1.17); Fix button gadgets for >4 colors
* Comments: Workbench GUI. Amiga Dependent!
*/
#ifdef AMIGA /* This module is AMIGA dependent */
#include <stdio.h> /* sprintf() */
#include <string.h>
/*
* Amiga includes
*/
#include <exec/types.h>
#include <workbench/workbench.h>
#include <intuition/intuition.h>
#include <clib/intuition_protos.h>
#include <clib/exec_protos.h>
#include <dos.h> /* chkabort() */
/*
* GFFT includes
*/
#include "gfft.h"
#include "settings.h" /* for testing */
#include "wbench.h"
/*
* External globals
*/
extern struct Window *dialog_window_p;
extern char *Author_Strings[];
extern short Max_Columns;
extern char *Copyrt_Req_Prolog;
extern char *Author_Info_Button;
extern char *No_Warranty_Button;
extern char *Sharing_Rights_Button;
extern char *Idea_Contributor_Button;
extern char *Code_Contributor_Button;
#define FIRST_AUTHOR_LINE 1 /* Line 0 is blank */
static struct Requester *copyright_rp = NULL;
static struct Requester *author_rp = NULL;
static struct Gadget *author_gadgetp;
static struct Gadget *copying_gadgetp, *nowarranty_gadgetp;
static struct Gadget *idea_contributor_gadgetp, *code_contributor_gadgetp;
static struct Gadget *financial_contributor_gadgetp;
static struct Gadget *end_copyright_gadgetp, *ok_author_gadgetp;
#define MAX_AUTHOR_LINES 7
static struct IntuiText *prolog_textp;
static struct IntuiText *author_textp[MAX_AUTHOR_LINES];
static struct Gadget *next_author_gadgetp;
static struct Gadget *previous_author_gadgetp;
static void author (int start_line);
void copyright_requester (void)
{
struct IntuiMessage *message;
APTR *address = NULL;
ULONG class = 0;
if (!copyright_rp)
{
gadget__begin (GTYP_REQGADGET);
/*
* Setup Text
*/
prolog_textp = requester_text__new (Copyrt_Req_Prolog, 0, 0);
/*
* Setup Gadgets
*/
author_gadgetp = action_button__new (Author_Info_Button, 0, 1);
nowarranty_gadgetp = action_button__new (No_Warranty_Button, 0, 2);
copying_gadgetp = action_button__new (Sharing_Rights_Button, 0, 3);
idea_contributor_gadgetp = action_button__new
(Idea_Contributor_Button, 0, 4);
code_contributor_gadgetp = action_button__new
(Code_Contributor_Button, 0, 5);
/*
* financial_contributor_gadgetp = action_button__new
* ("Financial support has been contributed by...",
* 0, 6);
*/
end_copyright_gadgetp = tall_action_button__new
("...OK", Max_Columns - 5, 7);
copyright_rp = requester__new ();
copyright_rp->ReqGadget = end_copyright_gadgetp;
copyright_rp->ReqText = prolog_textp;
} /* Ok, copyright_rp has been created */
if (requester__display (copyright_rp, dialog_window_p))
{
while (TRUE)
{
Wait (1 << dialog_window_p->UserPort->mp_SigBit);
while (message = (struct IntuiMessage *) GetMsg
(dialog_window_p->UserPort))
{
CATCH_ERROR
class = message->Class;
address = message->IAddress;
ReplyMsg ((struct Message *) message);
if (address == (APTR) author_gadgetp)
{
author (FIRST_AUTHOR_LINE);
}
else if (address == (APTR) copying_gadgetp)
{
copying_message (NullString);
}
else if (address == (APTR) nowarranty_gadgetp)
{
no_warranty_message (NullString);
}
else if (address == (APTR) idea_contributor_gadgetp)
{
help_message ("idea contributors");
}
else if (address == (APTR) code_contributor_gadgetp)
{
help_message ("code contributors");
}
else if (address == (APTR) financial_contributor_gadgetp)
{
help_message ("financial contributors");
}
else if (address == (APTR) end_copyright_gadgetp)
{
requester__remove (copyright_rp, dialog_window_p);
return;
}
END_CATCH_ERROR
}
}
}
}
static void author (int start_line)
{
struct IntuiMessage *message;
APTR *address = NULL;
ULONG class = 0;
static int author_line_count = 0;
int start_line_here = start_line;
int end_line_here;
int line_count_here;
int i, j;
int col;
static BOOLEAN all_pages_seen = FALSE;
if (!author_line_count)
{
while (Author_Strings[author_line_count++]);
}
if (author_rp)
{
gfree (author_rp); /* should free text also... */
author_rp = NULL;
}
while (Author_Strings[start_line_here] &&
strlen (Author_Strings[start_line_here++]) <= 1);
end_line_here = --start_line_here;
while (Author_Strings[end_line_here])
{
col = strlen (Author_Strings[end_line_here]);
if (col <= 1) break;
end_line_here++;
}
end_line_here--;
line_count_here = 1 + end_line_here - start_line_here;
if (line_count_here < 1 || line_count_here > MAX_AUTHOR_LINES) return;
gadget__begin (GTYP_REQGADGET);
for (i = start_line_here, j = 0; i <= end_line_here; i++, j++)
{
author_textp[j] = requester_text__new (Author_Strings[i], 0, j);
}
next_author_gadgetp = action_button__new ("Next", 11, j);
if (end_line_here + 3 >= author_line_count)
{
next_author_gadgetp->Flags |= GFLG_DISABLED;
all_pages_seen = TRUE;
}
previous_author_gadgetp = action_button__new ("Previous", 0, j);
if (start_line_here <= FIRST_AUTHOR_LINE || !all_pages_seen)
previous_author_gadgetp->Flags |= GFLG_DISABLED;
ok_author_gadgetp = action_button__new ("...OK", Max_Columns - 5, j);
if (!all_pages_seen)
ok_author_gadgetp->Flags |= GFLG_DISABLED;
author_rp = requester__new ();
author_rp->ReqGadget = ok_author_gadgetp;
author_rp->ReqText = author_textp[j-1];
if (requester__display (author_rp, dialog_window_p))
{
while (TRUE)
{
Wait (1 << dialog_window_p->UserPort->mp_SigBit);
while (message = (struct IntuiMessage *) GetMsg
(dialog_window_p->UserPort))
{
class = message->Class;
address = message->IAddress;
ReplyMsg ((struct Message *) message);
if (address == (APTR) ok_author_gadgetp)
{
requester__remove (author_rp, dialog_window_p);
return;
}
else if (address == (APTR) next_author_gadgetp)
{
requester__remove (author_rp, dialog_window_p);
author (end_line_here + 2);
return;
}
else if (address == (APTR) previous_author_gadgetp)
{
i = start_line_here - 1;
if (i-1 < FIRST_AUTHOR_LINE) break;
while (Author_Strings[i] &&
(strlen (Author_Strings[--i]) > 1));
requester__remove (author_rp, dialog_window_p);
author (i);
return;
}
}
}
}
}
#endif /* end ifdef AMIGA */
