#ifndef _TMACROX_H_
#define _TMACROX_H_

#ifndef FUNCPROTO
#define FUNCPROTO 0xFF
#endif
#include <Xm/Xm.h>
#include <Xm/BulletinB.h>
#include <Xm/Frame.h>

#include "tmacro.h"

/*---------------------------------------------------------------------------*/

#if XtSpecificationRelease >= 5
typedef int xargc_t;
#else
typedef unsigned int xargc_t;
#endif

/*---------------------------------------------------------------------------*/
/* macro per la gestione delle liste di argomenti */

#define TX_ARG_VARS(num) \
	Cardinal TxArgN = 0; \
	Arg TxArgs[num]

#define TX_ADD_ARG(resource, value)                                     \
	{                                                                   \
		if (TxArgN >= sizeof(TxArgs) / sizeof(Arg)) {                   \
			fprintf(stderr, "TX_ADD_ARG error in file %s at line %d\n", \
					__FILE__, __LINE__);                                \
			abort();                                                    \
		}                                                               \
		XtSetArg(TxArgs[TxArgN], resource, value);                      \
		TxArgN++;                                                       \
	}

#define TX_RESET_ARGS TxArgN = 0;
#define TX_ARGS TxArgs, TxArgN
#define TX_N_ARGS TxArgN

/*---------------------------------------------------------------------------*/
/* macro per la gestione dei form */
/* nota: l'attachment che e' widget o form a seconda che il widget ci sia o no
   e' una correzione veloce per lesstif (linux) che scrive un warning,
   ma andrebbe lasciato solo di tipo XmATTACH_WIDGET e corretto il codice
   che usa la macro sbagliata
*/
#define TX_ADD_LEFT_FORM(offset)                      \
	{                                                 \
		TX_ADD_ARG(XmNleftAttachment, XmATTACH_FORM); \
		TX_ADD_ARG(XmNleftOffset, offset)             \
	}

#define TX_ADD_LEFT_WIDGET(widget, offset)                                       \
	{                                                                            \
		TX_ADD_ARG(XmNleftAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \
		TX_ADD_ARG(XmNleftWidget, widget);                                       \
		TX_ADD_ARG(XmNleftOffset, offset)                                        \
	}

#define TX_ADD_LEFT_OPPOSITE(widget, offset)                     \
	{                                                            \
		TX_ADD_ARG(XmNleftAttachment, XmATTACH_OPPOSITE_WIDGET); \
		TX_ADD_ARG(XmNleftWidget, widget);                       \
		TX_ADD_ARG(XmNleftOffset, offset)                        \
	}

#define TX_ADD_RIGHT_FORM(offset)                      \
	{                                                  \
		TX_ADD_ARG(XmNrightAttachment, XmATTACH_FORM); \
		TX_ADD_ARG(XmNrightOffset, offset)             \
	}

#define TX_ADD_RIGHT_WIDGET(widget, offset)                                       \
	{                                                                             \
		TX_ADD_ARG(XmNrightAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \
		TX_ADD_ARG(XmNrightWidget, widget);                                       \
		TX_ADD_ARG(XmNrightOffset, offset)                                        \
	}

#define TX_ADD_RIGHT_OPPOSITE(widget, offset)                     \
	{                                                             \
		TX_ADD_ARG(XmNrightAttachment, XmATTACH_OPPOSITE_WIDGET); \
		TX_ADD_ARG(XmNrightWidget, widget);                       \
		TX_ADD_ARG(XmNrightOffset, offset)                        \
	}

#define TX_ADD_TOP_FORM(offset)                      \
	{                                                \
		TX_ADD_ARG(XmNtopAttachment, XmATTACH_FORM); \
		TX_ADD_ARG(XmNtopOffset, offset)             \
	}

#define TX_ADD_TOP_WIDGET(widget, offset)                                       \
	{                                                                           \
		TX_ADD_ARG(XmNtopAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \
		TX_ADD_ARG(XmNtopWidget, widget);                                       \
		TX_ADD_ARG(XmNtopOffset, offset)                                        \
	}

#define TX_ADD_TOP_OPPOSITE(widget, offset)                     \
	{                                                           \
		TX_ADD_ARG(XmNtopAttachment, XmATTACH_OPPOSITE_WIDGET); \
		TX_ADD_ARG(XmNtopWidget, widget);                       \
		TX_ADD_ARG(XmNtopOffset, offset)                        \
	}

#define TX_ADD_BOTTOM_FORM(offset)                      \
	{                                                   \
		TX_ADD_ARG(XmNbottomAttachment, XmATTACH_FORM); \
		TX_ADD_ARG(XmNbottomOffset, offset)             \
	}

#define TX_ADD_BOTTOM_WIDGET(widget, offset)                                       \
	{                                                                              \
		TX_ADD_ARG(XmNbottomAttachment, widget ? XmATTACH_WIDGET : XmATTACH_FORM); \
		TX_ADD_ARG(XmNbottomWidget, widget);                                       \
		TX_ADD_ARG(XmNbottomOffset, offset)                                        \
	}

#define TX_ADD_BOTTOM_OPPOSITE(widget, offset)                     \
	{                                                              \
		TX_ADD_ARG(XmNbottomAttachment, XmATTACH_OPPOSITE_WIDGET); \
		TX_ADD_ARG(XmNbottomWidget, widget);                       \
		TX_ADD_ARG(XmNbottomOffset, offset)                        \
	}

/*---------------------------------------------------------------------------*/
/* macro per actions e translations */

#define TX_ADD_ACTIONS(w, action_table)              \
	XtAppAddActions(XtWidgetToApplicationContext(w), \
					(action_table), XtNumber(action_table));

#define TX_OVERRIDE_TRANSLATIONS(w, translation_table) \
	XtOverrideTranslations((w), XtParseTranslationTable(translation_table));

#define TX_ADD_ACTIONS_AND_TRANSLATIONS(w, action_table, translation_table) \
	{                                                                       \
		TX_ADD_ACTIONS((w), (action_table))                                 \
		TX_OVERRIDE_TRANSLATIONS((w), (translation_table))                  \
	}

#endif