/*
* Motif
*
* Copyright (c) 1987-2012, The Open Group. All rights reserved.
*
* These libraries and programs are free software; you can
* redistribute them and/or modify them under the terms of the GNU
* Lesser General Public License as published by the Free Software
* Foundation; either version 2 of the License, or (at your option)
* any later version.
*
* These libraries and programs are distributed in the hope that
* they will be useful, but WITHOUT ANY WARRANTY; without even the
* implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
* PURPOSE. See the GNU Lesser General Public License for more
* details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with these librararies and programs; if not, write
* to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
* Floor, Boston, MA 02110-1301 USA
*/
/*
* HISTORY
*/
#ifdef REV_INFO
#ifndef lint
static char rcsid[] = "$XConsortium: PanedWin12.c /main/5 1995/08/29 15:22:48 drk $"
#endif
#endif
/*
* (c) Copyright 1989, HEWLETT-PACKARD COMPANY */
#include <testlib.h>
/* the following is an experiment which should work on all platforms*/
#if defined(__STDC__)
#include <stdlib.h>
#endif
#include <Xm/SashP.h>
#define RANGE 100
#define BUTTONS 10
#define B_X 50
#define B_Y 50
/* Global Variables */
static Cardinal NewInsertOrder ();
/* Test Paned Window creation with a new insertPosition function. */
void main(argc, argv)
int argc;
char **argv;
{
register int n, i;
Arg args[MAX_ARGS];
char name[10];
Widget PW, PB, PB1, PB2, PB3, PB4, PB5;
int b_value;
short get_val;
srand((int) time(NULL));
CommonTestInit(argc, argv);
n = 0;
XtSetArg(args[n], XmNgeometry, "150x150+0+0"); n++;
XtSetValues(Shell1, args, n);
XtRealizeWidget(Shell1);
n = 0;
XtSetArg(args[n], XmNinsertPosition, (XtOrderProc *) NewInsertOrder); n++;
PW = XmCreatePanedWindow(Shell1, "PW", args, n);
XtSetValues(PW, args, n); /* Ignored at creation? */
for (i = 0; i < BUTTONS; i++)
{
b_value = rand() % RANGE;
sprintf(name, "PB%2d:%3d", i, b_value);
n = 0;
XtSetArg(args[n], XmNuserData, b_value); n++;
XtSetArg(args[n], XmNwidth, 150); n++;
PB = XmCreatePushButton(PW, name, args, n);
XtManageChild(PB);
}
XtManageChild(PW);
CommonPause();
XtDestroyWidget(PW);
/*
* Add tests for 1.2 XmNpositionIndex functionality
*/
#ifndef MOTIF1_1
n = 0;
PW = XmCreatePanedWindow(Shell1, "PW", args, n);
/*
* Put some children in it
*/
n = 0;
XtSetArg(args[n], XmNwidth, 100); n++;
PB1 = XmCreatePushButton(PW, "PB1", args, n);
XtManageChild(PB1);
n = 0;
XtSetArg(args[n], XmNwidth, 100); n++;
PB2 = XmCreatePushButton(PW, "PB2", args, n);
XtManageChild(PB2);
n = 0;
XtSetArg(args[n], XmNwidth, 100); n++;
PB3 = XmCreatePushButton(PW, "PB3", args, n);
XtManageChild(PB3);
n = 0;
XtSetArg(args[n], XmNwidth, 100); n++;
PB4 = XmCreatePushButton(PW, "PB4", args, n);
XtManageChild(PB4);
XtManageChild(PW);
CommonPause();
/*
* Change the last child first
*/
n = 0;
XtSetArg(args[n], XmNpositionIndex, 0); n++;
XtSetValues(PB4, args, n);
n = 0;
XtSetArg(args[n], XmNpositionIndex, &get_val); n++;
XtGetValues(PB4, args, n);
printf("Value of PB4 XmNpositionIndex = %d\n", get_val);
CommonPause();
/*
* Mix up the middle ones
*/
n = 0;
XtSetArg(args[n], XmNpositionIndex, 1); n++;
XtSetValues(PB3, args, n);
n = 0;
XtSetArg(args[n], XmNpositionIndex, &get_val); n++;
XtGetValues(PB3, args, n);
printf("Value of PB3 XmNpositionIndex = %d\n", get_val);
CommonPause();
/*
* Add a new child to the end
*/
n = 0;
XtSetArg(args[n], XmNpositionIndex, XmLAST_POSITION); n++;
XtSetArg(args[n], XmNwidth, 100); n++;
PB5 = XmCreatePushButton(PW, "PB5", args, n);
XtManageChild(PB5);
n = 0;
XtSetArg(args[n], XmNpositionIndex, &get_val); n++;
XtGetValues(PB5, args, n);
printf("Value of PB5 XmNpositionIndex = %d\n", get_val);
CommonPause();
/*
* Set an illegal value for XmNpositionIndex and see if it ralphs
*/
n = 0;
XtSetArg(args[n], XmNpositionIndex, 7); n++;
XtSetValues(PB5, args, n);
n = 0;
XtSetArg(args[n], XmNpositionIndex, &get_val); n++;
XtGetValues(PB5, args, n);
printf("Value of PB5 XmNpositionIndex = %d\n", get_val);
CommonPause();
/*
* Set XmNpositionIndex = -2 and see what happens.
*/
n = 0;
XtSetArg(args[n], XmNpositionIndex, -2); n++;
XtSetValues(PB4, args, n);
n = 0;
XtSetArg(args[n], XmNpositionIndex, &get_val); n++;
XtGetValues(PB4, args, n);
printf("Value of PB4 XmNpositionIndex = %d\n", get_val);
CommonPause();
CommonPause(); /* Exit */
#endif
XtAppMainLoop(app_context);
}
/***************************************************************************
*
* static Cardinal
* NewInsertOrder (w)
*
* This function searches through the composite widget's list of children
* to find the correct insertion position for the new child. If the
* new child is an ordinary child (not a subclass of XmSashWidget)
* the position returned will cause it to be inserted sorted based on the
* value of XmNuserData within the other
* ordinary children but before any Sashs; if the new child is a
* sash the position returned will cause it to be inserted at the
* end of the list. This procedure does not examine the arglist.
*
************************************************************************/
static Cardinal NewInsertOrder (w)
Widget w; /* Composite widget being inserted into */
{
CompositeWidget cw = (CompositeWidget) XtParent(w);
Cardinal i=0;
if (XmIsSash(w) || XmIsSeparatorGadget(w))
{
while ((i < cw->composite.num_children) &&
(! XmIsSash(cw->composite.children[i])) &&
(! XmIsSeparatorGadget(cw->composite.children[i])))
i++;
}
else
{
while ((i < cw->composite.num_children) &&
((long) ((XmPrimitiveWidget) w)->primitive.user_data <
(long) ((XmPrimitiveWidget)
(cw->composite.children[i]))->primitive.user_data) &&
(! XmIsSash(cw->composite.children[i])) &&
(! XmIsSeparatorGadget(cw->composite.children[i])))
i++;
}
return (i);
}
static void ReportSize (w)
Widget w;
{
register int n;
Arg args[2];
Dimension width, height;
n = 0;
XtSetArg(args[n], XmNwidth, &width); n++;
XtSetArg(args[n], XmNheight, &height); n++;
XtGetValues(w, args, n);
printf("%dX%d\n", (int)width, (int)height);
}