home *** CD-ROM | disk | FTP | other *** search
- /*
- ** PhonePanelPlus.c
- **
- ** The phonebook and support routines
- **
- ** Copyright © 1990-1996 by Olaf `Olsen' Barthel
- ** All Rights Reserved
- **
- ** :ts=4
- */
-
- #ifndef _GLOBAL_H
- #include "Global.h"
- #endif
-
- // The gadget IDs are in there
-
- #include "PhonePanel.h"
-
- BOOL
- SaveChanges(struct Window *Parent)
- {
- return((BOOL)ShowRequest(Parent,LocaleString(MSG_SAVE_CHANGES),LocaleString(MSG_GLOBAL_YES_NO_TXT)));
- }
-
- BOOL
- EditConfig(struct Configuration *Config,LONG Type,ULONG Qualifier,struct Window *Window)
- {
- STATIC LONG TypeMappings[15][2] =
- {
- GAD_SERIAL_EDIT, PREF_SERIAL,
- GAD_MODEM_EDIT, PREF_MODEM,
- GAD_SCREEN_EDIT, PREF_SCREEN,
- GAD_TERMINAL_EDIT, PREF_TERMINAL,
- GAD_EMULATION_EDIT, PREF_EMULATION,
- GAD_CLIPBOARD_EDIT, PREF_CLIP,
- GAD_CAPTURE_EDIT, PREF_CAPTURE,
- GAD_COMMAND_EDIT, PREF_COMMAND,
- GAD_MISC_EDIT, PREF_MISC,
- GAD_PATH_EDIT, PREF_PATH,
- GAD_TRANSFER_EDIT, PREF_TRANSFER,
- GAD_TRANSLATION_EDIT, PREF_TRANSLATIONFILENAME,
- GAD_MACRO_EDIT, PREF_MACROFILENAME,
- GAD_CURSOR_EDIT, PREF_CURSORFILENAME,
- GAD_FASTMACRO_EDIT, PREF_FASTMACROFILENAME
- };
-
- struct FileRequester *FileRequest;
- UBYTE DummyBuffer[MAX_FILENAME_LENGTH],
- *DummyChar;
- BOOL Changed = FALSE,
- FallBack = TRUE;
- LONG PrefType;
- LONG i;
- APTR Data;
-
- // Find the prefs fragment that should be worked upon
-
- for(i = 0 ; i < sizeof(TypeMappings) / (sizeof(LONG) * 2) ; i++)
- {
- if(TypeMappings[i][0] == Type)
- {
- PrefType = TypeMappings[i][1];
-
- break;
- }
- }
-
- Data = GetConfigEntry(Config,PrefType);
-
- if(CreateConfigEntry(Config,PrefType))
- {
- switch(Type)
- {
- case GAD_SERIAL_EDIT:
-
- Changed = SerialPanel(Window,Config);
- break;
-
- case GAD_MODEM_EDIT:
-
- Changed = ModemPanel(Window,Config);
- break;
-
- case GAD_SCREEN_EDIT:
-
- Changed = ScreenPanel(Window,Config);
- break;
-
- case GAD_TERMINAL_EDIT:
-
- Changed = TerminalPanel(Window,Config);
- break;
-
- case GAD_EMULATION_EDIT:
-
- Changed = EmulationPanel(Window,Config);
- break;
-
- case GAD_CLIPBOARD_EDIT:
-
- Changed = ClipPanel(Window,Config);
- break;
-
- case GAD_CAPTURE_EDIT:
-
- Changed = CapturePanel(Window,Config);
- break;
-
- case GAD_COMMAND_EDIT:
-
- Changed = CommandPanel(Window,Config);
- break;
-
- case GAD_MISC_EDIT:
-
- Changed = MiscPanel(Window,Config);
- break;
-
- case GAD_PATH_EDIT:
-
- Changed = PathPanel(Window,Config);
- break;
-
- case GAD_TRANSFER_EDIT:
-
- Changed = LibPanel(Window,Config);
- break;
-
- case GAD_TRANSLATION_EDIT:
-
- if(!(Qualifier & (IEQUALIFIER_LSHIFT | IEQUALIFIER_RSHIFT)))
- {
- struct TranslationEntry **Send,**Receive = NULL;
- BOOL Success = FALSE;
-
- strcpy(DummyBuffer,Config -> TranslationFileName);
-
- if(Send = AllocTranslationTable())
- {
- if(Receive = AllocTranslationTable())
- {
- Success = TRUE;
-
- if(DummyBuffer[0])
- {
- if(!LoadTranslationTables(DummyBuffer,Send,Receive))
- {
- LONG Error = IoErr();
-
- if(Error != ERROR_OBJECT_NOT_FOUND)
- ShowError(Window,ERR_LOAD_ERROR,Error,DummyBuffer);
-
- FillTranslationTable(Send);
- FillTranslationTable(Receive);
- }
- }
- else
- {
- FillTranslationTable(Send);
- FillTranslationTable(Receive);
- }
- }
- }
-
- if(Success)
- {
- if(TranslationPanelConfig(NULL,&Send,&Receive,DummyBuffer,Window,NULL))
- {
- if(Send || Receive)
- {
- if(IsStandardTable(Send) && IsStandardTable(Receive))
- DummyBuffer[0] = 0;
-
- if(DummyBuffer[0])
- {
- if(SaveChanges(Window))
- {
- if(!SaveTranslationTables(DummyBuffer,Send,Receive))
- ShowError(Window,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
- }
- }
- }
- else
- DummyBuffer[0] = 0;
- }
-
- if(strcmp(Config -> TranslationFileName,DummyBuffer))
- {
- strcpy(Config -> TranslationFileName,DummyBuffer);
-
- Changed = TRUE;
- }
-
- FallBack = FALSE;
- }
-
- if(Send)
- FreeTranslationTable(Send);
-
- if(Receive)
- FreeTranslationTable(Receive);
- }
-
- if(FallBack)
- {
- SplitFileName(Config -> TranslationFileName,&DummyChar,DummyBuffer);
-
- if(FileRequest = GetFile(Window,LocaleString(MSG_PHONEPANEL_SELECT_TRANSLATION_TXT),DummyBuffer,DummyChar,DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SELECT_TXT),TRUE))
- {
- strcpy(Config -> TranslationFileName,DummyBuffer);
-
- FreeAslRequest(FileRequest);
-
- Changed = TRUE;
- }
- }
-
- break;
-
- case GAD_MACRO_EDIT:
-
- if(!(Qualifier & (IEQUALIFIER_LSHIFT | IEQUALIFIER_RSHIFT)))
- {
- struct MacroKeys *Keys;
-
- if(Keys = (struct MacroKeys *)AllocVecPooled(sizeof(struct MacroKeys),MEMF_ANY | MEMF_CLEAR))
- {
- strcpy(DummyBuffer,Config -> MacroFileName);
-
- if(DummyBuffer[0])
- {
- if(!LoadMacros(DummyBuffer,Keys))
- {
- LONG Error = IoErr();
-
- if(Error != ERROR_OBJECT_NOT_FOUND)
- ShowError(Window,ERR_LOAD_ERROR,Error,DummyBuffer);
- }
- }
-
- if(MacroPanelConfig(NULL,Keys,DummyBuffer,Window,NULL))
- {
- if(DummyBuffer[0] && SaveChanges(Window))
- {
- if(!WriteIFFData(DummyBuffer,Keys,sizeof(struct MacroKeys),ID_KEYS))
- ShowError(Window,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
- }
- }
-
- if(strcmp(Config -> MacroFileName,DummyBuffer))
- {
- strcpy(Config -> MacroFileName,DummyBuffer);
-
- Changed = TRUE;
- }
-
- FallBack = FALSE;
-
- FreeVecPooled(Keys);
- }
- }
-
- if(FallBack)
- {
- SplitFileName(Config -> MacroFileName,&DummyChar,DummyBuffer);
-
- if(FileRequest = GetFile(Window,LocaleString(MSG_PHONEPANEL_SELECT_KEYBOARD_MACROS_TXT),DummyBuffer,DummyChar,DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SELECT_TXT),TRUE))
- {
- strcpy(Config -> MacroFileName,DummyBuffer);
-
- FreeAslRequest(FileRequest);
-
- Changed = TRUE;
- }
- }
-
- break;
-
- case GAD_CURSOR_EDIT:
-
- if(!(Qualifier & (IEQUALIFIER_LSHIFT | IEQUALIFIER_RSHIFT)))
- {
- struct CursorKeys *Keys;
-
- if(Keys = (struct CursorKeys *)AllocVecPooled(sizeof(struct CursorKeys),MEMF_ANY | MEMF_CLEAR))
- {
- strcpy(DummyBuffer,Config -> CursorFileName);
-
- if(DummyBuffer[0])
- {
- if(!ReadIFFData(DummyBuffer,Keys,sizeof(struct CursorKeys),ID_KEYS))
- {
- LONG Error = IoErr();
-
- ResetCursorKeys(Keys);
-
- if(Error != ERROR_OBJECT_NOT_FOUND)
- ShowError(Window,ERR_LOAD_ERROR,Error,DummyBuffer);
- }
- }
- else
- ResetCursorKeys(Keys);
-
- if(CursorPanelConfig(NULL,Keys,DummyBuffer,Window,NULL))
- {
- if(DummyBuffer[0] && SaveChanges(Window))
- {
- if(!WriteIFFData(DummyBuffer,Keys,sizeof(struct CursorKeys),ID_KEYS))
- ShowError(Window,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
- }
- }
-
- if(strcmp(Config -> CursorFileName,DummyBuffer))
- {
- strcpy(Config -> CursorFileName,DummyBuffer);
-
- Changed = TRUE;
- }
-
- FallBack = FALSE;
-
- FreeVecPooled(Keys);
- }
- }
-
- if(FallBack)
- {
- SplitFileName(Config -> CursorFileName,&DummyChar,DummyBuffer);
-
- if(FileRequest = GetFile(Window,LocaleString(MSG_PHONEPANEL_SELECT_CURSOR_KEYS_TXT),DummyBuffer,DummyChar,DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SELECT_TXT),TRUE))
- {
- strcpy(Config -> CursorFileName,DummyBuffer);
-
- FreeAslRequest(FileRequest);
-
- Changed = TRUE;
- }
- }
-
- break;
-
- case GAD_FASTMACRO_EDIT:
-
- if(!(Qualifier & (IEQUALIFIER_LSHIFT | IEQUALIFIER_RSHIFT)))
- {
- struct List *List;
-
- if(List = CreateList())
- {
- strcpy(DummyBuffer,Config -> FastMacroFileName);
-
- if(DummyBuffer[0])
- {
- if(!LoadFastMacros(DummyBuffer,List))
- {
- LONG Error = IoErr();
-
- if(Error != ERROR_OBJECT_NOT_FOUND)
- ShowError(Window,ERR_LOAD_ERROR,Error,DummyBuffer);
- }
- }
-
- if(FastMacroPanelConfig(NULL,List,DummyBuffer,Window,NULL))
- {
- if(DummyBuffer[0] && SaveChanges(Window))
- {
- if(!SaveFastMacros(DummyBuffer,List))
- ShowError(Window,ERR_SAVE_ERROR,IoErr(),DummyBuffer);
- }
- }
-
- if(strcmp(Config -> FastMacroFileName,DummyBuffer))
- {
- strcpy(Config -> FastMacroFileName,DummyBuffer);
-
- Changed = TRUE;
- }
-
- FallBack = FALSE;
-
- DeleteList(List);
- }
- }
-
- if(FallBack)
- {
- SplitFileName(Config -> FastMacroFileName,&DummyChar,DummyBuffer);
-
- if(FileRequest = GetFile(Window,LocaleString(MSG_PHONEPANEL_SELECT_FAST_MACROS_TXT),DummyBuffer,DummyChar,DummyBuffer,"#?.prefs",FALSE,FALSE,FALSE,LocaleString(MSG_GLOBAL_SELECT_TXT),TRUE))
- {
- strcpy(Config -> FastMacroFileName,DummyBuffer);
-
- FreeAslRequest(FileRequest);
-
- Changed = TRUE;
- }
- }
-
- break;
- }
-
- if(!Changed && !Data)
- DeleteConfigEntry(Config,PrefType);
- }
- else
- DisplayBeep(Window -> WScreen);
-
- return(Changed);
- }
-
- BOOL
- ChangeState(LONG Type,LONG Default,struct PhoneNode *Node)
- {
- STATIC LONG TypeMappings[][2] =
- {
- GAD_SERIAL_STATE, PREF_SERIAL,
- GAD_MODEM_STATE, PREF_MODEM,
- GAD_SCREEN_STATE, PREF_SCREEN,
- GAD_TERMINAL_STATE, PREF_TERMINAL,
- GAD_EMULATION_STATE, PREF_EMULATION,
- GAD_CLIPBOARD_STATE, PREF_CLIP,
- GAD_CAPTURE_STATE, PREF_CAPTURE,
- GAD_COMMAND_STATE, PREF_COMMAND,
- GAD_MISC_STATE, PREF_MISC,
- GAD_PATH_STATE, PREF_PATH,
- GAD_TRANSFER_STATE, PREF_TRANSFER,
- GAD_TRANSLATION_STATE, PREF_TRANSLATIONFILENAME,
- GAD_MACRO_STATE, PREF_MACROFILENAME,
- GAD_CURSOR_STATE, PREF_CURSORFILENAME,
- GAD_FASTMACRO_STATE, PREF_FASTMACROFILENAME,
- GAD_RATE_STATE, PREF_RATES
- };
-
- struct Configuration *LocalConfig;
- LONG PrefType;
- LONG i;
- APTR Data;
-
- // Find the prefs fragment that should be worked upon
-
- for(i = 0 ; i < sizeof(TypeMappings) / (sizeof(LONG) * 2) ; i++)
- {
- if(TypeMappings[i][0] == Type)
- {
- PrefType = TypeMappings[i][1];
-
- break;
- }
- }
-
- // This is the one we're about to put through the wringer
-
- LocalConfig = Node -> Entry -> Config;
-
- // A special case, the phone rates
-
- if(PrefType == PREF_RATES)
- {
- if(Default)
- {
- // There will be some rates...
-
- Node -> Entry -> Header -> NoRates = FALSE;
-
- // Nothing in this list?
-
- if(!Node -> Entry -> TimeDateList . mlh_Head -> mln_Succ)
- {
- struct TimeDateNode *TimeDateNode;
-
- // Provide defaults
-
- if(TimeDateNode = CreateTimeDateNode(-1,-1,"",2))
- AddTail((struct List *)&Node -> Entry -> TimeDateList,&TimeDateNode -> VanillaNode);
- else
- {
- Node -> Entry -> Header -> NoRates = TRUE; // Sorry, guv'nor
-
- return(FALSE);
- }
- }
- }
- else
- {
- // Discard the time/date list
-
- FreeTimeDateList((struct List *)&Node -> Entry -> TimeDateList);
-
- // No rates here
-
- Node -> Entry -> Header -> NoRates = TRUE;
- }
-
- return(TRUE);
- }
-
- // Get a pointer to it
-
- Data = GetConfigEntry(LocalConfig,PrefType);
-
- // Default == TRUE means: replace fragment with a copy of the
- // current global configuration which the
- // user can edit later. Making a connection
- // through the phonebook will cause the
- // global configuration to be replaced
- // with this copy.
-
- if(Default)
- {
- BOOL Result;
-
- // Get rid of the old stuff
-
- if(Data)
- {
- DeleteConfigEntry(LocalConfig,PrefType);
-
- Result = TRUE;
- }
- else
- Result = FALSE;
-
- // Create a new fragment with default values
-
- if(!CreateConfigEntry(LocalConfig,PrefType))
- return(Result);
- }
- else
- {
- // Default == FALSE means: discard this fragment; making a
- // connection through the phonebook
- // will then leave these main config
- // fragments unmodified.
-
- if(Data)
- DeleteConfigEntry(LocalConfig,PrefType);
- else
- return(FALSE);
- }
-
- return(TRUE);
- }
-
- STRPTR *
- BuildLabels()
- {
- LONG Count;
- struct Node *Node;
- STRPTR *Labels;
- LONG i;
-
- for(Count = 0, Node = (struct Node *)PhoneGroupList . mlh_Head ; Node -> ln_Succ ; Node = Node -> ln_Succ)
- Count++;
-
- if(!(Labels = (STRPTR *)AllocVecPooled(sizeof(STRPTR) * (Count + 2),MEMF_ANY)))
- return(NULL);
-
- Labels[0] = LocaleString(MSG_PHONEBOOK_ALL_GROUP_TXT);
-
- for(i = 1, Node = (struct Node *)PhoneGroupList . mlh_Head ; Node -> ln_Succ ; Node = Node -> ln_Succ)
- Labels[i++] = Node -> ln_Name;
-
- Labels[i] = NULL;
-
- return(Labels);
- }
-
- VOID
- FindGroup(struct List **pCurrentList,LONG *pSelected,ULONG *pGrouper,struct List *PhoneList,struct MinList *List,struct PhoneNode *This)
- {
- PhoneGroupNode *GroupNode;
- struct PhoneNode *Node;
- LONG Index;
- ULONG Group;
-
- Group = 1;
-
- for(GroupNode = (PhoneGroupNode *)List -> mlh_Head ; GroupNode -> Node . ln_Succ ; GroupNode = (PhoneGroupNode *)GroupNode -> Node . ln_Succ)
- {
- Index = 0;
-
- for(Node = (struct PhoneNode *)GroupNode -> GroupList . mlh_Head ; Node -> VanillaNode . ln_Succ ; Node = (struct PhoneNode *)Node -> VanillaNode . ln_Succ)
- {
- if(Node == This)
- {
- *pCurrentList = (struct List *)&GroupNode -> GroupList;
- *pSelected = Index;
- *pGrouper = Group;
-
- return;
- }
-
- Index++;
- }
-
- Group++;
- }
-
- Index = 0;
-
- for(Node = (struct PhoneNode *)PhoneList -> lh_Head ; Node -> VanillaNode . ln_Succ ; Node = (struct PhoneNode *)Node -> VanillaNode . ln_Succ)
- {
- if(Node == This)
- {
- *pCurrentList = PhoneList;
- *pSelected = Index;
- *pGrouper = 0;
-
- return;
- }
-
- Index++;
- }
- }
-