0 | module Web.Internal.MediastreamTypes
  1 |
  2 | import JS
  3 |
  4 | %default total
  5 |
  6 |
  7 | --------------------------------------------------------------------------------
  8 | --          Enums
  9 | --------------------------------------------------------------------------------
 10 |
 11 | namespace MediaStreamTrackState
 12 |
 13 |   public export
 14 |   data MediaStreamTrackState = Live | Ended
 15 |
 16 |   public export
 17 |   Show MediaStreamTrackState where
 18 |     show Live = "live"
 19 |     show Ended = "ended"
 20 |
 21 |   public export
 22 |   Eq MediaStreamTrackState where
 23 |     (==) = (==) `on` show
 24 |
 25 |   public export
 26 |   Ord MediaStreamTrackState where
 27 |     compare = compare `on` show
 28 |
 29 |   public export
 30 |   read : String -> Maybe MediaStreamTrackState
 31 |   read "live" = Just Live
 32 |   read "ended" = Just Ended
 33 |   read _ = Nothing
 34 |
 35 |   export
 36 |   ToFFI MediaStreamTrackState String where
 37 |     toFFI = show
 38 |
 39 |   export
 40 |   FromFFI MediaStreamTrackState String where
 41 |     fromFFI = read
 42 |
 43 |
 44 | namespace VideoFacingModeEnum
 45 |
 46 |   public export
 47 |   data VideoFacingModeEnum = User | Environment | Left | Right
 48 |
 49 |   public export
 50 |   Show VideoFacingModeEnum where
 51 |     show User = "user"
 52 |     show Environment = "environment"
 53 |     show Left = "left"
 54 |     show Right = "right"
 55 |
 56 |   public export
 57 |   Eq VideoFacingModeEnum where
 58 |     (==) = (==) `on` show
 59 |
 60 |   public export
 61 |   Ord VideoFacingModeEnum where
 62 |     compare = compare `on` show
 63 |
 64 |   public export
 65 |   read : String -> Maybe VideoFacingModeEnum
 66 |   read "user" = Just User
 67 |   read "environment" = Just Environment
 68 |   read "left" = Just Left
 69 |   read "right" = Just Right
 70 |   read _ = Nothing
 71 |
 72 |   export
 73 |   ToFFI VideoFacingModeEnum String where
 74 |     toFFI = show
 75 |
 76 |   export
 77 |   FromFFI VideoFacingModeEnum String where
 78 |     fromFFI = read
 79 |
 80 |
 81 | namespace VideoResizeModeEnum
 82 |
 83 |   public export
 84 |   data VideoResizeModeEnum = None | CropAndScale
 85 |
 86 |   public export
 87 |   Show VideoResizeModeEnum where
 88 |     show None = "none"
 89 |     show CropAndScale = "crop-and-scale"
 90 |
 91 |   public export
 92 |   Eq VideoResizeModeEnum where
 93 |     (==) = (==) `on` show
 94 |
 95 |   public export
 96 |   Ord VideoResizeModeEnum where
 97 |     compare = compare `on` show
 98 |
 99 |   public export
100 |   read : String -> Maybe VideoResizeModeEnum
101 |   read "none" = Just None
102 |   read "crop-and-scale" = Just CropAndScale
103 |   read _ = Nothing
104 |
105 |   export
106 |   ToFFI VideoResizeModeEnum String where
107 |     toFFI = show
108 |
109 |   export
110 |   FromFFI VideoResizeModeEnum String where
111 |     fromFFI = read
112 |
113 |
114 | namespace MediaDeviceKind
115 |
116 |   public export
117 |   data MediaDeviceKind = Audioinput | Audiooutput | Videoinput
118 |
119 |   public export
120 |   Show MediaDeviceKind where
121 |     show Audioinput = "audioinput"
122 |     show Audiooutput = "audiooutput"
123 |     show Videoinput = "videoinput"
124 |
125 |   public export
126 |   Eq MediaDeviceKind where
127 |     (==) = (==) `on` show
128 |
129 |   public export
130 |   Ord MediaDeviceKind where
131 |     compare = compare `on` show
132 |
133 |   public export
134 |   read : String -> Maybe MediaDeviceKind
135 |   read "audioinput" = Just Audioinput
136 |   read "audiooutput" = Just Audiooutput
137 |   read "videoinput" = Just Videoinput
138 |   read _ = Nothing
139 |
140 |   export
141 |   ToFFI MediaDeviceKind String where
142 |     toFFI = show
143 |
144 |   export
145 |   FromFFI MediaDeviceKind String where
146 |     fromFFI = read
147 |
148 |
149 |
150 | --------------------------------------------------------------------------------
151 | --          Interfaces
152 | --------------------------------------------------------------------------------
153 |
154 | export data ConstrainablePattern : Type where [external]
155 |
156 | export
157 | ToFFI ConstrainablePattern ConstrainablePattern where toFFI = id
158 |
159 | export
160 | FromFFI ConstrainablePattern ConstrainablePattern where fromFFI = Just
161 |
162 | export
163 | SafeCast ConstrainablePattern where
164 |   safeCast = unsafeCastOnPrototypeName "ConstrainablePattern"
165 |
166 | export data InputDeviceInfo : Type where [external]
167 |
168 | export
169 | ToFFI InputDeviceInfo InputDeviceInfo where toFFI = id
170 |
171 | export
172 | FromFFI InputDeviceInfo InputDeviceInfo where fromFFI = Just
173 |
174 | export
175 | SafeCast InputDeviceInfo where
176 |   safeCast = unsafeCastOnPrototypeName "InputDeviceInfo"
177 |
178 | export data MediaDeviceInfo : Type where [external]
179 |
180 | export
181 | ToFFI MediaDeviceInfo MediaDeviceInfo where toFFI = id
182 |
183 | export
184 | FromFFI MediaDeviceInfo MediaDeviceInfo where fromFFI = Just
185 |
186 | export
187 | SafeCast MediaDeviceInfo where
188 |   safeCast = unsafeCastOnPrototypeName "MediaDeviceInfo"
189 |
190 | export data MediaDevices : Type where [external]
191 |
192 | export
193 | ToFFI MediaDevices MediaDevices where toFFI = id
194 |
195 | export
196 | FromFFI MediaDevices MediaDevices where fromFFI = Just
197 |
198 | export
199 | SafeCast MediaDevices where
200 |   safeCast = unsafeCastOnPrototypeName "MediaDevices"
201 |
202 | export data MediaStream : Type where [external]
203 |
204 | export
205 | ToFFI MediaStream MediaStream where toFFI = id
206 |
207 | export
208 | FromFFI MediaStream MediaStream where fromFFI = Just
209 |
210 | export
211 | SafeCast MediaStream where
212 |   safeCast = unsafeCastOnPrototypeName "MediaStream"
213 |
214 | export data MediaStreamTrack : Type where [external]
215 |
216 | export
217 | ToFFI MediaStreamTrack MediaStreamTrack where toFFI = id
218 |
219 | export
220 | FromFFI MediaStreamTrack MediaStreamTrack where fromFFI = Just
221 |
222 | export
223 | SafeCast MediaStreamTrack where
224 |   safeCast = unsafeCastOnPrototypeName "MediaStreamTrack"
225 |
226 | export data MediaStreamTrackEvent : Type where [external]
227 |
228 | export
229 | ToFFI MediaStreamTrackEvent MediaStreamTrackEvent where toFFI = id
230 |
231 | export
232 | FromFFI MediaStreamTrackEvent MediaStreamTrackEvent where fromFFI = Just
233 |
234 | export
235 | SafeCast MediaStreamTrackEvent where
236 |   safeCast = unsafeCastOnPrototypeName "MediaStreamTrackEvent"
237 |
238 | export data OverconstrainedError : Type where [external]
239 |
240 | export
241 | ToFFI OverconstrainedError OverconstrainedError where toFFI = id
242 |
243 | export
244 | FromFFI OverconstrainedError OverconstrainedError where fromFFI = Just
245 |
246 | export
247 | SafeCast OverconstrainedError where
248 |   safeCast = unsafeCastOnPrototypeName "OverconstrainedError"
249 |
250 |
251 | --------------------------------------------------------------------------------
252 | --          Dictionaries
253 | --------------------------------------------------------------------------------
254 |
255 | export data Capabilities : Type where [external]
256 |
257 | export
258 | ToFFI Capabilities Capabilities where toFFI = id
259 |
260 | export
261 | FromFFI Capabilities Capabilities where fromFFI = Just
262 |
263 | export data ConstrainBooleanParameters : Type where [external]
264 |
265 | export
266 | ToFFI ConstrainBooleanParameters ConstrainBooleanParameters where toFFI = id
267 |
268 | export
269 | FromFFI ConstrainBooleanParameters ConstrainBooleanParameters where fromFFI = Just
270 |
271 | export data ConstrainDOMStringParameters : Type where [external]
272 |
273 | export
274 | ToFFI ConstrainDOMStringParameters ConstrainDOMStringParameters where toFFI = id
275 |
276 | export
277 | FromFFI ConstrainDOMStringParameters ConstrainDOMStringParameters where fromFFI = Just
278 |
279 | export data ConstrainDoubleRange : Type where [external]
280 |
281 | export
282 | ToFFI ConstrainDoubleRange ConstrainDoubleRange where toFFI = id
283 |
284 | export
285 | FromFFI ConstrainDoubleRange ConstrainDoubleRange where fromFFI = Just
286 |
287 | export data ConstrainULongRange : Type where [external]
288 |
289 | export
290 | ToFFI ConstrainULongRange ConstrainULongRange where toFFI = id
291 |
292 | export
293 | FromFFI ConstrainULongRange ConstrainULongRange where fromFFI = Just
294 |
295 | export data ConstraintSet : Type where [external]
296 |
297 | export
298 | ToFFI ConstraintSet ConstraintSet where toFFI = id
299 |
300 | export
301 | FromFFI ConstraintSet ConstraintSet where fromFFI = Just
302 |
303 | export data Constraints : Type where [external]
304 |
305 | export
306 | ToFFI Constraints Constraints where toFFI = id
307 |
308 | export
309 | FromFFI Constraints Constraints where fromFFI = Just
310 |
311 | export data DoubleRange : Type where [external]
312 |
313 | export
314 | ToFFI DoubleRange DoubleRange where toFFI = id
315 |
316 | export
317 | FromFFI DoubleRange DoubleRange where fromFFI = Just
318 |
319 | export data MediaStreamConstraints : Type where [external]
320 |
321 | export
322 | ToFFI MediaStreamConstraints MediaStreamConstraints where toFFI = id
323 |
324 | export
325 | FromFFI MediaStreamConstraints MediaStreamConstraints where fromFFI = Just
326 |
327 | export data MediaStreamTrackEventInit : Type where [external]
328 |
329 | export
330 | ToFFI MediaStreamTrackEventInit MediaStreamTrackEventInit where toFFI = id
331 |
332 | export
333 | FromFFI MediaStreamTrackEventInit MediaStreamTrackEventInit where fromFFI = Just
334 |
335 | export data MediaTrackCapabilities : Type where [external]
336 |
337 | export
338 | ToFFI MediaTrackCapabilities MediaTrackCapabilities where toFFI = id
339 |
340 | export
341 | FromFFI MediaTrackCapabilities MediaTrackCapabilities where fromFFI = Just
342 |
343 | export data MediaTrackConstraintSet : Type where [external]
344 |
345 | export
346 | ToFFI MediaTrackConstraintSet MediaTrackConstraintSet where toFFI = id
347 |
348 | export
349 | FromFFI MediaTrackConstraintSet MediaTrackConstraintSet where fromFFI = Just
350 |
351 | export data MediaTrackConstraints : Type where [external]
352 |
353 | export
354 | ToFFI MediaTrackConstraints MediaTrackConstraints where toFFI = id
355 |
356 | export
357 | FromFFI MediaTrackConstraints MediaTrackConstraints where fromFFI = Just
358 |
359 | export data MediaTrackSettings : Type where [external]
360 |
361 | export
362 | ToFFI MediaTrackSettings MediaTrackSettings where toFFI = id
363 |
364 | export
365 | FromFFI MediaTrackSettings MediaTrackSettings where fromFFI = Just
366 |
367 | export data MediaTrackSupportedConstraints : Type where [external]
368 |
369 | export
370 | ToFFI MediaTrackSupportedConstraints MediaTrackSupportedConstraints where toFFI = id
371 |
372 | export
373 | FromFFI MediaTrackSupportedConstraints MediaTrackSupportedConstraints where fromFFI = Just
374 |
375 | export data Settings : Type where [external]
376 |
377 | export
378 | ToFFI Settings Settings where toFFI = id
379 |
380 | export
381 | FromFFI Settings Settings where fromFFI = Just
382 |
383 | export data ULongRange : Type where [external]
384 |
385 | export
386 | ToFFI ULongRange ULongRange where toFFI = id
387 |
388 | export
389 | FromFFI ULongRange ULongRange where fromFFI = Just
390 |
391 |
392 |
393 | --------------------------------------------------------------------------------
394 | --          Callbacks
395 | --------------------------------------------------------------------------------
396 |
397 | export data NavigatorUserMediaErrorCallback : Type where [external]
398 |
399 | export
400 | ToFFI NavigatorUserMediaErrorCallback NavigatorUserMediaErrorCallback where toFFI = id
401 |
402 | export
403 | FromFFI NavigatorUserMediaErrorCallback NavigatorUserMediaErrorCallback where fromFFI = Just
404 |
405 | export data NavigatorUserMediaSuccessCallback : Type where [external]
406 |
407 | export
408 | ToFFI NavigatorUserMediaSuccessCallback NavigatorUserMediaSuccessCallback where toFFI = id
409 |
410 | export
411 | FromFFI NavigatorUserMediaSuccessCallback NavigatorUserMediaSuccessCallback where fromFFI = Just
412 |