~ubuntu-branches/ubuntu/natty/haskell-gstreamer/natty

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
/*  GIMP Toolkit (GTK) Binding for Haskell: binding to gstreamer
 *
 *  Author : Peter Gavin
 *  Created: 1-Apr-2007
 *
 *  Copyright (c) 2007 Peter Gavin
 *
 *  This library is free software: you can redistribute it and/or
 *  modify it under the terms of the GNU Lesser General Public License
 *  as published by the Free Software Foundation, either version 3 of
 *  the License, or (at your option) any later version.
 *  
 *  This library is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 *  Lesser General Public License for more details.
 *  
 *  You should have received a copy of the GNU Lesser General Public
 *  License along with this program.  If not, see
 *  <http://www.gnu.org/licenses/>.
 *  
 *  GStreamer, the C library which this Haskell library depends on, is
 *  available under LGPL Version 2. The documentation included with
 *  this library is based on the original GStreamer documentation.
 */
#ifndef __HSGSTREAMER_H__
#define __HSGSTREAMER_H__

#include <gst/gst.h>

#if !((GST_VERSION_MAJOR > 0) ||                                        \
      (GST_VERSION_MAJOR == 0 && GST_VERSION_MINOR > 10) ||                 \
      (GST_VERSION_MAJOR == 0 && GST_VERSION_MINOR == 10 && GST_VERSION_MICRO >= 18))
#define GST_CHECK_VERSION(major,minor,micro)    \
  (GST_VERSION_MAJOR > (major) || \
  (GST_VERSION_MAJOR == (major) && GST_VERSION_MINOR > (minor)) || \
  (GST_VERSION_MAJOR == (major) && GST_VERSION_MINOR == (minor) && \
   GST_VERSION_MICRO >= (micro)))
#endif

#include <gst/base/gstadapter.h>
#include <gst/base/gstbasesink.h>
#include <gst/base/gstbasesrc.h>
#include <gst/base/gstbasetransform.h>
#include <gst/base/gstcollectpads.h>
#if GST_CHECK_VERSION(0,10,10)
#include <gst/base/gstdataqueue.h>
#endif
#include <gst/base/gstpushsrc.h>
#include <gst/base/gsttypefindhelper.h>
#include <gst/controller/gstcontroller.h>
#include <gst/net/gstnet.h>
#include <gst/dataprotocol/dataprotocol.h>
#include <gst/audio/audio.h>
#include <gst/audio/gstaudioclock.h>

guint    _hs_gst_object_flags (GstObject* obj);
void     _hs_gst_object_flag_set (GstObject* obj, guint flags);
void     _hs_gst_object_flag_unset (GstObject* obj, guint flags);
void     _hs_gst_object_lock    (GstObject* obj);
gboolean _hs_gst_object_trylock (GstObject* obj);
void     _hs_gst_object_unlock  (GstObject* obj);
void _hs_gst_object_unfloat (gpointer obj);
GstMessageType _hs_gst_message_get_message_type (GstMessage *message);
void _hs_gst_structure_make_immutable (GstStructure *structure);
gsize _hs_gst_segment_sizeof (void) G_GNUC_CONST;

GstPad *_hs_gst_base_src_get_pad (GstBaseSrc *base_src);
GstPad *_hs_gst_base_sink_get_pad (GstBaseSink *base_sink);
GstPad *_hs_gst_base_transform_get_sink_pad (GstBaseTransform *base_transform);
GstPad *_hs_gst_base_transform_get_src_pad (GstBaseTransform *base_transform);

guint    _hs_gst_mini_object_flags (GstMiniObject* obj);
void     _hs_gst_mini_object_flag_set (GstMiniObject* obj, guint flags);
void     _hs_gst_mini_object_flag_unset (GstMiniObject* obj, guint flags);
void     _hs_gst_mini_object_make_read_only (GstMiniObject *obj);

GstQueryType _hs_gst_query_type (GstQuery *query);
GstEventType _hs_gst_event_type (GstEvent *event);

GstClockTime _hs_gst_frames_to_clock_time (gint64 frames, double rate);
gint64       _hs_gst_clock_time_to_frames (GstClockTime clock_time, double rate);

#endif