Gecko [ www.ctm-euromeuble.fr ]

Linux vps-61133.fhnet.fr 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64
Apache/2.4.25 (Debian)
Server IP : 93.113.207.21 & Your IP : 216.73.216.122
Domains : Cant Read [ /etc/named.conf ]
User : www-data

Name	Size	Permission	Date
daemon.sh	872 B	-rwxr-xr-x	2010-10-06 09:25
ftp.sh.gz	1.79 KB	-rw-r--r--	2010-10-06 09:25
mail.sh	1.99 KB	-rwxr-xr-x	2013-06-23 07:54
proxy.sh	1.63 KB	-rwxr-xr-x	2014-03-15 18:40
proxyecho.sh	1.16 KB	-rwxr-xr-x	2013-06-23 07:54
readline-test.sh	1.22 KB	-rwxr-xr-x	2010-10-06 09:25
readline.sh	663 B	-rwxr-xr-x	2010-10-06 09:25
socks4a-echo.sh	2.42 KB	-rwxr-xr-x	2010-10-06 09:25
socks4echo.sh	2.21 KB	-rwxr-xr-x	2010-10-06 09:25
test.sh.gz	51.88 KB	-rw-r--r--	2016-01-29 11:29

Rename

#! /bin/bash
# source: proxy.sh
# Copyright Gerhard Rieger 2003-2004
# Published under the GNU General Public License V.2, see file COPYING

# perform primitive simulation of a proxy server.
# accepts and answers correct HTTP CONNECT requests on stdio, and tries to
# establish the connection to the given server.
# it is required for socats test.sh
# for TCP, use this script as:
# socat tcp-l:8080,reuseaddr,fork exec:"proxy.sh",nofork

if [ -z "$SOCAT" ]; then
    if type socat >/dev/null 2>&1; then
	SOCAT=socat
    else
	SOCAT="./socat"
    fi
fi

if   [ $(echo "x\c") = "x" ]; then E=""
elif [ $(echo -e "x\c") = "x" ]; then E="-e"
else
    echo "cannot suppress trailing newline on echo" >&2
    exit 1
fi
ECHO="echo $E"
CR=$($ECHO "\r")
#echo "CR=$($ECHO "$CR\c" |od -c)" >&2

case `uname` in
HP-UX|OSF1)
    # their cats are too stupid to work with unix domain sockets
    CAT="$SOCAT -u stdin stdout"
    ;;
*)
    CAT=cat
    ;;
esac

SPACES=" "
while [ -n "$1" ]; do
    case "$1" in
    -w) n="$2"; while [ "$n" -gt 0 ]; do SPACES="$SPACES "; n=$((n-1)); done
	shift ;;
    #-s) STAT="$2"; shift ;;
    esac
    shift
done

# read and parse HTTP request
read l
if echo "$l" |egrep '^CONNECT +[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+:[0-9]+ +HTTP/1.[01]' >/dev/null
then
    : go on below
else
    $ECHO "HTTP/1.0${SPACES}500 Bad Request$CR"
    $ECHO "$CR"
    exit
fi

# extract target server name/address
s=`echo $l |awk '{print($2);}'`

# read more headers until empty line
while [ "$l" != "$CR" ]; do
    read l
done

# send status
$ECHO "HTTP/1.0${SPACES}200 OK$CR"
# send empty line
$ECHO "$CR"

# perform proxy (relay) function
exec $SOCAT $SOCAT_OPTS - tcp:$s