module Graphics.UI.Gtk.WebKit.DOM.HTMLObjectElement
(htmlObjectElementCheckValidity,
htmlObjectElementSetCustomValidity, htmlObjectElementGetForm,
htmlObjectElementSetCode, htmlObjectElementGetCode,
htmlObjectElementSetAlign, htmlObjectElementGetAlign,
htmlObjectElementSetArchive, htmlObjectElementGetArchive,
htmlObjectElementSetBorder, htmlObjectElementGetBorder,
htmlObjectElementSetCodeBase, htmlObjectElementGetCodeBase,
htmlObjectElementSetCodeType, htmlObjectElementGetCodeType,
htmlObjectElementSetData, htmlObjectElementGetData,
htmlObjectElementSetDeclare, htmlObjectElementGetDeclare,
htmlObjectElementSetHeight, htmlObjectElementGetHeight,
htmlObjectElementSetHspace, htmlObjectElementGetHspace,
htmlObjectElementSetName, htmlObjectElementGetName,
htmlObjectElementSetStandby, htmlObjectElementGetStandby,
htmlObjectElementSetUseMap, htmlObjectElementGetUseMap,
htmlObjectElementSetVspace, htmlObjectElementGetVspace,
htmlObjectElementSetWidth, htmlObjectElementGetWidth,
htmlObjectElementGetWillValidate, htmlObjectElementGetValidity,
htmlObjectElementGetValidationMessage,
htmlObjectElementGetContentDocument, HTMLObjectElement,
HTMLObjectElementClass, castToHTMLObjectElement,
gTypeHTMLObjectElement, toHTMLObjectElement)
where
import System.Glib.FFI
import System.Glib.UTFString
import Control.Applicative
import Graphics.UI.Gtk.WebKit.Types
import System.Glib.GError
import Graphics.UI.Gtk.WebKit.DOM.EventM
htmlObjectElementCheckValidity ::
(HTMLObjectElementClass self) => self -> IO Bool
htmlObjectElementCheckValidity self
= toBool <$>
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_check_validity argPtr1)
(toHTMLObjectElement self))
htmlObjectElementSetCustomValidity ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetCustomValidity self error
= withUTFString error $
\ errorPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_custom_validity argPtr1 arg2)
(toHTMLObjectElement self)
errorPtr
htmlObjectElementGetForm ::
(HTMLObjectElementClass self) => self -> IO (Maybe HTMLFormElement)
htmlObjectElementGetForm self
= maybeNull (makeNewGObject mkHTMLFormElement)
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_form argPtr1)
(toHTMLObjectElement self))
htmlObjectElementSetCode ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetCode self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_code argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetCode ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetCode self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_code argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetAlign ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetAlign self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_align argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetAlign ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetAlign self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_align argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetArchive ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetArchive self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_archive argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetArchive ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetArchive self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_archive argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetBorder ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetBorder self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_border argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetBorder ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetBorder self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_border argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetCodeBase ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetCodeBase self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_code_base argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetCodeBase ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetCodeBase self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_code_base argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetCodeType ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetCodeType self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_code_type argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetCodeType ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetCodeType self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_code_type argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetData ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetData self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_data argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetData ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetData self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_data argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetDeclare ::
(HTMLObjectElementClass self) => self -> Bool -> IO ()
htmlObjectElementSetDeclare self val
= (\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_declare argPtr1 arg2)
(toHTMLObjectElement self)
(fromBool val)
htmlObjectElementGetDeclare ::
(HTMLObjectElementClass self) => self -> IO Bool
htmlObjectElementGetDeclare self
= toBool <$>
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_declare argPtr1)
(toHTMLObjectElement self))
htmlObjectElementSetHeight ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetHeight self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_height argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetHeight ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetHeight self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_height argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetHspace ::
(HTMLObjectElementClass self) => self -> Int -> IO ()
htmlObjectElementSetHspace self val
= (\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_hspace argPtr1 arg2)
(toHTMLObjectElement self)
(fromIntegral val)
htmlObjectElementGetHspace ::
(HTMLObjectElementClass self) => self -> IO Int
htmlObjectElementGetHspace self
= fromIntegral <$>
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_hspace argPtr1)
(toHTMLObjectElement self))
htmlObjectElementSetName ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetName self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_name argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetName ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetName self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_name argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetStandby ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetStandby self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_standby argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetStandby ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetStandby self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_standby argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetUseMap ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetUseMap self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_use_map argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetUseMap ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetUseMap self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_use_map argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementSetVspace ::
(HTMLObjectElementClass self) => self -> Int -> IO ()
htmlObjectElementSetVspace self val
= (\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_vspace argPtr1 arg2)
(toHTMLObjectElement self)
(fromIntegral val)
htmlObjectElementGetVspace ::
(HTMLObjectElementClass self) => self -> IO Int
htmlObjectElementGetVspace self
= fromIntegral <$>
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_vspace argPtr1)
(toHTMLObjectElement self))
htmlObjectElementSetWidth ::
(HTMLObjectElementClass self, GlibString string) =>
self -> string -> IO ()
htmlObjectElementSetWidth self val
= withUTFString val $
\ valPtr ->
(\(HTMLObjectElement arg1) arg2 -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_set_width argPtr1 arg2)
(toHTMLObjectElement self)
valPtr
htmlObjectElementGetWidth ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetWidth self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_width argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementGetWillValidate ::
(HTMLObjectElementClass self) => self -> IO Bool
htmlObjectElementGetWillValidate self
= toBool <$>
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_will_validate argPtr1)
(toHTMLObjectElement self))
htmlObjectElementGetValidity ::
(HTMLObjectElementClass self) => self -> IO (Maybe ValidityState)
htmlObjectElementGetValidity self
= maybeNull (makeNewGObject mkValidityState)
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_validity argPtr1)
(toHTMLObjectElement self))
htmlObjectElementGetValidationMessage ::
(HTMLObjectElementClass self, GlibString string) =>
self -> IO string
htmlObjectElementGetValidationMessage self
= ((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_validation_message argPtr1)
(toHTMLObjectElement self))
>>=
readUTFString
htmlObjectElementGetContentDocument ::
(HTMLObjectElementClass self) => self -> IO (Maybe Document)
htmlObjectElementGetContentDocument self
= maybeNull (makeNewGObject mkDocument)
((\(HTMLObjectElement arg1) -> withForeignPtr arg1 $ \argPtr1 ->webkit_dom_html_object_element_get_content_document argPtr1)
(toHTMLObjectElement self))
foreign import ccall safe "webkit_dom_html_object_element_check_validity"
webkit_dom_html_object_element_check_validity :: ((Ptr HTMLObjectElement) -> (IO CInt))
foreign import ccall safe "webkit_dom_html_object_element_set_custom_validity"
webkit_dom_html_object_element_set_custom_validity :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_form"
webkit_dom_html_object_element_get_form :: ((Ptr HTMLObjectElement) -> (IO (Ptr HTMLFormElement)))
foreign import ccall safe "webkit_dom_html_object_element_set_code"
webkit_dom_html_object_element_set_code :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_code"
webkit_dom_html_object_element_get_code :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_align"
webkit_dom_html_object_element_set_align :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_align"
webkit_dom_html_object_element_get_align :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_archive"
webkit_dom_html_object_element_set_archive :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_archive"
webkit_dom_html_object_element_get_archive :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_border"
webkit_dom_html_object_element_set_border :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_border"
webkit_dom_html_object_element_get_border :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_code_base"
webkit_dom_html_object_element_set_code_base :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_code_base"
webkit_dom_html_object_element_get_code_base :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_code_type"
webkit_dom_html_object_element_set_code_type :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_code_type"
webkit_dom_html_object_element_get_code_type :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_data"
webkit_dom_html_object_element_set_data :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_data"
webkit_dom_html_object_element_get_data :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_declare"
webkit_dom_html_object_element_set_declare :: ((Ptr HTMLObjectElement) -> (CInt -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_declare"
webkit_dom_html_object_element_get_declare :: ((Ptr HTMLObjectElement) -> (IO CInt))
foreign import ccall safe "webkit_dom_html_object_element_set_height"
webkit_dom_html_object_element_set_height :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_height"
webkit_dom_html_object_element_get_height :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_hspace"
webkit_dom_html_object_element_set_hspace :: ((Ptr HTMLObjectElement) -> (CLong -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_hspace"
webkit_dom_html_object_element_get_hspace :: ((Ptr HTMLObjectElement) -> (IO CLong))
foreign import ccall safe "webkit_dom_html_object_element_set_name"
webkit_dom_html_object_element_set_name :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_name"
webkit_dom_html_object_element_get_name :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_standby"
webkit_dom_html_object_element_set_standby :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_standby"
webkit_dom_html_object_element_get_standby :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_use_map"
webkit_dom_html_object_element_set_use_map :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_use_map"
webkit_dom_html_object_element_get_use_map :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_set_vspace"
webkit_dom_html_object_element_set_vspace :: ((Ptr HTMLObjectElement) -> (CLong -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_vspace"
webkit_dom_html_object_element_get_vspace :: ((Ptr HTMLObjectElement) -> (IO CLong))
foreign import ccall safe "webkit_dom_html_object_element_set_width"
webkit_dom_html_object_element_set_width :: ((Ptr HTMLObjectElement) -> ((Ptr CChar) -> (IO ())))
foreign import ccall safe "webkit_dom_html_object_element_get_width"
webkit_dom_html_object_element_get_width :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_get_will_validate"
webkit_dom_html_object_element_get_will_validate :: ((Ptr HTMLObjectElement) -> (IO CInt))
foreign import ccall safe "webkit_dom_html_object_element_get_validity"
webkit_dom_html_object_element_get_validity :: ((Ptr HTMLObjectElement) -> (IO (Ptr ValidityState)))
foreign import ccall safe "webkit_dom_html_object_element_get_validation_message"
webkit_dom_html_object_element_get_validation_message :: ((Ptr HTMLObjectElement) -> (IO (Ptr CChar)))
foreign import ccall safe "webkit_dom_html_object_element_get_content_document"
webkit_dom_html_object_element_get_content_document :: ((Ptr HTMLObjectElement) -> (IO (Ptr Document)))