+sub _ensure_employees_for_authorized_users_exist {
+ my ($self) = @_;
+
+ my %employees_by_login = map { ($_->login => $_) } @{ SL::DB::Manager::Employee->get_all };
+
+ foreach my $user (@{ SL::DB::AuthClient->new(id => $::auth->client->{id})->load->users || [] }) {
+ my $user_config = $user->config_values;
+ my $employee = $employees_by_login{$user->login} || SL::DB::Employee->new(login => $user->login);
+
+ $employee->update_attributes(
+ name => $user_config->{name},
+ workphone => $user_config->{tel},
+ deleted => 0,
+ );
+ }
+}
+
+sub error_state {
+ my %states = (
+ session => { warning => t8('The session has expired. Please log in again.') },
+ password => { error => t8('Incorrect username or password or no access to selected client!') },
+ );
+
+ return %{ $states{$_[0]} || {} };
+}
+
+sub set_layout {
+ $::request->{layout} = SL::Layout::Dispatcher->new(style => 'login');
+}
+
+sub init_clients {
+ return SL::DB::Manager::AuthClient->get_all_sorted;
+}
+
+sub init_default_client_id {
+ my ($self) = @_;
+ my $default_client = first { $_->is_default } @{ $self->clients };
+ return $default_client ? $default_client->id : undef;
+}
+
+sub show_login_form {
+ my ($self, %params) = @_;
+
+ $self->render('login_screen/user_login', %params, version => $::form->read_version);
+}
+