1 files changed, 79 insertions, 0 deletions
diff --git a/bin/class2mml b/bin/class2mml
new file mode 100755
index 00000000000..20453e0010b
--- /dev/null
+++ b/bin/class2mml
@@ -0,0 +1,79 @@
+#! /bin/sh
+# =============================================================================
+#
+# = DESCRIPTION
+#     Script to combine class2info and info2mml.
+#
+# = AUTHOR(S)
+#     Graham Dumpleton
+# 
+# = COPYRIGHT
+#     Copyright 1991 OTC LIMITED
+#     Copyright 1994 DUMPLETON SOFTWARE CONSULTING PTY LIMITED
+#
+# =============================================================================
+
+OSE_HOST=
+
+OSE_RELEASE_NAME=
+export OSE_RELEASE_NAME
+
+OSE_ROOT=${OSE_ROOT-$WRAPPER_ROOT}
+export OSE_ROOT
+
+OSE_VERSION_ROOT=$OSE_ROOT/$OSE_RELEASE_NAME
+export OSE_VERSION_ROOT
+
+BINDIR="$OSE_VERSION_ROOT/$OSE_HOST/bin"
+LIBDIR=${CLASSINFOLIBDIR-"$OSE_VERSION_ROOT/lib"}
+
+CLASS2INFO="$BINDIR/class2info"
+INFO2MAN="$BINDIR/info2mml"
+
+#
+# Error.
+#
+ERROR()
+{
+  echo "`basename $0`: $1" >&2
+  shift
+  while test $# != "0"
+  do
+    echo $1 >&2
+    shift
+  done
+  exit 1
+}
+
+#
+# Usage message.
+#
+USAGE()
+{
+  ERROR "Usage: `basename $0` files"
+} 
+
+#
+# Check usage.
+#
+if test "$#" = "0"
+then
+  USAGE
+fi
+
+while test "$#" != "0"
+do
+  $CLASS2INFO $1
+  if test "$?" != "0"
+  then
+    exit 1
+  fi
+  file=`basename $1`
+  base="`echo $file | sed -e 's/\..*$//'`"
+  if test -f "$base.ci"
+  then
+    $INFO2MAN $base.ci
+    rm -f $base.ci
+  fi
+  shift
+done