brintos

brintos / linux-shallow public Read only

0
0
Text · 8.7 KiB · c08cefb Raw
341 lines · bash
1#2# Common functions used by pktgen scripts3#  - Depending on bash 3 (or higher) syntax4#5# Author: Jesper Dangaaard Brouer6# License: GPL7 8set -o errexit9 10## -- General shell logging cmds --11function err() {12    local exitcode=$113    shift14    echo "ERROR: $@" >&215    exit $exitcode16}17 18function warn() {19    echo "WARN : $@" >&220}21 22function info() {23    if [[ -n "$VERBOSE" ]]; then24	echo "INFO : $@" >&225    fi26}27 28## -- Pktgen proc config commands -- ##29export PROC_DIR=/proc/net/pktgen30#31# Three different shell functions for configuring the different32# 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 devices38# * pg_set()    control setup of individual devices39function pg_ctrl() {40    local proc_file="pgctrl"41    proc_cmd ${proc_file} "$@"42}43 44function pg_thread() {45    local thread=$146    local proc_file="kpktgend_${thread}"47    shift48    proc_cmd ${proc_file} "$@"49}50 51function pg_set() {52    local dev=$153    local proc_file="$dev"54    shift55    proc_cmd ${proc_file} "$@"56}57 58# More generic replacement for pgset(), that does not depend on global59# variable for proc file.60function proc_cmd() {61    local result62    local proc_file=$163    local status=064    # after shift, the remaining args are contained in $@65    shift66    local proc_ctrl=${PROC_DIR}/$proc_file67    if [[ ! -e "$proc_ctrl" ]]; then68	err 3 "proc file:$proc_ctrl does not exists (dev added to thread?)"69    else70	if [[ ! -w "$proc_ctrl" ]]; then71	    err 4 "proc file:$proc_ctrl not writable, not root?!"72	fi73    fi74 75    if [[ "$DEBUG" == "yes" ]]; then76	echo "cmd: $@ > $proc_ctrl"77    fi78    # Quoting of "$@" is important for space expansion79    echo "$@" > "$proc_ctrl" || status=$?80 81    if [[ "$proc_file" != "pgctrl" ]]; then82        result=$(grep "Result: OK:" $proc_ctrl) || true83        if [[ "$result" == "" ]]; then84            grep "Result:" $proc_ctrl >&285        fi86    fi87    if (( $status != 0 )); then88	err 5 "Write error($status) occurred cmd: \"$@ > $proc_ctrl\""89    fi90}91 92# Old obsolete "pgset" function, with slightly improved err handling93function pgset() {94    local result95 96    if [[ "$DEBUG" == "yes" ]]; then97	echo "cmd: $1 > $PGDEV"98    fi99    echo $1 > $PGDEV100    local status=$?101 102    result=`cat $PGDEV | fgrep "Result: OK:"`103    if [[ "$result" == "" ]]; then104         cat $PGDEV | fgrep Result:105    fi106    if (( $status != 0 )); then107	err 5 "Write error($status) occurred cmd: \"$1 > $PGDEV\""108    fi109}110 111function trap_exit()112{113    # Cleanup pktgen setup on exit if thats not "append mode"114    if [[ -z "$APPEND" ]] && [[ $EUID -eq 0 ]]; then115        trap 'pg_ctrl "reset"' EXIT116    fi117}118 119## -- General shell tricks --120 121function root_check_run_with_sudo() {122    # Trick so, program can be run as normal user, will just use "sudo"123    #  call as root_check_run_as_sudo "$@"124    if [ "$EUID" -ne 0 ]; then125	if [ -x $0 ]; then # Directly executable use sudo126	    info "Not root, running with sudo"127            sudo -E "$0" "$@"128            exit $?129	fi130	err 4 "cannot perform sudo run of $0"131    fi132}133 134# Exact input device's NUMA node info135function get_iface_node()136{137    local node=$(</sys/class/net/$1/device/numa_node)138    if [[ $node == -1 ]]; then139        echo 0140    else141        echo $node142    fi143}144 145# Given an Dev/iface, get its queues' irq numbers146function get_iface_irqs()147{148	local IFACE=$1149	local queues="${IFACE}-.*TxRx"150 151	irqs=$(grep "$queues" /proc/interrupts | cut -f1 -d:)152	[ -z "$irqs" ] && irqs=$(grep $IFACE /proc/interrupts | cut -f1 -d:)153	[ -z "$irqs" ] && irqs=$(for i in `ls -Ux /sys/class/net/$IFACE/device/msi_irqs` ;\154	    do grep "$i:.*TxRx" /proc/interrupts | grep -v fdir | cut -f 1 -d : ;\155	    done)156	[ -z "$irqs" ] && err 3 "Could not find interrupts for $IFACE"157 158	echo $irqs159}160 161# Given a NUMA node, return cpu ids belonging to it.162function get_node_cpus()163{164	local node=$1165	local node_cpu_list166	local node_cpu_range_list=`cut -f1- -d, --output-delimiter=" " \167	                  /sys/devices/system/node/node$node/cpulist`168 169	for cpu_range in $node_cpu_range_list170	do171	    node_cpu_list="$node_cpu_list "`seq -s " " ${cpu_range//-/ }`172	done173 174	echo $node_cpu_list175}176 177# Check $1 is in between $2, $3 ($2 <= $1 <= $3)178function in_between() { [[ ($1 -ge $2) && ($1 -le $3) ]] ; }179 180# Extend shrunken IPv6 address.181# fe80::42:bcff:fe84:e10a => fe80:0:0:0:42:bcff:fe84:e10a182function extend_addr6()183{184    local addr=$1185    local sep=: sep2=::186    local sep_cnt=$(tr -cd $sep <<< $1 | wc -c)187    local shrink188 189    # separator count should be (2 <= $sep_cnt <= 7)190    if ! (in_between $sep_cnt 2 7); then191        err 5 "Invalid IP6 address: $1"192    fi193 194    # if shrink '::' occurs multiple, it's malformed.195    shrink=( $(grep -E -o "$sep{2,}" <<< $addr) )196    if [[ ${#shrink[@]} -ne 0 ]]; then197        if [[ ${#shrink[@]} -gt 1 || ( ${shrink[0]} != $sep2 ) ]]; then198            err 5 "Invalid IP6 address: $1"199        fi200    fi201 202    # add 0 at begin & end, and extend addr by adding :0203    [[ ${addr:0:1} == $sep ]] && addr=0${addr}204    [[ ${addr: -1} == $sep ]] && addr=${addr}0205    echo "${addr/$sep2/$(printf ':0%.s' $(seq $[8-sep_cnt])):}"206}207 208# Given a single IP(v4/v6) address, whether it is valid.209function validate_addr()210{211    # check function is called with (funcname)6212    [[ ${FUNCNAME[1]: -1} == 6 ]] && local IP6=6213    local bitlen=$[ IP6 ? 128 : 32 ]214    local len=$[ IP6 ? 8 : 4 ]215    local max=$[ 2**(len*2)-1 ]216    local net prefix217    local addr sep218 219    IFS='/' read net prefix <<< $1220    [[ $IP6 ]] && net=$(extend_addr6 $net)221 222    # if prefix exists, check (0 <= $prefix <= $bitlen)223    if [[ -n $prefix ]]; then224        if ! (in_between $prefix 0 $bitlen); then225            err 5 "Invalid prefix: /$prefix"226        fi227    fi228 229    # set separator for each IP(v4/v6)230    [[ $IP6 ]] && sep=: || sep=.231    IFS=$sep read -a addr <<< $net232 233    # array length234    if [[ ${#addr[@]} != $len ]]; then235        err 5 "Invalid IP$IP6 address: $1"236    fi237 238    # check each digit (0 <= $digit <= $max)239    for digit in "${addr[@]}"; do240        [[ $IP6 ]] && digit=$[ 16#$digit ]241        if ! (in_between $digit 0 $max); then242            err 5 "Invalid IP$IP6 address: $1"243        fi244    done245 246    return 0247}248 249function validate_addr6() { validate_addr $@ ; }250 251# Given a single IP(v4/v6) or CIDR, return minimum and maximum IP addr.252function parse_addr()253{254    # check function is called with (funcname)6255    [[ ${FUNCNAME[1]: -1} == 6 ]] && local IP6=6256    local net prefix257    local min_ip max_ip258 259    IFS='/' read net prefix <<< $1260    [[ $IP6 ]] && net=$(extend_addr6 $net)261 262    if [[ -z $prefix ]]; then263        min_ip=$net264        max_ip=$net265    else266        # defining array for converting Decimal 2 Binary267        # 00000000 00000001 00000010 00000011 00000100 ...268        local d2b='{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}{0..1}'269        [[ $IP6 ]] && d2b+=$d2b270        eval local D2B=($d2b)271 272        local bitlen=$[ IP6 ? 128 : 32 ]273        local remain=$[ bitlen-prefix ]274        local octet=$[ IP6 ? 16 : 8 ]275        local min_mask max_mask276        local min max277        local ip_bit278        local ip sep279 280        # set separator for each IP(v4/v6)281        [[ $IP6 ]] && sep=: || sep=.282        IFS=$sep read -ra ip <<< $net283 284        min_mask="$(printf '1%.s' $(seq $prefix))$(printf '0%.s' $(seq $remain))"285        max_mask="$(printf '0%.s' $(seq $prefix))$(printf '1%.s' $(seq $remain))"286 287        # calculate min/max ip with &,| operator288        for i in "${!ip[@]}"; do289            digit=$[ IP6 ? 16#${ip[$i]} : ${ip[$i]} ]290            ip_bit=${D2B[$digit]}291 292            idx=$[ octet*i ]293            min[$i]=$[ 2#$ip_bit & 2#${min_mask:$idx:$octet} ]294            max[$i]=$[ 2#$ip_bit | 2#${max_mask:$idx:$octet} ]295            [[ $IP6 ]] && { min[$i]=$(printf '%X' ${min[$i]});296                            max[$i]=$(printf '%X' ${max[$i]}); }297        done298 299        min_ip=$(IFS=$sep; echo "${min[*]}")300        max_ip=$(IFS=$sep; echo "${max[*]}")301    fi302 303    echo $min_ip $max_ip304}305 306function parse_addr6() { parse_addr $@ ; }307 308# Given a single or range of port(s), return minimum and maximum port number.309function parse_ports()310{311    local port_str=$1312    local port_list313    local min_port314    local max_port315 316    IFS="-" read -ra port_list <<< $port_str317 318    min_port=${port_list[0]}319    max_port=${port_list[1]:-$min_port}320 321    echo $min_port $max_port322}323 324# Given a minimum and maximum port, verify port number.325function validate_ports()326{327    local min_port=$1328    local max_port=$2329 330    # 1 <= port <= 65535331    if (in_between $min_port 1 65535); then332	if (in_between $max_port 1 65535); then333	    if [[ $min_port -le $max_port ]]; then334		return 0335	    fi336	fi337    fi338 339    err 5 "Invalid port(s): $min_port-$max_port"340}341