int
dio_init()
{
    char  *sWrtCtrl = "WrtCtrl:0x03\n";    /* mode = low & high output mode */
    char  *sWrtMask = "WrtMask:0x00\n";    /* Int disable */

    if (dio_dev[0] == '\0') {
        strcpy(dio_dev, "/dev/dio");
    }

    Card_fd = open(dio_dev, O_RDWR);
    if (Card_fd == -1) {
        g_print("open error ...\n");
        return (-1);
    }

  g_print("open : %s\n", dio_dev);

     /* Set Contorl */
    if ( write(Card_fd, sWrtCtrl, strlen(sWrtCtrl)) == -1) {
        g_print("%s %s error...\n", dio_dev, sWrtCtrl);
        return (-1);
    }

     /* Set Int mask */
    if ( write(Card_fd, sWrtMask, strlen(sWrtMask)) == -1) {
        g_print("%s %s error...\n", dio_dev, sWrtMask);
        return (-1);
    }


  return 0;
}  /* dio_init */

int
dio_exit()
{
  if (Card_fd == -1)
    return -1;

  g_print("dio_exit : start\n");
  close(Card_fd);

  g_print("close : %s\n", dio_dev);
  return 0;
}

int
dio_write(char *cmd)
{
  int  wlen, len;

  if (Card_fd == -1)
    return -1;

  wlen = strlen(cmd);
  len = write(Card_fd, cmd, wlen);
  if (len == -1) {
      g_print("write error...:[%d] %s\n", wlen, cmd);
      return (-1);
  }

  g_print("write : %s\n", cmd);
  return 0;

}  /* dio_write */

void
DevNameChanged(char *new )
{
    dio_exit();
    strcpy( dio_dev, new);
    dio_init();
}

int
main (int argc, char *argv[])
{
  GtkWidget *Topwin;

#ifdef ENABLE_NLS
  bindtextdomain (PACKAGE, PACKAGE_LOCALE_DIR);
  textdomain (PACKAGE);
#endif

  gnome_init ("gtkex2", VERSION, argc, argv);

  /*
   * The following code was added by Glade to create one of each component
   * (except popup menus), just so that you see something after building
   * the project. Delete any components that you don't want shown initially.
   */
  Topwin = create_Topwin ();
  gtk_widget_show (Topwin);

  dio_init();	/* Initializing REX=5055 */

  gtk_main ();
  return 0;
}

static void
SetLED_stat(int Start, 
            int End,
            gboolean  BitOn, /* TRUE: on  FALSE: off */
            GtkButton  *button )
{
  GtkToggleButton *togglebutton;
  GtkWidget *widget;
  char widget_name[8];

  int  LED_no;

  for (LED_no = Start; LED_no <= End; LED_no++) {
    bLED_stat[LED_no] = BitOn;
    sprintf(widget_name, "bLED%d", LED_no+1);
    widget = lookup_widget( GTK_WIDGET(button), (const gchar *)widget_name );
    togglebutton = GTK_TOGGLE_BUTTON(widget);
    gtk_toggle_button_set_active( togglebutton, BitOn );
  }
}

static int
Out_LED_BitStat( int BitNo,
              GtkToggleButton *togglebutton )
{
  char  *StrOnOff;

  /* TRUE: on  FALSE: off */
  bLED_stat[BitNo] = gtk_toggle_button_get_active( togglebutton );
  StrOnOff = ( bLED_stat[BitNo] == TRUE) ? "On" : "Off";
  g_print("LED%d is %s\n", BitNo + 1, StrOnOff);

  sprintf( dio_cmd, "SetBit%s:%d\n", StrOnOff, BitNo);
  dio_write(dio_cmd);

  return 0;
}

static int
Out_LED_ByteStat( int  sBit,
                  gboolean  BitOn, /* TRUE: on  FALSE: off */
                  GtkButton  *button )
{
  char  *StrOnOff;
  char  *StrLowHigh;
  int   ByteVal;

  SetLED_stat( sBit, sBit + 7, BitOn, button );

  if (BitOn == TRUE) {
    StrOnOff = "On";
    ByteVal = 0xff;
  } else {
    StrOnOff = "Off";
    ByteVal = 0x00;
  }
  StrLowHigh = ( sBit == 0 ) ? "Low" : "High";
  g_print("%s LED%d-%d is %s\n", 
              StrLowHigh, sBit + 1, sBit + 8, StrOnOff);

  sprintf( dio_cmd, "Write%sByte:0x%02X\n", StrLowHigh, ByteVal);
  dio_write(dio_cmd);

  return 0;
}

static int
Out_LED_WordStat( gboolean BitOn,  /* TRUE: on  FALSE: off */
                  GtkButton  *button )
{
  int   WordVal;


  SetLED_stat( 0, 15, BitOn, button ); 
  WordVal = (BitOn == TRUE) ? 0xffff : 0x0000 ;
  g_print("All LED are %s\n",
                (( BitOn == TRUE ) ? sOn : sOff ) );

  sprintf( dio_cmd, "WriteWord:0x%04X\n", WordVal);
  dio_write(dio_cmd);

  return 0;
}

gboolean
on_Topwin_delete_event                 (GtkWidget       *widget,
                                        GdkEvent        *event,
                                        gpointer         user_data)
{
  int  result;

  result = dio_exit();
  g_print("dio_exit: %d\n", result);

  gtk_main_quit();

  g_print("on_Topwin_delete_event: quit\n");

  return FALSE;
}

void
on_bLED1_toggled                       (GtkToggleButton *togglebutton,
                                        gpointer         user_data)
{
  Out_LED_BitStat( 0, togglebutton );
}

void
on_bHighOn_clicked                     (GtkButton       *button,
                                        gpointer         user_data)
{
  Out_LED_ByteStat( DIO_HIGH, LED_ON, button );
}

void
on_bWordOn_clicked                     (GtkButton       *button,
                                        gpointer         user_data)
{
  Out_LED_WordStat( LED_ON, button );
}

void
on_combo_entry1_changed                (GtkEditable     *editable,
                                        gpointer         user_data)
{
  char *str;

  str = gtk_entry_get_text(GTK_ENTRY(editable));
  DevNameChanged( str );
}