#!/bin/sh

# This script is based on draft by Sam Steingold

# Copyright (c) 1998 by Alexander V. Lukyanov

# This script can be distributed and modified freely under GNU GPL, see COPYING

set -e

NS="$HOME/.netscape/bookmarks.html"

OLD="${LFTP_HOME:-$HOME/.lftp}/bookmarks"

NEW="$OLD.new.$$"

prepend_hash()

{

   n=$$

   while read line; do

      u=`echo $line | sed -e 's|\(ftp://[^:]*\):[^@]*@|\1|'`

      t=`expr "$u" : "ftp://\([^.]*\)"`

      if [ "$t" = ftp -o -z "$t" ]; then

      	 t=`expr "$u" : "ftp://[^.]*.\([^.]*\)"`

	 if [ "$t" = ftp -o -z "$t" ]; then

	    t="$n"

	    n=`expr $n + 1`

	 fi

      fi

      echo "NS-$t $line"

   done

}

grep ftp:// "$NS" | cut "-d\"" -f2 | prepend_hash > "$NEW"

if [ -f "$OLD" ]; then

   sort -u "$OLD" "$NEW" -o "$NEW"

   mv -f "$OLD" "$OLD~" # backup

else

   sort -u "$NEW" -o "$NEW"

fi

mv -f "$NEW" "$OLD"