The short-link service is installed but has not been set up. ' . 'Open /admin to choose a password and a home destination.
'; exit; } /* --- the home page is not a page: it is wherever you point it ------- */ if ($path === '' || $path === 'favicon.ico' || $path === 'robots.txt') { if ($path === 'robots.txt') { // Nothing here is for indexing; every URL is a redirect. header('Content-Type: text/plain; charset=utf-8'); echo "User-agent: *\nDisallow: /\n"; exit; } btl_redirect($cfg['home'] !== '' ? $cfg['home'] : 'https://' . (string) ($_SERVER['HTTP_HOST'] ?? ''), 'home'); } /* --- the actual job ------------------------------------------------- */ $slug = btl_slug($path); try { $st = btl_db()->prepare('SELECT id, target FROM links WHERE slug = ?'); $st->execute([$slug]); $row = $st->fetch(); } catch (Throwable $e) { // A broken database must still send the visitor somewhere. btl_redirect($cfg['home'] !== '' ? $cfg['home'] : btl_base_url(), 'error'); } if (!$row) { // A mistyped or retired link lands on the home destination rather than an // error. The header is the difference between "never existed" and // "deliberately pointed at the home page", which matters when a slug is // about to be printed and cannot be checked any other way from outside. btl_redirect($cfg['home'] !== '' ? $cfg['home'] : btl_base_url(), 'miss'); } // Counted before the redirect, so a slow browser cannot lose the click. try { btl_record_click($slug, (int) $row['id']); btl_prune(); } catch (Throwable $e) { // Never let bookkeeping cost somebody their destination. } btl_redirect((string) $row['target'], 'hit');