/* $XConsortium: ToggleBtn7.c /main/3 1996/07/08 15:38:28 jakku $ */
/*
 *  @OPENGROUP_COPYRIGHT@
 *  COPYRIGHT NOTICE
 *  Copyright (c) 1990, 1991, 1992, 1993 Open Software Foundation, Inc.
 *  Copyright (c) 1996, 1997, 1998, 1999, 2000 The Open Group
 *  ALL RIGHTS RESERVED (MOTIF). See the file named COPYRIGHT.MOTIF for
 *  the full copyright text.
 *  
 *  This software is subject to an open license. It may only be
 *  used on, with or for operating systems which are themselves open
 *  source systems. You must contact The Open Group for a license
 *  allowing distribution and sublicensing of this software on, with,
 *  or for operating systems which are not Open Source programs.
 *  
 *  See http://www.opengroup.org/openmotif/license for full
 *  details of the license agreement. Any use, reproduction, or
 *  distribution of the program constitutes recipient's acceptance of
 *  this agreement.
 *  
 *  EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS
 *  PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
 *  KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY
 *  WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, MERCHANTABILITY
 *  OR FITNESS FOR A PARTICULAR PURPOSE
 *  
 *  EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT
 *  NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT,
 *  INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 *  DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED
 *  AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 *  LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
 *  ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE
 *  EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE
 *  POSSIBILITY OF SUCH DAMAGES.
 */
/*
 * HISTORY
 */
#include <testlib.h>

#define MGR_WIDTH 200
#define MGR_HEIGHT 300

#define NUM_INDICATOR_ON_VALUES 7
#define NUM_INDICATOR_TYPE_VALUES 4

#define NUM_TOGGLE_BUTTONS 3


static char *indicator_on_strings[NUM_INDICATOR_ON_VALUES] = {
	"XmINDICATOR_NONE",
	"XmINDICATOR_FILL",
        "XmINDICATOR_BOX",
	"XmINDICATOR_CHECK",
	"XmINDICATOR_CHECK_BOX",
	"XmINDICATOR_CROSS", 
	"XmINDICATOR_CROSS_BOX" 
     };

static char *indicator_type_strings[NUM_INDICATOR_TYPE_VALUES] = {
        "XmN_OF_MANY",
	"XmONE_OF_MANY",
	"XmONE_OF_MANY_ROUND",
	"XmONE_OF_MANY_DIAMOND"
     };

static unsigned int indicator_on[NUM_INDICATOR_ON_VALUES] = {
	XmINDICATOR_NONE,
	XmINDICATOR_FILL,
        XmINDICATOR_BOX,
	XmINDICATOR_CHECK,
	XmINDICATOR_CHECK_BOX,
	XmINDICATOR_CROSS, 
	XmINDICATOR_CROSS_BOX }; 
	
static unsigned int indicator_type[NUM_INDICATOR_TYPE_VALUES] = {
        XmN_OF_MANY,
	XmONE_OF_MANY,
	XmONE_OF_MANY_ROUND,
	XmONE_OF_MANY_DIAMOND };
 
Widget ToggleButton[NUM_TOGGLE_BUTTONS];
Widget ToggleButtonGadget[NUM_TOGGLE_BUTTONS];
Widget IndicatorOnOptions, IndicatorTypeOptions;
Widget IndicatorOnPB[NUM_INDICATOR_ON_VALUES];
Widget IndicatorTypePB[NUM_INDICATOR_TYPE_VALUES];
int n, i;
Arg args[25];

void PrintIndicatorValues( Widget widget )
{
unsigned char  	indicatorOn;
unsigned char	indicatorType;

     n = 0;
     XtSetArg( args[n], XmNindicatorOn, &indicatorOn ); n++ ;
     XtSetArg( args[n], XmNindicatorType, &indicatorType ); n++ ;
     XtGetValues( widget, args, n );

     if ( XtIsSubclass( widget, xmToggleButtonWidgetClass )) {
        printf("ToggleButton Resource Values: \n");
        printf("============================: \n\n");
		}
     else {
	if ( XtIsSubclass( widget, xmToggleButtonGadgetClass ))
	 {
           printf("ToggleButtonGadget Resource Values: \n");
           printf("==================================  \n\n");
		}
	}
     printf("XmNindicatorOn = ");
     switch( indicatorOn )
     {
	case XmINDICATOR_NONE:
	     printf("XmINDICATOR_NONE \n");
             break;
	case XmINDICATOR_FILL:
	     printf("XmINDICATOR_FILL \n");
             break;
        case XmINDICATOR_BOX:
	     printf("XmINDICATOR_BOX \n");
             break;
	case XmINDICATOR_CHECK:
	     printf("XmINDICATOR_CHECK \n");
             break;
	case XmINDICATOR_CHECK_BOX:
	     printf("XmINDICATOR_CHECK_BOX \n");
             break;
	case XmINDICATOR_CROSS:
	     printf("XmINDICATOR_CROSS \n");
             break;
	case XmINDICATOR_CROSS_BOX:
	     printf("XmINDICATOR_CROSS_BOX \n");
             break;
        default:
             printf("*** an invalid value *** \n");
     }

     printf("XmNindicatorType = "); 
     switch( indicatorType )
     {
        case XmN_OF_MANY:
	     printf("XmN_OF_MANY \n");
             break;
	case XmONE_OF_MANY:
	     printf("XmONE_OF_MANY \n");
             break;
	case XmONE_OF_MANY_ROUND:
	     printf("XmONE_OF_MANY_ROUND \n");
             break;
	case XmONE_OF_MANY_DIAMOND:
	     printf("XmONE_OF_MANY_DIAMOND \n");
             break;
        default:
             printf("*** an invalid value *** \n");
     }

     return;
}

void IndicatorOnCB( Widget widget, XtPointer client_data, XtPointer call_data )
{
	unsigned int indicator_on = *((unsigned int *)client_data );

	n = 0;
	XtSetArg( args[n], XmNindicatorOn, indicator_on ); n++;
	for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ )
        { 
		XtSetValues( ToggleButton[i], args, n );
		XtSetValues( ToggleButtonGadget[i], args, n );
	}
}

void IndicatorTypeCB( Widget widget, XtPointer client_data, XtPointer call_data )
{
	unsigned int indicator_type = *((unsigned int *)client_data );

	n = 0;
	XtSetArg( args[n], XmNindicatorType, indicator_type ); n++;
	for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ )
        { 
		XtSetValues( ToggleButton[i], args, n );
		XtSetValues( ToggleButtonGadget[i], args, n );
	}
}

void CreateControlPanel()
{
Widget 		Form, PopupShell, RowColumn, Label1, Label2;
Widget		Pulldown1, Pulldown2;
int		n;
Arg		args[25];
XmString  	string;
char		buffer[25];

        n = 0;
        XtSetArg( args[n], XmNx, 0 ); n++;
        XtSetArg( args[n], XmNy, 500 ); n++;
        XtSetArg( args[n], XmNwidth,  300 ); n++;
        XtSetArg( args[n], XmNheight,  300 ); n++;
        PopupShell = XtCreatePopupShell("Resource Control Panel",
                                         topLevelShellWidgetClass,
                                         Shell1, args, n );

	n = 0;
	Form = XmCreateForm( PopupShell, "Form", args, n );
	XtManageChild( Form );

        n = 0;
        XtSetArg( args[n], XmNtopAttachment, XmATTACH_FORM ); n++;
        XtSetArg( args[n], XmNleftAttachment, XmATTACH_FORM ); n++;
        XtSetArg(args[n], XmNnumColumns, 4); n++;
        XtSetArg(args[n], XmNorientation, XmHORIZONTAL); n++;
        XtSetArg(args[n], XmNpacking, XmPACK_COLUMN); n++;
        RowColumn = XmCreateRowColumn( Form, "RowColumn", args, n );
        XtManageChild( RowColumn ); 

       /*
        *  Create label and option menu for XmNindicatorOn
        *  resource settings.
        */
	string = XmStringCreateLtoR("XmNindicatorOn:", 
	         XmFONTLIST_DEFAULT_TAG );

	n = 0;
        XtSetArg( args[n], XmNlabelString, string ); n++;
	Label1 = XmCreateLabel( RowColumn, "Label1", args, n );
	XtManageChild( Label1 );
	XmStringFree( string );

	n = 0;
	Pulldown1 = XmCreatePulldownMenu(RowColumn, "Pulldown1", 
                   args, n );

	for ( i = 0; i < NUM_INDICATOR_ON_VALUES; i++ )
	{
	    string = XmStringCreateLtoR( indicator_on_strings[i],
		     XmFONTLIST_DEFAULT_TAG );
            n = 0;
	    sprintf( buffer, "IndicatorOnPB%d", i ); 
	    XtSetArg( args[n], XmNlabelString, string ); n++;
            IndicatorOnPB[i] = 
               XmCreatePushButton( Pulldown1, buffer, args, n ); 
            XmStringFree( string );	
	    XtAddCallback( IndicatorOnPB[i], XmNactivateCallback,
	                   IndicatorOnCB, (XtPointer)&indicator_on[i] ); 
        }
	XtManageChildren( IndicatorOnPB, NUM_INDICATOR_ON_VALUES );

	n = 0;
        XtSetArg( args[n], XmNmenuHistory,
                  IndicatorOnPB[0] ); n++;
        XtSetArg( args[n], XmNsubMenuId, Pulldown1 ); n++;
        IndicatorOnOptions =
        XmCreateOptionMenu( RowColumn, "IndicatorOnOptions", args, n );
        XtManageChild( IndicatorOnOptions );

       /*
        *  Create label and option menu for XmNindicatorType
        *  resource settings.
        */
	string = XmStringCreateLtoR("XmNindicatorType:", 
	         XmFONTLIST_DEFAULT_TAG );

	n = 0;
        XtSetArg( args[n], XmNlabelString, string ); n++;
	Label2 = XmCreateLabel( RowColumn, "Label2", args, n );
	XtManageChild( Label2 );
	XmStringFree( string );

	n = 0;
	Pulldown2 = XmCreatePulldownMenu(RowColumn, "Pulldown2", 
                   args, n );

	for ( i = 0; i < NUM_INDICATOR_TYPE_VALUES; i++ )
	{
	    string = XmStringCreateLtoR( indicator_type_strings[i],
		     XmFONTLIST_DEFAULT_TAG );
            n = 0;
	    sprintf( buffer, "IndicatorTypePB%d", i ); 
	    XtSetArg( args[n], XmNlabelString, string ); n++;
            IndicatorTypePB[i] = 
               XmCreatePushButton( Pulldown2, buffer, args, n ); 
            XmStringFree( string );	
	    XtAddCallback( IndicatorTypePB[i], XmNactivateCallback,
	                   IndicatorTypeCB, (XtPointer)&indicator_type[i] ); 
        }
	XtManageChildren( IndicatorTypePB, NUM_INDICATOR_TYPE_VALUES );

	n = 0;
        XtSetArg( args[n], XmNmenuHistory,
                  IndicatorTypePB[0] ); n++;
        XtSetArg( args[n], XmNsubMenuId, Pulldown2 ); n++;
        IndicatorTypeOptions =
        XmCreateOptionMenu( RowColumn, "IndicatorTypeOptions", args, n );
        XtManageChild( IndicatorTypeOptions ); 


	XtPopup( PopupShell, XtGrabNone );
}

/*
 * Main
 */
void main ( int argc, char **argv )
{

/*int	 	n;
Arg    	 	args[25];*/
char		buffer[25];
Widget		Manager1, RadioBox;

     CommonTestInit( argc, argv );

     n = 0;
     XtSetArg( args[n], XmNwidth, MGR_WIDTH ); n++;
     XtSetArg( args[n], XmNheight, MGR_HEIGHT ); n++;
     Manager1 = XmCreateForm( Shell1, "Manager1", args, n );
     XtManageChild( Manager1 );

    /*
     *  Create XmToggleButton widgets, with default resource values,
     *  which are not children of an XmRadioBox widget.
     */
     i = 0;

     for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ )
     {
        sprintf( buffer, "ToggleButton%d", i );

     	n = 0;
       if ( i == 0 )
	{
     		XtSetArg( args[n], XmNtopAttachment, XmATTACH_FORM ); n++;
	}
	else
	{
     		XtSetArg( args[n], XmNtopAttachment, XmATTACH_WIDGET ); n++;
     		XtSetArg( args[n], XmNtopWidget, ToggleButton[i-1] ); n++;
        }
     	XtSetArg( args[n], XmNleftAttachment, XmATTACH_FORM ); n++;
        ToggleButton[i] = 
           XmCreateToggleButton( Manager1, buffer, args, n );
        XtManageChild( ToggleButton[i] );
     }

    /*
     *  Create XmToggleButtonGadgets, with default resource values,
     *  that are not children of an XmRadioBox widget.
     */
     for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ )
     {
        sprintf( buffer, "ToggleButtonGadget%d", i );

      	n = 0;

	if ( i == 0 )
	{
     		XtSetArg( args[n], XmNtopAttachment, XmATTACH_FORM ); n++;
	}
	else
	{
     		XtSetArg( args[n], XmNtopAttachment, XmATTACH_WIDGET ); n++;
     		XtSetArg( args[n], XmNtopWidget, ToggleButtonGadget[i-1] );
                n++;
	}
     	XtSetArg( args[n], XmNleftAttachment, XmATTACH_WIDGET ); n++;
     	XtSetArg( args[n], XmNleftWidget, ToggleButton[i] ); n++;
     	ToggleButtonGadget[i] = 
          XmCreateToggleButtonGadget( Manager1, buffer, args, n );
     	XtManageChild( ToggleButtonGadget[i] );
      }

    /*
     *  Create control panel which enables testers to set
     *  ToggleButton and ToggleButtonGadget resource values.
     */
     CreateControlPanel();

     XtRealizeWidget( Shell1 );


     CommonPause(); 

    /*
     *  Print the default values of the XmNindicatorOn and 
     *  XmNindicatorType resource values for the ToggleButton
     *  and ToggleButtonGadget.
     */
     PrintIndicatorValues( ToggleButton[0] );
     PrintIndicatorValues( ToggleButtonGadget[0] );

     CommonPause(); 

    /*
     *  Destroy the ToggleButton and ToggleButtonGadget widgets, so that
     *  they can be re-created as children of the RadioBox.
     *  The reason these widgets are destroyed rather than just unmanaged,
     *  is that when tests are run automated, the automated instances of
     *  the widgets are managed at creation time and stay managed.
     */
     for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ )
     {
     	XtDestroyWidget( ToggleButton[i] );
     	XtDestroyWidget( ToggleButtonGadget[i] );
     }

    /*
     *  Reset the option menu settings in the Resource Control
     *  Panel.
     */
     n = 0;
     XtSetArg( args[n], XmNmenuHistory, IndicatorOnPB[0] ); n++;
     XtSetValues( IndicatorOnOptions, args, n );

     n = 0;
     XtSetArg( args[n], XmNmenuHistory, IndicatorTypePB[0] ); n++;
     XtSetValues( IndicatorTypeOptions, args, n );

    /*
     *  Recreate the widgets as children of a RadioBox.
     */
     XtSetArg( args[n], XmNleftAttachment, XmATTACH_FORM ); n++;
     XtSetArg( args[n], XmNtopAttachment, XmATTACH_FORM ); n++;
     XtSetArg( args[n], XmNbottomAttachment, XmATTACH_FORM ); n++;
     XtSetArg( args[n], XmNorientation, XmHORIZONTAL ); n++;
     XtSetArg( args[n], XmNnumColumns, 2 ); n++;
     RadioBox = XmCreateRadioBox( Manager1, "RadioBox", args, n ); 

    /*
     *  Create XmToggleButtons and XmToggleButtonGadgets, 
     *  with default resource values, and a children of
     *  a XmRadioBox widget.
     */
     for ( i = 0; i < NUM_TOGGLE_BUTTONS; i++ ) 
     {
	sprintf( buffer, "ToggleButton%d", i );

        n = 0;
     	ToggleButton[i] =
           XmCreateToggleButton( RadioBox, buffer, args, n );
        XtManageChild( ToggleButton[i] );

	sprintf( buffer, "ToggleButtonGadget%d", i );

        n = 0;
     	ToggleButtonGadget[i] =
           XmCreateToggleButtonGadget( RadioBox, buffer, args, n );
        XtManageChild( ToggleButtonGadget[i] );
     }

     PrintIndicatorValues( ToggleButton[0] );
     PrintIndicatorValues( ToggleButtonGadget[0] );

     CommonPause(); 
     CommonPause(); 

     XtAppMainLoop( app_context );
}