Revision 07672867
Von Moritz Bunkus vor etwa 9 Jahren hinzugefügt
scripts/task_server.pl | ||
---|---|---|
32 | 32 |
use List::Util qw(first); |
33 | 33 |
use POSIX qw(setuid setgid); |
34 | 34 |
use SL::Auth; |
35 |
use SL::DBUpgrade2; |
|
35 | 36 |
use SL::DB::AuthClient; |
36 | 37 |
use SL::DB::BackgroundJob; |
37 | 38 |
use SL::BackgroundJob::ALL; |
... | ... | |
210 | 211 |
exit 2; |
211 | 212 |
} |
212 | 213 |
|
214 |
initialize_kivitendo(); |
|
215 |
|
|
216 |
my $dbupdater_auth = SL::DBUpgrade2->new(form => $::form, auth => 1)->parse_dbupdate_controls; |
|
217 |
if ($dbupdater_auth->unapplied_upgrade_scripts($::auth->dbconnect)) { |
|
218 |
print STDERR <<EOT; |
|
219 |
The authentication database requires an upgrade. Please login to |
|
220 |
kivitendo's administration interface in order to apply it. The task |
|
221 |
server cannot start until the upgrade has been applied. |
|
222 |
EOT |
|
223 |
exit 2; |
|
224 |
} |
|
225 |
|
|
213 | 226 |
drop_privileges(); |
214 | 227 |
|
215 | 228 |
return (); |
Auch abrufbar als: Unified diff
Task-Server: nicht starten, solange Auth-DB-Upgrades eingespielt werden müssen