Vyššie na [Platon] / scripts / shell / sysadmin

Added universal script for testing SMTP authentication

#!/bin/sh

#
# test-smtp-auth.sh
#
# Developed by Ondrej Jombik <nepto@platon.sk>
# Copyright (c) 2005 Platon Group, http://platon.sk/
# Licensed under terms of GNU General Public License.
# All rights reserved.
#
# Changelog:
# 2005-10-19 - created
#

# $Platon$

#
# Add more BASE64 encoding functions if neccessary
#

encode_base64()
{
    encode_base64_perl
}

encode_base64_perl()
{
    perl -e '
        use MIME::Base64 qw(encode_base64);
        local($/) = undef;
        print encode_base64(<STDIN>);';
}

if [ "$#" -lt 3 ]; then
    echo
    echo "Usage:";
    echo "  $0 <hostname> <username> <password>";
    echo
    echo "Example:";
    echo "  $0 smtp.platon.sk rajo@opelclub.sk kofola";
    echo
    exit 1;
fi

host="$1";
user="$2";
pass="$3";

user_base64="` echo -n \"$user\" | encode_base64 `";
pass_base64="` echo -n \"$pass\" | encode_base64 `";

(
    sleep 2;
    echo "EHLO maxim.platon.sk";
    sleep 2;
    echo "AUTH LOGIN";
    sleep 2;
    echo "$user_base64";
    sleep 2;
    echo "$pass_base64";
    sleep 10;
) | telnet "$host" 25