#!/bin/sh
set -x
#
# require gawk-4.1.3
#
# ./delproxy.sh -a addr -f proxylist
#
#

PROGNAME=$(basename $0)
GAWK=$(which gawk-4.1.3)
USED="/root/geoip/usedproxies.txt"
ADDR=
PROXY=
ID=
LOCK="/var/run/lock/proxy.lock"

#
# LOCK
#

lockfile -r 20 -l 20 $LOCK

TMP=$(getopt -o a:f: -l id: -n "$PROGNAME" -- "$@")

eval set -- "$TMP"

while [ $# -gt 0 ]; do
	case "$1" in
	-a)
		ADDR=$2
		shift 2;;
	-f)
		PROXY=$2
		shift 2;;
	--id)
		ID=$2
		shift 2;;
	--)
		shift
		break;;
	*)
		echo "error: unknown option"
		exit 1;;
	esac
done

[ -z "$ADDR" -o -z "$PROXY" ] && usage && exit 1

$GAWK -F'/' -v ADDR=$ADDR -v USED=$USED -v ID=$ID -i inplace '
{
	if ($2 == ADDR && $6 == "U") {
		printf("%s/%s/%s/%s/%s\n", ID, $1, $2, $4, $5) >> USED
		gsub($0,"")
	}
};
{
	print
}
' $PROXY

#
# UNLOCK
#

rm -f $LOCK