X-Git-Url: http://git.plutz.net/?a=blobdiff_plain;f=indexmeta.sh;h=45a3bac008b2ee469719d6ac2b91b3a0976b9178;hb=e5fa77f840c59f5ff4b146f687a0d7b38e2d77f6;hp=2e4e74f16494305ce92f77578208447096e1b192;hpb=b8e2146aaabd7acdff878cd3061de7e24a0a91b2;p=serve0 diff --git a/indexmeta.sh b/indexmeta.sh index 2e4e74f..45a3bac 100644 --- a/indexmeta.sh +++ b/indexmeta.sh @@ -40,7 +40,7 @@ meta_file(){ name="$(meta_name "$file")" if [ -d "${meta%/meta}" ] && LOCK "$meta"; then - grep -vF " ${name}" "$meta" >"$meta.tmp" + grep -avF " ${name}" "$meta" >"$meta.tmp" meta_line "$file" \ | tee -a "$meta.tmp" mv "$meta.tmp" "$meta" @@ -48,14 +48,28 @@ meta_file(){ fi } +meta_purge(){ + local file meta name + file="$1" + meta="${file%/*}/.index/meta" + name="$(meta_name "$file")" + + if [ -d "${meta%/meta}" ] && LOCK "$meta"; then + grep -avF " ${name}" "$meta" >"$meta.tmp" + grep -aF " ${name}" "$meta" >>"$meta.trash" + mv "$meta.tmp" "$meta" + RELEASE "$meta" + fi +} + meta_info(){ local file meta file="$1" meta="${file%/*}/.index/meta" if [ -d "${meta%/meta}" ]; then - grep -m1 -F " $(meta_name "$file")" "$meta" \ - | grep -xE '[0-9]+ [0-9]+ [0-9]+ tags=[^ ]* comment=[^ ]* .+' \ + grep -aF " $(meta_name "$file")" "$meta" \ + | grep -m1 -axE '[0-9]+ [0-9]+ [0-9]+ tags=[^ ]* comment=[^ ]* .+' \ || meta_file "$file" else printf '0\t0\t0\ttags=\tcomment=\t\r' @@ -70,8 +84,8 @@ meta_dir(){ if [ -d "$dir/.index" -a \! -f "$meta" ] && LOCK "$meta"; then touch "$meta" # preliminary touch to prevent concurrent generators find "$dir" -type f -mindepth 1 -maxdepth 1 \ - | grep -E "$file_pattern" \ - | while v="$(line)"; do + | grep -aE "$file_pattern" \ + | while read -r v; do meta_line "$v" done >"$meta" @@ -79,8 +93,8 @@ meta_dir(){ elif [ -d "$dir/.index" -a "$dir" -nt "$meta" ] && LOCK "$meta"; then touch "$meta" find "$dir" -type f -mindepth 1 -maxdepth 1 \ - | grep -E "$file_pattern" \ - | while v="$(line)"; do + | grep -aE "$file_pattern" \ + | while read -r v; do if [ "$v" -nt "$meta" ]; then grep -qF " $(meta_name "$v")" "$meta" \ || meta_line "$v"