Linux Audio

Check our new training course

Loading...
v4.6
  1#
  2# Common functions used by pktgen scripts
  3#  - Depending on bash 3 (or higher) syntax
  4#
  5# Author: Jesper Dangaaard Brouer
  6# License: GPL
  7
 
 
  8## -- General shell logging cmds --
  9function err() {
 10    local exitcode=$1
 11    shift
 12    echo "ERROR: $@" >&2
 13    exit $exitcode
 14}
 15
 16function warn() {
 17    echo "WARN : $@" >&2
 18}
 19
 20function info() {
 21    if [[ -n "$VERBOSE" ]]; then
 22	echo "INFO : $@" >&2
 23    fi
 24}
 25
 26## -- Pktgen proc config commands -- ##
 27export PROC_DIR=/proc/net/pktgen
 28#
 29# Three different shell functions for configuring the different
 30# components of pktgen:
 31#   pg_ctrl(), pg_thread() and pg_set().
 32#
 33# These functions correspond to pktgens different components.
 34# * pg_ctrl()   control "pgctrl" (/proc/net/pktgen/pgctrl)
 35# * pg_thread() control the kernel threads and binding to devices
 36# * pg_set()    control setup of individual devices
 37function pg_ctrl() {
 38    local proc_file="pgctrl"
 39    proc_cmd ${proc_file} "$@"
 40}
 41
 42function pg_thread() {
 43    local thread=$1
 44    local proc_file="kpktgend_${thread}"
 45    shift
 46    proc_cmd ${proc_file} "$@"
 47}
 48
 49function pg_set() {
 50    local dev=$1
 51    local proc_file="$dev"
 52    shift
 53    proc_cmd ${proc_file} "$@"
 54}
 55
 56# More generic replacement for pgset(), that does not depend on global
 57# variable for proc file.
 58function proc_cmd() {
 59    local result
 60    local proc_file=$1
 
 61    # after shift, the remaining args are contained in $@
 62    shift
 63    local proc_ctrl=${PROC_DIR}/$proc_file
 64    if [[ ! -e "$proc_ctrl" ]]; then
 65	err 3 "proc file:$proc_ctrl does not exists (dev added to thread?)"
 66    else
 67	if [[ ! -w "$proc_ctrl" ]]; then
 68	    err 4 "proc file:$proc_ctrl not writable, not root?!"
 69	fi
 70    fi
 71
 72    if [[ "$DEBUG" == "yes" ]]; then
 73	echo "cmd: $@ > $proc_ctrl"
 74    fi
 75    # Quoting of "$@" is important for space expansion
 76    echo "$@" > "$proc_ctrl"
 77    local status=$?
 78
 79    result=$(grep "Result: OK:" $proc_ctrl)
 80    # Due to pgctrl, cannot use exit code $? from grep
 81    if [[ "$result" == "" ]]; then
 82	grep "Result:" $proc_ctrl >&2
 
 83    fi
 84    if (( $status != 0 )); then
 85	err 5 "Write error($status) occurred cmd: \"$@ > $proc_ctrl\""
 86    fi
 87}
 88
 89# Old obsolete "pgset" function, with slightly improved err handling
 90function pgset() {
 91    local result
 92
 93    if [[ "$DEBUG" == "yes" ]]; then
 94	echo "cmd: $1 > $PGDEV"
 95    fi
 96    echo $1 > $PGDEV
 97    local status=$?
 98
 99    result=`cat $PGDEV | fgrep "Result: OK:"`
100    if [[ "$result" == "" ]]; then
101         cat $PGDEV | fgrep Result:
102    fi
103    if (( $status != 0 )); then
104	err 5 "Write error($status) occurred cmd: \"$1 > $PGDEV\""
105    fi
106}
107
 
 
 
 
 
 
 
108## -- General shell tricks --
109
110function root_check_run_with_sudo() {
111    # Trick so, program can be run as normal user, will just use "sudo"
112    #  call as root_check_run_as_sudo "$@"
113    if [ "$EUID" -ne 0 ]; then
114	if [ -x $0 ]; then # Directly executable use sudo
115	    info "Not root, running with sudo"
116            sudo "$0" "$@"
117            exit $?
118	fi
119	err 4 "cannot perform sudo run of $0"
120    fi
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
121}
v5.14.15
  1#
  2# Common functions used by pktgen scripts
  3#  - Depending on bash 3 (or higher) syntax
  4#
  5# Author: Jesper Dangaaard Brouer
  6# License: GPL
  7
  8set -o errexit
  9
 10## -- General shell logging cmds --
 11function err() {
 12    local exitcode=$1
 13    shift
 14    echo "ERROR: $@" >&2
 15    exit $exitcode
 16}
 17
 18function warn() {
 19    echo "WARN : $@" >&2
 20}
 21
 22function info() {
 23    if [[ -n "$VERBOSE" ]]; then
 24	echo "INFO : $@" >&2
 25    fi
 26}
 27
 28## -- Pktgen proc config commands -- ##
 29export PROC_DIR=/proc/net/pktgen
 30#
 31# Three different shell functions for configuring the different
 32# components of pktgen:
 33#   pg_ctrl(), pg_thread() and pg_set().
 34#
 35# These functions correspond to pktgens different components.
 36# * pg_ctrl()   control "pgctrl" (/proc/net/pktgen/pgctrl)
 37# * pg_thread() control the kernel threads and binding to devices
 38# * pg_set()    control setup of individual devices
 39function pg_ctrl() {
 40    local proc_file="pgctrl"
 41    proc_cmd ${proc_file} "$@"
 42}
 43
 44function pg_thread() {
 45    local thread=$1
 46    local proc_file="kpktgend_${thread}"
 47    shift
 48    proc_cmd ${proc_file} "$@"
 49}
 50
 51function pg_set() {
 52    local dev=$1
 53    local proc_file="$dev"
 54    shift
 55    proc_cmd ${proc_file} "$@"
 56}
 57
 58# More generic replacement for pgset(), that does not depend on global
 59# variable for proc file.
 60function proc_cmd() {
 61    local result
 62    local proc_file=$1
 63    local status=0
 64    # after shift, the remaining args are contained in $@
 65    shift
 66    local proc_ctrl=${PROC_DIR}/$proc_file
 67    if [[ ! -e "$proc_ctrl" ]]; then
 68	err 3 "proc file:$proc_ctrl does not exists (dev added to thread?)"
 69    else
 70	if [[ ! -w "$proc_ctrl" ]]; then
 71	    err 4 "proc file:$proc_ctrl not writable, not root?!"
 72	fi
 73    fi
 74
 75    if [[ "$DEBUG" == "yes" ]]; then
 76	echo "cmd: $@ > $proc_ctrl"
 77    fi
 78    # Quoting of "$@" is important for space expansion
 79    echo "$@" > "$proc_ctrl" || status=$?
 
 80
 81    if [[ "$proc_file" != "pgctrl" ]]; then
 82        result=$(grep "Result: OK:" $proc_ctrl) || true
 83        if [[ "$result" == "" ]]; then
 84            grep "Result:" $proc_ctrl >&2
 85        fi
 86    fi
 87    if (( $status != 0 )); then
 88	err 5 "Write error($status) occurred cmd: \"$@ > $proc_ctrl\""
 89    fi
 90}
 91
 92# Old obsolete "pgset" function, with slightly improved err handling
 93function pgset() {
 94    local result
 95
 96    if [[ "$DEBUG" == "yes" ]]; then
 97	echo "cmd: $1 > $PGDEV"
 98    fi
 99    echo $1 > $PGDEV
100    local status=$?
101
102    result=`cat $PGDEV | fgrep "Result: OK:"`
103    if [[ "$result" == "" ]]; then
104         cat $PGDEV | fgrep Result:
105    fi
106    if (( $status != 0 )); then
107	err 5 "Write error($status) occurred cmd: \"$1 > $PGDEV\""
108    fi
109}
110
111if [[ -z "$APPEND" ]]; then
112	if [[ $EUID -eq 0 ]]; then
113		# Cleanup pktgen setup on exit if thats not "append mode"
114		trap 'pg_ctrl "reset"' EXIT
115	fi
116fi
117
118## -- General shell tricks --
119
120function root_check_run_with_sudo() {
121    # Trick so, program can be run as normal user, will just use "sudo"
122    #  call as root_check_run_as_sudo "$@"
123    if [ "$EUID" -ne 0 ]; then
124	if [ -x $0 ]; then # Directly executable use sudo
125	    info "Not root, running with sudo"
126            sudo "$0" "$@"
127            exit $?
128	fi
129	err 4 "cannot perform sudo run of $0"
130    fi
131}
132
133# Exact input device's NUMA node info
134function get_iface_node()
135{
136    local node=$(</sys/class/net/$1/device/numa_node)
137    if [[ $node == -1 ]]; then
138        echo 0
139    else
140        echo $node
141    fi
142}
143
144# Given an Dev/iface, get its queues' irq numbers
145function get_iface_irqs()
146{
147	local IFACE=$1
148	local queues="${IFACE}-.*TxRx"
149
150	irqs=$(grep "$queues" /proc/interrupts | cut -f1 -d:)
151	[ -z "$irqs" ] && irqs=$(grep $IFACE /proc/interrupts | cut -f1 -d:)
152	[ -z "$irqs" ] && irqs=$(for i in `ls -Ux /sys/class/net/$IFACE/device/msi_irqs` ;\
153	    do grep "$i:.*TxRx" /proc/interrupts | grep -v fdir | cut -f 1 -d : ;\
154	    done)
155	[ -z "$irqs" ] && err 3 "Could not find interrupts for $IFACE"
156
157	echo $irqs
158}
159
160# Given a NUMA node, return cpu ids belonging to it.
161function get_node_cpus()
162{
163	local node=$1
164	local node_cpu_list
165	local node_cpu_range_list=`cut -f1- -d, --output-delimiter=" " \
166	                  /sys/devices/system/node/node$node/cpulist`
167
168	for cpu_range in $node_cpu_range_list
169	do
170	    node_cpu_list="$node_cpu_list "`seq -s " " ${cpu_range//-/ }`
171	done
172
173	echo $node_cpu_list
174}
175
176# Check $1 is in between $2, $3 ($2 <= $1 <= $3)
177function in_between() { [[ ($1 -ge $2) && ($1 -le $3) ]] ; }
178
179# Extend shrunken IPv6 address.
180# fe80::42:bcff:fe84:e10a => fe80:0:0:0:42:bcff:fe84:e10a
181function extend_addr6()
182{
183    local addr=$1
184    local sep=: sep2=::
185    local sep_cnt=$(tr -cd $sep <<< $1 | wc -c)
186    local shrink
187
188    # separator count should be (2 <= $sep_cnt <= 7)
189    if ! (in_between $sep_cnt 2 7); then
190        err 5 "Invalid IP6 address: $1"
191    fi
192
193    # if shrink '::' occurs multiple, it's malformed.
194    shrink=( $(egrep -o "$sep{2,}" <<< $addr) )
195    if [[ ${#shrink[@]} -ne 0 ]]; then
196        if [[ ${#shrink[@]} -gt 1 || ( ${shrink[0]} != $sep2 ) ]]; then
197            err 5 "Invalid IP6 address: $1"
198        fi
199    fi
200
201    # add 0 at begin & end, and extend addr by adding :0
202    [[ ${addr:0:1} == $sep ]] && addr=0${addr}
203    [[ ${addr: -1} == $sep ]] && addr=${addr}0
204    echo "${addr/$sep2/$(printf ':0%.s' $(seq $[8-sep_cnt])):}"
205}
206
207# Given a single IP(v4/v6) address, whether it is valid.
208function validate_addr()
209{
210    # check function is called with (funcname)6
211    [[ ${FUNCNAME[1]: -1} == 6 ]] && local IP6=6
212    local bitlen=$[ IP6 ? 128 : 32 ]
213    local len=$[ IP6 ? 8 : 4 ]
214    local max=$[ 2**(len*2)-1 ]
215    local net prefix
216    local addr sep
217
218    IFS='/' read net prefix <<< $1
219    [[ $IP6 ]] && net=$(extend_addr6 $net)
220
221    # if prefix exists, check (0 <= $prefix <= $bitlen)
222    if [[ -n $prefix ]]; then
223        if ! (in_between $prefix 0 $bitlen); then
224            err 5 "Invalid prefix: /$prefix"
225        fi
226    fi
227
228    # set separator for each IP(v4/v6)
229    [[ $IP6 ]] && sep=: || sep=.
230    IFS=$sep read -a addr <<< $net
231
232    # array length
233    if [[ ${#addr[@]} != $len ]]; then
234        err 5 "Invalid IP$IP6 address: $1"
235    fi
236
237    # check each digit (0 <= $digit <= $max)
238    for digit in "${addr[@]}"; do
239        [[ $IP6 ]] && digit=$[ 16#$digit ]
240        if ! (in_between $digit 0 $max); then
241            err 5 "Invalid IP$IP6 address: $1"
242        fi
243    done
244
245    return 0
246}
247
248function validate_addr6() { validate_addr $@ ; }
249
250# Given a single IP(v4/v6) or CIDR, return minimum and maximum IP addr.
251function parse_addr()
252{
253    # check function is called with (funcname)6
254    [[ ${FUNCNAME[1]: -1} == 6 ]] && local IP6=6
255    local net prefix
256    local min_ip max_ip
257
258    IFS='/' read net prefix <<< $1
259    [[ $IP6 ]] && net=$(extend_addr6 $net)
260
261    if [[ -z $prefix ]]; then
262        min_ip=$net
263        max_ip=$net
264    else
265        # defining array for converting Decimal 2 Binary
266        # 00000000 00000001 00000010 00000011 00000100 ...
267        local d2b='{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}'
268        [[ $IP6 ]] && d2b+=$d2b
269        eval local D2B=($d2b)
270
271        local bitlen=$[ IP6 ? 128 : 32 ]
272        local remain=$[ bitlen-prefix ]
273        local octet=$[ IP6 ? 16 : 8 ]
274        local min_mask max_mask
275        local min max
276        local ip_bit
277        local ip sep
278
279        # set separator for each IP(v4/v6)
280        [[ $IP6 ]] && sep=: || sep=.
281        IFS=$sep read -ra ip <<< $net
282
283        min_mask="$(printf '1%.s' $(seq $prefix))$(printf '0%.s' $(seq $remain))"
284        max_mask="$(printf '0%.s' $(seq $prefix))$(printf '1%.s' $(seq $remain))"
285
286        # calculate min/max ip with &,| operator
287        for i in "${!ip[@]}"; do
288            digit=$[ IP6 ? 16#${ip[$i]} : ${ip[$i]} ]
289            ip_bit=${D2B[$digit]}
290
291            idx=$[ octet*i ]
292            min[$i]=$[ 2#$ip_bit & 2#${min_mask:$idx:$octet} ]
293            max[$i]=$[ 2#$ip_bit | 2#${max_mask:$idx:$octet} ]
294            [[ $IP6 ]] && { min[$i]=$(printf '%X' ${min[$i]});
295                            max[$i]=$(printf '%X' ${max[$i]}); }
296        done
297
298        min_ip=$(IFS=$sep; echo "${min[*]}")
299        max_ip=$(IFS=$sep; echo "${max[*]}")
300    fi
301
302    echo $min_ip $max_ip
303}
304
305function parse_addr6() { parse_addr $@ ; }
306
307# Given a single or range of port(s), return minimum and maximum port number.
308function parse_ports()
309{
310    local port_str=$1
311    local port_list
312    local min_port
313    local max_port
314
315    IFS="-" read -ra port_list <<< $port_str
316
317    min_port=${port_list[0]}
318    max_port=${port_list[1]:-$min_port}
319
320    echo $min_port $max_port
321}
322
323# Given a minimum and maximum port, verify port number.
324function validate_ports()
325{
326    local min_port=$1
327    local max_port=$2
328
329    # 1 <= port <= 65535
330    if (in_between $min_port 1 65535); then
331	if (in_between $max_port 1 65535); then
332	    if [[ $min_port -le $max_port ]]; then
333		return 0
334	    fi
335	fi
336    fi
337
338    err 5 "Invalid port(s): $min_port-$max_port"
339}