Import sources from 2011-03-30 iso image - rc

1 files changed, 32 insertions, 0 deletions

diff --git a/rc/bin/xls2txt b/rc/bin/xls2txt
new file mode 100755
index 000000000..9d72c238b
--- /dev/null
+++ b/rc/bin/xls2txt
@@ -0,0 +1,32 @@
+#!/bin/rc
+
+rfork en
+
+if(! ~ $#* 0 1) {
+	echo 'usage: xls2txt [file.xls]' >[1=2]
+	exit usage
+}
+
+switch($#*){
+case 0
+	cat >/tmp/xls2txt.$pid
+	file=/tmp/xls2txt.$pid
+case 1
+	file=$1
+}
+aux/olefs $file || { 
+	echo 'xls2txt: couldn''t mount excel document' >[1=2]
+	rm -f /tmp/xls2txt.$pid
+	exit word
+}
+
+if(! test -f /mnt/doc/Workbook) {
+	echo 'xls2txt: is an MSoffice doc but not an Excel document' >[1=2]
+	rm -f /tmp/xls2txt.$pid
+	exit wordxls
+}
+
+aux/msexceltables /mnt/doc/Workbook
+unmount /mnt/doc
+rm -f /tmp/xls2txt.$pid
+