ieuroklavfilter - rfcommd - RFCOMM daemon to run filters on clients. Err bitreich.org 70 hgit clone git://bitreich.org/rfcommd/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/rfcommd/ URL:git://bitreich.org/rfcommd/ git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/rfcommd/ bitreich.org 70 1Log /scm/rfcommd/log.gph bitreich.org 70 1Files /scm/rfcommd/files.gph bitreich.org 70 1Refs /scm/rfcommd/refs.gph bitreich.org 70 1Tags /scm/rfcommd/tag bitreich.org 70 1README /scm/rfcommd/file/README.md.gph bitreich.org 70 1LICENSE /scm/rfcommd/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 ieuroklavfilter (683B) Err bitreich.org 70 i--- Err bitreich.org 70 i 1 #!/bin/sh Err bitreich.org 70 i 2 Err bitreich.org 70 i 3 euroklavdb="/home/david/share/euroklav" Err bitreich.org 70 i 4 dbpath="${euroklavdb}" Err bitreich.org 70 i 5 Err bitreich.org 70 i 6 if [ $# -gt 0 ]; Err bitreich.org 70 i 7 then Err bitreich.org 70 i 8 infile="$1" Err bitreich.org 70 i 9 case "${infile}" in Err bitreich.org 70 i 10 /dev/rfcomm*) Err bitreich.org 70 i 11 stty -F "${infile}" raw -echo -echoe -echok Err bitreich.org 70 i 12 ;; Err bitreich.org 70 i 13 esac Err bitreich.org 70 i 14 else Err bitreich.org 70 i 15 infile="/dev/stdin" Err bitreich.org 70 i 16 fi Err bitreich.org 70 i 17 Err bitreich.org 70 i 18 cd "${dbpath}" Err bitreich.org 70 i 19 datetime="$(date +%Y-%m-%d-%H-%M-%S)" Err bitreich.org 70 i 20 outfile="euroklav-${datetime}.txt" Err bitreich.org 70 i 21 cat "${infile}" \ Err bitreich.org 70 i 22 | while read -r line; Err bitreich.org 70 i 23 do Err bitreich.org 70 i 24 case "${line}" in Err bitreich.org 70 i 25 $'\003'*) Err bitreich.org 70 i 26 datetime="$(date +%Y-%m-%d-%H-%M-%S)" Err bitreich.org 70 i 27 outfile="euroklav-${datetime}.txt" Err bitreich.org 70 i 28 ;; Err bitreich.org 70 i 29 *" 4.07 4.08"*) Err bitreich.org 70 i 30 printf "%s\n" "${line}" >> ${outfile} Err bitreich.org 70 i 31 cat ${outfile} \ Err bitreich.org 70 i 32 | tr -d '\002\003' \ Err bitreich.org 70 i 33 | tr '\370' ' ' \ Err bitreich.org 70 i 34 | tr '\346' ' ' \ Err bitreich.org 70 i 35 | lpr Err bitreich.org 70 i 36 ;; Err bitreich.org 70 i 37 esac Err bitreich.org 70 i 38 printf "%s\n" "${line}" >> ${outfile} Err bitreich.org 70 i 39 done Err bitreich.org 70 i 40 Err bitreich.org 70 .