# This file:
#   http://anggtwu.net/bin/2025.1-provas.sh.html
#   http://anggtwu.net/bin/2025.1-provas.sh
#          (find-angg "bin/2025.1-provas.sh")
# Author: Eduardo Ochs <eduardoochs@gmail.com>
#
# (defun e () (interactive) (find-angg "bin/2025.1-provas.sh"))
# (find-es "puro" "2025.1-C2-P1s")
# (find-fline "~/2025.1-C2/P1s/")
#
# «.core»		(to "core")
# «.core-tests»		(to "core-tests")
# «.c2p1»		(to "c2p1")
# «.c2p1-tests»		(to "c2p1-tests")
# «.c2p2»		(to "c2p2")
# «.c2p2-tests»		(to "c2p2-tests")
# «.c2vrp1»		(to "c2vrp1")
# «.c2vrp1-tests»	(to "c2vrp1-tests")
# «.c2vrp2»		(to "c2vrp2")
# «.c2vrp2-tests»	(to "c2vrp2-tests")
# «.c2vs»		(to "c2vs")
# «.c2vs-tests»		(to "c2vs-tests")
# «.c3p2»		(to "c3p2")
# «.c3p2-tests»		(to "c3p2-tests")
# «.c3vrp1-tests»	(to "c3vrp1-tests")
# «.c3vrp1»		(to "c3vrp1")

# «core»  (to ".core")
toname0   () { cut -b17- | rev | cut -b7- | rev; }
toname0   () { cut -d_ -f3- | rev | cut -d_ -f2- | rev; }
tonumber0 () { rev | cut -b5 | rev; }
tonumber0 () { rev | cut -d_ -f1 | cut -b5- | rev; }
toname    () { echo $1 | toname0; }
tonumber  () { echo $1 | tonumber0; }
names     () { for i in 2025*.jpg; do toname $i; done | sort | uniq; }

echoandrun () { echo $*; $*; }
mkdirfor   () { $2 mkdir -p $1/; }
rmdirfor   () { $2 rm -Rfv  $1/; }
mkdirs     () { for i in $(names); do $1 mkdir -p $i/; done; }
rmdirs     () { for i in $(names); do $1 rm -Rfv  $i/; done; }

cpjpg         () { $2 cp -v $1 $(toname $1)/$(tonumber $1).jpg; }
jpgsfor       () { ls ????????_??????_${1}_?.jpg; }
jpgsfor       () { ls *.jpg | grep "^........_......_${1}_.*.jpg"; }
cpjpgsfor     () { for i in $(jpgsfor $1); do cpjpg $i $2; done; }
mkfotospdffor () { $2 convert -quality 50 $1/*.jpg ${1}_fotos.pdf }

nfotos        () { ls $1/ | rev | cut -b5- | rev | tail -n1; }
nfotos_       () { ls $1/; }

rmdirs        () { for i in $(names); do rmdirfor      $i $1; done; }
mkdirs        () { for i in $(names); do mkdirfor      $i $1; done; }
cpjpgs        () { for i in $(names); do cpjpgsfor     $i $1; done; }
mkfotospdfs   () { for i in $(names); do mkfotospdffor $i $1; done; }
mkprovas_c2p1 () { for i in $(names); do mkprova_c2p1  $i $1; done; }
mkprovas_c2p2 () { for i in $(names); do mkprova_c2p2  $i $1; done; }
mkprovas_c3p2 () { for i in $(names); do mkprova_c3p2  $i $1; done; }
mkprovas_c2vrp1 () { for i in $(names); do mkprova_c2vrp1 $i $1; done; }
mkprovas_c2vrp2 () { for i in $(names); do mkprova_c2vrp2 $i $1; done; }
mkprovas_c3vrp1 () { for i in $(names); do mkprova_c3vrp1 $i $1; done; }
mkprovas_c2vs   () { for i in $(names); do mkprova_c2vs   $i $1; done; }


# «core-tests»  (to ".core-tests")
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
** (find-fline "~/2025.1-C2/VSs/")
. 2025.1-provas.sh
cd              ~/2025.1-C2/VSs/
for i in $(ls *.jpg); do echo $i; done
for i in $(ls *.jpg); do toname   $i; done
for i in $(ls *.jpg); do tonumber $i; done
names
jpgsfor bruno_henri
jpgsfor mariana
nfotos  bruno_henri
nfotos  mariana

%%%%%

: <<'%%%%%'
** (find-fline "~/2025.1-C2/P1s/")
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C2/P1s/

rmdirs        echo
mkdirs        echo
cpjpgs        echo
mkfotospdfs   echo
mkprovas_c2p1 echo

ls bruna/
nfotos  bruna
nfotos_ bruna
nfotos  bleh

tonumber  20250604_083812_bruna_2.jpg
cpjpg     20250604_083812_bruna_2.jpg echo
jpgsfor       bruna
cpjpgsfor     bruna echo
mkdirfor      bruna echo
rmdirfor      bruna echo
mkfotospdffor bruna echo
mkfotospdfs         echo

mkprova_c2p1  bruna echo
mkprova_c2p1  bruna echoandrun
mkprovas_c2p1       echo

laf bruna_prova.pdf

#  (find-pdf-page "~/2025.1-C2/P1s/bruna_prova.pdf")
#  (find-fline "~/2025.1-C2/P1s/" "bruna_prova.pdf")
# file:////home/edrx/2025.1-C2/P1s/bruna_prova.pdf

nfotos bruna

names
mkdirs echo
rmdirs echo


ls [0-9]*

%%%%%


# «c2p1»  (to ".c2p1")
mkprova_c2p1  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1-2 \
     ~/LATEX/2025-1-C2-P1.pdf 4-9 \
     ${1}_fotos.pdf 3-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c2p1-tests»  (to ".c2p1-tests")
: <<'%%%%%'
* (eepitch-sh)
* (eepitch-kill)
* (eepitch-sh)
. 2025.1-provas.sh
cd ~/2025.1-C2/P1s/

%%%%%

# «c2p2»  (to ".c2p2")
mkprova_c2p2  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1-2 \
     ~/LATEX/2025-1-C2-P2.pdf 5-10 \
     ${1}_fotos.pdf 3-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c2p2-tests»  (to ".c2p2-tests")
# (find-fline "~/2025.1-C2/P2s/")
# (c2p2p)
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C2/P2s/
rmdirs        echo
mkdirs        echo
cpjpgs        echo
mkfotospdfs   echo
mkprovas_c2p2 echo

rmdirs        echoandrun
mkdirs        echoandrun
cpjpgs        echoandrun
mkfotospdfs   echoandrun
mkprovas_c2p2 echoandrun

%%%%%


# «c3p2»  (to ".c3p2")
mkprova_c3p2  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1 \
     ~/LATEX/2025-1-C3-P2.pdf 5-z \
     ${1}_fotos.pdf 2-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c3p2-tests»  (to ".c3p2-tests")
# (find-fline "~/2025.1-C3/P2s/")
# (c3p2p)
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C3/P2s/
rmdirs        echo
mkdirs        echo
cpjpgs        echo
mkfotospdfs   echo
mkprovas_c3p2 echo

rmdirs        echoandrun
mkdirs        echoandrun
cpjpgs        echoandrun
mkfotospdfs   echoandrun
mkprovas_c3p2 echoandrun

%%%%%


# «c3vrp1»  (to ".c3vrp1")
mkprova_c3vrp1  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1-2 \
     ~/LATEX/2025-1-C3-P1.pdf 6-z \
     ${1}_fotos.pdf 3-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c3vrp1-tests»  (to ".c3vrp1-tests")
# (find-fline "~/2025.1-C3/VRP1s/")
# (c3vr1p)
# (c3p1p)
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C3/VRP1s/
rmdirs          echo
mkdirs          echo
cpjpgs          echo
mkfotospdfs     echo
mkprovas_c3vrp1 echo

rmdirs          echoandrun
mkdirs          echoandrun
cpjpgs          echoandrun
mkfotospdfs     echoandrun
mkprovas_c3vrp1 echoandrun

%%%%%




# «c2vrp2»  (to ".c2vrp2")
mkprova_c2vrp2  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1-2 \
     ~/LATEX/2025-1-C2-VRP2.pdf 5-z \
     ${1}_fotos.pdf 3-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c2vrp2-tests»  (to ".c2vrp2-tests")
# (find-fline "~/2025.1-C2/VRP2s/")
# (c2vr2p)
# (c3p1p)
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C2/VRP2s/
rmdirs          echo
mkdirs          echo
cpjpgs          echo
mkfotospdfs     echo
mkprovas_c2vrp2 echo

rmdirs          echoandrun
mkdirs          echoandrun
cpjpgs          echoandrun
mkfotospdfs     echoandrun
mkprovas_c2vrp2 echoandrun

%%%%%


# «c2vs»  (to ".c2vs")
mkprova_c2vs  () {
  $2 qpdf --empty --pages \
     ${1}_fotos.pdf 1-2 \
     ~/LATEX/2025-1-C2-VS.pdf 5-z \
     ${1}_fotos.pdf 3-$(nfotos $1) \
     -- \
     ${1}_prova.pdf
  }

# «c2vs-tests»  (to ".c2vs-tests")
# (find-fline "~/2025.1-C2/VSs/")
# (c2vsp)
# (c3p1p)
: <<'%%%%%'
* (eepitch-shell)
* (eepitch-kill)
* (eepitch-shell)
. 2025.1-provas.sh
cd ~/2025.1-C2/VSs/
rmdirs          echo
mkdirs          echo
cpjpgs          echo
mkfotospdfs     echo
mkprovas_c2vs echo

rmdirs          echoandrun
mkdirs          echoandrun
cpjpgs          echoandrun
mkfotospdfs     echoandrun
mkprovas_c2vs echoandrun

%%%%%


# (find-fline "~/2025.1-C3/P2s/")





# Local Variables:
# coding:  utf-8-unix
# End: