/*

 * 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: ToggleBGad5.c /main/4 1995/07/13 17:32:09 drk $"

#endif

#endif

/****************************************************************************

 *

 * This program tests the indicator dimensions - Changing pixmap sizes,

 * setting the indicator dimension for pixmaps, and changing the label in

 * a pulldown menu of toggle buttons. 

 *

 ****************************************************************************/

#include <testlib.h>

#include <X11/Xlib.h>

#include <X11/StringDefs.h>

#include <X11/Xatom.h>

#define xlogo32_width 32

#define xlogo32_height 32

static char xlogo32_bits[] = {

   0xff, 0x00, 0x00, 0xc0, 0xfe, 0x01, 0x00, 0xc0, 0xfc, 0x03, 0x00, 0x60,

   0xf8, 0x07, 0x00, 0x30, 0xf8, 0x07, 0x00, 0x18, 0xf0, 0x0f, 0x00, 0x0c,

   0xe0, 0x1f, 0x00, 0x06, 0xc0, 0x3f, 0x00, 0x06, 0xc0, 0x3f, 0x00, 0x03,

   0x80, 0x7f, 0x80, 0x01, 0x00, 0xff, 0xc0, 0x00, 0x00, 0xfe, 0x61, 0x00,

   0x00, 0xfe, 0x31, 0x00, 0x00, 0xfc, 0x33, 0x00, 0x00, 0xf8, 0x1b, 0x00,

   0x00, 0xf0, 0x0d, 0x00, 0x00, 0xf0, 0x0e, 0x00, 0x00, 0x60, 0x1f, 0x00,

   0x00, 0xb0, 0x3f, 0x00, 0x00, 0x98, 0x7f, 0x00, 0x00, 0x98, 0x7f, 0x00,

   0x00, 0x0c, 0xff, 0x00, 0x00, 0x06, 0xfe, 0x01, 0x00, 0x03, 0xfc, 0x03,

   0x80, 0x01, 0xfc, 0x03, 0xc0, 0x00, 0xf8, 0x07, 0xc0, 0x00, 0xf0, 0x0f,

   0x60, 0x00, 0xe0, 0x1f, 0x30, 0x00, 0xe0, 0x1f, 0x18, 0x00, 0xc0, 0x3f,

   0x0c, 0x00, 0x80, 0x7f, 0x06, 0x00, 0x00, 0xff};

#define LARGE_width 16

#define LARGE_height 16

static char LARGE_bits[] = {

   0x03, 0xc0, 0x07, 0xe0, 0x0e, 0x70, 0x1c, 0x38, 0x38, 0x1c, 0x70, 0x0e,

   0Xe0, 0x07, 0x40, 0x02, 0x40, 0x02, 0xe0, 0x07, 0x70, 0x0e, 0x38, 0x1c,

   0x1c, 0x38, 0x0e, 0x70, 0x07, 0xe0, 0x03, 0xc0};

#define grid8_width 8

#define grid8_height 8

static char grid8_bits[] = {

   0x55, 0x00, 0x01, 0x00, 0x01, 0x00, 0x01, 0x00};

Pixmap pix[3];

void pbCB (widget, togglebutton, callData)

  Widget widget;

  XtPointer togglebutton;

  XtPointer callData;

{

  Cardinal n;

  Arg args[MAX_ARGS];

  Widget tb = (Widget)togglebutton;

  static int pix_num = 0;

  pix_num = (pix_num + 1) % 3;

  n = 0;

  XtSetArg(args[n], XmNlabelPixmap, pix[pix_num]); n++;

  XtSetValues(tb, args, n);

}

void tbCB (widget, moreinfo, callData)

  Widget widget;

  XtPointer moreinfo;

  XtPointer callData;

{

  Cardinal n;

  Arg args[MAX_ARGS];

  XmString original = XmStringCreateLocalized("Button_A");

  XmString new      = XmStringCreateLocalized("A New Label");

  XmString from_tb;

  n = 0;

  XtSetArg(args[n], XmNlabelString, &from_tb); n++;

  XtGetValues(widget, args, n);

  n = 0;

  XtSetArg(args[n], XmNset, True); n++;

  if (XmStringCompare(original, from_tb))

  {

    XtSetArg(args[n], XmNlabelString, new); n++;

  }

  else if (XmStringCompare(new, from_tb))

  {

    XtSetArg(args[n], XmNlabelString, original); n++;

  }

  else

  {

    printf("A horrible error occurred.  AAACCCCKKKK!!!\n\n");

    exit(0);

  }

  XtSetValues(widget, args, n);

}

void main (argc, argv)

unsigned int argc;

char **argv;

{

  Cardinal n;

  Arg args[MAX_ARGS];

  Widget rc, tb1, pb1;

  Widget menubar, pulldown, tb[4], cb1;

  static char labelstring[9] = "Button_A";

  XmString tcs;

  CommonTestInit(argc, argv);

/* Begin test for 4998 - Change the pixmaps to verify that the indicator

 * size changes to match the size of the new pixmap.

 */ 

  rc = XmCreateRowColumn(Shell1, "rc", NULL, 0);

  XtManageChild(rc);

  pix[0] = XCreatePixmapFromBitmapData(display, DefaultRootWindow(display),

				 grid8_bits, grid8_width, grid8_height,

				 WhitePixel(display, DefaultScreen(display)),

				 BlackPixel(display, DefaultScreen(display)),

				 DefaultDepth(display,DefaultScreen(display)));

  pix[1] = XCreatePixmapFromBitmapData(display, DefaultRootWindow(display),

                                 LARGE_bits, LARGE_width, LARGE_height,

                                 WhitePixel(display, DefaultScreen(display)),

                                 BlackPixel(display, DefaultScreen(display)),

                                 DefaultDepth(display,DefaultScreen(display)));

  pix[2] = XCreatePixmapFromBitmapData(display, DefaultRootWindow(display),

                                 xlogo32_bits, xlogo32_width, xlogo32_height,

                                 WhitePixel(display, DefaultScreen(display)),

                                 BlackPixel(display, DefaultScreen(display)),

                                 DefaultDepth(display,DefaultScreen(display)));

  n = 0;

  XtSetArg(args[n], XmNlabelType, XmPIXMAP); n++;

  XtSetArg(args[n], XmNlabelPixmap, pix[0]); n++;

  tb1 = XmCreateToggleButtonGadget(rc, "tb1", args, n);

  XtManageChild(tb1);

  n = 0;

  tcs = XmStringCreateSimple("Cycle Pixmaps");

  XtSetArg(args[n], XmNlabelString, tcs); n++;

  pb1 = XmCreatePushButton(rc, "pb1", args, n);

  XtManageChild(pb1);

  XtAddCallback(pb1, XmNactivateCallback, pbCB, (XtPointer)tb1);

  XmStringFree(tcs);

  XtRealizeWidget(Shell1);

  CommonPause();

  XtDestroyWidget(rc);

/* End Test for 4998 */

/*

 * Begin test for 5203: Create a pulldown menu of toggle buttons.

 * Add a callback to the first toggle button which will cause a change 

 * in its label.  Verify that the indicator size stays the same after 

 * the change.

 */

  n = 0;

  menubar = XmCreateMenuBar(Shell1, "menubar", args, n);

  n = 0;

  pulldown = XmCreatePulldownMenu(menubar, "pulldown", args, n);

  for (n = 0; n < 4; n++)

  {

    labelstring[strlen(labelstring) - 1] = 'A' + n;

    tcs = XmStringCreateLocalized(labelstring);

    XtSetArg(args[0], XmNlabelString, tcs);

    XtSetArg(args[1], XmNset, True);  

    tb[n] = XmCreateToggleButtonGadget(pulldown, labelstring, args, 2);

    XmStringFree(tcs);

  }

  XtManageChildren(tb, 4);

  XtAddCallback(tb[0], XmNvalueChangedCallback, tbCB, NULL);

  n = 0;

  XtSetArg(args[n], XmNsubMenuId, pulldown); n++;

  cb1 = XmCreateCascadeButton(menubar, "MENU", args, n);

  XtManageChild(cb1);

  XtManageChild(menubar); 

  CommonPause();

  CommonPause(); /* exit */

  XtAppMainLoop(app_context);

}