-- GENERATED by C->Haskell Compiler, version 0.13.12 (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,
        HTMLButtonElement, HTMLButtonElementClass, castToHTMLButtonElement,
        gTypeHTMLButtonElement, toHTMLButtonElement)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 22 "./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 30 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetCustomValidity ::
                                   (HTMLButtonElementClass self, GlibString string) =>
                                     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 39 "./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 46 "./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 54 "./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 60 "./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 68 "./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 75 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetFormAction ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 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 84 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormAction ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 self -> IO string
htmlButtonElementGetFormAction self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_action argPtr1)
{-# LINE 92 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetFormEnctype ::
                                (HTMLButtonElementClass self, GlibString string) =>
                                  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 103 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormEnctype ::
                                (HTMLButtonElementClass self, GlibString string) =>
                                  self -> IO string
htmlButtonElementGetFormEnctype self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_enctype argPtr1)
{-# LINE 111 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetFormMethod ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 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 122 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormMethod ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 self -> IO string
htmlButtonElementGetFormMethod self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_method argPtr1)
{-# LINE 130 "./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 138 "./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 146 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementSetFormTarget ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 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 155 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetFormTarget ::
                               (HTMLButtonElementClass self, GlibString string) =>
                                 self -> IO string
htmlButtonElementGetFormTarget self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_form_target argPtr1)
{-# LINE 163 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetName ::
                         (HTMLButtonElementClass self, GlibString string) =>
                           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 174 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetName ::
                         (HTMLButtonElementClass self, GlibString string) =>
                           self -> IO string
htmlButtonElementGetName self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_name argPtr1)
{-# LINE 182 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
       (toHTMLButtonElement self))
      >>=
      readUTFString
 
htmlButtonElementSetValue ::
                          (HTMLButtonElementClass self, GlibString string) =>
                            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 193 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
          (toHTMLButtonElement self)
          valPtr
 
htmlButtonElementGetValue ::
                          (HTMLButtonElementClass self, GlibString string) =>
                            self -> IO string
htmlButtonElementGetValue self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_value argPtr1)
{-# LINE 201 "./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 210 "./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 217 "./Graphics/UI/Gtk/WebKit/DOM/HTMLButtonElement.chs" #-}
         (toHTMLButtonElement self))
 
htmlButtonElementGetValidationMessage ::
                                      (HTMLButtonElementClass self, GlibString string) =>
                                        self -> IO string
htmlButtonElementGetValidationMessage self
  = ((\(HTMLButtonElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_button_element_get_validation_message argPtr1)
{-# LINE 224 "./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 233 "./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)))