1 files changed, 98 insertions, 0 deletions
diff --git a/tools/scripts/check_koffice_install.sh b/tools/scripts/check_koffice_install.sh
new file mode 100755
index 000000000..d15876f75
--- /dev/null
+++ b/tools/scripts/check_koffice_install.sh
@@ -0,0 +1,98 @@
+#!/bin/bash
+if ! kde-config ; then
+  echo 'kde-config not found ! Aborting. You need a more recent KDE, or to fix your $PATH.'
+  exit 1
+fi
+
+instance=kword
+applnks=`kde-config --path apps`:`kde-config --path xdgdata-apps`
+services=`kde-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-KDE-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-KDE-NativeMimetype in it was found! Installation problem."
+  echo $applnks
+fi
+
+echo
+
+stfound=0
+for dir in `kde-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!'
+  kde-config --path servicetypes
+else
+  echo
+  if [ $found = 1 ]; then
+    echo "Everything looks ok"
+  fi
+fi
+