Where are you?
body<=
{statusvis} ne 'L';
return $u;
};
my $remote = LJ::get_remote();
my $remote_is_fake = 0;
unless ($remote) {
$remote_is_fake = 1;
$remote = $get_fake_remote->();
}
return "Not logged in." unless $remote;
my $ret = "";
my $authas = $remote->{user};
my $u = $remote;
# authas only works if $remote is not fake
unless ($remote_is_fake) {
# logic to authenticate as alternate user
$authas = $GET{'authas'} || $remote->{'user'};
$u = LJ::get_authas_user($authas);
return LJ::bad_input("You could not be authenticated as the specified user.")
unless $u;
# authas switcher form
$ret .= "";
}
# human-readable cluster name
my $name = LJ::get_cluster_description($u->{clusterid}, 1);
if ($remote_is_fake) {
$ret .= "You appear to be logged in as " . LJ::ljuser($authas) . ", which is on " .
"$name, but your login session was unable to be retrieved, most likely " .
"because $name is currently down. If you own any communities, you won't be able to " .
"see where they are during this time. If they won't load, they're probably down for " .
"maintenance.
";
} else {
$ret .= "" . LJ::ljuser($authas) . " is on $name.
";
}
# is their cluster down?
unless (LJ::get_cluster_master($u)) {
$ret .= "";
$ret .= " 'C' }) . " journal for " .
"further status updates. p?>";
$ret .= "status.livejournal.org. p?>";
}
return $ret;
}
_code?>
<=body
page?>