GUI_Main_Actions_Server.c

/*
** SPDX-License-Identifier: GPL-3.0-or-later
** Copyright (c) 2023-2024 Rene W. Olsen <renewolsen@gmail.com>
*/

// --

static Object *Page_Action_Server( struct Config *cfg UNUSED )
{
Object *o;

	o = IIntuition->NewObject( LayoutClass, NULL,
		LAYOUT_Orientation,					LAYOUT_ORIENT_VERT,

		LAYOUT_AddChild,					IIntuition->NewObject( LayoutClass, NULL,
		End,

		#if 1
		LAYOUT_AddChild,					IIntuition->NewObject( LayoutClass, NULL,
			LAYOUT_Orientation,				LAYOUT_ORIENT_VERT,
			LAYOUT_BevelStyle,				BVS_SBAR_VERT,
			LAYOUT_Label,					"Server Start",
			LAYOUT_AddChild,				IIntuition->NewObject( LayoutClass, NULL,
				LAYOUT_Orientation,			LAYOUT_ORIENT_HORIZ,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Start_Enable ] = IIntuition->NewObject( CheckBoxClass, NULL,
					GA_ID,					GID_Actions_Server_Start_Enable,
					GA_Selected,			( cfg->cfg_ActionsServerStartEnable ) ? 1 : 0,
					GA_RelVerify,			TRUE,
				End,
				CHILD_WeightedWidth,		0,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Start_Type ] = IIntuition->NewObject( ChooserClass, NULL,
					GA_Disabled,			cfg->cfg_ActionsServerStartEnable == 0,
					CHOOSER_LabelArray,		ActionTypes,
					CHOOSER_Selected,		0,
//					GA_RelVerify,			TRUE,
//					GA_Selected,			( DoVerbose ) ? 1 : 0,
				End,
				CHILD_MinWidth,				150,
				CHILD_WeightedWidth,		0,
				LAYOUT_AddChild,			IIntuition->NewObject( LayoutClass, NULL,
				End,
			End,

			LAYOUT_AddChild,				IIntuition->NewObject( LayoutClass, NULL,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Start_String ] = IIntuition->NewObject( StringClass, NULL,
					GA_Disabled,			cfg->cfg_ActionsServerStartEnable == 0,
					GA_ID,					GID_Actions_Server_Start_String,
					GA_RelVerify,			TRUE,
					GA_TabCycle,			TRUE,
					STRINGA_WorkBuffer,		WorkBuffer,
					STRINGA_MaxChars,		MAX_ACTIONBUFFER,
					STRINGA_TextVal,		ActionBuffer_ServerStart,
				End,
			End,
		End,
		CHILD_WeightedHeight,				0,

		LAYOUT_AddChild,					IIntuition->NewObject( LayoutClass, NULL,
			LAYOUT_Orientation,				LAYOUT_ORIENT_VERT,
			LAYOUT_BevelStyle,				BVS_SBAR_VERT,
			LAYOUT_Label,					"Server Stop",
			LAYOUT_AddChild,				IIntuition->NewObject( LayoutClass, NULL,
				LAYOUT_Orientation,			LAYOUT_ORIENT_HORIZ,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Stop_Enable ] = IIntuition->NewObject( CheckBoxClass, NULL,
					GA_ID,					GID_Actions_Server_Stop_Enable,
					GA_Selected,			( cfg->cfg_ActionsServerStopEnable ) ? 1 : 0,
					GA_RelVerify,			TRUE,
				End,
				CHILD_WeightedWidth,		0,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Stop_Type ] = IIntuition->NewObject( ChooserClass, NULL,
					GA_Disabled,			cfg->cfg_ActionsServerStopEnable == 0,
					CHOOSER_LabelArray,		ActionTypes,
					CHOOSER_Selected,		0,
//					GA_RelVerify,			TRUE,
//					GA_Selected,			( DoVerbose ) ? 1 : 0,
				End,
				CHILD_MinWidth,				150,
				CHILD_WeightedWidth,		0,
				LAYOUT_AddChild,			IIntuition->NewObject( LayoutClass, NULL,
				End,
			End,

			LAYOUT_AddChild,				IIntuition->NewObject( LayoutClass, NULL,
				LAYOUT_AddChild,			GUIObjects[ GID_Actions_Server_Stop_String ] = IIntuition->NewObject( StringClass, NULL,
					GA_Disabled,			cfg->cfg_ActionsServerStopEnable == 0,
					GA_ID,					GID_Actions_Server_Stop_String,
					GA_RelVerify,			TRUE,
					GA_TabCycle,			TRUE,
					STRINGA_WorkBuffer,		WorkBuffer,
					STRINGA_MaxChars,		MAX_ACTIONBUFFER,
					STRINGA_TextVal,		ActionBuffer_ServerStop,
				End,
			End,
		End,
		CHILD_WeightedHeight,				0,
		#endif
	
		LAYOUT_AddChild,					IIntuition->NewObject( LayoutClass, NULL,
		End,
	End;

	return( o );
}

// --

static void GUIFunc_Actions_Server_Start_Enable( struct Config *cfg )
{
uint32 val;
	
	val = 0;

	IIntuition->GetAttrs( GUIObjects[ GID_Actions_Server_Start_Enable ],
		GA_Selected, & val,
		TAG_END
	);

	cfg->cfg_ActionsServerStartEnable = ( val ) ? 1 : 0 ;

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Start_Type ],
		GA_Disabled, val == 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Start_String ],
		GA_Disabled, val == 0,
		TAG_END
	);
}

// --

static void GUIFunc_Actions_Server_Stop_Enable( struct Config *cfg )
{
uint32 val;
	
	val = 0;

	IIntuition->GetAttrs( GUIObjects[ GID_Actions_Server_Stop_Enable ],
		GA_Selected, & val,
		TAG_END
	);

	cfg->cfg_ActionsServerStopEnable = ( val ) ? 1 : 0 ;

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Stop_Type ],
		GA_Disabled, val == 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Stop_String ],
		GA_Disabled, val == 0,
		TAG_END
	);
}

// --

static void GUIFunc_UpdateActionServerStart( struct Config *cfg UNUSED )
{
char *str;

	str = NULL;

	IIntuition->GetAttrs( GUIObjects[ GID_Actions_Server_Start_String ],
		STRINGA_TextVal, & str,
		TAG_END
	);

	if ( str )
	{
		strncpy( ActionBuffer_ServerStart, str, MAX_ACTIONBUFFER-1 );
	}
}

// --

static void GUIFunc_UpdateActionServerStop( struct Config *cfg UNUSED )
{
char *str;

	str = NULL;

	IIntuition->GetAttrs( GUIObjects[ GID_Actions_Server_Stop_String ],
		STRINGA_TextVal, & str,
		TAG_END
	);

	if ( str )
	{
		strncpy( ActionBuffer_ServerStop, str, MAX_ACTIONBUFFER-1 );
	}
}

// --

static void Page_Refresh_Action_Server( struct Config *cfg )
{
	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Start_Enable ],
		GA_Selected, ( cfg->cfg_ActionsServerStartEnable ) ? 1 : 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Start_Type ],
		GA_Disabled, cfg->cfg_ActionsServerStartEnable == 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Start_String ],
		GA_Disabled, cfg->cfg_ActionsServerStartEnable == 0,
		STRINGA_TextVal, ActionBuffer_ServerStart,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Stop_Enable ],
		GA_Selected, ( cfg->cfg_ActionsServerStopEnable ) ? 1 : 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Stop_Type ],
		GA_Disabled, cfg->cfg_ActionsServerStopEnable == 0,
		TAG_END
	);

	mySetTags( cfg, GUIObjects[ GID_Actions_Server_Stop_String ],
		GA_Disabled, cfg->cfg_ActionsServerStopEnable == 0,
		STRINGA_TextVal, ActionBuffer_ServerStop,
		TAG_END
	);
}

// --