s4

diff y4.cgi @ 11:3565d93c2fb1

add mpsplit.pl
author HIROSE Yuuji <yuuji@gentei.org>
date Mon, 20 Jul 2015 18:09:20 +0900
parents 63c0e22870bb
children f2204bd941d5
line diff
     1.1 --- a/y4.cgi	Mon Jul 20 11:53:05 2015 +0900
     1.2 +++ b/y4.cgi	Mon Jul 20 18:09:20 2015 +0900
     1.3 @@ -254,13 +254,11 @@
     1.4        putfooter; exit
     1.5      fi
     1.6      idir=`umask 002; mktempd` || exit 1
     1.7 -    tmpfiles=$tmpfiles"${tmpfiles+ }$idir"
     1.8 +    # tmpfiles=$tmpfiles"${tmpfiles+ }$idir"
     1.9      bin=$idir/$myname-$$.bin
    1.10 -    ##sql="select quote(bin) from $2 where id='$3' and val='$4'"
    1.11 -    sql="select quote(bin) from $2 where rowid='$3'"
    1.12 -    sq $db "$sql" | xxd -r -p > $bin
    1.13 -    # type=`sq $db "select type from $2 where id='$3' and val='$4'"`
    1.14 -    tv=`sq $db "select type,val from $2 where rowid='$3'"`
    1.15 +    sql="select quote(bin) from $2 where rowid='$3';"
    1.16 +    sq $db "$sql" | unhexize > $bin
    1.17 +    tv=`query "select type,val from $2 where rowid='$3';"`
    1.18      type=${tv%|*} fn=${tv#*|}
    1.19      err tv=$tv type=$type fn=$fn
    1.20      ct=${type#file:}
    1.21 @@ -284,7 +282,7 @@
    1.22      ## contenttype "Image/jpeg"
    1.23      sql="select quote(b) from te where a='${2:-mikan.jpg}'"
    1.24      idir=`umask 002; mktempd` || exit 1
    1.25 -    tmpfiles=$tmpfiles"${tmpfiles+ }$idir"
    1.26 +    # tmpfiles=$tmpfiles"${tmpfiles+ }$idir"
    1.27      img=$idir/$myname-$$.bin
    1.28      db=b.sq3
    1.29      sqlite3 $db "$sql" | xxd -r -p > $img