Jaahas... Tuli tehtyä purkkaratkaisu...
Kuvien pilkkominen bash:lla...
#!/bin/bash
declare -i nro
nro="0"
for f in kirja*.png
do
nro="$nro+1"
echo "$nro"
echo $f
if [[ $nro = 1 ]]
then
echo "TULI !!!!!!"
convert -density 600 -crop 3508x4958+0+0 $f -density 600 page$nro.png
#convert -density 600 page.png -auto-orient book.pdf
else
echo convert -density 600 -crop 3508x4958+0+0 $f -density 600 page$nro.png
convert -density 600 -crop 3508x4958+0+0 $f -density 600 page$nro.png
#convert -crop 3508x4958+0+0 $f page$nro.png
fi
nro="$nro+1"
echo "$nro"
echo $f
echo convert -density 600 -crop 3508x4958+3508+0 $f -density 600 page$nro.png
convert -density 600 -crop 3508x4958+3508+0 $f -density 600 page$nro.png
#convert -crop 3508x4958+3508+0 $f page$nro.png
done
Png portrateksi php:llä.
<?php
require_once('tcpdf_include.php');
$imgfile="kuva.png";
$ext="";
if(isset($argv[1])) {
if(isset($argv[2])) {
$ext=$argv[2];
}
$imgfile=$argv[1];
}
if ($ext!="") {
$i=0;
while (file_exists($imgfile.($i+1).$ext)) {
$a[$i]=$imgfile.($i+1).$ext;
$i++;
}
//print (count($a))
$imagefiles=$a;
} else $imagefiles[0]=$imgfile;
$imgfile=$imagefiles[0];
$image=imagecreatefrompng($imgfile);
if (substr($imgfile,-4)==".png") {
$image=imagecreatefrompng($imgfile);
} else if(substr($imgfile,-4)=='.jpg') {
$image=imagecreatefromjpeg($imgfile);
}/**/
$imagesy=imagesy($image);
$imagesx=imagesx($image);
imagedestroy($image);
// $portrate="L";
// $xmax=280;
// $ymax=190;
//echo "$imagesx,$imagesy";
if($imagesx>$imagesy) {
$portrate="L";
$xmax=280;
$ymax=190;
} else {
$portrate="P";
$xmax=190;
$ymax=280;
}
$pdf=new TCPDF($portrate, "mm", "A4", true, 'UTF-8', false); //FPDF('P','mm','A4');
$pdf->SetCreator(PDF_CREATOR);
$pdf->SetAuthor('Sami Ojanen');
$pdf->SetTitle('Printing');
$pdf->SetSubject('Printing');
$pdf->SetKeywords('TCPDF, PDF, print');
$pdf->SetTopMargin(0);
$pdf->setPrintHeader(false);
$pdf->setPrintFooter(false);
$pdf->SetAutoPageBreak(false, PDF_MARGIN_BOTTOM);
for($i=0;$i<count($imagefiles);$i++) {
$imgfile=$imagefiles[$i];
$pdf->addPage();
$marginx=10;
$marginy=10;
$pdf->SetMargins($marginx,$marginy);
$k=$imagesy/$imagesx;
$width=$ymax/$k;
$height=$ymax;
if($width>$xmax) {
$width=$xmax;
$height=$xmax*$k;
}
$x=$marginx+($xmax-$width)/2;
$y=$marginy;
$pdf->Image($imgfile,$x,$y,$width,$height); /* */
}
//$pdf->AddPage();
//$pdf->SetFont('Arial','B',16);
//$pdf->Cell(40,10,'Hello World!');
$pdf->Output();
?>
png:t pdf:ksi
php phppdf/png2pdf.php page .png >book.pdf
pdf:stä ps:ksi...
pdf2ps book.pdf book.ps
ps vihkoksi...
psbook book.ps bookVihko.ps
cat bookVihko.ps|psnup -s1 -2 |ps2pdf - Valmiskirja.pdf
Tekee töitä edelleen, mutta saattaa onnistua.