#!/bin/sh

. caterva-alterator.sh
. verborum-caterva-valtable

print_port()
{
    if [ "$method" = "CONNECT" ]; then
	print_info "Adding SSL port $label"
	if [ "$start_port" = "$end_port" ]; then
	    echo "acl SSL_ports port ${start_port}    # $label"
	else
	    echo "acl SSL_ports port ${start_port}-${end_port}    # $label"
	fi
	def_val SQ_SSL_ports yes
    else
	print_info "Adding safe port $label"
	if [ "$start_port" = "$end_port" ]; then
	    echo "acl Safe_ports port ${start_port}    # $label"
	else
	    echo "acl Safe_ports port ${start_port}-${end_port}   # $label"
	fi
	def_val SQ_Safe_ports yes
    fi
}

metalterator-cmdline /squid/safe-ports action "list" \
start_port "start_port" \
end_port "end_port" \
method "method" \
comment "label" \
| on_object print_port
