X-Git-Url: http://git.plutz.net/?a=blobdiff_plain;f=multitag.sh;h=674983ad626431746700d091655fa305ce7dfc68;hb=ccc8de4ebdd18fb52cdb8ce2013573d079186fba;hp=0a8e9d4858d1e6d4e7c969251cb4f8bc36a6ce36;hpb=3f9026072887cc5723948ec151dd108cf874225d;p=serve0 diff --git a/multitag.sh b/multitag.sh old mode 100644 new mode 100755 index 0a8e9d4..674983a --- a/multitag.sh +++ b/multitag.sh @@ -1,31 +1,49 @@ #!/bin/sh -. "$_EXEC/cgilite/storage.sh" +. "$_EXEC/db_meta.sh" +. "$_EXEC/cgilite/session.sh" nocookie + +newtags='' +for tn in $(seq 1 $(POST_COUNT tag)); do + newtags="$(POST tag $tn)${BR}${newtags}" +done +newtags="$(POST newtagn |tr -d '\r' |tr , '\n')${BR}${newtags}" + +if [ "$(POST makegroup)" = true ]; then + group="$(timeid)" +fi + +while [ "${newtags#${BR}}" != "${newtags}" ]; do newtags="${newtags#${BR}}"; done +while [ "${newtags%${BR}}" != "${newtags}" ]; do newtags="${newtags%${BR}}"; done + +[ "$(POST op)" = del ] && deltags="$newtags" for select in $(seq 1 $(POST_COUNT select)); do - file="$_DATA/$ITEM/$(POST select $select)" - meta="${file%/*}/.index/meta" - fn="${file##*/}" - - if LOCK "$meta"; then - grep -vF " $fn" "$meta" >"${meta}.tmp" - read length width height tags comment x <<-EOF - $(grep -F " $fn" "$meta") - EOF - tags="$(printf '%s' "${tags#tags=}" | tr , '\n')" - - for tn in $(seq 1 $(POST_COUNT tag)); do - tags="$tags${BR}$(POST tag $tn |sed -r 's;\t;\\t;g; s;\r;;g;')" - done - tags="$tags${BR}$(POST newtag |sed -r 's;\t;\\t;g; s;\r;;g;')" + file="$(POST select $select)" + + read_meta "${file%.*}" || continue + tags="$(printf %s\\n "$META_TAGS" |tr , \\n)" - printf '%i\t%i\t%i\ttags=%s\t%s\t%s\n' \ - "$length" "$width" "$height" \ - "$(printf %s "$tags" |sort -u |tr '\n' ,)" \ - "$comment" "$fn" \ - >>"${meta}.tmp" - mv "${meta}.tmp" "$meta" + if [ ! "$deltags" ]; then + extags="$(printf '%s' "${newtags}" |grep -e "^-" |cut -d: -f1 )" + [ "$extags" ] && tags="$(printf %s\\n "$tags" |grep -vwFe "$extags")" + if printf %s "${newtags}" |grep -e "^-" |grep -qEe "^-[^:]+$"; then + tags="$(printf %s\\n "$tags" |grep -vEe '^-[^:]+$')" + fi + tags="$(printf '%s\n' "${tags},${newtags}" \ + | tr , '\n' |sort -u |tr '\n' ,)" + else + detag="${deltags}${BR}"; while [ "$detag" ]; do + tags="$(printf '%s\n' "$tags" |grep -vxFe "${detag%%${BR}*}")" + detag="${detag#*${BR}}" + done + tags="$(printf '%s\n' "$tags" |sort -u |tr '\n' ,)" + fi + tags="${tags#,}"; tags="${tags%,}" - RELEASE "$meta" + if [ "$group" ]; then + update_meta "$META_NAME" tags="${tags}" group="${group}" + else + update_meta "$META_NAME" tags="${tags}" fi done