-- 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/HTMLKeygenElement.chs" #-}
module Graphics.UI.Gtk.WebKit.DOM.HTMLKeygenElement
       (htmlKeygenElementCheckValidity,
        htmlKeygenElementSetCustomValidity, htmlKeygenElementSetAutofocus,
        htmlKeygenElementGetAutofocus, htmlKeygenElementSetChallenge,
        htmlKeygenElementGetChallenge, htmlKeygenElementSetDisabled,
        htmlKeygenElementGetDisabled, htmlKeygenElementGetForm,
        htmlKeygenElementSetKeytype, htmlKeygenElementGetKeytype,
        htmlKeygenElementSetName, htmlKeygenElementGetName,
        htmlKeygenElementGetWillValidate, htmlKeygenElementGetValidity,
        htmlKeygenElementGetValidationMessage, htmlKeygenElementGetLabels,
        HTMLKeygenElement, HTMLKeygenElementClass, castToHTMLKeygenElement,
        gTypeHTMLKeygenElement, toHTMLKeygenElement)
       where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
{-# LINE 17 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
 
htmlKeygenElementCheckValidity ::
                               (HTMLKeygenElementClass self) => self -> IO Bool
htmlKeygenElementCheckValidity self
  = toBool <$>
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_check_validity argPtr1)
{-# LINE 25 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementSetCustomValidity ::
                                   (HTMLKeygenElementClass self) => self -> String -> IO ()
htmlKeygenElementSetCustomValidity self error
  = withUTFString error $
      \ errorPtr ->
        (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_custom_validity argPtr1 arg2)
{-# LINE 33 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
          (toHTMLKeygenElement self)
          errorPtr
 
htmlKeygenElementSetAutofocus ::
                              (HTMLKeygenElementClass self) => self -> Bool -> IO ()
htmlKeygenElementSetAutofocus self val
  = (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_autofocus argPtr1 arg2)
{-# LINE 40 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
      (toHTMLKeygenElement self)
      (fromBool val)
 
htmlKeygenElementGetAutofocus ::
                              (HTMLKeygenElementClass self) => self -> IO Bool
htmlKeygenElementGetAutofocus self
  = toBool <$>
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_autofocus argPtr1)
{-# LINE 48 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementSetChallenge ::
                              (HTMLKeygenElementClass self) => self -> String -> IO ()
htmlKeygenElementSetChallenge self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_challenge argPtr1 arg2)
{-# LINE 56 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
          (toHTMLKeygenElement self)
          valPtr
 
htmlKeygenElementGetChallenge ::
                              (HTMLKeygenElementClass self) => self -> IO String
htmlKeygenElementGetChallenge self
  = ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_challenge argPtr1)
{-# LINE 63 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
       (toHTMLKeygenElement self))
      >>=
      readUTFString
 
htmlKeygenElementSetDisabled ::
                             (HTMLKeygenElementClass self) => self -> Bool -> IO ()
htmlKeygenElementSetDisabled self val
  = (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_disabled argPtr1 arg2)
{-# LINE 71 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
      (toHTMLKeygenElement self)
      (fromBool val)
 
htmlKeygenElementGetDisabled ::
                             (HTMLKeygenElementClass self) => self -> IO Bool
htmlKeygenElementGetDisabled self
  = toBool <$>
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_disabled argPtr1)
{-# LINE 79 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementGetForm ::
                         (HTMLKeygenElementClass self) => self -> IO (Maybe HTMLFormElement)
htmlKeygenElementGetForm self
  = maybeNull (makeNewGObject mkHTMLFormElement)
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_form argPtr1)
{-# LINE 86 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementSetKeytype ::
                            (HTMLKeygenElementClass self) => self -> String -> IO ()
htmlKeygenElementSetKeytype self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_keytype argPtr1 arg2)
{-# LINE 94 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
          (toHTMLKeygenElement self)
          valPtr
 
htmlKeygenElementGetKeytype ::
                            (HTMLKeygenElementClass self) => self -> IO String
htmlKeygenElementGetKeytype self
  = ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_keytype argPtr1)
{-# LINE 101 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
       (toHTMLKeygenElement self))
      >>=
      readUTFString
 
htmlKeygenElementSetName ::
                         (HTMLKeygenElementClass self) => self -> String -> IO ()
htmlKeygenElementSetName self val
  = withUTFString val $
      \ valPtr ->
        (\(HTMLKeygenElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_set_name argPtr1 arg2)
{-# LINE 111 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
          (toHTMLKeygenElement self)
          valPtr
 
htmlKeygenElementGetName ::
                         (HTMLKeygenElementClass self) => self -> IO String
htmlKeygenElementGetName self
  = ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_name argPtr1)
{-# LINE 118 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
       (toHTMLKeygenElement self))
      >>=
      readUTFString
 
htmlKeygenElementGetWillValidate ::
                                 (HTMLKeygenElementClass self) => self -> IO Bool
htmlKeygenElementGetWillValidate self
  = toBool <$>
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_will_validate argPtr1)
{-# LINE 127 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementGetValidity ::
                             (HTMLKeygenElementClass self) => self -> IO (Maybe ValidityState)
htmlKeygenElementGetValidity self
  = maybeNull (makeNewGObject mkValidityState)
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_validity argPtr1)
{-# LINE 134 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))
 
htmlKeygenElementGetValidationMessage ::
                                      (HTMLKeygenElementClass self) => self -> IO String
htmlKeygenElementGetValidationMessage self
  = ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_validation_message argPtr1)
{-# LINE 140 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
       (toHTMLKeygenElement self))
      >>=
      readUTFString
 
htmlKeygenElementGetLabels ::
                           (HTMLKeygenElementClass self) => self -> IO (Maybe NodeList)
htmlKeygenElementGetLabels self
  = maybeNull (makeNewGObject mkNodeList)
      ((\(HTMLKeygenElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_keygen_element_get_labels argPtr1)
{-# LINE 149 "./Graphics/UI/Gtk/WebKit/DOM/HTMLKeygenElement.chs" #-}
         (toHTMLKeygenElement self))

foreign import ccall safe "webkit_dom_html_keygen_element_check_validity"
  webkit_dom_html_keygen_element_check_validity :: ((Ptr HTMLKeygenElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_keygen_element_set_custom_validity"
  webkit_dom_html_keygen_element_set_custom_validity :: ((Ptr HTMLKeygenElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_set_autofocus"
  webkit_dom_html_keygen_element_set_autofocus :: ((Ptr HTMLKeygenElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_get_autofocus"
  webkit_dom_html_keygen_element_get_autofocus :: ((Ptr HTMLKeygenElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_keygen_element_set_challenge"
  webkit_dom_html_keygen_element_set_challenge :: ((Ptr HTMLKeygenElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_get_challenge"
  webkit_dom_html_keygen_element_get_challenge :: ((Ptr HTMLKeygenElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_keygen_element_set_disabled"
  webkit_dom_html_keygen_element_set_disabled :: ((Ptr HTMLKeygenElement) -> (CInt -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_get_disabled"
  webkit_dom_html_keygen_element_get_disabled :: ((Ptr HTMLKeygenElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_keygen_element_get_form"
  webkit_dom_html_keygen_element_get_form :: ((Ptr HTMLKeygenElement) -> (IO (Ptr HTMLFormElement)))

foreign import ccall safe "webkit_dom_html_keygen_element_set_keytype"
  webkit_dom_html_keygen_element_set_keytype :: ((Ptr HTMLKeygenElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_get_keytype"
  webkit_dom_html_keygen_element_get_keytype :: ((Ptr HTMLKeygenElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_keygen_element_set_name"
  webkit_dom_html_keygen_element_set_name :: ((Ptr HTMLKeygenElement) -> ((Ptr CChar) -> (IO ())))

foreign import ccall safe "webkit_dom_html_keygen_element_get_name"
  webkit_dom_html_keygen_element_get_name :: ((Ptr HTMLKeygenElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_keygen_element_get_will_validate"
  webkit_dom_html_keygen_element_get_will_validate :: ((Ptr HTMLKeygenElement) -> (IO CInt))

foreign import ccall safe "webkit_dom_html_keygen_element_get_validity"
  webkit_dom_html_keygen_element_get_validity :: ((Ptr HTMLKeygenElement) -> (IO (Ptr ValidityState)))

foreign import ccall safe "webkit_dom_html_keygen_element_get_validation_message"
  webkit_dom_html_keygen_element_get_validation_message :: ((Ptr HTMLKeygenElement) -> (IO (Ptr CChar)))

foreign import ccall safe "webkit_dom_html_keygen_element_get_labels"
  webkit_dom_html_keygen_element_get_labels :: ((Ptr HTMLKeygenElement) -> (IO (Ptr NodeList)))