Adds camera streaming to frontend

1 files changed, 0 insertions, 48 deletions

diff --git a/hsm-stream/Hsm/Stream/FFI.hsc b/hsm-stream/Hsm/Stream/FFI.hsc
deleted file mode 100644
index 3ef4f98..0000000
--- a/hsm-stream/Hsm/Stream/FFI.hsc
+++ /dev/null
@@ -1,48 +0,0 @@
-{-# LANGUAGE CApiFFI #-}
-
-module Hsm.Stream.FFI
-  ( GstElement
-  , gstInit
-  , gstDeinit
-  , gstParseLaunch
-  , gstStatePlaying
-  , gstStateNull
-  , gstElementSetState
-  , gstObjectUnref
-  )
-where
-
-import Foreign.C.String (CString)
-import Foreign.C.Types (CChar, CInt)
-import Foreign.Ptr (Ptr)
-
-data GstElement
-
-data GError
-
-newtype GStateChangeReturn
-  = GStateChangeReturn Int
-
-newtype GState
-  = GState Int
-
-foreign import capi safe "gst/gst.h gst_init"
-  gstInit :: Ptr CInt -> Ptr (Ptr (Ptr CChar)) -> IO ()
-
-foreign import capi safe "gst/gst.h gst_deinit"
-  gstDeinit :: IO ()
-
-foreign import capi safe "gst/gst.h gst_parse_launch"
-  gstParseLaunch :: CString -> Ptr GError -> IO (Ptr GstElement)
-
-foreign import capi safe "gst/gst.h value GST_STATE_PLAYING"
-  gstStatePlaying :: GState
-
-foreign import capi safe "gst/gst.h value GST_STATE_NULL"
-  gstStateNull :: GState
-
-foreign import capi safe "gst/gst.h gst_element_set_state"
-  gstElementSetState :: Ptr GstElement -> GState -> IO GStateChangeReturn
-
-foreign import capi safe "gst/gst.h gst_object_unref"
-  gstObjectUnref :: Ptr GstElement -> IO ()