#!/bin/sh # Copyright (C) 2016-2019 Aleksander Morgado [ -x /usr/bin/mmcli ] || exit 0 [ -x /usr/sbin/pppd ] || exit 0 [ -n "$INCLUDE_ONLY" ] || { . /lib/functions.sh . ../netifd-proto.sh . ./ppp.sh init_proto "$@" } cdr2mask () { # Number of args to shift, 255..255, first non-255 byte, zeroes set -- $(( 5 - ($1 / 8) )) 255 255 255 255 $(( (255 << (8 - ($1 % 8))) & 255 )) 0 0 0 if [ "$1" -gt 1 ] then shift "$1" else shift fi echo "${1-0}"."${2-0}"."${3-0}"."${4-0}" } # This method expects as first argument a list of key-value pairs, as returned by mmcli --output-keyvalue # The second argument must be exactly the name of the field to read # # Sample output: # $ mmcli -m 0 -K # modem.dbus-path : /org/freedesktop/ModemManager1/Modem/0 # modem.generic.device-identifier : ed6eff2e3e0f90463da1c2a755b2acacd1335752 # modem.generic.manufacturer : Dell Inc. # modem.generic.model : DW5821e Snapdragon X20 LTE # modem.generic.revision : T77W968.F1.0.0.4.0.GC.009\n026 # modem.generic.carrier-configuration : GCF # modem.generic.carrier-configuration-revision : 08E00009 # modem.generic.hardware-revision : DW5821e Snapdragon X20 LTE # .... modemmanager_get_field() { local list=$1 local field=$2 local value="" [ -z "${list}" ] || [ -z "${field}" ] && return # there is always at least a whitespace after each key, and we use that as part of the # key matching we do (e.g. to avoid getting 'modem.generic.state-failed-reason' as a result # when grepping for 'modem.generic.state'. line=$(echo "${list}" | grep "${field} ") value=$(echo ${line#*:}) # not found? [ -n "${value}" ] || return 2 # only print value if set [ "${value}" != "--" ] && echo "${value}" return 0 } # build a comma-separated list of values from the list modemmanager_get_multivalue_field() { local list=$1 local field=$2 local value="" local length idx item [ -z "${list}" ] || [ -z "${field}" ] && return length=$(modemmanager_get_field "${list}" "${field}.length") [ -n "${length}" ] || return 0 [ "$length" -ge 1 ] || return 0 idx=1 while [ $idx -le "$length" ]; do item=$(modemmanager_get_field "${list}" "${field}.value\[$idx\]") [ -n "${item}" ] && [ "${item}" != "--" ] && { [ -n "${value}" ] && value="${value}, " value="${value}${item}" } idx=$((idx + 1)) done # nothing built? [ -n "${value}" ] || return 2 # only print value if set echo "${value}" return 0 } modemmanager_cleanup_connection() { local modemstatus="$1" local bearercount idx bearerpath bearercount=$(modemmanager_get_field "${modemstatus}" "modem.generic.bearers.length") # do nothing if no bearers reported [ -n "${bearercount}" ] && [ "$bearercount" -ge 1 ] && { # explicitly disconnect just in case mmcli --modem="${device}" --simple-disconnect >/dev/null 2>&1 # and remove all bearer objects, if any found idx=1 while [ $idx -le "$bearercount" ]; do bearerpath=$(modemmanager_get_field "${modemstatus}" "modem.generic.bearers.value\[$idx\]") mmcli --modem "${device}" --delete-bearer="${bearerpath}" >/dev/null 2>&1 idx=$((idx + 1)) done } } modemmanager_connected_method_ppp() { local interface="$1" local ttyname="$2" local username="$3" local password="$4" proto_run_command "${interface}" /usr/sbin/pppd \ "${ttyname}" \ 115200 \ nodetach \ noaccomp \ nobsdcomp \ nopcomp \ novj \ noauth \ ${username:+ user $username} \ ${password:+ password $password} \ lcp-echo-failure 5 \ lcp-echo-interval 15 \ lock \ crtscts \ nodefaultroute \ usepeerdns \ ipparam "${interface}" \ ip-up-script /lib/netifd/ppp-up \ ip-down-script /lib/netifd/ppp-down } modemmanager_disconnected_method_ppp() { local interface="$1" echo "running disconnection (ppp method)" [ -n "${ERROR}" ] && { local errorstring errorstring=$(ppp_exitcode_tostring "${ERROR}") case "$ERROR" in 0) ;; 2) proto_notify_error "$interface" "$errorstring" proto_block_restart "$interface" ;; *) proto_notify_error "$interface" "$errorstring" ;; esac } || echo "pppd result code not given" proto_kill_command "$interface" } modemmanager_connected_method_dhcp() { local interface="$1" local wwan="$2" local metric="$3" proto_init_update "${wwan}" 1 proto_send_update "${interface}" json_init json_add_string name "${interface}_4" json_add_string ifname "@${interface}" json_add_string proto "dhcp" [ -n "$metric" ] && json_add_int metric "${metric}" ubus call network add_dynamic "$(json_dump)" } modemmanager_disconnected_method_dhcp() { local interface="$1" echo "running disconnection (dhcp method)" proto_init_update "*" 0 proto_send_update "${interface}" } modemmanager_connected_method_static() { local interface="$1" local wwan="$2" local address="$3" local prefix="$4" local gateway="$5" local mtu="$6" local dns1="$7" local dns2="$8" local metric="$9" local mask="" [ -n "${address}" ] || { proto_notify_error "${interface}" ADDRESS_MISSING return } [ -n "${prefix}" ] || { proto_notify_error "${interface}" PREFIX_MISSING return } mask=$(cdr2mask "${prefix}") # TODO: mtu reporting in proto handler proto_init_update "${wwan}" 1 echo "adding IPv4 address ${address}, netmask ${mask}" proto_add_ipv4_address "${address}" "${mask}" [ -n "${gateway}" ] && { echo "adding default IPv4 route via ${gateway}" proto_add_ipv4_route "0.0.0.0" "0" "${gateway}" "${address}" } [ -n "${dns1}" ] && { echo "adding primary DNS at ${dns1}" proto_add_dns_server "${dns1}" } [ -n "${dns2}" ] && { echo "adding secondary DNS at ${dns2}" proto_add_dns_server "${dns2}" } [ -n "$metric" ] && json_add_int metric "${metric}" proto_send_update "${interface}" } modemmanager_disconnected_method_static() { local interface="$1" echo "running disconnection (static method)" proto_init_update "*" 0 proto_send_update "${interface}" } proto_modemmanager_init_config() { proto_config_add_string "device:device" proto_config_add_string apn proto_config_add_string username proto_config_add_string password proto_config_add_string pincode proto_config_add_string iptype proto_config_add_boolean lowpower } proto_modemmanager_setup() { local interface="$1" local modempath modemstatus bearercount bearerpath connectargs bearerstatus beareriface local operatorname operatorid registration accesstech signalquality local device apn username password pincode iptype metric local address prefix gateway mtu dns1 dns2 json_get_vars device apn username password pincode iptype metric # validate sysfs path given in config [ -n "${device}" ] || { echo "No device specified" proto_notify_error "${interface}" NO_DEVICE proto_set_available "${interface}" 0 return 1 } [ -e "${device}" ] || { echo "Device not found in sysfs" proto_set_available "${interface}" 0 return 1 } # validate that ModemManager is handling the modem at the sysfs path modemstatus=$(mmcli --modem="${device}" --output-keyvalue) modempath=$(modemmanager_get_field "${modemstatus}" "modem.dbus-path") [ -n "${modempath}" ] || { echo "Device not managed by ModemManager" proto_notify_error "${interface}" DEVICE_NOT_MANAGED proto_set_available "${interface}" 0 return 1 } echo "modem available at ${modempath}" # always cleanup before attempting a new connection, just in case modemmanager_cleanup_connection "${modemstatus}" # setup connect args; APN mandatory (even if it may be empty) echo "starting connection with apn '${apn}'..." connectargs="apn=${apn}${username:+,user=${username}}${password:+,password=${password}}${pincode:+,pin=${pincode}}${iptype:+,ip-type=${iptype}}" mmcli --modem="${device}" --timeout 120 --simple-connect="${connectargs}" || { proto_notify_error "${interface}" CONNECT_FAILED proto_block_restart "${interface}" return 1 } # log additional useful information modemstatus=$(mmcli --modem="${device}" --output-keyvalue) operatorname=$(modemmanager_get_field "${modemstatus}" "modem.3gpp.operator-name") [ -n "${operatorname}" ] && echo "network operator name: ${operatorname}" operatorid=$(modemmanager_get_field "${modemstatus}" "modem.3gpp.operator-code") [ -n "${operatorid}" ] && echo "network operator MCCMNC: ${operatorid}" registration=$(modemmanager_get_field "${modemstatus}" "modem.3gpp.registration-state") [ -n "${registration}" ] && echo "registration type: ${registration}" accesstech=$(modemmanager_get_multivalue_field "${modemstatus}" "modem.generic.access-technologies") [ -n "${accesstech}" ] && echo "access technology: ${accesstech}" signalquality=$(modemmanager_get_field "${modemstatus}" "modem.generic.signal-quality.value") [ -n "${signalquality}" ] && echo "signal quality: ${signalquality}%" # we won't like it if there are more than one bearers, as that would mean the # user manually created them, and that's unsupported by this proto bearercount=$(modemmanager_get_field "${modemstatus}" "modem.generic.bearers.length") [ -n "${bearercount}" ] && [ "$bearercount" -eq 1 ] || { proto_notify_error "${interface}" INVALID_BEARER_LIST return 1 } # load connected bearer information bearerpath=$(modemmanager_get_field "${modemstatus}" "modem.generic.bearers.value\[1\]") bearerstatus=$(mmcli --bearer "${bearerpath}" --output-keyvalue) # load network interface and method information beareriface=$(modemmanager_get_field "${bearerstatus}" "bearer.status.interface") bearermethod=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.method") echo "connection setup required in interface ${beareriface}: ${bearermethod}" case "${bearermethod}" in "dhcp") modemmanager_connected_method_dhcp "${interface}" "${beareriface}" "${metric}" ;; "static") address=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.address") prefix=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.prefix") gateway=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.gateway") mtu=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.mtu") dns1=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.dns.value\[1\]") dns2=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.dns.value\[2\]") modemmanager_connected_method_static "${interface}" "${beareriface}" "${address}" "${prefix}" "${gateway}" "${mtu}" "${dns1}" "${dns2}" "${metric}" ;; "ppp") modemmanager_connected_method_ppp "${interface}" "${beareriface}" "${username}" "${password}" ;; *) proto_notify_error "${interface}" UNKNOWN_METHOD return 1 ;; esac return 0 } proto_modemmanager_teardown() { local interface="$1" local modemstatus bearerpath errorstring local device lowpower json_get_vars device lowpower echo "stopping network" # load connected bearer information, just the first one should be ok modemstatus=$(mmcli --modem="${device}" --output-keyvalue) bearerpath=$(modemmanager_get_field "${modemstatus}" "modem.generic.bearers.value\[1\]") [ -n "${bearerpath}" ] || { echo "couldn't load bearer path" return } # load bearer connection method bearerstatus=$(mmcli --bearer "${bearerpath}") bearermethod=$(modemmanager_get_field "${bearerstatus}" "bearer.ipv4-config.method") [ -n "${bearermethod}" ] || { echo "couldn't load bearer method" return } case "${bearermethod}" in "dhcp") modemmanager_disconnected_method_dhcp "${interface}" ;; "static") modemmanager_disconnected_method_static "${interface}" ;; "ppp") modemmanager_disconnected_method_ppp "${interface}" ;; *) ;; esac # disconnect mmcli --modem="${device}" --simple-disconnect || proto_notify_error "${interface}" DISCONNECT_FAILED # disable mmcli --modem="${device}" --disable # low power, only if requested [ "${lowpower:-0}" -lt 1 ] || mmcli --modem="${device}" --set-power-state-low } [ -n "$INCLUDE_ONLY" ] || { add_protocol modemmanager }