1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80

#!/usr/bin/php
<?php
#{
    //input directory - the origenal pictures
    $dir_in = "./in/";
 
    //output directory - the new pictures and thumbnails
    $dir_out = "./out/";
 
    //new picture size
    $base_size = "1536x1024";
 
    //thumbnail size
    $thumb_size = "150x150";
 
    //url where the pictures are stored on the web
    $url = "http://your.web/path_to_picture_dir_with_ending_slash/";
 
    //how many pictures per row?
    $pics_per_row = 3;
 
 
    /////////////////////////////////////////////////////////////////////////////
    $files = array();
    $dh = opendir($dir_in);
    while(($file = readdir($dh))!==false)
    {
      if($file!="." && $file!="..")
      {
	$_fn = strtolower($file);
	$_fn = str_replace(array(" ", "%20"), "_", $_fn);
	$_fn = preg_replace("/[^a-z0-9\.]/", "", $_fn);
 
	$files[$_fn] = $file; 
      }
    }
    closedir($dh);
 
    $cnt_files = count($files);
    $cnt = 1;
    foreach($files as $key=>$val)
    {
      if(!file_exists($dir_out.$key))
      {
	$_sys = "gm convert -size ".$base_size." ".$dir_in.$val." ".$dir_out.$key;
	//print $_sys."\n";
	exec($_sys);
      }
      if(!file_exists($dir_out."t_".$key))
      {
	$_sys = "gm convert -size ".$thumb_size." ".$dir_in.$val." -resize ".$thumb_size." +profile \"*\" ".$dir_out."t_".$key;
	//print $_sys."\n";
	exec($_sys);
      }
 
      print "\nthumbnailing ".$val." - ".$cnt."/".$cnt_files;
      $cnt++;
    }
 
    if($url)
    {
      $cnt = 1;
      $links = array();
      foreach($files as $key=>$val)
      {
	$links[0] .= "<a href=\"".$url.$key."\"><img src=\"".$url."t_".$key."\" border=\"0\" alt=\"".$key."\" /></a>".($cnt<$pics_per_row ? " " : "<b />\n");
	$links[1] .= "[url=".$url.$key."][img]".$url."t_".$key."[/img][/url]".($cnt<$pics_per_row ? " " : "\n");
 
	if($cnt==$pics_per_row) $cnt = 1;
	else $cnt++;
      }
 
      $fh = fopen("links.txt", "w+");
      fwrite($fh, $links[0]."\n\n".$links[1]);
      fclose($fh);
    }
 
    print "\ndone\n";
 
?>