Gentoo hoogle offline DB builder

hoogle-build-local-offlinedb.sh

#!/bin/sh
# 
# emerge -vp hoogle の後，hoogle-build-localdbを走らせろと言われるが，
# それを無視してコッチのスクリプトを走らせるとローカルにインストールしたパッケージのhaddock等を参照するhoogle DBが作られる．
# そのままで hoogle server すると file:/// とローカルドキュメントへのファイルURLが検索結果に出るようになる．
# また， hoogle server -l すると http://localhost:port/file//usr/share/doc のような，hoogle serverがstatic fileとして処理ってくれるURLになって，
# Haskell環境はVMの中(でホストからputty等で接続してるだけ)だけどブラウザはホストから使いたいようなケースでもOKになる．
# 
ROOT="/"

if [ ! -d "${ROOT}var/lib/hoogle/databases" ]
then
    mkdir -p "${ROOT}var/lib/hoogle/databases"
fi

pushd "${ROOT}var/lib/hoogle/databases"

for TXT in $(find $(grep haddock-html $(find $(ghc-pkg list --global | head -n 1 | sed 's/:$//') -type f) | sed 's/.*haddock-html://;s/^[[:space:]]//;/^$/d') -name "*.txt" 2>/dev/null)
do
    SRC=$(basename $TXT)
    HOO=${SRC/.txt/.hoo}
    (
        awk '/^@package/ {exit}; {print}' $TXT;
        echo "@url file://$(dirname $TXT)/"
        awk '/^@package/ {x=1}; {if (x == 1) print;}' $TXT
    ) > $SRC
    hoogle convert $SRC $HOO
done
rm default.hoo
hoogle combine -o=default.hoo $(ls *.hoo)