# TODO list helper functions

package TODO;

use SL::DBUtils;
use SL::DB;

use strict;

sub get_user_config {
  $main::lxdebug->enter_sub();

  my $self     = shift;
  my %params   = @_;

  my $myconfig = \%main::myconfig;
  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

  $form->error('Need params: id or login') if (!$params{id} && !$params{login});

  if ($params{login}) {
    ($params{id}) = selectfirst_array_query($form, $dbh, qq|SELECT id FROM employee WHERE login = ?|, $params{login});

    if (!$params{id}) {
      $main::lxdebug->leave_sub();
      return ();
    }

  } else {
    ($params{login}) = selectfirst_array_query($form, $dbh, qq|SELECT login FROM employee WHERE id = ?|, conv_i($params{id}));
  }

  my $cfg = selectfirst_hashref_query($form, $dbh, qq|SELECT * FROM todo_user_config WHERE employee_id = ?|, conv_i($params{id}));

  if (!$cfg) {
    # Standard configuration: enable all

    $cfg = { map { $_ => 1 } qw(show_after_login show_follow_ups show_follow_ups_login show_overdue_sales_quotations show_overdue_sales_quotations_login) };
  }

  if (! $main::auth->check_right($params{login}, 'sales_quotation_edit')) {
    map { delete $cfg->{$_} } qw(show_overdue_sales_quotations show_overdue_sales_quotations_login);
  }

  $main::lxdebug->leave_sub();

  return %{ $cfg };
}

sub save_user_config {
  $main::lxdebug->enter_sub();

  my $self     = shift;
  my %params   = @_;

  Common::check_params(\%params, qw(login));

  my $myconfig = \%main::myconfig;
  my $form     = $main::form;

  SL::DB->client->with_transaction(sub {
    my $dbh      = $params{dbh} || SL::DB->client->dbh;

    my $query    = qq|SELECT id FROM employee WHERE login = ?|;

    my ($id)     = selectfirst_array_query($form, $dbh, $query, $params{login});

    if (!$id) {
      $main::lxdebug->leave_sub();
      return;
    }

    $query =
      qq|SELECT show_after_login
         FROM todo_user_config
         WHERE employee_id = ?|;

    if (! selectfirst_hashref_query($form, $dbh, $query, $id)) {
      do_query($form, $dbh, qq|INSERT INTO todo_user_config (employee_id) VALUES (?)|, $id);
    }

    $query =
      qq|UPDATE todo_user_config SET
           show_after_login = ?,
           show_follow_ups = ?,
           show_follow_ups_login = ?,
           show_overdue_sales_quotations = ?,
           show_overdue_sales_quotations_login = ?

         WHERE employee_id = ?|;

    my @values = map { $params{$_} ? 't' : 'f' } qw(show_after_login show_follow_ups show_follow_ups_login show_overdue_sales_quotations show_overdue_sales_quotations_login);
    push @values, $id;

    do_query($form, $dbh, $query, @values);
    1;
  }) or do { die SL::DB->client->error };

  $main::lxdebug->leave_sub();
}

1;
