diff options
author | mkanat%bugzilla.org <> | 2009-11-24 06:09:41 +0000 |
---|---|---|
committer | mkanat%bugzilla.org <> | 2009-11-24 06:09:41 +0000 |
commit | 5fc80f94271780b6ff6d1dbba554df35e803ac51 (patch) | |
tree | ebc3f2bc12bb32ab280cacb1cd88b35001fb2c0e /extensions/BmpConvert/Extension.pm | |
parent | 78413d851910175fcc8aef2249be377cab7dd7e8 (diff) | |
download | bugs-5fc80f94271780b6ff6d1dbba554df35e803ac51.tar bugs-5fc80f94271780b6ff6d1dbba554df35e803ac51.tar.gz bugs-5fc80f94271780b6ff6d1dbba554df35e803ac51.tar.bz2 bugs-5fc80f94271780b6ff6d1dbba554df35e803ac51.tar.xz bugs-5fc80f94271780b6ff6d1dbba554df35e803ac51.zip |
Bug 430014: Re-write the code hooks system so that it uses modules instead of individual .pl files
Patch by Max Kanat-Alexander <mkanat@bugzilla.org> (module owner) a=mkanat
Diffstat (limited to 'extensions/BmpConvert/Extension.pm')
-rw-r--r-- | extensions/BmpConvert/Extension.pm | 57 |
1 files changed, 57 insertions, 0 deletions
diff --git a/extensions/BmpConvert/Extension.pm b/extensions/BmpConvert/Extension.pm new file mode 100644 index 000000000..29113bd08 --- /dev/null +++ b/extensions/BmpConvert/Extension.pm @@ -0,0 +1,57 @@ +# -*- Mode: perl; indent-tabs-mode: nil -*- +# +# The contents of this file are subject to the Mozilla Public +# License Version 1.1 (the "License"); you may not use this file +# except in compliance with the License. You may obtain a copy of +# the License at http://www.mozilla.org/MPL/ +# +# Software distributed under the License is distributed on an "AS +# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or +# implied. See the License for the specific language governing +# rights and limitations under the License. +# +# The Original Code is the Bugzilla Bug Tracking System. +# +# The Initial Developer of the Original Code is Frédéric Buclin. +# Portions created by Frédéric Buclin are Copyright (C) 2009 +# Frédéric Buclin. All Rights Reserved. +# +# Contributor(s): +# Frédéric Buclin <LpSolit@gmail.com> +# Max Kanat-Alexander <mkanat@bugzilla.org> + +package Bugzilla::Extension::BmpConvert; +use strict; +use base qw(Bugzilla::Extension); + +use Image::Magick; + +our $VERSION = '1.0'; + +sub attachment_process_data { + my ($self, $params) = @_; + return unless $params->{attributes}->{mimetype} eq 'image/bmp'; + + my $data = ${$params->{data}}; + my $img = Image::Magick->new(magick => 'bmp'); + + # $data is a filehandle. + if (ref $data) { + $img->Read(file => \*$data); + $img->set(magick => 'png'); + $img->Write(file => \*$data); + } + # $data is a blob. + else { + $img->BlobToImage($data); + $img->set(magick => 'png'); + $data = $img->ImageToBlob(); + } + undef $img; + + ${$params->{data}} = $data; + $params->{attributes}->{mimetype} = 'image/png'; + $params->{attributes}->{filename} =~ s/^(.+)\.bmp$/$1.png/i; +} + + __PACKAGE__->NAME; |