4 echo Usage: dcm_sort_by_field.sh \"field name\"
7 [ -d sorted ] && rm -r sorted
8 find . -type f -iname "*.dcm" > dicom_files
10 total=$(wc -l dicom_files)
12 cat dicom_files | while :
16 while [ $jobrunning -lt $conc_jobs ]
18 read i || { wait; break 2; }
20 name="$(clitkDicomInfo "$i" | grep "$1" | sed "s/.*\[//;s/.$//;s/ /_/g")"
21 [ -z "$name" ] && echo "Warning: key not found in file $i" 1>&2 && exit 1 #don't do anything if dicom key not found
22 [ -z `echo $name | grep "/"` ] || name=`echo $name | sed 's/\//\_/'`
23 [ -d "sorted/$name" ] || mkdir "sorted/$name" 2>>/dev/null
24 basename=$(basename "$i")
25 cp -l "$i" "sorted/$name/$basename"
27 jobrunning=$(( $jobrunning + 1 ))
29 finished=$(( $finished + $conc_jobs ))
30 echo -e -n "( $finished / $total )\r"