-- GENERATED by C->Haskell Compiler, version 0.13.11 (gtk2hs branch) "Bin IO", 27 May 2012 (Haskell)
-- Edit the ORIGNAL .chs file instead!


{-# LINE 1 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLButtonElement
       (htmlButtonElementCheckValidity,
        htmlButtonElementSetCustomValidity, htmlButtonElementSetAutofocus,
        htmlButtonElementGetAutofocus, htmlButtonElementSetDisabled,
        htmlButtonElementGetDisabled, htmlButtonElementGetForm,
        htmlButtonElementSetFormAction, htmlButtonElementGetFormAction,
        htmlButtonElementSetFormEnctype, htmlButtonElementGetFormEnctype,
        htmlButtonElementSetFormMethod, htmlButtonElementGetFormMethod,
        htmlButtonElementSetFormNoValidate,
        htmlButtonElementGetFormNoValidate, htmlButtonElementSetFormTarget,
        htmlButtonElementGetFormTarget, htmlButtonElementSetName,
        htmlButtonElementGetName, htmlButtonElementSetValue,
        htmlButtonElementGetValue, htmlButtonElementGetWillValidate,
        htmlButtonElementGetValidity,
        htmlButtonElementGetValidationMessage, htmlButtonElementGetLabels)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 20 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlButtonElementCheckValidity ::
                               (HTMLButtonElementClass self) => self -> IO Bool
htmlButtonElementCheckValidity self
  = toBool <$>
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_check_validity argPtr1)
{-# LINE 28 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetCustomValidity ::
                                   (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetCustomValidity self error
  = withUTFString error $
      \ errorPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_custom_validity argPtr1 arg2)
{-# LINE 36 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          errorPtr
 
htmlButtonElementSetAutofocus ::
                              (HTMLButtonElementClass self) => self -> Bool -> IO ()
htmlButtonElementSetAutofocus self val
  = (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_autofocus argPtr1 arg2)
{-# LINE 43 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
      (toHTMLButtonElement self)
      (fromBool val)
 
htmlButtonElementGetAutofocus ::
                              (HTMLButtonElementClass self) => self -> IO Bool
htmlButtonElementGetAutofocus self
  = toBool <$>
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_autofocus argPtr1)
{-# LINE 51 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetDisabled ::
                             (HTMLButtonElementClass self) => self -> Bool -> IO ()
htmlButtonElementSetDisabled self val
  = (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_disabled argPtr1 arg2)
{-# LINE 57 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
      (toHTMLButtonElement self)
      (fromBool val)
 
htmlButtonElementGetDisabled ::
                             (HTMLButtonElementClass self) => self -> IO Bool
htmlButtonElementGetDisabled self
  = toBool <$>
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_disabled argPtr1)
{-# LINE 65 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementGetForm ::
                         (HTMLButtonElementClass self) => self -> IO (Maybe HTMLFormElement)
htmlButtonElementGetForm self
  = maybeNull (makeNewGObject mkHTMLFormElement)
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form argPtr1)
{-# LINE 72 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetFormAction ::
                               (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetFormAction self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_form_action argPtr1 arg2)
{-# LINE 80 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormAction ::
                               (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetFormAction self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_action argPtr1)
{-# LINE 87 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetFormEnctype ::
                                (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetFormEnctype self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_form_enctype argPtr1 arg2)
{-# LINE 97 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormEnctype ::
                                (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetFormEnctype self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_enctype argPtr1)
{-# LINE 104 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetFormMethod ::
                               (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetFormMethod self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_form_method argPtr1 arg2)
{-# LINE 114 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormMethod ::
                               (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetFormMethod self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_method argPtr1)
{-# LINE 121 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetFormNoValidate ::
                                   (HTMLButtonElementClass self) => self -> Bool -> IO ()
htmlButtonElementSetFormNoValidate self val
  = (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_form_no_validate argPtr1 arg2)
{-# LINE 129 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
      (toHTMLButtonElement self)
      (fromBool val)
 
htmlButtonElementGetFormNoValidate ::
                                   (HTMLButtonElementClass self) => self -> IO Bool
htmlButtonElementGetFormNoValidate self
  = toBool <$>
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_no_validate argPtr1)
{-# LINE 137 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetFormTarget ::
                               (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetFormTarget self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_form_target argPtr1 arg2)
{-# LINE 145 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormTarget ::
                               (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetFormTarget self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_target argPtr1)
{-# LINE 152 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetName ::
                         (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_name argPtr1 arg2)
{-# LINE 162 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetName ::
                         (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetName self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_name argPtr1)
{-# LINE 169 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetValue ::
                          (HTMLButtonElementClass self) => self -> String -> IO ()
htmlButtonElementSetValue self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLButtonElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_set_value argPtr1 arg2)
{-# LINE 179 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetValue ::
                          (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetValue self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_value argPtr1)
{-# LINE 186 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementGetWillValidate ::
                                 (HTMLButtonElementClass self) => self -> IO Bool
htmlButtonElementGetWillValidate self
  = toBool <$>
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_will_validate argPtr1)
{-# LINE 195 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementGetValidity ::
                             (HTMLButtonElementClass self) => self -> IO (Maybe ValidityState)
htmlButtonElementGetValidity self
  = maybeNull (makeNewGObject mkValidityState)
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_validity argPtr1)
{-# LINE 202 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementGetValidationMessage ::
                                      (HTMLButtonElementClass self) => self -> IO String
htmlButtonElementGetValidationMessage self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_validation_message argPtr1)
{-# LINE 208 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementGetLabels ::
                           (HTMLButtonElementClass self) => self -> IO (Maybe NodeList)
htmlButtonElementGetLabels self
  = maybeNull (makeNewGObject mkNodeList)
      ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_labels argPtr1)
{-# LINE 217 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))

foreign import ccall safe "webkit_dom_html_button_element_check_validity"
  webkit_dom_html_button_element_check_validity :: ((Ptr HTMLButtonElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_button_element_set_custom_validity"
  webkit_dom_html_button_element_set_custom_validity :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_set_autofocus"
  webkit_dom_html_button_element_set_autofocus :: ((Ptr HTMLButtonElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_autofocus"
  webkit_dom_html_button_element_get_autofocus :: ((Ptr HTMLButtonElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_button_element_set_disabled"
  webkit_dom_html_button_element_set_disabled :: ((Ptr HTMLButtonElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_disabled"
  webkit_dom_html_button_element_get_disabled :: ((Ptr HTMLButtonElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_button_element_get_form"
  webkit_dom_html_button_element_get_form :: ((Ptr HTMLButtonElement) -> (IO (Ptr HTMLFormElement)))

foreign import ccall safe "webkit_dom_html_button_element_set_form_action"
  webkit_dom_html_button_element_set_form_action :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_form_action"
  webkit_dom_html_button_element_get_form_action :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_set_form_enctype"
  webkit_dom_html_button_element_set_form_enctype :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_form_enctype"
  webkit_dom_html_button_element_get_form_enctype :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_set_form_method"
  webkit_dom_html_button_element_set_form_method :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_form_method"
  webkit_dom_html_button_element_get_form_method :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_set_form_no_validate"
  webkit_dom_html_button_element_set_form_no_validate :: ((Ptr HTMLButtonElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_form_no_validate"
  webkit_dom_html_button_element_get_form_no_validate :: ((Ptr HTMLButtonElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_button_element_set_form_target"
  webkit_dom_html_button_element_set_form_target :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_form_target"
  webkit_dom_html_button_element_get_form_target :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_set_name"
  webkit_dom_html_button_element_set_name :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_name"
  webkit_dom_html_button_element_get_name :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_set_value"
  webkit_dom_html_button_element_set_value :: ((Ptr HTMLButtonElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_button_element_get_value"
  webkit_dom_html_button_element_get_value :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_get_will_validate"
  webkit_dom_html_button_element_get_will_validate :: ((Ptr HTMLButtonElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_button_element_get_validity"
  webkit_dom_html_button_element_get_validity :: ((Ptr HTMLButtonElement) -> (IO (Ptr ValidityState)))

foreign import ccall safe "webkit_dom_html_button_element_get_validation_message"
  webkit_dom_html_button_element_get_validation_message :: ((Ptr HTMLButtonElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_button_element_get_labels"
  webkit_dom_html_button_element_get_labels :: ((Ptr HTMLButtonElement) -> (IO (Ptr NodeList)))