From 66ad9f5357cc930c22adc27a429ef392853e47ea Mon Sep 17 00:00:00 2001
From: Kern Sibbald <kern@sibbald.com>
Date: Sat, 8 Jan 2005 14:04:40 +0000
Subject: [PATCH] Add dvd scripts

git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@1795 91ce42f0-d328-0410-95d8-f526ca767f89
---
 bacula/scripts/dvd-freespace.in | 116 ++++++++++++++++++++++++++++++++
 bacula/scripts/dvd-writepart.in |  56 +++++++++++++++
 2 files changed, 172 insertions(+)
 create mode 100755 bacula/scripts/dvd-freespace.in
 create mode 100644 bacula/scripts/dvd-writepart.in

diff --git a/bacula/scripts/dvd-freespace.in b/bacula/scripts/dvd-freespace.in
new file mode 100755
index 0000000000..005377a4cc
--- /dev/null
+++ b/bacula/scripts/dvd-freespace.in
@@ -0,0 +1,116 @@
+#!@PYTHON@
+#
+# Check the free space available on a writable DVD
+# Should always exit with 0 status, otherwise it indicates a serious error.
+# (wrong number of arguments, Python exception...)
+#
+# Prints on the first output line the free space available in bytes.
+# If an error occurs, prints a negative number (-errno), followed,
+# on the second line, by an error message.
+# 
+# $Id$
+
+# Configurable values:
+mkisofs="@MKISOFS@"
+growisofs="@GROWISOFS@"
+dvdrwmediainfo="@DVDRWMEDIAINFO@"
+
+margin=10485760 # 10 mb security margin
+
+growisofsparams=""
+
+# Uncomment the following line if you have a Linux kernel >=2.6.8, and
+# if you want to allow a session to start behind the 4gb boundary.
+#growisofsparams = growisofsparams + " -use-the-force-luke=4gms"
+
+# end of configurable values
+
+import popen2
+import os
+import errno
+import tempfile
+import sys
+
+if len(sys.argv) != 3:
+   print "Wrong number of argument."
+   sys.exit(1)
+
+device=sys.argv[1]
+part_num=int(sys.argv[2])
+
+os.environ["MKISOFS"] = mkisofs
+
+def gettotalsize():
+   cmd=dvdrwmediainfo + " " + device
+   processi = popen2.Popen4(cmd)
+   status = processi.wait()
+   if not os.WIFEXITED(status):
+      print -errno.EPIPE
+      print "Process has not exited correctly."
+      sys.exit(0)
+   if os.WEXITSTATUS(status) != 0:
+      print -errno.EPIPE
+      print 'Cannot get media info.'
+      sys.exit(0)
+   while 1:
+      result = processi.fromchild.readline()
+      if result.find("Legacy lead-out at:") > -1:
+         index = result.find("=")
+         if index > -1:
+            res = result[index+1:-1]
+            if not res.isdigit():
+               print -errno.EPIPE
+               print 'Invalid format in media info lead-out line.'
+               sys.exit(0)
+            return int(res)
+         else:
+            print -errno.EPIPE
+            print 'Invalid format in media info lead-out line.'
+            sys.exit(0)
+      if not result:
+         print -errno.EPIPE
+         print 'Cannot get media lead-out index.'
+         sys.exit(0)
+
+tmpfile = tempfile.NamedTemporaryFile()
+if part_num == 0:
+   flag = "-Z"
+else:
+   flag = "-M"
+cmd=growisofs + " " + growisofsparams + " -use-the-force-luke=tty -dry-run -quiet " + flag + " " + device + " -R " + tmpfile.name
+process = popen2.Popen4(cmd)
+status = process.wait()
+if not os.WIFEXITED(status):
+   print -errno.EPIPE
+   print "Process has not exited correctly."
+   sys.exit(0)
+
+exitstat = os.WEXITSTATUS(status) & ~0x80
+if exitstat == errno.ENOSPC:
+   print "0"
+   print os.strerror(exitstat)
+   sys.exit(0)
+if exitstat != 0:
+   print -exitstat
+   print os.strerror(exitstat)
+   sys.exit(0)
+while 1:
+   result = process.fromchild.readline()
+   if not result:
+      print -errno.EPIPE
+      print 'Cannot find the seek argument in the output.'
+      sys.exit(0)
+   index = result.find("seek=")
+   if index > -1:
+      res = result[index+5:-2]
+      if not res.isdigit():
+         print -errno.EPIPE
+         print 'Wrong seek argument in the output.'
+         sys.exit(0)
+      size = int(res)*32*1024
+      size = gettotalsize()-(size+margin)
+      if size < 0:
+         size = 0
+      print size
+      print "No error occured"
+      sys.exit(0)
diff --git a/bacula/scripts/dvd-writepart.in b/bacula/scripts/dvd-writepart.in
new file mode 100644
index 0000000000..43734d2a00
--- /dev/null
+++ b/bacula/scripts/dvd-writepart.in
@@ -0,0 +1,56 @@
+#!/bin/sh
+#
+# Bacula interface to growisofs, used to write to DVD+/-R(W)
+#
+#  $Id$
+#
+#  If you set in your Device resource
+#
+#  Write Part Command = "path-to-this-script/dvd-writepart %n %a %v"
+#    you will have the following input to this script:
+#
+#  dvd-writepart "part_number"    "device"  "part_filename"
+#                     $1             $2           $3
+#
+#  for example:
+#
+#  dvd-writepart 0 /dev/hda File-0001
+
+MKISOFS=@MKISOFS@
+GROWISOFS=@GROWISOFS@
+
+GROWARGS="-use-the-force-luke=tty -quiet"
+
+# Uncomment the following line if you do not want the tray to be reloaded
+# when writing ends.
+#GROWARGS="${GROWARGS} -use-the-force-luke=notray"
+
+# Uncomment the following line if you have a Linux kernel >=2.6.8, and
+# if you want to allow a session to start behind the 4gb boundary.
+#GROWARGS="${GROWARGS} -use-the-force-luke=4gms"
+
+#### You should probably not modify anything below this line
+
+if test $# -ne 3 ; then
+  echo "usage: dvd-writepart part_number device part_filename"
+  echo "  Wrong number of arguments arguments given (!= 3)."
+  exit 1
+fi
+
+# Setup arguments
+partnum=$1
+dev=$2
+filename=$3
+
+if test $partnum = 0 ; then
+  arg="-Z"
+else
+  arg="-M"  
+fi
+
+echo Running ${GROWISOFS} ${GROWARGS} $arg $dev -R $filename...
+
+${GROWISOFS} ${GROWARGS} $arg $dev -R $filename
+rtn=$?
+
+exit $rtn
-- 
2.39.5