# 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/.
#
# This Source Code Form is "Incompatible With Secondary Licenses", as
# defined by the Mozilla Public License, v. 2.0.

package Bugzilla::Extension::ZPushNotify;

use 5.10.1;
use strict;
use warnings;

use base qw(Bugzilla::Extension);
our $VERSION = '1';

use Bugzilla;

#
# insert into the notifications table
#

sub _notify {
  my ($bug_id, $delta_ts) = @_;

  # beacuse the push_notify table is hot, we defer updating it until the
  # request has completed.  this ensures we are outside the scope of any
  # transaction blocks.

  my $stash = Bugzilla->request_cache->{ZPushNotify_stash} ||= [];
  push @$stash, {bug_id => $bug_id, delta_ts => $delta_ts};
}

sub request_cleanup {
  my $stash = Bugzilla->request_cache->{ZPushNotify_stash} || return;

  my $dbh = Bugzilla->dbh;
  foreach my $rh (@$stash) {

    # using REPLACE INTO or INSERT .. ON DUPLICATE KEY UPDATE results in a
    # lock on the bugs table due to the FK.  this way is more verbose but
    # only locks the push_notify table.
    $dbh->bz_start_transaction();
    my ($id) = $dbh->selectrow_array("SELECT id FROM push_notify WHERE bug_id=?",
      undef, $rh->{bug_id});
    if ($id) {
      $dbh->do("UPDATE push_notify SET delta_ts=? WHERE id=?",
        undef, $rh->{delta_ts}, $id);
    }
    else {
      $dbh->do("INSERT INTO push_notify (bug_id, delta_ts) VALUES (?, ?)",
        undef, $rh->{bug_id}, $rh->{delta_ts});
    }
    $dbh->bz_commit_transaction();
  }
}

#
# object hooks
#

sub object_end_of_create {
  my ($self, $args) = @_;
  my $object = $args->{object};
  return unless Bugzilla->params->{enable_simple_push};
  return unless $object->isa('Bugzilla::Flag');
  _notify($object->bug->id, $object->creation_date);
}

sub flag_updated {
  my ($self, $args) = @_;
  my $flag      = $args->{flag};
  my $timestamp = $args->{timestamp};
  my $changes   = $args->{changes};
  return unless Bugzilla->params->{enable_simple_push};
  return unless scalar(keys %$changes);
  _notify($flag->bug->id, $timestamp);
}

sub flag_deleted {
  my ($self, $args) = @_;
  my $flag      = $args->{flag};
  my $timestamp = $args->{timestamp};
  return unless Bugzilla->params->{enable_simple_push};
  _notify($flag->bug->id, $timestamp);
}

sub attachment_end_of_update {
  my ($self, $args) = @_;
  return unless Bugzilla->params->{enable_simple_push};
  return unless scalar keys %{$args->{changes}};
  return unless my $object = $args->{object};
  _notify($object->bug->id, $object->modification_time);
}

sub object_before_delete {
  my ($self, $args) = @_;
  return unless Bugzilla->params->{enable_simple_push};
  return unless my $object = $args->{object};
  if ($object->isa('Bugzilla::Attachment')) {
    my $timestamp = Bugzilla->dbh->selectrow_array('SELECT LOCALTIMESTAMP(0)');
    _notify($object->bug->id, $timestamp);
  }
}

sub bug_end_of_update_delta_ts {
  my ($self, $args) = @_;
  return unless Bugzilla->params->{enable_simple_push};
  _notify($args->{bug_id}, $args->{timestamp});
}

sub bug_end_of_create {
  my ($self, $args) = @_;
  return unless Bugzilla->params->{enable_simple_push};
  _notify($args->{bug}->id, $args->{timestamp});
}

#
# schema / param
#

sub db_schema_abstract_schema {
  my ($self, $args) = @_;
  $args->{'schema'}->{'push_notify'} = {
    FIELDS => [
      id     => {TYPE => 'INTSERIAL', NOTNULL => 1, PRIMARYKEY => 1,},
      bug_id => {
        TYPE       => 'INT3',
        NOTNULL    => 1,
        REFERENCES => {TABLE => 'bugs', COLUMN => 'bug_id', DELETE => 'CASCADE'},
      },
      delta_ts => {TYPE => 'DATETIME', NOTNULL => 1,},
    ],
    INDEXES => [push_notify_idx => {FIELDS => ['bug_id'], TYPE => 'UNIQUE',},],
  };
}

sub config_modify_panels {
  my ($self, $args) = @_;
  push @{$args->{panels}->{advanced}->{params}},
    {name => 'enable_simple_push', type => 'b', default => 0,};
}

__PACKAGE__->NAME;