|
|
|
#!/bin/bash
|
|
|
|
if ! tde-config ; then
|
|
|
|
echo 'tde-config not found ! Aborting. You need a more recent KDE, or to fix your $PATH.'
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
|
|
|
|
instance=kword
|
|
|
|
applnks=`tde-config --path apps`:`tde-config --path xdgdata-apps`
|
|
|
|
services=`tde-config --path services`
|
|
|
|
found=0
|
|
|
|
|
|
|
|
function checkname()
|
|
|
|
{
|
|
|
|
f=`echo $1 | sed -e 's,//,/,g'`
|
|
|
|
if [ -f $f ]; then
|
|
|
|
echo -n "Found: $f... "
|
|
|
|
mimetypes=`grep ^MimeType $f|sed -e 's/.*=//;s/;/,/g;'`
|
|
|
|
servicetypes=`grep ^ServiceTypes $f|sed -e 's/.*=//;s/$/,/g'`
|
|
|
|
fulllist="$mimetypes,$servicetypes"
|
|
|
|
if echo $fulllist | grep "KOfficePart," >/dev/null 2>/dev/null; then
|
|
|
|
echo "ok, this is a KOfficePart"
|
|
|
|
else
|
|
|
|
echo '**** KOfficePart not in list of types !'
|
|
|
|
echo Service Types: $fulllist
|
|
|
|
cat $f
|
|
|
|
exit 1
|
|
|
|
fi
|
|
|
|
nativemime=`grep X-TDE-NativeMimeType $f`
|
|
|
|
echo Native mimetype : $nativemime
|
|
|
|
if echo $nativemime | grep "application/x-$instance" >/dev/null 2>/dev/null; then
|
|
|
|
found=1
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
}
|
|
|
|
|
|
|
|
IFS=:
|
|
|
|
for dir in $services; do
|
|
|
|
if test -n "$dir"; then
|
|
|
|
echo Looking for ${instance}part.desktop under services dir: $dir
|
|
|
|
f="$dir/${instance}part.desktop"
|
|
|
|
checkname $f
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
|
|
|
|
if [ $found = 0 ]; then
|
|
|
|
# The old way, as fallback
|
|
|
|
for dir in $applnks; do
|
|
|
|
if test -n "$dir"; then
|
|
|
|
echo Looking under applnk dir: $dir
|
|
|
|
f="$dir/Office/$instance.desktop"
|
|
|
|
checkname $f
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ $found = 0 ]; then
|
|
|
|
echo
|
|
|
|
echo Now looking by filename
|
|
|
|
echo
|
|
|
|
|
|
|
|
for dir in $applnks; do
|
|
|
|
if test -n "$dir"; then
|
|
|
|
echo Looking under applnk dir: $dir
|
|
|
|
for f in `find $dir -name $instance.desktop`; do
|
|
|
|
checkname $f
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ $found = 0 ]; then
|
|
|
|
echo "***** No $instance.desktop with X-TDE-NativeMimetype in it was found! Installation problem."
|
|
|
|
echo $applnks
|
|
|
|
fi
|
|
|
|
|
|
|
|
echo
|
|
|
|
|
|
|
|
stfound=0
|
|
|
|
for dir in `tde-config --path servicetypes`; do
|
|
|
|
echo Service Types dir $dir
|
|
|
|
f=`echo $dir/kofficepart.desktop | sed -e 's,//,/,g'`
|
|
|
|
if [ -f $f ]; then
|
|
|
|
echo Found $f
|
|
|
|
grep Native $f
|
|
|
|
stfound=1
|
|
|
|
fi
|
|
|
|
done
|
|
|
|
|
|
|
|
if [ $stfound = 0 ]; then
|
|
|
|
echo '****** kofficepart.desktop not found!'
|
|
|
|
tde-config --path servicetypes
|
|
|
|
else
|
|
|
|
echo
|
|
|
|
if [ $found = 1 ]; then
|
|
|
|
echo "Everything looks ok"
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|