#!/bin/sh

Check (){

# $1 katalogas

k=1

check=`ls -l | grep index.txt`

if [ -z "$check" ]; then

k=0

fi

if [ $k -eq 0 ]; then

touch index.txt

fi

for i in *; do

if [ -f $i ] && [ "$i" != "index.txt" ]; then

check=`grep $i index.txt`

if [ -z "$check" ]; then

echo "Katalogas $1, aprasymas $i : "

read apr

echo $i " / " $apr >> index.txt

fi

fi

done

}

Delete() {

# 1 katalogas

for i in *; do

touch tarpinis.txt

check=`cat index.txt | grep $i`

if [ -n "$check" ]; then

#echo "==" +$check+

echo $check >> tarpinis.txt

fi

done

cat tarpinis.txt > index.txt

rm tarpinis.txt

}

#Surandami katalogai/failai, kurie atitinkamai irasomi i index.txt

dir=`pwd`

for i in *; do

if [ -d $dir/$i ]; then

cd $dir/$i

Check $i

cd $dir

elif [ -f $i ]; then

name=`basename "$PWD"`

Check $name

fi

done

#Pasalinami panaikinti failai

k=1

for i in *; do

if [ -d $dir/$i ]; then

cd $dir/$i

Delete $i

cd $dir

elif [ -f $i ] && [ k -eq 1 ]; then

k=0

name=`basename "$PWD"`

Delete $name

fi

done