Toggle.c File Reference

#include <stdio.h>
#include <X11/IntrinsicP.h>
#include <X11/StringDefs.h>
#include <X11/Xaw3d/XawInit.h>
#include <X11/Xmu/Converters.h>
#include <X11/Xmu/Misc.h>
#include <X11/Xaw3d/ToggleP.h>

Include dependency graph for Toggle.c:

Go to the source code of this file.

Defines
#define	offset(field)   XtOffsetOf(ToggleRec, field)
#define	SuperClass   ((CommandWidgetClass)&commandClassRec)
Functions
static void	Toggle ()
static void	Initialize ()
static void	Notify ()
static void	ToggleSet ()
static void	ToggleDestroy ()
static void	ClassInit ()
static Boolean	SetValues ()
static RadioGroup *	GetRadioGroup ()
static void	CreateRadioGroup ()
static void	AddToRadioGroup ()
static void	TurnOffRadioSiblings ()
static void	RemoveFromRadioGroup ()
static void	Initialize (Widget request, Widget new, ArgList args, Cardinal *num_args)
static void	ToggleSet (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	Toggle (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	Notify (Widget w, XEvent *event, String *params, Cardinal *num_params)
static Boolean	SetValues (Widget current, Widget request, Widget new, ArgList args, Cardinal *num_args)
static void	ToggleDestroy (Widget w, XtPointer junk, XtPointer garbage)
static RadioGroup *	GetRadioGroup (Widget w)
static void	CreateRadioGroup (Widget w1, Widget w2)
static void	AddToRadioGroup (RadioGroup *group, Widget w)
static void	TurnOffRadioSiblings (Widget w)
static void	RemoveFromRadioGroup (Widget w)
void	XawToggleChangeRadioGroup (Widget w, Widget radio_group)
XtPointer	XawToggleGetCurrent (Widget w)
void	XawToggleSetCurrent (Widget radio_group, XtPointer radio_data)
void	XawToggleUnsetCurrent (Widget radio_group)
Variables
static char	defaultTranslations []
static XtResource	resources []
static XtActionsRec	actionsList []
ToggleClassRec	toggleClassRec
WidgetClass	toggleWidgetClass = (WidgetClass) &toggleClassRec

---

Define Documentation

#define offset

(

field

)

XtOffsetOf(ToggleRec, field)

Definition at line 68 of file Toggle.c.

#define SuperClass   ((CommandWidgetClass)&commandClassRec)

Definition at line 99 of file Toggle.c.

---

Function Documentation

static void AddToRadioGroup	(	RadioGroup *	group,
		Widget	w
	)			[static]

Definition at line 395 of file Toggle.c.

References _RadioGroup::next, _RadioGroup::prev, TogglePart::radio_group, _ToggleRec::toggle, and _RadioGroup::widget.

{
  ToggleWidget tw = (ToggleWidget) w;
  RadioGroup * local;

  local = (RadioGroup *) XtMalloc( sizeof(RadioGroup) );
  local->widget = w;
  tw->toggle.radio_group = local;

  if (group == NULL) {          /* Creating new group. */
    group = local;
    group->next = NULL;
    group->prev = NULL;
    return;
  }
  local->prev = group;          /* Adding to previous group. */
  if ((local->next = group->next) != NULL)
      local->next->prev = local;
  group->next = local;
}

static void AddToRadioGroup

(

)

Referenced by CreateRadioGroup(), Initialize(), and XawToggleChangeRadioGroup().

Here is the caller graph for this function:

static void ClassInit

(

)

Definition at line 165 of file Toggle.c.

References actions, commandWidgetClass, i, streq, string, toggleWidgetClass, XawInitializeWidgetSet(), and XmuNewCvtStringToWidget().

{
  XtActionList actions;
  Cardinal num_actions;
  Cardinal i;
  ToggleWidgetClass class = (ToggleWidgetClass) toggleWidgetClass;
  static XtConvertArgRec parentCvtArgs[] = {
      {XtBaseOffset, (XtPointer)XtOffsetOf(WidgetRec, core.parent),
           sizeof(Widget)}
  };

  XawInitializeWidgetSet();
  XtSetTypeConverter(XtRString, XtRWidget, XmuNewCvtStringToWidget,
                     parentCvtArgs, XtNumber(parentCvtArgs), XtCacheNone,
                     (XtDestructor)NULL);
/* 
 * Find the set and unset actions in the command widget's action table. 
 */

  XtGetActionList(commandWidgetClass, &actions, &num_actions);

  for (i = 0 ; i < num_actions ; i++) {
    if (streq(actions[i].string, "set"))
        class->toggle_class.Set = actions[i].proc;
    if (streq(actions[i].string, "unset")) 
        class->toggle_class.Unset = actions[i].proc;

    if ( (class->toggle_class.Set != NULL) &&
         (class->toggle_class.Unset != NULL) ) {
        XtFree((char *) actions);
        return;
    }
  }  

/* We should never get here. */
  XtError("Aborting, due to errors resolving bindings in the Toggle widget.");
}

Here is the call graph for this function:

static void CreateRadioGroup	(	Widget	w1,
		Widget	w2
	)			[static]

Definition at line 370 of file Toggle.c.

References AddToRadioGroup(), GetRadioGroup(), TogglePart::radio_group, _ToggleRec::toggle, and void().

{
  char error_buf[BUFSIZ];
  ToggleWidget tw1 = (ToggleWidget) w1;
  ToggleWidget tw2 = (ToggleWidget) w2;

  if ( (tw1->toggle.radio_group != NULL) || (tw2->toggle.radio_group != NULL) ) {
    (void) sprintf(error_buf, "%s %s", "Toggle Widget Error - Attempting",
            "to create a new toggle group, when one already exists.");
    XtWarning(error_buf);
  }

  AddToRadioGroup( (RadioGroup *)NULL, w1 );
  AddToRadioGroup( GetRadioGroup(w1), w2 );
}

Here is the call graph for this function:

static void CreateRadioGroup

(

)

[static]

Referenced by Initialize(), and XawToggleChangeRadioGroup().

Here is the caller graph for this function:

static RadioGroup* GetRadioGroup

(

Widget

w

)

[static]

Definition at line 351 of file Toggle.c.

References TogglePart::radio_group, and _ToggleRec::toggle.

{
  ToggleWidget tw = (ToggleWidget) w;

  if (tw == NULL) return(NULL);
  return( tw->toggle.radio_group );
}

static RadioGroup* GetRadioGroup

(

)

[static]

Referenced by CreateRadioGroup(), Initialize(), RemoveFromRadioGroup(), TurnOffRadioSiblings(), XawToggleChangeRadioGroup(), XawToggleGetCurrent(), XawToggleSetCurrent(), and XawToggleUnsetCurrent().

Here is the caller graph for this function:

static void Initialize	(	Widget	request,
		Widget	new,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 204 of file Toggle.c.

References AddToRadioGroup(), _ToggleRec::command, CreateRadioGroup(), GetRadioGroup(), TogglePart::radio_data, TogglePart::radio_group, CommandPart::set, _ToggleRec::toggle, ToggleDestroy(), ToggleSet(), and TogglePart::widget.

{
    ToggleWidget tw = (ToggleWidget) new;
    ToggleWidget tw_req = (ToggleWidget) request;

    tw->toggle.radio_group = NULL;

    if (tw->toggle.radio_data == NULL) 
      tw->toggle.radio_data = (XtPointer) new->core.name;

    if (tw->toggle.widget != NULL) {
      if ( GetRadioGroup(tw->toggle.widget) == NULL) 
        CreateRadioGroup(new, tw->toggle.widget);
      else
        AddToRadioGroup( GetRadioGroup(tw->toggle.widget), new);
    }      
    XtAddCallback(new, XtNdestroyCallback, ToggleDestroy, (XtPointer)NULL);

/*
 * Command widget assumes that the widget is unset, so we only 
 * have to handle the case where it needs to be set.
 *
 * If this widget is in a radio group then it may cause another
 * widget to be unset, thus calling the notify proceedure.
 *
 * I want to set the toggle if the user set the state to "On" in 
 * the resource group, reguardless of what my ancestors did.
 */

    if (tw_req->command.set)
      ToggleSet(new, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
}

Here is the call graph for this function:

static void Initialize

(

void

)

Initialisation of Scilab

static void Notify	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 278 of file Toggle.c.

References _ToggleRec::command, and CommandPart::set.

{
  ToggleWidget tw = (ToggleWidget) w;
  long antilint = tw->command.set;

  XtCallCallbacks( w, XtNcallback, (XtPointer) antilint );
}

static void Notify

(

)

static void RemoveFromRadioGroup

(

Widget

w

)

[static]

Definition at line 455 of file Toggle.c.

References GetRadioGroup(), _RadioGroup::next, and _RadioGroup::prev.

{
  RadioGroup * group = GetRadioGroup(w);
  if (group != NULL) {
    if (group->prev != NULL)
      (group->prev)->next = group->next;
    if (group->next != NULL)
      (group->next)->prev = group->prev;
    XtFree((char *) group);
  }
}

Here is the call graph for this function:

static void RemoveFromRadioGroup

(

)

[static]

Referenced by ToggleDestroy(), and XawToggleChangeRadioGroup().

Here is the caller graph for this function:

static Boolean SetValues	(	Widget	current,
		Widget	request,
		Widget	new,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 298 of file Toggle.c.

References _ToggleRec::command, _ToggleRec::core, FALSE, CommandPart::set, Toggle(), _ToggleRec::toggle, TogglePart::widget, and XawToggleChangeRadioGroup().

{
    ToggleWidget oldtw = (ToggleWidget) current;
    ToggleWidget tw = (ToggleWidget) new;
    ToggleWidget rtw = (ToggleWidget) request;

    if (oldtw->toggle.widget != tw->toggle.widget)
      XawToggleChangeRadioGroup(new, tw->toggle.widget);

    if (!tw->core.sensitive && oldtw->core.sensitive && rtw->command.set)
        tw->command.set = True;

    if (oldtw->command.set != tw->command.set) {
        tw->command.set = oldtw->command.set;
        Toggle(new, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
    }
    return(FALSE);
}

Here is the call graph for this function:

static Boolean SetValues

(

)

[static]

static void Toggle	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 262 of file Toggle.c.

References _ToggleRec::command, CommandPart::set, _ToggleClassRec::toggle_class, ToggleSet(), _ToggleClass::Unset, and w.

{
  ToggleWidget tw = (ToggleWidget)w;
  ToggleWidgetClass class = (ToggleWidgetClass) w->core.widget_class;

  if (tw->command.set) 
    class->toggle_class.Unset(w, event, NULL, 0);
  else 
    ToggleSet(w, event, params, num_params);
}

Here is the call graph for this function:

static void Toggle

(

)

[static]

Referenced by SetValues().

Here is the caller graph for this function:

static void ToggleDestroy	(	Widget	w,
		XtPointer	junk,
		XtPointer	garbage
	)			[static]

Definition at line 329 of file Toggle.c.

References RemoveFromRadioGroup().

{
  RemoveFromRadioGroup(w);
}

Here is the call graph for this function:

static void ToggleDestroy

(

)

[static]

Referenced by Initialize().

Here is the caller graph for this function:

static void ToggleSet	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 248 of file Toggle.c.

References TurnOffRadioSiblings(), and w.

{
    ToggleWidgetClass class = (ToggleWidgetClass) w->core.widget_class;

    TurnOffRadioSiblings(w);
    class->toggle_class.Set(w, event, NULL, 0);
}

Here is the call graph for this function:

static void ToggleSet

(

)

Referenced by Initialize(), Toggle(), and XawToggleSetCurrent().

Here is the caller graph for this function:

static void TurnOffRadioSiblings

(

Widget

w

)

[static]

Definition at line 425 of file Toggle.c.

References GetRadioGroup(), _RadioGroup::next, Notify(), _RadioGroup::prev, w, and _RadioGroup::widget.

{
  RadioGroup * group;
  ToggleWidgetClass class = (ToggleWidgetClass) w->core.widget_class;

  if ( (group = GetRadioGroup(w)) == NULL)  /* Punt if there is no group */
    return;

  /* Go to the top of the group. */

  for ( ; group->prev != NULL ; group = group->prev );

  while ( group != NULL ) {
    ToggleWidget local_tog = (ToggleWidget) group->widget;
    if ( local_tog->command.set ) {
      class->toggle_class.Unset(group->widget, NULL, NULL, 0);
      Notify( group->widget, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
    }
    group = group->next;
  }
}

Here is the call graph for this function:

static void TurnOffRadioSiblings

(

)

Referenced by ToggleSet(), and XawToggleUnsetCurrent().

Here is the caller graph for this function:

void XawToggleChangeRadioGroup	(	Widget	w,
		Widget	radio_group
	)

Definition at line 485 of file Toggle.c.

References AddToRadioGroup(), _ToggleRec::command, CreateRadioGroup(), GetRadioGroup(), RemoveFromRadioGroup(), CommandPart::set, and XawToggleUnsetCurrent().

Referenced by SetValues().

{
  ToggleWidget tw = (ToggleWidget) w;
  RadioGroup * group;

  RemoveFromRadioGroup(w);

/*
 * If the toggle that we are about to add is set then we will 
 * unset all toggles in the new radio group.
 */

  if ( tw->command.set && radio_group != NULL )
    XawToggleUnsetCurrent(radio_group);

  if (radio_group != NULL)
      if ((group = GetRadioGroup(radio_group)) == NULL)
          CreateRadioGroup(w, radio_group);
      else AddToRadioGroup(group, w);
}

Here is the call graph for this function:

Here is the caller graph for this function:

XtPointer XawToggleGetCurrent

(

Widget

w

)

Definition at line 519 of file Toggle.c.

References GetRadioGroup(), _RadioGroup::next, _RadioGroup::prev, and _RadioGroup::widget.

Referenced by DoSearch(), and Replace().

{
  RadioGroup * group;

  if ( (group = GetRadioGroup(w)) == NULL) return(NULL);
  for ( ; group->prev != NULL ; group = group->prev);

  while ( group != NULL ) {
    ToggleWidget local_tog = (ToggleWidget) group->widget;
    if ( local_tog->command.set )
      return( local_tog->toggle.radio_data );
    group = group->next;
  }
  return(NULL);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void XawToggleSetCurrent	(	Widget	radio_group,
		XtPointer	radio_data
	)

Definition at line 549 of file Toggle.c.

References _ToggleRec::command, GetRadioGroup(), Notify(), _RadioGroup::prev, TogglePart::radio_data, CommandPart::set, _ToggleRec::toggle, ToggleSet(), and _RadioGroup::widget.

{
  RadioGroup * group;
  ToggleWidget local_tog; 

/* Special case of no radio group. */

  if ( (group = GetRadioGroup(radio_group)) == NULL) {
    local_tog = (ToggleWidget) radio_group;
    if ( (local_tog->toggle.radio_data == radio_data) )     
      if (!local_tog->command.set) {
        ToggleSet((Widget) local_tog, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
        Notify((Widget) local_tog, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
      }
    return;
  }

/*
 * find top of radio_roup 
 */

  for ( ; group->prev != NULL ; group = group->prev);

/*
 * search for matching radio data.
 */

  while ( group != NULL ) {
    local_tog = (ToggleWidget) group->widget;
    if ( (local_tog->toggle.radio_data == radio_data) ) {
      if (!local_tog->command.set) { /* if not already set. */
        ToggleSet((Widget) local_tog, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
        Notify((Widget) local_tog, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
      }
      return;                   /* found it, done */
    }
    group = group->next;
  }
}

Here is the call graph for this function:

void XawToggleUnsetCurrent

(

Widget

radio_group

)

Definition at line 602 of file Toggle.c.

References _ToggleRec::command, GetRadioGroup(), Notify(), CommandPart::set, _ToggleClassRec::toggle_class, TurnOffRadioSiblings(), and _ToggleClass::Unset.

Referenced by XawToggleChangeRadioGroup().

{
  ToggleWidgetClass class;
  ToggleWidget local_tog = (ToggleWidget) radio_group;

  /* Special Case no radio group. */

  if (local_tog->command.set) {
    class = (ToggleWidgetClass) local_tog->core.widget_class;
    class->toggle_class.Unset(radio_group, NULL, NULL, 0);
    Notify(radio_group, (XEvent *)NULL, (String *)NULL, (Cardinal *)0);
  }
  if ( GetRadioGroup(radio_group) == NULL) return;
  TurnOffRadioSiblings(radio_group);
}

Here is the call graph for this function:

Here is the caller graph for this function:

---

Variable Documentation

XtActionsRec actionsList[] [static]

Initial value:

{
  {"toggle",            Toggle},
  {"notify",            Notify},
  {"set",               ToggleSet},
}

Definition at line 92 of file Toggle.c.

char defaultTranslations[] [static]

Initial value:

    "<EnterWindow>:         highlight(Always)   \n\
     <LeaveWindow>:         unhighlight()       \n\
     <Btn1Down>,<Btn1Up>:   toggle() notify()"

Definition at line 63 of file Toggle.c.

XtResource resources[] [static]

Initial value:

 { 
   {XtNstate, XtCState, XtRBoolean, sizeof(Boolean), 
      offset(command.set), XtRString, "off"},
   {XtNradioGroup, XtCWidget, XtRWidget, sizeof(Widget), 
      offset(toggle.widget), XtRWidget, (XtPointer) NULL },
   {XtNradioData, XtCRadioData, XtRPointer, sizeof(XtPointer), 
      offset(toggle.radio_data), XtRPointer, (XtPointer) NULL },
}

Definition at line 70 of file Toggle.c.

ToggleClassRec toggleClassRec

Definition at line 101 of file Toggle.c.

WidgetClass toggleWidgetClass = (WidgetClass) &toggleClassRec

Definition at line 156 of file Toggle.c.

---