home *** CD-ROM | disk | FTP | other *** search
- /* namePanel.c
- *
- * defines the GUIFront characteristics of the name panel
- */
-
- #include <exec/types.h>
- #include <exec/lists.h>
- #include <exec/nodes.h>
- #include <exec/memory.h>
- #include <clib/exec_protos.h>
- #include <clib/alib_protos.h>
- #include <clib/intuition_protos.h>
- #include <stdio.h>
- #include <intuition/gadgetclass.h>
- #include "amiCheck.h"
- #include "dataBase.h"
- #include "namePanel.h"
- #include "regGadget.h"
- #include <string.h>
-
-
- /* prototypes */
- BOOL NameHandleGadget(struct IntuiMessage *);
- void NameInit(void);
- void NameDisableGads(BOOL);
-
- struct List tempnames;
- BOOL updatename,nameretval;
- ExtErrorData NameExtData;
- GUIFront *nameGUI;
- UWORD namelistActive;
- struct Window *nameWin;
- BOOL updatenames = FALSE;
-
- /* quick configure of some gadgets */
- extern struct TagItem nameList[];
-
- /* define gadgetspec */
- GadgetSpec NAMEgadgetspecs[] =
- {
- {LISTVIEW_KIND,30,8, {0,0,0,0,NULL,NULL,GID_NAMELIST,
- PLACETEXT_ABOVE},nameList,GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_New", NULL, GID_NAMENEW,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Remove", NULL, GID_NAMEDEL,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {STRING_KIND,20,0,{0,0,0,0,NULL, NULL, GID_NAMEEDIT,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Up", NULL, GID_NAMEUP,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Down", NULL, GID_NAMEDOWN,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Top", NULL, GID_NAMETOP,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Bottom", NULL, GID_NAMEBOTTOM,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_OK", NULL, GID_NAMEOK,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- {BUTTON_KIND,0,0,{0,0,0,0,"_Cancel", NULL, GID_NAMECANCEL,
- PLACETEXT_IN}, NULL, GS_DefaultTags},
-
- };
-
- struct TagItem nameList[] =
- {
- {GTLV_ShowSelected, &NAMEgadgetspecs[GID_NAMEEDIT]},
- /*
- {GTLV_Labels, ~0},
- {GTLV_Selected,~0},
- */
- {TAG_DONE},
- };
-
- /* set up array of pointers to our specs */
- GadgetSpec *N_NameSpecs[] =
- {
- &NAMEgadgetspecs[0],
- &NAMEgadgetspecs[1],
- &NAMEgadgetspecs[2],
- &NAMEgadgetspecs[3],
- &NAMEgadgetspecs[4],
- &NAMEgadgetspecs[5],
- &NAMEgadgetspecs[6],
- &NAMEgadgetspecs[7],
- &NAMEgadgetspecs[8],
- &NAMEgadgetspecs[9],
- NULL,
- };
-
-
- /* define the layout of this panel */
- ULONG N_NamePanel[] =
- {
- GUIL_Flags, GUILF_PropShare | GUILF_EqualWidth,
-
- GUIL_HorizGroup, 1,
- GUIL_Flags, GUILF_PropShare,
- GUIL_FrameType, GUILFT_Recess,
-
- GUIL_VertGroup, 1,
-
- GUIL_HorizGroup,1,
- GUIL_FrameType, GUILFT_Ridge,
- GUIL_GadgetSpecID, GID_NAMELIST,
-
- GUIL_VertGroup,1,
- GUIL_Flags, GUILF_PropShare | GUILF_EqualWidth | GUILF_EqualHeight,
-
- GUIL_GadgetSpecID, GID_NAMEUP,
- GUIL_GadgetSpecID, GID_NAMEDOWN,
- GUIL_GadgetSpecID, GID_NAMETOP,
- GUIL_GadgetSpecID, GID_NAMEBOTTOM,
- TAG_DONE,
-
- TAG_DONE,
-
- GUIL_HorizGroup,1,
- GUIL_FrameType, GUILFT_Ridge,
- GUIL_Flags, GUILF_EqualSize | GUILF_EqualWidth,
- GUIL_GadgetSpecID, GID_NAMEDEL,
- GUIL_GadgetSpecID, GID_NAMENEW,
- TAG_DONE,
-
- TAG_DONE,
-
- TAG_DONE,
-
- GUIL_HorizGroup,1,
- GUIL_Flags, GUILF_EqualSize | GUILF_EqualWidth,
-
- GUIL_GadgetSpecID, GID_NAMEOK,
- GUIL_GadgetSpecID, GID_NAMECANCEL,
-
- TAG_DONE,
-
- TAG_DONE,
- };
-
-
- /****************************************************
- * NameGUI ()
- *
- * Creates the GUI for the edit temp panel.
- *****************************************************/
- BOOL NameGUI(void)
- {
- BOOL done = FALSE;
- BOOL noreply;
- UWORD ordinal;
- ULONG signal;
-
- AmiLock();
-
- /* install temporary list */
- NewList(&tempnames);
- DataCopyList(&namelist, &tempnames, NameNewEdit);
-
- updatename = FALSE;
-
- GF_SetGUIAttr(nameGUI, GUI_OpenGUI, TRUE, TAG_DONE);
- /* grab window */
- GF_GetGUIAttr(nameGUI,GUI_Window,&nameWin,TAG_DONE);
- NameInit();
-
-
- /* Process input events */
- while (!done)
- {
- struct IntuiMessage *imsg;
-
- /* Wait for an event to occur */
-
- signal = GF_Wait(guiapp,AmigaGuideSignal(agc));
- if (signal & AmigaGuideSignal(agc)) {
- AmiHelpMsg();
- continue;
- }
-
- /* We only bother to listen for CLOSEWINDOW events.
- * Of course, in a real application, you would be
- * examining the Class field for IDCMP_GADGETUP
- * messages and act accordingly.
- */
-
- while (imsg = GF_GetIMsg(guiapp))
- {
- noreply = TRUE;
- switch (imsg->Class) {
- case IDCMP_REFRESHWINDOW:
- RegRefresh(TRUE);
- break;
-
- case IDCMP_CLOSEWINDOW:
- DataFreeList(&tempnames);
- done = TRUE;
- break;
-
- case IDCMP_RAWKEY:
- if (GF_ProcessListView(nameGUI,N_NameSpecs[GID_NAMELIST],
- imsg,&ordinal)) {
- namelistActive = ordinal;
- NameDisableGads(FALSE);
- }
- AmiHelpKey(imsg,NAME_PANEL);
- break;
-
- case IDCMP_GADGETUP:
- noreply = FALSE;
- done=NameHandleGadget(imsg);
- break;
- }
-
-
- if (noreply) GF_ReplyIMsg(imsg);
- }
- }
-
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, ~0,
- TAG_DONE);
- GF_SetGUIAttr(nameGUI, GUI_OpenGUI, FALSE, TAG_DONE);
- if (updatename == TRUE) {
- DataMoveList(&tempnames, &namelist);
- NewList(&tempnames);
- }
-
- AmiUnlock();
- return (nameretval);
- }
-
- /***************************************************
- * NameHandleGadget()
- *
- * Handles gadget events for this panel
- ****************************************************/
- BOOL NameHandleGadget(struct IntuiMessage *imsg)
- {
- BOOL done = FALSE;
- struct Gadget *gad = (struct Gadget *)(imsg->IAddress);
- UWORD code = imsg->Code;
- nameNode tempname;
- nameNode *temp;
-
- switch (gad->GadgetID) {
-
- case GID_NAMELIST:
- namelistActive = code;
- NameDisableGads(FALSE);
- break;
-
- case GID_NAMEEDIT:
- if (namelistActive != ~0) {
- if (DataIsUnique(nameGUI, &tempnames,((struct StringInfo*)gad->SpecialInfo)->Buffer,
- TRUE,"Name name is not unique or invalid") ) {
-
- /* detach and modify this */
- temp = (nameNode*)DataOrd2Node(&tempnames,namelistActive);
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, ~0,
- TAG_DONE);
-
- strcpy(temp->nameStr, ((struct StringInfo*)gad->SpecialInfo)->Buffer);
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, &tempnames,
- TAG_DONE);
- }
- else {
- DataSitNSpin(N_NameSpecs[GID_NAMEEDIT]->gs_Gadget,nameWin);
- return (done);
- }
- }
- break;
-
- case GID_NAMENEW:
- strcpy(tempname.nameStr,"NEW:RENAME ME");
- if (DataIsUnique(nameGUI, &tempnames,tempname.nameStr,TRUE,"You must rename the previous entry first")){
- /* detach and modify list */
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, ~0,
- TAG_DONE);
-
- temp=NameNewEdit(&tempnames,&tempname);
- namelistActive = DataNode2Ord(&tempnames,temp->nameStr);
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, &tempnames,
- GTLV_Selected, namelistActive,
- TAG_DONE);
-
- NameDisableGads(FALSE);
- }
- break;
-
- case GID_NAMEDEL:
- DataListRemove(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- &tempnames, &namelistActive);
-
- /* disable up/down? */
- if (IsListEmpty(&tempnames))
- NameDisableGads(TRUE);
- break;
-
- case GID_NAMEUP:
- DataListUp(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- &tempnames, &namelistActive);
- break;
-
- case GID_NAMEDOWN:
- DataListDown(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- &tempnames, &namelistActive);
- break;
-
- case GID_NAMETOP:
- DataListTop(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- &tempnames, &namelistActive,0);
- break;
-
- case GID_NAMEBOTTOM:
- DataListBottom(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- &tempnames, &namelistActive,DataCountNodes(&tempnames));
- break;
-
- case GID_NAMECANCEL:
- DataFreeList(&tempnames);
- done = TRUE;
- break;
-
- case GID_NAMEOK:
- amiChangedItems = TRUE;
- updatename = done = TRUE;
- break;
- }
-
- GF_ReplyIMsg(imsg);
- return (done);
- }
-
- /****************************************************
- * NameInit()
- *
- * Set up some globals
- *****************************************************/
- void NameInit(void)
- {
- nameretval = FALSE;
- namelistActive = ~0;
-
- /* grab window */
- GF_GetGUIAttr(nameGUI,GUI_Window,&nameWin,TAG_DONE);
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMELIST].gs_Gadget,
- GTLV_Labels, &tempnames,
- GTLV_Selected,~0,
- TAG_DONE);
- NameDisableGads(TRUE);
- }
-
- /****************************************************
- * NameDisableGads()
- *
- * Disable/Enable extra gadgets
- *****************************************************/
- void NameDisableGads(BOOL dis)
- {
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMEDEL].gs_Gadget,
- GA_Disabled, dis,
- TAG_DONE);
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMEUP].gs_Gadget,
- GA_Disabled, dis,
- TAG_DONE);
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMEDOWN].gs_Gadget,
- GA_Disabled, dis,
- TAG_DONE);
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMETOP].gs_Gadget,
- GA_Disabled, dis,
- TAG_DONE);
-
- GF_SetGadgetAttrs(nameGUI,NAMEgadgetspecs[GID_NAMEBOTTOM].gs_Gadget,
- GA_Disabled, dis,
- TAG_DONE);
- }
-
- /*************************************************************
- * NameNewEdit()
- *
- * Creates a new name node and places it at tail
- **************************************************************/
- nameNode *NameNewEdit(struct List *el,nameNode *m)
- {
- nameNode *work;
-
- work = (nameNode *)AllocVec(sizeof(nameNode), MEMF_CLEAR);
- strcpy(work->nameStr,m->nameStr);
- work->node.ln_Name = work->nameStr;
- AddTail((struct List *)el,(struct Node *)work);
- return (work);
- }
-