You need to sign in or sign up before continuing.
Extension.pm 1.11 KB
Newer Older
1 2 3
# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.
4
#
5 6
# This Source Code Form is "Incompatible With Secondary Licenses", as
# defined by the Mozilla Public License, v. 2.0.
7 8

package Bugzilla::Extension::BmpConvert;
9 10

use 5.10.1;
11
use strict;
12 13
use warnings;

14
use parent qw(Bugzilla::Extension);
15 16 17 18 19 20

use Image::Magick;

our $VERSION = '1.0';

sub attachment_process_data {
21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44
  my ($self, $args) = @_;
  return unless $args->{attributes}->{mimetype} eq 'image/bmp';

  my $data = ${$args->{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;

  ${$args->{data}} = $data;
  $args->{attributes}->{mimetype} = 'image/png';
  $args->{attributes}->{filename} =~ s/^(.+)\.bmp$/$1.png/i;
45 46
}

47
__PACKAGE__->NAME;