// Read an environment
BOOL environment_open(Cfg_Environment *env,char *name,BOOL first,APTR prog)
{
struct OpenEnvironmentData *opendata;
BOOL success;
short progress=1;
// Free volatile memory
ClearMemHandle(env->volatile_memory);
// Initialise open structure
if (!(opendata=AllocMemH(env->volatile_memory,sizeof(struct OpenEnvironmentData))))
return 0;
opendata->memory=env->desktop_memory;
opendata->volatile_memory=env->volatile_memory;
opendata->flags=OEDF_ALL;
// Initialise progress
SetProgressWindowTags(prog,PW_FileCount,14,PW_FileNum,1,TAG_END);
// Read environment
if ((success=OpenEnvironment((name)?name:env->path,opendata)))
{
// Check stack setting and increase if too low
if (opendata->env.default_stack < STACK_DEFAULT)
opendata->env.default_stack = STACK_DEFAULT;
// Copy things back to the environment
CopyMem((char *)&opendata->env,(char *)env->env,sizeof(CFG_ENVR));
strcpy(env->toolbar_path,opendata->toolbar_path);
strcpy(env->menu_path,opendata->menu_path);
strcpy(env->user_menu_path,opendata->user_menu_path);
strcpy(env->scripts_path,opendata->scripts_path);
strcpy(env->hotkeys_path,opendata->hotkeys_path);
// Get maximum filename length
// we have to do this before the listers are opened
GUI->def_filename_length=environment->env->settings.max_filename;
if (GUI->def_filename_length<FILENAME_LEN)
GUI->def_filename_length=FILENAME_LEN;
else
if (GUI->def_filename_length>107)
GUI->def_filename_length=107;
}
// Successful?
if (success || first)
{
ButtonBankNode *button;
OpenListerNode *lister;
// Bump progress
main_bump_progress(prog,progress++,0);
// Store new environment path
if (name) strcpy(env->path,name);
// Bump progress
main_bump_progress(prog,progress++,0);
// Get new toolbar
FreeToolBar(GUI->toolbar);
GUI->toolbar=OpenToolBar(0,env->toolbar_path);
// Bump progress
main_bump_progress(prog,progress++,0);
// Free lister menu, get new one
CloseButtonBank(GUI->lister_menu);
if ((GUI->lister_menu=OpenButtonBank(env->menu_path)))
{
// Check if it needs conversion
if (!(GUI->lister_menu->window.flags&BTNWF_FIX_MENU))
{
// Convert it to new format
ConvertStartMenu(GUI->lister_menu);
GUI->lister_menu->window.flags|=BTNWF_FIX_MENU;
}
}
// Bump progress
main_bump_progress(prog,progress++,0);
// Free user menu, get new one
CloseButtonBank(GUI->user_menu);
GUI->user_menu=OpenButtonBank(env->user_menu_path);
// Bump progress
main_bump_progress(prog,progress++,0);
// Free scripts, get new set
CloseButtonBank(GUI->scripts);
GUI->scripts=OpenButtonBank(env->scripts_path);
// Bump progress
main_bump_progress(prog,progress++,0);
// Free hotkeys, get new ones
send_main_reset_cmd(CONFIG_CHANGE_HOTKEYS,0,0);
// Go through buttons to open
for (button=(ButtonBankNode *)opendata->buttons.mlh_Head;
button->node.ln_Succ;)
{
ButtonBankNode *next=(ButtonBankNode *)button->node.ln_Succ;
Buttons *but;
// Create button bank from this node
if ((but=buttons_new(button->node.ln_Name,0,&button->pos,0,button->flags|BUTTONF_FAIL)))
{
// Set icon position
but->icon_pos_x=button->icon_pos_x;
but->icon_pos_y=button->icon_pos_y;
}
// Free this node, get next
Remove((struct Node *)button);
FreeMemH(button->node.ln_Name);
FreeMemH(button);
button=next;
}
// Bump progress
main_bump_progress(prog,progress++,0);
// Go through StartMenus to open
for (button=(ButtonBankNode *)opendata->startmenus.mlh_Head;
button->node.ln_Succ;)
{
ButtonBankNode *next=(ButtonBankNode *)button->node.ln_Succ;
// Create new start menu
start_new(button->node.ln_Name,0,0,button->pos.Left,button->pos.Top);
// Free this node, get next
Remove((struct Node *)button);
FreeMemH(button->node.ln_Name);
FreeMemH(button);
button=next;
}
// Bump progress
main_bump_progress(prog,progress++,0);
// Go through listers to open
for (lister=(OpenListerNode *)opendata->listers.mlh_Head;
lister->node.ln_Succ;)
{
OpenListerNode *next=(OpenListerNode *)lister->node.ln_Succ;
// Create lister from this node
if (lister->lister)
lister_new((Cfg_Lister *)lister->lister);
// Free this node, get next
Remove((struct Node *)lister);
FreeMemH(lister);
lister=next;
}
// Bump progress
main_bump_progress(prog,progress++,0);
// Free existing desktop list
env_free_desktop(&env->desktop);
// Copy new desktop into list
if (!(IsListEmpty((struct List *)&opendata->desktop)))
{
env->desktop=opendata->desktop;
env->desktop.mlh_TailPred->mln_Succ=(struct MinNode *)&env->desktop.mlh_Tail;
env->desktop.mlh_Head->mln_Pred=(struct MinNode *)&env->desktop.mlh_Head;
}
// Free existing path list
env_free_desktop(&env->path_list);
// Copy new pathlist into list
if (!(IsListEmpty((struct List *)&opendata->pathlist)))
{
env->path_list=opendata->pathlist;
env->path_list.mlh_TailPred->mln_Succ=(struct MinNode *)&env->path_list.mlh_Tail;
env->path_list.mlh_Head->mln_Pred=(struct MinNode *)&env->path_list.mlh_Head;
}
// Free existing sound list
env_free_desktop(&env->sound_list);
// Copy new sound list into list
if (!(IsListEmpty((struct List *)&opendata->soundlist)))
{
env->sound_list=opendata->soundlist;
env->sound_list.mlh_TailPred->mln_Succ=(struct MinNode *)&env->sound_list.mlh_Tail;
env->sound_list.mlh_Head->mln_Pred=(struct MinNode *)&env->sound_list.mlh_Head;
}
// Bump progress
main_bump_progress(prog,progress++,0);
// Update priority
IPC_Command(&main_ipc,
IPC_PRIORITY,
env->env->settings.pri_main[1],
(APTR)env->env->settings.pri_main[0],
0,0);
// Fix lister priorities
lister_fix_priority(0);
// Bump progress
main_bump_progress(prog,progress++,0);
}
// Failed, free temp lists
else
{
env_free_desktop(&opendata->desktop);
env_free_desktop(&opendata->pathlist);
env_free_desktop(&opendata->soundlist);
env_free_desktop(&opendata->startmenus);
env_free_desktop(&opendata->buttons);
env_free_desktop(&opendata->listers);
}
// Free open data structure
FreeMemH(opendata);
// Bump progress
main_bump_progress(prog,progress,0);
// Build the user menu (needed even if there is none)
display_build_user_menu();
// Initialise progress
SetProgressWindowTags(prog,PW_FileCount,1,PW_FileNum,1,TAG_END);
// Set library flag for 'Move AppIcons to Tools Menu'
SetLibraryFlags((env->env->display_options&DISPOPTF_SHIFT_APPICONS)?LIBDF_REDIRECT_TOOLS:0,LIBDF_REDIRECT_TOOLS);
// Set library flag for borderless icons
SetLibraryFlags((env->env->desktop_flags&DESKTOPF_NO_BORDERS)?LIBDF_BORDERS_OFF:0,LIBDF_BORDERS_OFF);
// No icon caching?
SetLibraryFlags((env->env->desktop_flags&DESKTOPF_NO_CACHE)?LIBDF_NO_CACHING:0,LIBDF_NO_CACHING);
// Set NewIcons flags
SetNewIconsFlags(env->env->env_NewIconsFlags,env->env->env_NewIconsPrecision);
// No custom drag?
SetLibraryFlags((env->env->desktop_flags&DESKTOPF_NO_CUSTOMDRAG)?LIBDF_NO_CUSTOM_DRAG:0,LIBDF_NO_CUSTOM_DRAG);
// Thin borders?
SetLibraryFlags((env->env->display_options&DISPOPTF_THIN_BORDERS)?LIBDF_THIN_BORDERS:0,LIBDF_THIN_BORDERS);
// Update pathlist environment variable
env_update_pathlist();
// Set popup delay
SetPopUpDelay(env->env->settings.popup_delay);
// Fix MUFS library
env_fix_mufs();
// Assign themes path
env_fix_themes();
// Initialise sound events
InitSoundEvents(TRUE);
return success;
}
// Open the button editor (called from a sub-process)
void buttons_edit(
IPCData *my_ipc,
buttons_edit_packet *packet)
{
ButtonsStartup startup;
struct Library *ConfigOpusBase;
IPCData *ipc;
long ret,command;
Buttons *buttons=0;
Cfg_Button *send_button=0;
struct AppMessage *send_msg=0;
short button_col=-1,button_row=-1;
short can_start=1;
// Get packet data
if (packet)
{
buttons=packet->buttons;
send_button=packet->edit;
button_col=packet->col;
button_row=packet->row;
can_start=packet->can_start;
send_msg=packet->appmsg;
}
// Lock process list
lock_listlock(&GUI->process_list,FALSE);
// Get edit command
command=(button_col==-2)?BUTTONEDIT_RE_EDIT_ME:BUTTONEDIT_EDIT_ME;
// See if button editor is running
if (ipc=IPC_FindProc(&GUI->process_list,NAME_BUTTON_EDITOR_RUN,FALSE,0))
{
BOOL front=1;
// Button bank supplied?
if (buttons)
{
// Does the bank not already have the editor?
if (!buttons->editor)
{
// Tell editor to edit the toolbar bank
IPC_Command(
ipc,
command,
(ULONG)buttons->bank,
buttons->ipc,
0,
0);
// Set flag for pending edit request
buttons->flags|=BUTTONF_EDIT_REQUEST;
front=0;
}
// Button to send?
if (send_button)
{
Point *pos;
// Allocate position
if (pos=AllocVec(sizeof(Point),MEMF_CLEAR))
{
// Convert coordinates to window relative
pos->x=button_col-buttons->window->LeftEdge;
pos->y=button_row-buttons->window->TopEdge;
// Send command
IPC_Command(
ipc,
BUTTONEDIT_BUTTON_TO_BANK,
0,
send_button,
pos,
0);
send_button=0;
}
front=0;
}
// Message to send?
if (send_msg)
{
// Send it on
IPC_Command(
ipc,
CFG_APPMESSAGE_PASS,
(ULONG)buttons->bank,
send_msg,
0,
0);
send_msg=0;
}
// Button to edit?
if (button_col>-1)
{
// Send edit command
IPC_Command(
ipc,
BUTTONEDIT_EDIT_BUTTON,
button_col,
(APTR)button_row,
0,
0);
front=0;
}
}
// Bring editor to front
if (front) IPC_Command(ipc,IPC_ACTIVATE,0,0,0,0);
}
// Unlock the process list
unlock_listlock(&GUI->process_list);
// Free button if we have one
if (send_button) FreeButton(send_button);
// Free message if we have one
if (send_msg) ReplyAppMessage((DOpusAppMessage *)send_msg);
// If editor was already running, or we can't start it if not, return
if (ipc || !can_start) return;
// Change our name
my_ipc->proc->pr_Task.tc_Node.ln_Name=NAME_BUTTON_EDITOR_RUN;
// Set flag
GUI->flags|=GUIF_BUTTON_EDITOR;
// Open configuration library
if (!(ConfigOpusBase=OpenModule(config_name)))
return;
// Bank supplied?
if (buttons)
{
// Fill out startup packet
startup.bank=buttons->bank;
startup.ipc=buttons->ipc;
// Button supplied?
if (button_col>-1)
{
// Set flag
startup.flag=1;
// Pass button
startup.button=(button_col<<16)|button_row;
}
else startup.flag=0;
// Set pending edit request
buttons->flags|=BUTTONF_EDIT_REQUEST;
}
else startup.bank=0;
// Configure buttons
ret=Config_Buttons(
&startup,
my_ipc,
&main_ipc,
GUI->screen_pointer,
(ULONG)&GUI->command_list.list);
// Change our name back
my_ipc->proc->pr_Task.tc_Node.ln_Name=NAME_BUTTON_EDITOR;
// Clear flag
GUI->flags&=~GUIF_BUTTON_EDITOR;
// Permit now we've cleaned up
Permit();
// Close library
CloseLibrary(ConfigOpusBase);
// Lock buttons list
lock_listlock(&GUI->buttons_list,FALSE);
// Go through button banks
for (ipc=(IPCData *)GUI->buttons_list.list.lh_Head;
ipc->node.mln_Succ;
ipc=(IPCData *)ipc->node.mln_Succ)
{
// Get buttons pointer
Buttons *buttons=IPCDATA(ipc);
// Toolbar buttons?
if (buttons->flags&BUTTONF_TOOLBAR)
{
// Hide bank
IPC_Command(ipc,IPC_HIDE,0,0,0,REPLY_NO_PORT);
// Need to save?
if (ret&CONFIG_SAVE)
IPC_Command(ipc,BUTTONS_SAVE,0,0,0,REPLY_NO_PORT);
// Use?
if (ret)
{
// Send change
send_main_reset_cmd(CONFIG_CHANGE_LIST_TOOLBAR,0,buttons->bank);
// Steal bank pointer
IPC_Command(ipc,BUTTONEDIT_NEW_BANK,1,0,0,REPLY_NO_PORT);
}
// Close bank
IPC_Command(ipc,IPC_QUIT,0,0,0,0);
}
// Ok?
else
if (ret)
{
// Save?
if (ret&CONFIG_SAVE)
{
// Buttons been changed?
if (buttons->flags&BUTTONF_CHANGED)
{
// Tell bank to save itself
IPC_Command(ipc,BUTTONS_SAVE,0,0,0,REPLY_NO_PORT);
}
}
// Clear 'new' flag
buttons->flags&=~BUTTONF_NEW_BANK;
}
}
// Unlock buttons list
unlock_listlock(&GUI->buttons_list);
}
