#! /bin/bash -eu
# Last edited on 2025-11-04 04:25:05 by stolfi

for args in \
    port-curr=head.0:4628,tail.3400:9000,full.0:9000 \
    port-orig=head.0:4625,tail.3401:9000,full.0:9000 \
    port-phon=head.0:4841,tail.3624:9000,full.0:9000 \
    span-curr=head.0:4523,tail.3762:9000,full.0:9000 \
  ; do
  sname="${args/=*/}"
  prs=( `echo "${args/*=/}" | tr ',' ' '` )
  ifile="out/text/${sname}.txt"
  filter='text_to_sample.py'
  mkdir -p out/{head,tail,full}
  for pr in ${prs[@]}; do 
    part="${pr/.*/}"
    range="${pr/*./}"
    beg="${range/:*/}"
    lim="${range/*:/}"
    ofile="out/${part}/${sname}.txt"
    echo "=== ${sname} ${part} ${beg} ${lim} ===" 1>&2
    cat ${ifile} \
      | ${filter} ${beg} ${lim} \
      | cat -s \
      > ${ofile}
  done
done

#      | join_parag_lines.gawk \
#      | fmt --split-only --width=72 \
      
#      | gawk \
#          ' /^$/ { print; next; } 
#            /./ { gsub(/^|[ ]|$/, ". "); print }
#          ' \
#       | tr -d ' ' \


dicio-wc out/full/*.txt

dicio-wc out/head/*.txt

dicio-wc out/tail/*.txt