#!/bin/sh # @(#$Id: rclsoff,v 1.3 2005-10-20 11:33:49 dockes Exp $ (C) 2004 J.F.Dockes # Parts taken from Estraier: #================================================================ # Estraier: a personal full-text search system # Copyright (C) 2003-2004 Mikio Hirabayashi #================================================================ #================================================================ # rclsoff # Extract text from an openoffice/soffice file # #================================================================ # set variables LANG=C ; export LANG LC_ALL=C ; export LC_ALL progname="rclsoff" # show help message if test $# -ne 1 -o "$1" = "--help" then printf 'Convert an openoffice file to unformatted HTML text.\n' printf 'Usage: %s [infile]\n' "$progname" exit 1 fi infile="$1" iscmd() { cmd=$1 case $cmd in */*) if test -x $cmd ; then return 0; else return 1; fi ;; *) IFS=: ; set -- $PATH; unset IFS for d in $* ; do test -x $d/$cmd && return 0; done return 1 ;; esac } checkcmds() { for cmd in $*;do if iscmd $cmd then a=1 else echo $cmd not found 1>&2 exit 1 fi done } checkcmds awk iconv unzip # check the input file existence if test ! -f "$infile" then printf '%s: %s: no such file\n' "$progname" "$infile" exit 1 fi # We need a temporary directory if test z"$RECOLL_TMPDIR" != z; then ttdir=$RECOLL_TMPDIR elif test z"$TMPDIR" != z ; then ttdir=$TMPDIR else ttdir=/tmp fi tmpdir=$ttdir/rclsoff_tmp$$ mkdir $tmpdir || exit 1 mkdir $tmpdir/rclsofftmp || exit 1 cleanup() { # Note that we're using a constant part (rclsofftmp), that hopefully # guarantees that we can't do big mistakes here. rm -rf $tmpdir/rclsofftmp rmdir $tmpdir } trap cleanup EXIT SIGHUP SIGQUIT SIGINT SIGTERM # Unzip the input file and change to the unzipped directory unzip -q -d $tmpdir/rclsofftmp $infile cd $tmpdir/rclsofftmp # Note: there can be newlines inside the description field, we don't want # them... descsedprog='//,/<\/dc:description>/{ s!.*!! s!.*!! p } ' description=`sed -n -e "$descsedprog" < meta.xml | tr '\n' ' '` subject=`sed -e "s/\"/'/" -e 's/.*\([^<]*\).*/\1/p;d' < meta.xml` title=`sed -e "s/\"/'/" -e 's/.*\([^<]*\).*/\1/p;d' < meta.xml` keywords=`sed -e "s/\"/'/" -e 's/.*\([^<]*\).*/\1/p;d' \ < meta.xml` # Note: next expr inserts a newline at each end of paragraph (for preview) content="`sed -e 's!!\\ !g' -e 's/<[^>]*>/ /g' < content.xml`" #echo description "$description" #echo subject "$subject" #echo title "$title" #echo keywords "$keywords" #echo content "$content" # output the result echo '' echo '' "$title" '' echo '' echo '' echo '' echo '

' echo "$content" | sed -e "s/'/'/g" -e 's/"/"/g' |\ awk ' BEGIN { esc = 1 } { if ($0 ~ /-$/) { sub(/-$/, "", $0) printf("%s", $0); } else if($0 == "\f") { printf("

\n
\n

") } else { if(esc > 0) { gsub(/&/, "\\&", $0) gsub(//, "\\>", $0) } printf("%s
", $0) } } END { printf("

\n"); }' | iconv -f UTF-8 -t UTF-8 -c -s cd / # exit normally exit 0