#pragma once

#ifndef _TMACROX_H_

#define _TMACROX_H_

#ifndef FUNCPROTO

#define FUNCPROTO 0xFF

#endif

#include <xm xm.h=""></xm>

#include <xm bulletinb.h=""></xm>

#include <xm frame.h=""></xm>

#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