JFIFxxC      C  " }!1AQa"q2#BR$3br %&'()*456789:CDEFGHIJSTUVWXYZcdefghijstuvwxyz w!1AQaq"2B #3Rbr#!/usr/bin/perl # # Authentic Theme (https://github.com/authentic-theme/authentic-theme) # Copyright Ilia Rostovtsev # Licensed under MIT (https://github.com/authentic-theme/authentic-theme/blob/master/LICENSE) # use strict; our (%in, %gconfig, %tconfig, %text, $config_directory, $current_theme, %theme_text); do($ENV{'THEME_ROOT'} . "/authentic-lib.pl"); my %miniserv; get_miniserv_config(\%miniserv); load_theme_library(); my $charset = &get_charset(); # Check to add error handler error_40x_handler(); our %theme_config = (settings($config_directory . "/$current_theme/settings.js", 'settings_'), settings($config_directory . "/$current_theme/settings-admin", 'settings_'), settings($config_directory . "/$current_theme/settings-root", 'settings_')); # Show pre-login text banner if ($gconfig{'loginbanner'} && get_env('http_cookie') !~ /banner=1/ && !$in{'logout'} && !$in{'failed'} && !$in{'timed_out'}) { print "Auth-type: auth-required=1\r\n"; print "Set-Cookie: banner=1; path=/\r\n"; &PrintHeader($charset); print '', "\n"; print '', "\n"; embed_login_head(); print '' . "\n"; embed_overlay_prebody(); print '


' . "\n"; my $url = $in{'page'}; open(BANNER, $gconfig{'loginbanner'}); while () { s/LOGINURL/$url/g; print; } close(BANNER); &footer(); return; } my $sec = lc(get_env('https')) eq 'on' ? "; secure" : ""; if (!$miniserv{'no_httponly'}) { $sec .= "; httpOnly"; } my $sidname = $miniserv{'sidname'} || "sid"; print "Auth-type: auth-required=1\r\n"; print "Set-Cookie: banner=0; path=/$sec\r\n" if ($gconfig{'loginbanner'}); print "Set-Cookie: $sidname=x; path=/$sec\r\n" if ($in{'logout'}); print "Set-Cookie: redirect=1; path=/$sec\r\n"; print "Set-Cookie: testing=1; path=/$sec\r\n"; &PrintHeader($charset); print '', "\n"; print '', "\n"; embed_login_head(); print '' . "\n"; embed_overlay_prebody(); print '