module Iup

# File lib/wrapped/messagedialog.rb, line 17
def self.alarm title, msg, button1, button2=nil, button3=nil
  IupLib.IupAlarm(title, msg, button1, button2, button3)
end

# File lib/wrapped/colordialog.rb, line 13
def self.get_color x=0, y=0
  r = FFI::MemoryPointer.new(:int, 1, 0)
  g = FFI::MemoryPointer.new(:int, 1, 0)
  b = FFI::MemoryPointer.new(:int, 1, 0)
  code = IupLib.IupGetColor x, y, r, g, b
  if code == 0
    return nil
  else
    return r.read_int, g.read_int, b.read_int
  end
end

# File lib/wrapped/filedialog.rb, line 17
def self.get_file filter=''
  file = ' '*(256-filter.size) + filter
  code = IupLib.IupGetFile(file)
  case code
  when 0, 1
    filename = file[0...file.index("\0")]
    return code, filename
  else
    return code, ''
  end
end

# File lib/wrapped/iup-global.rb, line 31
def self.global(name, val=nil)
  if val.nil?
    IupLib.IupGetGlobal(name).first
  else
    IupLib.IupSetGlobal(name, val)
  end
end

# File lib/wrapped/iup-global.rb, line 40
def self.idle callback
  unless callback.nil? or callback.arity.zero? 
    raise ArgumentError 'callback to idle must take no arguments'
  end
  IupLib.IupSetFunction('IDLE_ACTION', callback)
end

# File lib/wrapped/list.rb, line 15
def self.listdialog(title, items)
  strptrs = []
  strptrs << nil
 
  items_ptr = FFI::MemoryPointer.new(:pointer, items.length)
  items.each_with_index do |item, i|
    items_ptr[i].put_pointer(0, FFI::MemoryPointer.from_string(item))
  end

  code = IupLib.IupListDialog(1, title, items.length, items_ptr, 1, 1, 10, nil)

  return (code == -1 ? nil : items[code])
end

# File lib/wrapped/image.rb, line 6
def self.load_image filename
  if File.exist?(filename)
    handle = ImLib.IupLoadImage(filename)
    puts handle # TODO - broken?
    image = ImageWidget.new
    image.handle = handle

    return image
  else
    raise RuntimeError, "File does not exist", filename
  end
end

# File lib/wrapped/iup-global.rb, line 16
def self.mainloop 
  begin
    IupLib.IupOpen(0, nil)
    ImgLib.IupImageLibOpen()

    yield
    IupLib.IupMainLoop
  ensure
    IupLib.IupClose
  end
end

# File lib/wrapped/messagedialog.rb, line 33
def self.message(title, value)
  IupLib.IupMessage(title, value)
end