Mail Index

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[ApacheGallery] Rotating and comment on images

Hi!
I wonder if annyone has been doing some work on functions to rotate and comment on the images via the web? I.e. a web user interface to create and modify [imagename].rotate and [imagename].comment files.
I'm aware that this means that the web server user has to have write privileges in the image directory but my plan is to use two separate processes. One with privileges that use access control as well, and one public.
I have added some code (below) to my Apache/Gallery.pm in order to make it able to rotate images.
Preferably I would like to set a "PerlSetVar GalleryRotateMode 1" and maybe GalleryCommentMode (or some better name) in the httpd.conf to enable these funktions.
I'm a bit comfused about the SelectionMode (which has to be disabled if rotate or rotateback is sent) as it doesnt seem to work for me and I don't se the reason for it, so anyway... 

Any comments?

Have a happy new year!
Erik Melkersson

---
   # Handle rotating selected images
   if ($cgi->param('selection') && ($cgi->param('rotate') ||
                    $cgi->param('rotateback'))) {
       my @selected = $cgi->param('selection');

       # Get directory path
       my $dirname = $r->filename;
       $dirname =~ s/\/$//;

       # Create (or remove) a .rotate-file per image
       foreach my $file (@selected) {
       my $dir = 0;

       if (open (FILE, "$dirname/$file.rotate")) {
           $dir = <FILE>;
           close FILE;
       }

       $dir = ($dir + 1) % 4 if $cgi->param('rotate');
       $dir = ($dir + 3) % 4 if $cgi->param('rotateback');
if ($dir > 0) { 
           open (FILE, ">$dirname/$file.rotate");
           print FILE $dir;
           close FILE;
       } else {
           unlink ("$dirname/$file.rotate");
       }
       }
   }

---
$tpl->assign(FORM_END => $select_mode?'<input type="submit" name="rotateback" value="Rotate back"><input type="submit" name="rotate" value="Rotate"></form>':''); 



_______________________________________________
users mailing list
users@xxxxxxxxxxxxxxxx
http://ufo.hestdesign.com/cgi-bin/mailman/listinfo/agusers