tools/gst-element-maker

   1 #!/bin/sh
   2
   3
   4 prefix=gst
   5 templatedir=element-templates
   6
   7 while [ "$1" ] ; do
   8   case $1 in
   9     --help)
  10       cat <<-EOF
  11 Usage: element-maker [OPTIONS] ELEMENT_NAME BASE_CLASS
  12 Create a GStreamer element that subclasses BASE_CLASS.
  13 Options:
  14   --help             Print this information
  15   --prefix PREFIX    Use PREFIX instead of "gst"
  16 Example: 'element-maker my_element basetransform' will create the files
  17   gstmyelement.c and gstmyelement.h that implement GstMyElement, a
  18   subclass of GstBaseTransform, as an element named myelement.
  19 EOF
  20       exit 0
  21       ;;
  22     --prefix)
  23       shift
  24       prefix=$1
  25       ;;
  26     -*)
  27       echo Unknown option: $1
  28       exit 1
  29       ;;
  30     *)
  31       if [ "$name" = "" ]; then
  32         name=$1
  33       elif [ "$class" = "" ]; then
  34         class=$1
  35       else
  36         echo Ignored: $1
  37       fi
  38   esac
  39   shift
  40 done
  41
  42 if [ "$name" = "" -o "$class" = "" ] ; then
  43   echo "Usage: element-maker [OPTIONS] ELEMENT_NAME BASE_CLASS"
  44   exit 1
  45 fi
  46
  47 if [ ! -f "element-templates/$class" ] ; then
  48   echo "Template file for $class not found."
  49   exit 1
  50 fi
  51
  52
  53 PREFIX=$(echo $prefix | sed -e 's/\(.*\)/\U\1/')
  54 NAME=$(echo $name | sed -e 's/\(.*\)/\U\1/')
  55 Prefix=$(echo $prefix | sed -e 's/_\(.\)/\U\1/g' -e 's/^\(.\)/\U\1/')
  56 Name=$(echo $name | sed -e 's/_\(.\)/\U\1/g' -e 's/^\(.\)/\U\1/')
  57
  58 GST_IS_REPLACE=${PREFIX}_IS_${NAME}
  59 GST_REPLACE=${PREFIX}_${NAME}
  60 GST_TYPE_REPLACE=${PREFIX}_TYPE_${NAME}
  61 GstReplace=${Prefix}${Name}
  62 gst_replace=${prefix}_${name}
  63 gstreplace=${prefix}$(echo $name | sed -e 's/_//g')
  64 replace=$(echo $name | sed -e 's/_//g')
  65
  66 if [ "$REAL_NAME" = "" ] ; then
  67   REAL_NAME=FIXME
  68 fi
  69 if [ "$EMAIL_ADDRESS" = "" ] ; then
  70   EMAIL_ADDRESS=fixme@example.com
  71 fi
  72
  73
  74 pkg=`grep -A 10000 '^% pkg-config' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1`
  75 GST_TYPE_BASE_REPLACE=`grep -A 10000 '^% TYPE_CLASS_NAME' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1`
  76 GstBaseReplace=`grep -A 10000 '^% ClassName' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1`
  77 pads=`grep -A 10000 '^% pads' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1`
  78
  79 generate ()
  80 {
  81
  82 cat <<-EOF
  83 /* GStreamer
  84  * Copyright (C) $(date +%Y) $REAL_NAME <$EMAIL_ADDRESS>
  85  *
  86  * This library is free software; you can redistribute it and/or
  87  * modify it under the terms of the GNU Library General Public
  88  * License as published by the Free Software Foundation; either
  89  * version 2 of the License, or (at your option) any later version.
  90  *
  91  * This library is distributed in the hope that it will be useful,
  92  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  93  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  94  * Library General Public License for more details.
  95  *
  96  * You should have received a copy of the GNU Library General Public
  97  * License along with this library; if not, write to the
  98  * Free Software Foundation, Inc., 51 Franklin Street, Suite 500,
  99  * Boston, MA 02110-1335, USA.
 100  */
 101 EOF
 102
 103 cat <<-EOF
 104 /**
 105  * SECTION:element-$gstreplace
 106  *
 107  * The $replace element does FIXME stuff.
 108  *
 109  * <refsect2>
 110  * <title>Example launch line</title>
 111  * |[
 112  * gst-launch -v fakesrc ! $replace ! FIXME ! fakesink
 113  * ]|
 114  * FIXME Describe what the pipeline does.
 115  * </refsect2>
 116  */
 117 EOF
 118
 119 #grep -A 10000 '^% copyright' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 120
 121 cat <<EOF
 122
 123 #ifdef HAVE_CONFIG_H
 124 #include "config.h"
 125 #endif
 126
 127 EOF
 128
 129 grep -A 10000 '^% includes' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 130 grep -A 10000 '^% includes' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 131 grep -A 10000 '^% includes' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 132
 133 cat <<EOF
 134 #include "gstreplace.h"
 135
 136 GST_DEBUG_CATEGORY_STATIC (gst_replace_debug);
 137 #define GST_CAT_DEFAULT gst_replace_debug
 138
 139 /* prototypes */
 140
 141 EOF
 142
 143 grep -A 10000 '^% prototypes' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 144 grep -A 10000 '^% prototypes' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 145 grep -A 10000 '^% prototypes' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 146 for each in $pads
 147 do
 148   grep -A 10000 '^% prototypes' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 149 done
 150
 151 cat <<EOF
 152
 153 enum
 154 {
 155   PROP_0
 156 };
 157
 158 /* pad templates */
 159
 160 EOF
 161
 162 for each in $pads
 163 do
 164   grep -A 10000 '^% pad-template' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 165 done
 166
 167 cat <<EOF
 168
 169 /* class initialization */
 170
 171 #define DEBUG_INIT(bla) \\
 172   GST_DEBUG_CATEGORY_INIT (gst_replace_debug, "replace", 0, \\
 173       "debug category for replace element");
 174
 175 GST_BOILERPLATE_FULL (GstReplace, gst_replace, GstBaseReplace,
 176     GST_TYPE_BASE_REPLACE, DEBUG_INIT);
 177
 178 static void
 179 gst_replace_base_init (gpointer g_class)
 180 {
 181   GstElementClass *element_class = GST_ELEMENT_CLASS (g_class);
 182
 183 EOF
 184
 185 for each in $pads
 186 do
 187   grep -A 10000 '^% base-init' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 188 done
 189
 190 cat <<EOF
 191
 192   gst_element_class_set_details_simple (element_class, "FIXME Long name",
 193       "Generic", "FIXME Description", "$REAL_NAME <$EMAIL_ADDRESS>");
 194 }
 195
 196 static void
 197 gst_replace_class_init (GstReplaceClass * klass)
 198 {
 199 EOF
 200 grep -A 10000 '^% declare-class' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 201 grep -A 10000 '^% declare-class' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 202 grep -A 10000 '^% declare-class' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 203
 204 echo
 205
 206 grep -A 10000 '^% set-methods' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 207 grep -A 10000 '^% set-methods' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 208 grep -A 10000 '^% set-methods' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 209
 210 cat <<EOF
 211
 212 }
 213
 214 static void
 215 gst_replace_init (GstReplace * replace, GstReplaceClass * replace_class)
 216 {
 217 EOF
 218
 219 for each in $pads
 220 do
 221   grep -A 10000 '^% instance-init' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 222 done
 223
 224
 225 cat <<EOF
 226 }
 227 EOF
 228
 229
 230 grep -A 10000 '^% methods' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 231 grep -A 10000 '^% methods' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 232 grep -A 10000 '^% methods' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 233 for each in $pads
 234 do
 235   grep -A 10000 '^% methods' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 236 done
 237
 238
 239 cat <<EOF
 240
 241 static gboolean
 242 plugin_init (GstPlugin * plugin)
 243 {
 244
 245   gst_element_register (plugin, "replace", GST_RANK_NONE,
 246       gst_replace_get_type ());
 247
 248   return TRUE;
 249 }
 250
 251 #ifndef VERSION
 252 #define VERSION "0.0.FIXME"
 253 #endif
 254 #ifndef PACKAGE
 255 #define PACKAGE "FIXME_package"
 256 #endif
 257 #ifndef PACKAGE_NAME
 258 #define PACKAGE_NAME "FIXME_package_name"
 259 #endif
 260 #ifndef GST_PACKAGE_ORIGIN
 261 #define GST_PACKAGE_ORIGIN "http://FIXME.org/"
 262 #endif
 263
 264 GST_PLUGIN_DEFINE (GST_VERSION_MAJOR,
 265     GST_VERSION_MINOR,
 266     "replace",
 267     "FIXME plugin description",
 268     plugin_init, VERSION, "LGPL", PACKAGE_NAME, GST_PACKAGE_ORIGIN)
 269
 270 EOF
 271
 272
 273 }
 274
 275 generate_header ()
 276 {
 277
 278 grep -A 10000 '^% copyright' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 279
 280 cat <<EOF
 281 #ifndef _GST_REPLACE_H_
 282 #define _GST_REPLACE_H_
 283
 284 EOF
 285
 286 grep -A 10000 '^% includes' $templatedir/base | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 287 grep -A 10000 '^% includes' $templatedir/gobject | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 288 grep -A 10000 '^% includes' $templatedir/$class | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 289
 290 cat <<EOF
 291
 292 G_BEGIN_DECLS
 293
 294 #define GST_TYPE_REPLACE \
 295   (gst_replace_get_type())
 296 #define GST_REPLACE(obj) \
 297   (G_TYPE_CHECK_INSTANCE_CAST((obj),GST_TYPE_REPLACE,GstReplace))
 298 #define GST_REPLACE_CLASS(klass) \
 299   (G_TYPE_CHECK_CLASS_CAST((klass),GST_TYPE_REPLACE,GstReplaceClass))
 300 #define GST_IS_REPLACE(obj) \
 301   (G_TYPE_CHECK_INSTANCE_TYPE((obj),GST_TYPE_REPLACE))
 302 #define GST_IS_REPLACE_CLASS(obj) \
 303   (G_TYPE_CHECK_CLASS_TYPE((klass),GST_TYPE_REPLACE))
 304
 305 typedef struct _GstReplace GstReplace;
 306 typedef struct _GstReplaceClass GstReplaceClass;
 307
 308 struct _GstReplace
 309 {
 310   GstBaseReplace base_replace;
 311
 312 EOF
 313
 314 for each in $pads
 315 do
 316   grep -A 10000 '^% instance-members' $templatedir/$each | tail -n +2|grep -m 1 -B 10000 '^%'|head -n -1
 317 done
 318
 319 cat <<EOF
 320 };
 321
 322 struct _GstReplaceClass
 323 {
 324   GstBaseReplaceClass base_replace_class;
 325 };
 326
 327 GType gst_replace_get_type (void);
 328
 329 G_END_DECLS
 330
 331 #endif
 332 EOF
 333
 334
 335 }
 336
 337
 338 generate | sed \
 339   -e "s/GST_BASE_REPLACE/$GST_BASE_REPLACE/g" \
 340   -e "s/GST_TYPE_BASE_REPLACE/$GST_TYPE_BASE_REPLACE/g" \
 341   -e "s/GstBaseReplace/$GstBaseReplace/g" \
 342   -e "s/GST_IS_REPLACE/$GST_IS_REPLACE/g" \
 343   -e "s/GST_REPLACE/$GST_REPLACE/g" \
 344   -e "s/GST_TYPE_REPLACE/$GST_TYPE_REPLACE/g" \
 345   -e "s/GstReplace/$GstReplace/g" \
 346   -e "s/gst_replace/$gst_replace/g" \
 347   -e "s/gstreplace/$gstreplace/g" \
 348   -e "s/replace/$replace/g" >$gstreplace.c
 349
 350 generate_header | sed \
 351   -e "s/GST_BASE_REPLACE/$GST_BASE_REPLACE/g" \
 352   -e "s/GST_TYPE_BASE_REPLACE/$GST_TYPE_BASE_REPLACE/g" \
 353   -e "s/GstBaseReplace/$GstBaseReplace/g" \
 354   -e "s/GST_IS_REPLACE/$GST_IS_REPLACE/g" \
 355   -e "s/GST_REPLACE/$GST_REPLACE/g" \
 356   -e "s/GST_TYPE_REPLACE/$GST_TYPE_REPLACE/g" \
 357   -e "s/GstReplace/$GstReplace/g" \
 358   -e "s/gst_replace/$gst_replace/g" \
 359   -e "s/gstreplace/$gstreplace/g" \
 360   -e "s/replace/$replace/g" >$gstreplace.h
 361
 362 gst-indent $gstreplace.c
 363
 364 echo pkg is $pkg
 365
 366 gcc -Wall $(pkg-config --cflags gstreamer-0.10 $pkg) -c -o $gstreplace.o $gstreplace.c
 367 gcc -shared -o $gstreplace.so $gstreplace.o $(pkg-config --libs gstreamer-0.10 $pkg)
 368
 369