#!/bin/sh # Copyright (C) 2023 Siriling #脚本目录 SCRIPT_DIR="/usr/share/modem" source /usr/share/libubox/jshn.sh #预设 quectel_presets() { at_command='ATI' # sh "${SCRIPT_DIR}/modem_at.sh" "$at_port" "$at_command" } #获取DNS # $1:AT串口 # $2:连接定义 quectel_get_dns() { local at_port="$1" local define_connect="$2" [ -z "$define_connect" ] && { define_connect="1" } local public_dns1_ipv4="223.5.5.5" local public_dns2_ipv4="119.29.29.29" local public_dns1_ipv6="2400:3200::1" #下一代互联网北京研究中心：240C::6666，阿里：2400:3200::1，腾讯：2402:4e00:: local public_dns2_ipv6="2402:4e00::" #获取DNS地址 at_command="AT+GTDNS=${define_connect}" local response=$(at ${at_port} ${at_command} | grep "+GTDNS: ") local ipv4_dns1=$(echo "${response}" | awk -F'"' '{print $2}' | awk -F',' '{print $1}') [ -z "$ipv4_dns1" ] && { ipv4_dns1="${public_dns1_ipv4}" } local ipv4_dns2=$(echo "${response}" | awk -F'"' '{print $4}' | awk -F',' '{print $1}') [ -z "$ipv4_dns2" ] && { ipv4_dns2="${public_dns2_ipv4}" } local ipv6_dns1=$(echo "${response}" | awk -F'"' '{print $2}' | awk -F',' '{print $2}') [ -z "$ipv6_dns1" ] && { ipv6_dns1="${public_dns1_ipv6}" } local ipv6_dns2=$(echo "${response}" | awk -F'"' '{print $4}' | awk -F',' '{print $2}') [ -z "$ipv6_dns2" ] && { ipv6_dns2="${public_dns2_ipv6}" } dns="{ \"dns\":{ \"ipv4_dns1\":\"$ipv4_dns1\", \"ipv4_dns2\":\"$ipv4_dns2\", \"ipv6_dns1\":\"$ipv6_dns1\", \"ipv6_dns2\":\"$ipv6_dns2\" } }" echo "$dns" } quectel_get_imei(){ local at_port="$1" at_command="AT+CGSN" imei=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | grep -E '[0-9]+' ) echo "$imei" } quectel_set_imei(){ local at_port="$1" local imei="$2" at_command="AT+EGMR=1,7,\"$imei\"" res=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) } #获取拨号模式 # $1:AT串口 # $2:平台 quectel_get_mode() { local at_port="$1" local platform="$2" at_command='AT+QCFG="usbnet"' local mode_num=$(sh ${SCRIPT_DIR}/modem_at.sh ${at_port} ${at_command} | grep "+QCFG:" | sed 's/+QCFG: "usbnet",//g' | sed 's/\r//g') if [ -z "$mode_num" ]; then echo "unknown" return fi #获取芯片平台 if [ -z "$platform" ]; then local modem_number=$(uci -q get modem.@global[0].modem_number) for i in $(seq 0 $((modem_number-1))); do local at_port_tmp=$(uci -q get modem.modem${i}.at_port) if [ "$at_port" = "$at_port_tmp" ]; then platform=$(uci -q get modem.modem${i}.platform) break fi done fi local mode case "$platform" in "qualcomm") case "$mode_num" in "0") mode="qmi" ;; # "0") mode="gobinet" ;; "1") mode="ecm" ;; "2") mode="mbim" ;; "3") mode="rndis" ;; "5") mode="ncm" ;; *) mode="${mode_num}" ;; esac ;; "unisoc") case "$mode_num" in "1") mode="ecm" ;; "2") mode="mbim" ;; "3") mode="rndis" ;; "5") mode="ncm" ;; *) mode="${mode_num}" ;; esac ;; *) mode="${mode_num}" ;; esac echo "${mode}" } #设置拨号模式 # $1:AT串口 # $2:拨号模式配置 quectel_set_mode() { local at_port="$1" #获取芯片平台 local platform local modem_number=$(uci -q get modem.@global[0].modem_number) for i in $(seq 0 $((modem_number-1))); do local at_port_tmp=$(uci -q get modem.modem$i.at_port) if [ "$at_port" = "$at_port_tmp" ]; then platform=$(uci -q get modem.modem$i.platform) break fi done #获取拨号模式配置 local mode_num case "$platform" in "qualcomm") case "$2" in "qmi") mode_num="0" ;; # "gobinet") mode_num="0" ;; "ecm") mode_num="1" ;; "mbim") mode_num="2" ;; "rndis") mode_num="3" ;; "ncm") mode_num="5" ;; *) mode_num="0" ;; esac ;; "unisoc") case "$2" in "ecm") mode_num="1" ;; "mbim") mode_num="2" ;; "rndis") mode_num="3" ;; "ncm") mode_num="5" ;; *) mode_num="0" ;; esac ;; *) mode_num="0" ;; esac #设置模组 at_command='AT+QCFG="usbnet",'${mode_num} sh ${SCRIPT_DIR}/modem_at.sh "${at_port}" "${at_command}" } #获取网络偏好 # $1:AT串口 quectel_get_network_prefer() { local at_port="$1" at_command='AT+QNWPREFCFG="mode_pref"' local response=$(sh ${SCRIPT_DIR}/modem_at.sh ${at_port} ${at_command} | grep "+QNWPREFCFG:" | awk -F',' '{print $2}' | sed 's/\r//g') local network_prefer_3g="0"; local network_prefer_4g="0"; local network_prefer_5g="0"; #匹配不同的网络类型 local auto=$(echo $response | grep "AUTO") if [ -n "$auto" ]; then network_prefer_3g="1" network_prefer_4g="1" network_prefer_5g="1" else local wcdma=$(echo $response | grep "WCDMA") local lte=$(echo $response | grep "LTE") local nr=$(echo $response | grep "NR5G") if [ -n "$wcdma" ]; then network_prefer_3g="1" fi if [ -n "$lte" ]; then network_prefer_4g="1" fi if [ -n "$nr" ]; then network_prefer_5g="1" fi fi local network_prefer="{ \"network_prefer\":{ \"3G\":$network_prefer_3g, \"4G\":$network_prefer_4g, \"5G\":$network_prefer_5g } }" echo "$network_prefer" } #设置网络偏好 # $1:AT串口 # $2:网络偏好配置 quectel_set_network_prefer() { local network_prefer="$2" #获取网络偏好配置 local network_prefer_config #获取选中的数量 local count=$(echo "$network_prefer" | grep -o "1" | wc -l) #获取每个偏好的值 local network_prefer_3g=$(echo "$network_prefer" | jq -r '.["3G"]') local network_prefer_4g=$(echo "$network_prefer" | jq -r '.["4G"]') local network_prefer_5g=$(echo "$network_prefer" | jq -r '.["5G"]') case "$count" in "1") if [ "$network_prefer_3g" = "1" ]; then network_prefer_config="WCDMA" elif [ "$network_prefer_4g" = "1" ]; then network_prefer_config="LTE" elif [ "$network_prefer_5g" = "1" ]; then network_prefer_config="NR5G" fi ;; "2") if [ "$network_prefer_3g" = "1" ] && [ "$network_prefer_4g" = "1" ]; then network_prefer_config="WCDMA:LTE" elif [ "$network_prefer_3g" = "1" ] && [ "$network_prefer_5g" = "1" ]; then network_prefer_config="WCDMA:NR5G" elif [ "$network_prefer_4g" = "1" ] && [ "$network_prefer_5g" = "1" ]; then network_prefer_config="LTE:NR5G" fi ;; "3") network_prefer_config="AUTO" ;; *) network_prefer_config="AUTO" ;; esac #设置模组 local at_port="$1" at_command='AT+QNWPREFCFG="mode_pref",'${network_prefer_config} sh ${SCRIPT_DIR}/modem_at.sh "${at_port}" "${at_command}" } #获取电压 # $1:AT串口 quectel_get_voltage() { local at_port="$1" #Voltage（电压） at_command="AT+CBC" local voltage=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+CBC:" | awk -F',' '{print $3}' | sed 's/\r//g') echo "${voltage}" } #获取温度 # $1:AT串口 quectel_get_temperature() { local at_port="$1" #Temperature（温度） at_command="AT+QTEMP" response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | awk -F'"' '{print $4}') local temperature if [ -n "$response" ]; then temperature="$response$(printf "\xc2\xb0")C" fi # response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+QTEMP:") # QTEMP=$(echo $response | grep -o -i "+QTEMP: [0-9]\{1,3\}") # if [ -z "$QTEMP" ]; then # QTEMP=$(echo $response | grep -o -i "+QTEMP:[ ]\?\"XO[_-]THERM[_-][^,]\+,[\"]\?[0-9]\{1,3\}" | grep -o "[0-9]\{1,3\}") # fi # if [ -z "$QTEMP" ]; then # QTEMP=$(echo $response | grep -o -i "+QTEMP:[ ]\?\"MDM-CORE-USR.\+[0-9]\{1,3\}\"" | cut -d\" -f4) # fi # if [ -z "$QTEMP" ]; then # QTEMP=$(echo $response | grep -o -i "+QTEMP:[ ]\?\"MDMSS.\+[0-9]\{1,3\}\"" | cut -d\" -f4) # fi # if [ -n "$QTEMP" ]; then # CTEMP=$(echo $QTEMP | grep -o -i "[0-9]\{1,3\}")$(printf "\xc2\xb0")"C" # fi echo "${temperature}" } #获取连接状态 # $1:AT串口 # $2:连接定义 quectel_get_connect_status() { local at_port="$1" local define_connect="$2" #默认值为1 [ -z "$define_connect" ] && { define_connect="1" } at_command="AT+CGPADDR=${define_connect}" local ipv4=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+CGPADDR: " | awk -F'"' '{print $2}') local not_ip="0.0.0.0" #设置连接状态 local connect_status if [ -z "$ipv4" ] || [[ "$ipv4" = *"$not_ip"* ]]; then connect_status="disconnect" else connect_status="connect" fi #方法二 # at_command="AT+QNWINFO" # local response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+QNWINFO:") # local connect_status # if [[ "$response" = *"No Service"* ]]; then # connect_status="disconnect" # elif [[ "$response" = *"Unknown Service"* ]]; then # connect_status="disconnect" # else # connect_status="connect" # fi echo "$connect_status" } #基本信息 quectel_base_info() { debug "Quectel base info" #Name（名称） at_command="AT+CGMM" name=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | sed 's/\r//g') #Manufacturer（制造商） at_command="AT+CGMI" manufacturer=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | sed 's/\r//g') #Revision（固件版本） at_command="ATI" revision=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "Revision:" | sed 's/Revision: //g' | sed 's/\r//g') # at_command="AT+CGMR" # revision=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | sed 's/\r//g') #Mode（拨号模式） mode=$(quectel_get_mode $at_port | tr 'a-z' 'A-Z') #Temperature（温度） temperature=$(quectel_get_temperature $at_port) } #获取SIM卡状态 # $1:SIM卡状态标志 quectel_get_sim_status() { local sim_status case $1 in "") sim_status="miss" ;; *"READY"*) sim_status="ready" ;; *"SIM PIN"*) sim_status="MT is waiting SIM PIN to be given" ;; *"SIM PUK"*) sim_status="MT is waiting SIM PUK to be given" ;; *"PH-FSIM PIN"*) sim_status="MT is waiting phone-to-SIM card password to be given" ;; *"PH-FSIM PIN"*) sim_status="MT is waiting phone-to-very first SIM card password to be given" ;; *"PH-FSIM PUK"*) sim_status="MT is waiting phone-to-very first SIM card unblocking password to be given" ;; *"SIM PIN2"*) sim_status="MT is waiting SIM PIN2 to be given" ;; *"SIM PUK2"*) sim_status="MT is waiting SIM PUK2 to be given" ;; *"PH-NET PIN"*) sim_status="MT is waiting network personalization password to be given" ;; *"PH-NET PUK"*) sim_status="MT is waiting network personalization unblocking password to be given" ;; *"PH-NETSUB PIN"*) sim_status="MT is waiting network subset personalization password to be given" ;; *"PH-NETSUB PUK"*) sim_status="MT is waiting network subset personalization unblocking password to be given" ;; *"PH-SP PIN"*) sim_status="MT is waiting service provider personalization password to be given" ;; *"PH-SP PUK"*) sim_status="MT is waiting service provider personalization unblocking password to be given" ;; *"PH-CORP PIN"*) sim_status="MT is waiting corporate personalization password to be given" ;; *"PH-CORP PUK"*) sim_status="MT is waiting corporate personalization unblocking password to be given" ;; *) sim_status="unknown" ;; esac echo "$sim_status" } #SIM卡信息 quectel_sim_info() { debug "Quectel sim info" #SIM Slot（SIM卡卡槽） at_command="AT+QUIMSLOT?" sim_slot=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+QUIMSLOT:" | awk -F' ' '{print $2}' | sed 's/\r//g') #IMEI（国际移动设备识别码） at_command="AT+CGSN" imei=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | sed 's/\r//g') #SIM Status（SIM状态） at_command="AT+CPIN?" sim_status_flag=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p') sim_status=$(quectel_get_sim_status "$sim_status_flag") if [ "$sim_status" != "ready" ]; then return fi #ISP（互联网服务提供商） at_command="AT+COPS?" isp=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | awk -F'"' '{print $2}') # if [ "$isp" = "CHN-CMCC" ] || [ "$isp" = "CMCC" ]|| [ "$isp" = "46000" ]; then # isp="中国移动" # # elif [ "$isp" = "CHN-UNICOM" ] || [ "$isp" = "UNICOM" ] || [ "$isp" = "46001" ]; then # elif [ "$isp" = "CHN-UNICOM" ] || [ "$isp" = "CUCC" ] || [ "$isp" = "46001" ]; then # isp="中国联通" # # elif [ "$isp" = "CHN-CT" ] || [ "$isp" = "CT" ] || [ "$isp" = "46011" ]; then # elif [ "$isp" = "CHN-TELECOM" ] || [ "$isp" = "CTCC" ] || [ "$isp" = "46011" ]; then # isp="中国电信" # fi #SIM Number（SIM卡号码，手机号） at_command="AT+CNUM" sim_number=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | awk -F'"' '{print $4}') #IMSI（国际移动用户识别码） at_command="AT+CIMI" imsi=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | sed -n '2p' | sed 's/\r//g') #ICCID（集成电路卡识别码） at_command="AT+ICCID" # iccid=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep -o "+ICCID:[ ]*[-0-9]\+" | grep -o "[-0-9]\{1,4\}") } #获取信号强度指示 # $1:信号强度指示数字 quectel_get_rssi() { local rssi case $1 in "99") rssi="unknown" ;; * ) rssi=$((2 * $1 - 113)) ;; esac echo "$rssi" } #网络信息 quectel_network_info() { debug "Quectel network info" #Connect Status（连接状态） connect_status=$(quectel_get_connect_status ${at_port} ${define_connect}) if [ "$connect_status" != "connect" ]; then return fi #Network Type（网络类型） # at_command="AT+COPS?" at_command="AT+QNWINFO" network_type=$(sh ${SCRIPT_DIR}/modem_at.sh ${at_port} ${at_command} | grep "+QNWINFO:" | awk -F'"' '{print $2}') #CSQ（信号强度） at_command="AT+CSQ" response=$(sh ${SCRIPT_DIR}/modem_at.sh ${at_port} ${at_command} | grep "+CSQ:" | sed 's/+CSQ: //g' | sed 's/\r//g') #RSSI（信号强度指示） # rssi_num=$(echo $response | awk -F',' '{print $1}') # rssi=$(quectel_get_rssi $rssi_num) #Ber（信道误码率） # ber=$(echo $response | awk -F',' '{print $2}') #PER（信号强度） # if [ -n "$csq" ]; then # per=$((csq * 100/31))"%" # fi #最大比特率，信道质量指示 at_command='AT+QNWCFG="nr5g_ambr"' response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+QNWCFG:") for context in $response; do local apn=$(echo "$context" | awk -F'"' '{print $4}' | tr 'a-z' 'A-Z') if [ -n "$apn" ] && [ "$apn" != "IMS" ]; then #CQL UL（上行信道质量指示） cqi_ul=$(echo "$context" | awk -F',' '{print $5}') #CQI DL（下行信道质量指示） cqi_dl=$(echo "$context" | awk -F',' '{print $3}') #AMBR UL（上行签约速率，单位，Mbps） ambr_ul=$(echo "$context" | awk -F',' '{print $6}' | sed 's/\r//g') #AMBR DL（下行签约速率，单位，Mbps） ambr_dl=$(echo "$context" | awk -F',' '{print $4}') break fi done #速率统计 at_command='AT+QNWCFG="up/down"' response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command | grep "+QNWCFG:" | sed 's/+QNWCFG: "up\/down",//g' | sed 's/\r//g') #当前上传速率（单位，Byte/s） tx_rate=$(echo $response | awk -F',' '{print $1}') #当前下载速率（单位，Byte/s） rx_rate=$(echo $response | awk -F',' '{print $2}') } #获取频段 # $1:网络类型 # $2:频段数字 quectel_get_band() { local band case $1 in "WCDMA") band="$2" ;; "LTE") band="$2" ;; "NR") band="$2" ;; esac echo "$band" } quectel_get_lockband_qualcomm() { local at_port="$1" debug "Quectel sdx55 get lockband info" get_wcdma_config_command='AT+QNWPREFCFG="gw_band"' get_lte_config_command='AT+QNWPREFCFG="lte_band"' get_nsa_nr_config_command='AT+QNWPREFCFG="nsa_nr5g_band"' get_sa_nr_config_command='AT+QNWPREFCFG="nr5g_band"' wcdma_avalible_band="1,2,3,4,5,6,7,8,9,19" lte_avalible_band="1,2,3,4,5,7,8,12,13,14,17,18,19,20,25,26,28,29,30,32,34,38,39,40,41,42,66,71" nsa_nr_avalible_band="1,2,3,5,7,8,12,20,25,28,38,40,41,48,66,71,77,78,79,257,258,260,261" sa_nr_avalible_band="1,2,3,5,7,8,12,20,25,28,38,40,41,48,66,71,77,78,79" gw_band=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $get_wcdma_config_command |grep -e "+QNWPREFCFG: " ) lte_band=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $get_lte_config_command|grep -e "+QNWPREFCFG: ") nsa_nr_band=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $get_nsa_nr_config_command|grep -e "+QNWPREFCFG: ") sa_nr_band=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $get_sa_nr_config_command|grep -e "+QNWPREFCFG: ") json_init json_add_object "available_band" for i in $(echo "$wcdma_avalible_band" | awk -F"," '{for(j=1; j<=NF; j++) print $j}'); do json_add_string "UMTS_$i" "UMTS_$i" done for i in $(echo "$lte_avalible_band" | awk -F"," '{for(j=1; j<=NF; j++) print $j}'); do json_add_string "LTE_B$i" "LTE_B$i" done for i in $(echo "$nsa_nr_avalible_band" | awk -F"," '{for(j=1; j<=NF; j++) print $j}'); do json_add_string "NSA_NR_N$i" "NSA_NR_N$i" done for i in $(echo "$sa_nr_avalible_band" | awk -F"," '{for(j=1; j<=NF; j++) print $j}'); do json_add_string "SA_NR_N$i" "SA_NR_N$i" done json_close_object json_add_array "lock_band" #+QNWPREFCFG: "nr5g_band",1:3:7:20:28:40:41:71:77:78:79 for i in $(echo "$gw_band" | cut -d, -f2 |tr -d '\r' | awk -F":" '{for(j=1; j<=NF; j++) print $j}'); do if [ -n "$i" ]; then json_add_string "" "UMTS_$i" fi done for i in $(echo "$lte_band" | cut -d, -f2|tr -d '\r' | awk -F":" '{for(j=1; j<=NF; j++) print $j}'); do if [ -n "$i" ]; then json_add_string "" "LTE_B$i" fi done for i in $(echo "$nsa_nr_band" | cut -d, -f2|tr -d '\r' | awk -F":" '{for(j=1; j<=NF; j++) print $j}'); do if [ -n "$i" ]; then json_add_string "" "NSA_NR_N$i" fi done for i in $(echo "$sa_nr_band" | cut -d, -f2|tr -d '\r' | awk -F":" '{for(j=1; j<=NF; j++) print $j}'); do if [ -n "$i" ]; then json_add_string "" "SA_NR_N$i" fi done json_close_array json_result=`json_dump` echo "$json_result" } convert2band() { hex_band=$1 hex=$(echo $hex_band | grep -o "[0-9A-F]\{1,16\}") if [ -z "$hex" ]; then echo Invalid band fi band_list="" bin=$(echo "ibase=16;obase=2;$hex" | bc) len=${#bin} for i in $(seq 1 ${#bin}); do if [ ${bin:$i-1:1} = "1" ]; then band_list=$band_list"\n"$((len - i + 1)) fi done echo -e $band_list | sort -n | tr '\n' ' ' } convert2hex() { band_list=$1 #splite band_list band_list=$(echo $band_list | tr ',' '\n' | sort -n | uniq) hex="0" for band in $band_list; do add_hex=$(echo "obase=16;2^($band - 1 )" | bc) hex=$(echo "obase=16;ibase=16;$hex + $add_hex" | bc) done if [ -n $hex ]; then echo $hex else echo Invalid band fi } quectel_get_lockband_lte() { local at_port="$1" local commamd="AT+QCFG=\"band\"" LTE_LOCK=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port "$commamd" |grep '+QCFG:'| awk -F, '{print $3}' | sed 's/"//g' | tr '[:a-z:]' '[:A-Z:]') if [ -z "$LOCK_BAND" ]; then LOCK_BAND="Unknown" fi LOCK_BAND=$(convert2band $LTE_LOCK) json_init json_add_object available_band json_add_string "1" "B01" json_add_string "3" "B03" json_add_string "5" "B05" json_add_string "7" "B07" json_add_string "8" "B08" json_add_string "20" "B20" json_add_string "34" "B34" json_add_string "38" "B38" json_add_string "39" "B39" json_add_string "40" "B40" json_add_string "41" "B41" json_close_object json_add_array "lock_band" for band in $(echo $LOCK_BAND | tr ',' '\n' | sort -n | uniq); do json_add_string "" $band done json_close_array json_close_object json_dump } quectel_get_lockband_generic() { local at_port="$1" local lte_lockband_cmd="AT+QCFG=?" local nr_lockband_cmd="AT+QNWPREFCFG=?" lte_response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $lte_lockband_cmd | grep "+QCFG:") nr_response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $nr_lockband_cmd | grep "+QNWPREFCFG:") if [ -n "$lte_response" ]; then quectel_get_lockband_lte $at_port else quectel_get_lockband_qualcomm $at_port fi } quectel_get_lockband() { local at_port="$1" local platform local modem_number=$(uci -q get modem.@global[0].modem_number) for i in $(seq 0 $((modem_number-1))); do local at_port_tmp=$(uci -q get modem.modem$i.at_port) if [ "$at_port" = "$at_port_tmp" ]; then platform=$(uci -q get modem.modem$i.platform) break fi done case "$platform" in "qualcomm") quectel_get_lockband_qualcomm $at_port ;; "unisoc") quectel_get_lockband_unisoc $at_port ;; *) quectel_get_lockband_generic $at_port ;; esac } quectel_set_lockband_generic() { local lte_lockband_cmd="AT+QCFG=?" local nr_lockband_cmd="AT+QNWPREFCFG=?" lte_response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $lte_lockband_cmd | grep "+QCFG:") nr_response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $nr_lockband_cmd | grep "+QNWPREFCFG:") if [ -n "$lte_response" ]; then quectel_set_lockband_lte $1 $2 else quectel_set_lockband_qualcomm $1 $2 fi } quectel_set_lockband_lte() { at_port=$1 band=$2 if [ -z $band ]; then echo "Invalid band" fi hex=$(convert2hex $band) sh ${SCRIPT_DIR}/modem_at.sh $at_port 'AT+QCFG="band",0,'${hex}',0' 2>&1 > /dev/null } quectel_set_lockband_qualcomm(){ local at_port="$1" local lock_band="$2" gw_band="" lte_band="" nsa_nr_band="" sa_nr_band="" for i in $(echo $2 | awk -F"," '{for(j=1; j<=NF; j++) print $j}' );do num_match=$(echo $i | grep -o "[0-9]\+") case "$i" in UMTS_*) if [ -z "$gw_band" ]; then gw_band=$num_match else gw_band=$gw_band:$num_match fi ;; LTE_B*) if [ -z "$lte_band" ]; then lte_band=$num_match else lte_band=$lte_band:$num_match fi ;; NSA_NR_N*) if [ -z "$nsa_nr_band" ]; then nsa_nr_band=$num_match else nsa_nr_band=$nsa_nr_band:$num_match fi ;; SA_NR_N*) if [ -z "$sa_nr_band" ]; then sa_nr_band=$num_match else sa_nr_band=$sa_nr_band:$num_match fi ;; esac done if [ -n "$gw_band" ]; then at_command="AT+QNWPREFCFG=\"gw_band\",$gw_band" res1=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) fi if [ -n "$lte_band" ]; then at_command="AT+QNWPREFCFG=\"lte_band\",$lte_band" res2=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) fi if [ -n "$nsa_nr_band" ]; then at_command="AT+QNWPREFCFG=\"nsa_nr5g_band\",$nsa_nr_band" res3=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) fi if [ -n "$sa_nr_band" ]; then at_command="AT+QNWPREFCFG=\"nr5g_band\",$sa_nr_band" res4=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) fi json_init json_add_string result1 "$res1" json_add_string result2 "$res2" json_add_string result3 "$res3" json_add_string result4 "$res4" json_result=`json_dump` echo "$json_result" } #设置锁频 quectel_set_lockband() { debug "quectel set lockband info" local at_port="$1" local platform local modem_number=$(uci -q get modem.@global[0].modem_number) for i in $(seq 0 $((modem_number-1))); do local at_port_tmp=$(uci -q get modem.modem$i.at_port) if [ "$at_port" = "$at_port_tmp" ]; then platform=$(uci -q get modem.modem$i.platform) break fi done case "$platform" in "qualcomm") quectel_set_lockband_qualcomm $at_port $2 ;; "unisoc") quectel_set_lockband_unisoc $at_port $2 ;; "generic") quectel_set_lockband_generic $at_port $2 ;; esac } quectel_get_neighborcell_qualcomm(){ local at_port="$1" local at_command='AT+QENG="neighbourcell"' nr_lock_check="AT+QNWLOCK=\"common\/5g\"" lte_lock_check="AT+QNWLOCK=\"common\/4g\"" lte_status=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $lte_lock_check | grep "+QNWLOCK:") lte_lock_status=$(echo $lte_status | awk -F',' '{print $2}') lte_lock_freq=$(echo $lte_status | awk -F',' '{print $3}') lte_lock_pci=$(echo $lte_status | awk -F',' '{print $4}') nr_status=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $nr_lock_check | grep "+QNWLOCK:") nr_lock_status=$(echo $nr_status | awk -F',' '{print $2}') nr_lock_pci=$(echo $nr_status | awk -F',' '{print $3}') nr_lock_freq=$(echo $nr_status | awk -F',' '{print $4}') nr_lock_scs=$(echo $nr_status | awk -F',' '{print $5}') nr_lock_band=$(echo $nr_status | awk -F',' '{print $6}') if [ "$lte_lock_status" = "1" ]; then lte_lock_status="locked" else lte_lock_status="" fi if [ "$nr_lock_status" = "1" ]; then nr_lock_status="locked" else nr_lock_status="" fi sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command > /tmp/quectel_neighborcell json_init json_add_object "Feature" json_add_string "Unlock" "2" json_add_string "Lock PCI" "1" json_add_string "Reboot Modem" "4" json_add_string "Manually Search" "3" json_close_object json_add_array "NR" json_close_array json_add_array "LTE" json_close_array json_add_object "lockcell_status" if [ -n "$lte_lock_status" ]; then json_add_string "LTE" "$lte_lock_status" json_add_string "LTE_Freq" "$lte_lock_freq" json_add_string "LTE_PCI" "$lte_lock_pci" else json_add_string "LTE" "unlock" fi if [ -n "$nr_lock_status" ]; then json_add_string "NR" "$nr_lock_status" json_add_string "NR_Freq" "$nr_lock_freq" json_add_string "NR_PCI" "$nr_lock_pci" json_add_string "NR_SCS" "$nr_lock_scs" json_add_string "NR_Band" "$nr_lock_band" else json_add_string "NR" "unlock" fi json_close_object while read line; do if [ -n "$(echo $line | grep "+QENG:")" ]; then # +QENG: "neighbourcell intra","LTE",,,< # RSRQ>,,,,,,,, # …] # [+QENG: "neighbourcell inter","LTE",,,< # RSRQ>,,,,,,, # …] # [+QENG:"neighbourcell","WCDMA",,,,,,, # …] line=$(echo $line | sed 's/+QENG: //g') case $line in *WCDMA*) type="WCDMA" arfcn=$(echo $line | awk -F',' '{print $3}') pci=$(echo $line | awk -F',' '{print $4}') rscp=$(echo $line | awk -F',' '{print $6}') ecno=$(echo $line | awk -F',' '{print $7}') ;; *LTE*) type="LTE" neighbourcell=$(echo $line | awk -F',' '{print $1}' | tr -d '"') arfcn=$(echo $line | awk -F',' '{print $3}') pci=$(echo $line | awk -F',' '{print $4}') rsrp=$(echo $line | awk -F',' '{print $5}') rsrq=$(echo $line | awk -F',' '{print $6}') ;; *NR*) type="NR" arfcn=$(echo $line | awk -F',' '{print $3}') pci=$(echo $line | awk -F',' '{print $4}') rsrp=$(echo $line | awk -F',' '{print $5}') rsrq=$(echo $line | awk -F',' '{print $6}') ;; esac json_select $type json_add_object "" json_add_string "neighbourcell" "$neighbourcell" json_add_string "arfcn" "$arfcn" json_add_string "pci" "$pci" json_add_string "rscp" "$rscp" json_add_string "ecno" "$ecno" json_add_string "rsrp" "$rsrp" json_add_string "rsrq" "$rsrq" json_close_object json_select ".." fi done < /tmp/quectel_neighborcell json_result=`json_dump` echo "$json_result" } quectel_get_neighborcell_lte(){ local at_port="$1" local at_command='AT+QENG="neighbourcell"' lte_lock_check="AT+QNWLOCK=\"common/lte\"" lte_status=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $lte_lock_check | grep "+QNWLOCK:") lte_lock_status=$(echo $lte_status | awk -F',' '{print $2}') lte_lock_freq=$(echo $lte_status | awk -F',' '{print $3}') lte_lock_pci=$(echo $lte_status | awk -F',' '{print $4}') lte_lock_finish=$(echo $lte_status | awk -F',' '{print $5}') if [ "$lte_lock_finish" == "1" ]; then lte_lock_finish="finish" else lte_lock_finish="not finish" fi if [ "$lte_lock_status" == "1" ]; then lte_lock_status="locked arfcn,$lte_lock_finish" elif [ "$lte_lock_status" == "2" ]; then lte_lock_status="lock pci,$lte_lock_finish" else lte_lock_status="" fi sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command > /tmp/quectel_neighborcell json_init json_add_object "Feature" json_add_string "Unlock" "5" json_add_string "Lock PCI" "6" json_add_string "Lock ARFCN" "7" json_close_object json_add_array "NR" json_close_array json_add_array "LTE" json_close_array json_add_object "lockcell_status" if [ -n "$lte_lock_status" ]; then json_add_string "lockcell_status" "$lte_lock_status" json_add_string "arfcn" "$lte_lock_freq" json_add_string "pci" "$lte_lock_pci" else json_add_string "lockcell_status" "unlock" fi json_close_object while read line; do if [ -n "$(echo $line | grep "+QENG:")" ]; then # +QENG: "neighbourcell intra","LTE",,,< # RSRQ>,,,,,,,, # …] # [+QENG: "neighbourcell inter","LTE",,,< # RSRQ>,,,,,,, # …] # [+QENG:"neighbourcell","WCDMA",,,,,,, # …] line=$(echo $line | sed 's/+QENG: //g') case $line in *LTE*) type="LTE" neighbourcell=$(echo $line | awk -F',' '{print $1}' | tr -d '"') arfcn=$(echo $line | awk -F',' '{print $3}') pci=$(echo $line | awk -F',' '{print $4}') rsrq=$(echo $line | awk -F',' '{print $5}') rsrp=$(echo $line | awk -F',' '{print $6}') ;; esac json_select $type json_add_object "" json_add_string "neighbourcell" "$neighbourcell" json_add_string "arfcn" "$arfcn" json_add_string "pci" "$pci" json_add_string "rsrp" "$rsrp" json_add_string "rsrq" "$rsrq" json_close_object json_select ".." fi done < /tmp/quectel_neighborcell json_result=`json_dump` echo "$json_result" } quectel_get_neighborcell(){ debug "quectel set lockband info" local at_port="$1" local platform local modem_number=$(uci -q get modem.@global[0].modem_number) for i in $(seq 0 $((modem_number-1))); do local at_port_tmp=$(uci -q get modem.modem$i.at_port) if [ "$at_port" = "$at_port_tmp" ]; then platform=$(uci -q get modem.modem$i.platform) break fi done case "$platform" in "qualcomm") quectel_get_neighborcell_qualcomm $at_port ;; "unisoc") quectel_get_neighborcell_unisoc $at_port ;; *) quectel_get_neighborcell_lte $at_port ;; esac } quectel_setlockcell(){ #at_port,func,celltype,arfcn,pci,scs,nrband # "lockpci" "1" # "unlockcell" "2" # "manually search" "3" # "reboot modem" "4" local at_port="$1" local func="$2" local cell_type="$3" local arfcn="$4" local pci="$5" local scs="$6" local nrband="$7" case $func in "1") quectel_lockpci $at_port $cell_type $arfcn $pci $scs $nrband ;; "2") quectel_unlockcell $at_port ;; "4") sh ${SCRIPT_DIR}/modem_reboot.sh $at_port at+cfun=1,1 ;; "5") quectel_unlockcell_lte $at_port ;; "6") quectel_lockpci_lte $at_port $cell_type $arfcn $pci $scs $nrband ;; "7") quectel_lockarfn_lte $at_port $cell_type $arfcn $pci $scs $nrband ;; esac } quectel_unlockcell(){ unlock4g="AT+QNWLOCK=\"common/4g\",0" unlocknr="AT+QNWLOCK=\"common/5g\",0" res2=$(sh ${SCRIPT_DIR}/modem_at.sh $1 $unlocknr) res3=$(sh ${SCRIPT_DIR}/modem_at.sh $1 $unlock4g) } quectel_unlockcell_lte(){ unlocklte="AT+QNWLOCK=\"common/lte\",0" res1=$(sh ${SCRIPT_DIR}/modem_at.sh $1 $unlocklte) } quectel_lockpci_nr(){ local at_port="$1" local cell_type="$2" local arfcn="$3" local pci="$4" local scs="$5" local nrband="$6" case $scs in 0) scs=15;; 1) scs=30;; 2) scs=60;; esac if [ "$cell_type" = "0" ]; then lock4g="AT+QNWLOCK=\"common/4g\",1,$arfcn,$pci" res=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $locklte) elif [ "$cell_type" = "1" ]; then locknr="AT+QNWLOCK=\"common/5g\",1,$pci,$arfcn,$scs,$nrband" echo $locknr res=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $locknr) fi } quectel_lockpci_lte(){ local at_port="$1" local cell_type="$2" local arfcn="$3" local pci="$4" local scs="$5" local nrband="$6" locklte="AT+QNWLOCK=\"common/lte\",2,$arfcn,$pci" res=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $locklte) } quectel_lockarfn_lte(){ local at_port="$1" local cell_type="$2" local arfcn="$3" local pci="$4" local scs="$5" local nrband="$6" locklte="AT+QNWLOCK=\"common/lte\",1,$arfcn" res=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $locklte) } #UL_bandwidth # $1:上行带宽数字 quectel_get_lte_ul_bandwidth() { local ul_bandwidth case $1 in "0") ul_bandwidth="1.4" ;; "1") ul_bandwidth="3" ;; "2"|"3"|"4"|"5") ul_bandwidth=$((($1 - 1) * 5)) ;; esac echo "$ul_bandwidth" } #DL_bandwidth # $1:下行带宽数字 quectel_get_lte_dl_bandwidth() { local dl_bandwidth case $1 in "0") dl_bandwidth="1.4" ;; "1") dl_bandwidth="3" ;; "2"|"3"|"4"|"5") dl_bandwidth=$((($1 - 1) * 5)) ;; esac echo "$dl_bandwidth" } #NR_DL_bandwidth # $1:下行带宽数字 quectel_get_nr_dl_bandwidth() { local nr_dl_bandwidth case $1 in "0"|"1"|"2"|"3"|"4"|"5") nr_dl_bandwidth=$((($1 + 1) * 5)) ;; "6"|"7"|"8"|"9"|"10"|"11"|"12") nr_dl_bandwidth=$((($1 - 2) * 10)) ;; "13") nr_dl_bandwidth="200" ;; "14") nr_dl_bandwidth="400" ;; esac echo "$nr_dl_bandwidth" } #获取NR子载波间隔 # $1:NR子载波间隔数字 quectel_get_scs() { local scs case $1 in "0") scs="15" ;; "1") scs="30" ;; "2") scs="60" ;; "3") scs="120" ;; "4") scs="240" ;; *) scs=$(awk "BEGIN{ print 2^$1 * 15 }") ;; esac echo "$scs" } #获取物理信道 # $1:物理信道数字 quectel_get_phych() { local phych case $1 in "0") phych="DPCH" ;; "1") phych="FDPCH" ;; esac echo "$phych" } #获取扩频因子 # $1:扩频因子数字 quectel_get_sf() { local sf case $1 in "0"|"1"|"2"|"3"|"4"|"5"|"6"|"7") sf=$(awk "BEGIN{ print 2^$(($1+2)) }") ;; "8") sf="UNKNOWN" ;; esac echo "$sf" } #获取插槽格式 # $1:插槽格式数字 quectel_get_slot() { local slot=$1 # case $1 in # "0"|"1"|"2"|"3"|"4"|"5"|"6"|"7"|"8"|"9"|"10"|"11"|"12"|"13"|"14"|"15"|"16") slot=$1 ;; # "0"|"1"|"2"|"3"|"4"|"5"|"6"|"7"|"8"|"9") slot=$1 ;; # esac echo "$slot" } #小区信息 quectel_cell_info() { debug "Quectel cell info" at_command='AT+QENG="servingcell"' response=$(sh ${SCRIPT_DIR}/modem_at.sh $at_port $at_command) local lte=$(echo "$response" | grep "+QENG: \"LTE\"") local nr5g_nsa=$(echo "$response" | grep "+QENG: \"NR5G-NSA\"") if [ -n "$lte" ] && [ -n "$nr5g_nsa" ] ; then #EN-DC模式 network_mode="EN-DC Mode" #LTE endc_lte_duplex_mode=$(echo "$lte" | awk -F',' '{print $2}' | sed 's/"//g') endc_lte_mcc=$(echo "$lte" | awk -F',' '{print $3}') endc_lte_mnc=$(echo "$lte" | awk -F',' '{print $4}') endc_lte_cell_id=$(echo "$lte" | awk -F',' '{print $5}') endc_lte_physical_cell_id=$(echo "$lte" | awk -F',' '{print $6}') endc_lte_earfcn=$(echo "$lte" | awk -F',' '{print $7}') endc_lte_freq_band_ind_num=$(echo "$lte" | awk -F',' '{print $8}') endc_lte_freq_band_ind=$(quectel_get_band "LTE" $endc_lte_freq_band_ind_num) ul_bandwidth_num=$(echo "$lte" | awk -F',' '{print $9}') endc_lte_ul_bandwidth=$(quectel_get_lte_ul_bandwidth $ul_bandwidth_num) dl_bandwidth_num=$(echo "$lte" | awk -F',' '{print $10}') endc_lte_dl_bandwidth=$(quectel_get_lte_dl_bandwidth $dl_bandwidth_num) endc_lte_tac=$(echo "$lte" | awk -F',' '{print $11}') endc_lte_rsrp=$(echo "$lte" | awk -F',' '{print $12}') endc_lte_rsrq=$(echo "$lte" | awk -F',' '{print $13}') endc_lte_rssi=$(echo "$lte" | awk -F',' '{print $14}') endc_lte_sinr=$(echo "$lte" | awk -F',' '{print $15}') endc_lte_cql=$(echo "$lte" | awk -F',' '{print $16}') endc_lte_tx_power=$(echo "$lte" | awk -F',' '{print $17}') endc_lte_srxlev=$(echo "$lte" | awk -F',' '{print $18}' | sed 's/\r//g') #NR5G-NSA endc_nr_mcc=$(echo "$nr5g_nsa" | awk -F',' '{print $2}') endc_nr_mnc=$(echo "$nr5g_nsa" | awk -F',' '{print $3}') endc_nr_physical_cell_id=$(echo "$nr5g_nsa" | awk -F',' '{print $4}') endc_nr_rsrp=$(echo "$nr5g_nsa" | awk -F',' '{print $5}') endc_nr_sinr=$(echo "$nr5g_nsa" | awk -F',' '{print $6}') endc_nr_rsrq=$(echo "$nr5g_nsa" | awk -F',' '{print $7}') endc_nr_arfcn=$(echo "$nr5g_nsa" | awk -F',' '{print $8}') endc_nr_band_num=$(echo "$nr5g_nsa" | awk -F',' '{print $9}') endc_nr_band=$(quectel_get_band "NR" $endc_nr_band_num) nr_dl_bandwidth_num=$(echo "$nr5g_nsa" | awk -F',' '{print $10}') endc_nr_dl_bandwidth=$(quectel_get_nr_dl_bandwidth $nr_dl_bandwidth_num) scs_num=$(echo "$nr5g_nsa" | awk -F',' '{print $16}' | sed 's/\r//g') endc_nr_scs=$(quectel_get_scs $scs_num) else #SA，LTE，WCDMA模式 response=$(echo "$response" | grep "+QENG:") local rat=$(echo "$response" | awk -F',' '{print $3}' | sed 's/"//g') case $rat in "NR5G-SA") network_mode="NR5G-SA Mode" nr_duplex_mode=$(echo "$response" | awk -F',' '{print $4}' | sed 's/"//g') nr_mcc=$(echo "$response" | awk -F',' '{print $5}') nr_mnc=$(echo "$response" | awk -F',' '{print $6}') nr_cell_id=$(echo "$response" | awk -F',' '{print $7}') nr_physical_cell_id=$(echo "$response" | awk -F',' '{print $8}') nr_tac=$(echo "$response" | awk -F',' '{print $9}') nr_arfcn=$(echo "$response" | awk -F',' '{print $10}') nr_band_num=$(echo "$response" | awk -F',' '{print $11}') nr_band=$(quectel_get_band "NR" $nr_band_num) nr_dl_bandwidth_num=$(echo "$response" | awk -F',' '{print $12}') nr_dl_bandwidth=$(quectel_get_nr_dl_bandwidth $nr_dl_bandwidth_num) nr_rsrp=$(echo "$response" | awk -F',' '{print $13}') nr_rsrq=$(echo "$response" | awk -F',' '{print $14}') nr_sinr=$(echo "$response" | awk -F',' '{print $15}') nr_scs_num=$(echo "$response" | awk -F',' '{print $16}') nr_scs=$(quectel_get_scs $nr_scs_num) nr_srxlev=$(echo "$response" | awk -F',' '{print $17}' | sed 's/\r//g') ;; "LTE"|"CAT-M"|"CAT-NB") network_mode="LTE Mode" lte_duplex_mode=$(echo "$response" | awk -F',' '{print $4}' | sed 's/"//g') lte_mcc=$(echo "$response" | awk -F',' '{print $5}') lte_mnc=$(echo "$response" | awk -F',' '{print $6}') lte_cell_id=$(echo "$response" | awk -F',' '{print $7}') lte_physical_cell_id=$(echo "$response" | awk -F',' '{print $8}') lte_earfcn=$(echo "$response" | awk -F',' '{print $9}') lte_freq_band_ind_num=$(echo "$response" | awk -F',' '{print $10}') lte_freq_band_ind=$(quectel_get_band "LTE" $lte_freq_band_ind_num) ul_bandwidth_num=$(echo "$response" | awk -F',' '{print $11}') lte_ul_bandwidth=$(quectel_get_lte_ul_bandwidth $ul_bandwidth_num) dl_bandwidth_num=$(echo "$response" | awk -F',' '{print $12}') lte_dl_bandwidth=$(quectel_get_lte_dl_bandwidth $dl_bandwidth_num) lte_tac=$(echo "$response" | awk -F',' '{print $13}') lte_rsrp=$(echo "$response" | awk -F',' '{print $14}') lte_rsrq=$(echo "$response" | awk -F',' '{print $15}') lte_rssi=$(echo "$response" | awk -F',' '{print $16}') lte_sinr=$(echo "$response" | awk -F',' '{print $17}') lte_cql=$(echo "$response" | awk -F',' '{print $18}') lte_tx_power=$(echo "$response" | awk -F',' '{print $19}') lte_srxlev=$(echo "$response" | awk -F',' '{print $20}' | sed 's/\r//g') ;; "WCDMA") network_mode="WCDMA Mode" wcdma_mcc=$(echo "$response" | awk -F',' '{print $4}') wcdma_mnc=$(echo "$response" | awk -F',' '{print $5}') wcdma_lac=$(echo "$response" | awk -F',' '{print $6}') wcdma_cell_id=$(echo "$response" | awk -F',' '{print $7}') wcdma_uarfcn=$(echo "$response" | awk -F',' '{print $8}') wcdma_psc=$(echo "$response" | awk -F',' '{print $9}') wcdma_rac=$(echo "$response" | awk -F',' '{print $10}') wcdma_rscp=$(echo "$response" | awk -F',' '{print $11}') wcdma_ecio=$(echo "$response" | awk -F',' '{print $12}') wcdma_phych_num=$(echo "$response" | awk -F',' '{print $13}') wcdma_phych=$(quectel_get_phych $wcdma_phych_num) wcdma_sf_num=$(echo "$response" | awk -F',' '{print $14}') wcdma_sf=$(quectel_get_sf $wcdma_sf_num) wcdma_slot_num=$(echo "$response" | awk -F',' '{print $15}') wcdma_slot=$(quectel_get_slot $wcdma_slot_num) wcdma_speech_code=$(echo "$response" | awk -F',' '{print $16}') wcdma_com_mod=$(echo "$response" | awk -F',' '{print $17}' | sed 's/\r//g') ;; esac fi return NR_NSA=$(echo $response | grep -o -i "+QENG:[ ]\?\"NR5G-NSA\",") NR_SA=$(echo $response | grep -o -i "+QENG: \"SERVINGCELL\",[^,]\+,\"NR5G-SA\",\"[DFT]\{3\}\",") if [ -n "$NR_NSA" ]; then QENG=",,"$(echo $response" " | grep -o -i "+QENG: \"LTE\".\+\"NR5G-NSA\"," | tr " " ",") QENG5=$(echo $response | grep -o -i "+QENG:[ ]\?\"NR5G-NSA\",[0-9]\{3\},[0-9]\{2,3\},[0-9]\{1,5\},-[0-9]\{2,5\},[-0-9]\{1,3\},-[0-9]\{2,3\},[0-9]\{1,7\},[0-9]\{1,3\}.\{1,6\}") if [ -z "$QENG5" ]; then QENG5=$(echo $response | grep -o -i "+QENG:[ ]\?\"NR5G-NSA\",[0-9]\{3\},[0-9]\{2,3\},[0-9]\{1,5\},-[0-9]\{2,3\},[-0-9]\{1,3\},-[0-9]\{2,3\}") if [ -n "$QENG5" ]; then QENG5=$QENG5",," fi fi elif [ -n "$NR_SA" ]; then QENG=$(echo $NR_SA | tr " " ",") QENG5=$(echo $response | grep -o -i "+QENG: \"SERVINGCELL\",[^,]\+,\"NR5G-SA\",\"[DFT]\{3\}\",[ 0-9]\{3,4\},[0-9]\{2,3\},[0-9A-F]\{1,10\},[0-9]\{1,5\},[0-9A-F]\{2,6\},[0-9]\{6,7\},[0-9]\{1,3\},[0-9]\{1,2\},-[0-9]\{2,5\},-[0-9]\{2,3\},[-0-9]\{1,3\}") else QENG=$(echo $response" " | grep -o -i "+QENG: [^ ]\+ " | tr " " ",") fi RAT=$(echo $QENG | cut -d, -f4 | grep -o "[-A-Z5]\{3,7\}") case $RAT in "GSM") # MODE="GSM" ;; "WCDMA") channel=$(echo $QENG | cut -d, -f9) rscp="-"$(echo $QENG | cut -d, -f12 | grep -o "[0-9]\{1,3\}") ecio=$(echo $QENG | cut -d, -f13) ecio="-"$(echo $ecio | grep -o "[0-9]\{1,3\}") ;; "LTE"|"CAT-M"|"CAT-NB") PCI=$(echo $QENG | cut -d, -f9) channel=$(echo $QENG | cut -d, -f10) LBAND=$(echo $QENG | cut -d, -f11 | grep -o "[0-9]\{1,3\}") BW=$(echo $QENG | cut -d, -f12) lte_bw BWU=$BW BW=$(echo $QENG | cut -d, -f13) lte_bw BWD=$BW if [ -z "$BWD" ]; then BWD="unknown" fi if [ -z "$BWU" ]; then BWU="unknown" fi if [ -n "$LBAND" ]; then LBAND="B"$LBAND" (Bandwidth $BWD MHz Down | $BWU MHz Up)" fi RSRP=$(echo $QENG | cut -d, -f15 | grep -o "[0-9]\{1,3\}") if [ -n "$RSRP" ]; then RSCP="-"$RSRP RSRPLTE=$RSCP fi rsrq=$(echo $QENG | cut -d, -f16 | grep -o "[0-9]\{1,3\}") if [ -n "$rsrq" ]; then ecio="-"$rsrq fi rssi=$(echo $QENG | cut -d, -f17 | grep -o "\-[0-9]\{1,3\}") if [ -n "$rssi" ]; then CSQ_RSSI=$rssi" dBm" fi sinrr=$(echo $QENG | cut -d, -f18 | grep -o "[0-9]\{1,3\}") if [ -n "$sinrr" ]; then if [ $sinrr -le 25 ]; then sinrr=$((($(echo $sinrr) * 2) -20))" dB" fi fi if [ -n "$NR_NSA" ]; then if [ -n "$QENG5" ] && [ -n "$LBAND" ] && [ "$RSCP" != "-" ] && [ "$ecio" != "-" ]; then PCI="$PCI, "$(echo $QENG5 | cut -d, -f4) SCHV=$(echo $QENG5 | cut -d, -f8) SLBV=$(echo $QENG5 | cut -d, -f9) BW=$(echo $QENG5 | cut -d, -f10 | grep -o "[0-9]\{1,3\}") if [ -n "$SLBV" ]; then LBAND=$LBAND"
n"$SLBV if [ -n "$BW" ]; then nr_bw LBAND=$LBAND" (Bandwidth $BW MHz)" fi if [ "$SCHV" -ge 123400 ]; then channel=$channel", "$SCHV else channel=$channel", -" fi else LBAND=$LBAND"
nxx (unknown NR5G band)" channel=$channel", -" fi RSCP=$RSCP" dBm
"$(echo $QENG5 | cut -d, -f5) sinrr=$(echo $QENG5 | cut -d, -f6 | grep -o "[0-9]\{1,3\}") if [ -n "$sinrr" ]; then if [ $sinrr -le 30 ]; then SINR=$SINR"
"$((($(echo $sinrr) * 2) -20))" dB" fi fi ecio=$ecio" (4G) dB
"$(echo $QENG5 | cut -d, -f7)" (5G) " fi fi if [ -z "$LBAND" ]; then LBAND="-" else if [ -n "$QCA" ]; then QCA=$(echo $QCA | grep -o "\"S[CS]\{2\}\"[-0-9A-Z,\"]\+") for QCAL in $(echo "$QCA"); do if [ $(echo "$QCAL" | cut -d, -f7) = "2" ]; then SCHV=$(echo $QCAL | cut -d, -f2 | grep -o "[0-9]\+") SRATP="B" if [ -n "$SCHV" ]; then channel="$channel, $SCHV" if [ "$SCHV" -gt 123400 ]; then SRATP="n" fi fi SLBV=$(echo $QCAL | cut -d, -f6 | grep -o "[0-9]\{1,2\}") if [ -n "$SLBV" ]; then LBAND=$LBAND"
"$SRATP$SLBV BWD=$(echo $QCAL | cut -d, -f3 | grep -o "[0-9]\{1,3\}") if [ -n "$BWD" ]; then UPDOWN=$(echo $QCAL | cut -d, -f13) case "$UPDOWN" in "UL" ) CATYPE="CA"$(printf "\xe2\x86\x91") ;; "DL" ) CATYPE="CA"$(printf "\xe2\x86\x93") ;; * ) CATYPE="CA" ;; esac if [ $BWD -gt 14 ]; then LBAND=$LBAND" ("$CATYPE", Bandwidth "$(($(echo $BWD) / 5))" MHz)" else LBAND=$LBAND" ("$CATYPE", Bandwidth 1.4 MHz)" fi fi LBAND=$LBAND fi PCI="$PCI, "$(echo $QCAL | cut -d, -f8) fi done fi fi if [ $RAT = "CAT-M" ] || [ $RAT = "CAT-NB" ]; then LBAND="B$(echo $QENG | cut -d, -f11) ($RAT)" fi ;; "NR5G-SA") if [ -n "$QENG5" ]; then #AT+qnwcfg="NR5G_AMBR" #查询速度 PCI=$(echo $QENG5 | cut -d, -f8) channel=$(echo $QENG5 | cut -d, -f10) LBAND=$(echo $QENG5 | cut -d, -f11) BW=$(echo $QENG5 | cut -d, -f12) nr_bw LBAND="n"$LBAND" (Bandwidth $BW MHz)" RSCP=$(echo $QENG5 | cut -d, -f13) ecio=$(echo $QENG5 | cut -d, -f14) if [ "$CSQ_PER" = "-" ]; then RSSI=$(rsrp2rssi $RSCP $BW) CSQ_PER=$((100 - (($RSSI + 51) * 100/-62)))"%" CSQ=$((($RSSI + 113) / 2)) CSQ_RSSI=$RSSI" dBm" fi SINRR=$(echo $QENG5 | cut -d, -f15 | grep -o "[0-9]\{1,3\}") if [ -n "$SINRR" ]; then if [ $SINRR -le 30 ]; then SINR=$((($(echo $SINRR) * 2) -20))" dB" fi fi fi ;; esac } # SIMCOM获取基站信息 Quectel_Cellinfo() { # return #cellinfo0.gcom OX1=$( sh modem_at.sh $at_port "AT+COPS=3,0;+COPS?") OX2=$( sh modem_at.sh $at_port "AT+COPS=3,2;+COPS?") OX=$OX1" "$OX2 #cellinfo.gcom OY1=$( sh modem_at.sh $at_port "AT+CREG=2;+CREG?;+CREG=0") OY2=$( sh modem_at.sh $at_port "AT+CEREG=2;+CEREG?;+CEREG=0") OY3=$( sh modem_at.sh $at_port "AT+C5GREG=2;+C5GREG?;+C5GREG=0") OY=$OY1" "$OY2" "$OY3 OXx=$OX OX=$(echo $OX | tr 'a-z' 'A-Z') OY=$(echo $OY | tr 'a-z' 'A-Z') OX=$OX" "$OY #debug "$OX" #debug "$OY" COPS="-" COPS_MCC="-" COPS_MNC="-" COPSX=$(echo $OXx | grep -o "+COPS: [01],0,.\+," | cut -d, -f3 | grep -o "[^\"]\+") if [ "x$COPSX" != "x" ]; then COPS=$COPSX fi COPSX=$(echo $OX | grep -o "+COPS: [01],2,.\+," | cut -d, -f3 | grep -o "[^\"]\+") if [ "x$COPSX" != "x" ]; then COPS_MCC=${COPSX:0:3} COPS_MNC=${COPSX:3:3} if [ "$COPS" = "-" ]; then COPS=$(awk -F[\;] '/'$COPS'/ {print $2}' $ROOTER/signal/mccmnc.data) [ "x$COPS" = "x" ] && COPS="-" fi fi if [ "$COPS" = "-" ]; then COPS=$(echo "$O" | awk -F[\"] '/^\+COPS: 0,0/ {print $2}') if [ "x$COPS" = "x" ]; then COPS="-" COPS_MCC="-" COPS_MNC="-" fi fi COPS_MNC=" "$COPS_MNC OX=$(echo "${OX//[ \"]/}") CID="" CID5="" RAT="" REGV=$(echo "$OX" | grep -o "+C5GREG:2,[0-9],[A-F0-9]\{2,6\},[A-F0-9]\{5,10\},[0-9]\{1,2\}") if [ -n "$REGV" ]; then LAC5=$(echo "$REGV" | cut -d, -f3) LAC5=$LAC5" ($(printf "%d" 0x$LAC5))" CID5=$(echo "$REGV" | cut -d, -f4) CID5L=$(printf "%010X" 0x$CID5) RNC5=${CID5L:1:6} RNC5=$RNC5" ($(printf "%d" 0x$RNC5))" CID5=${CID5L:7:3} CID5="Short $(printf "%X" 0x$CID5) ($(printf "%d" 0x$CID5)), Long $(printf "%X" 0x$CID5L) ($(printf "%d" 0x$CID5L))" RAT=$(echo "$REGV" | cut -d, -f5) fi REGV=$(echo "$OX" | grep -o "+CEREG:2,[0-9],[A-F0-9]\{2,4\},[A-F0-9]\{5,8\}") REGFMT="3GPP" if [ -z "$REGV" ]; then REGV=$(echo "$OX" | grep -o "+CEREG:2,[0-9],[A-F0-9]\{2,4\},[A-F0-9]\{1,3\},[A-F0-9]\{5,8\}") REGFMT="SW" fi if [ -n "$REGV" ]; then LAC=$(echo "$REGV" | cut -d, -f3) LAC=$(printf "%04X" 0x$LAC)" ($(printf "%d" 0x$LAC))" if [ $REGFMT = "3GPP" ]; then CID=$(echo "$REGV" | cut -d, -f4) else CID=$(echo "$REGV" | cut -d, -f5) fi CIDL=$(printf "%08X" 0x$CID) RNC=${CIDL:1:5} RNC=$RNC" ($(printf "%d" 0x$RNC))" CID=${CIDL:6:2} CID="Short $(printf "%X" 0x$CID) ($(printf "%d" 0x$CID)), Long $(printf "%X" 0x$CIDL) ($(printf "%d" 0x$CIDL))" else REGV=$(echo "$OX" | grep -o "+CREG:2,[0-9],[A-F0-9]\{2,4\},[A-F0-9]\{2,8\}") if [ -n "$REGV" ]; then LAC=$(echo "$REGV" | cut -d, -f3) CID=$(echo "$REGV" | cut -d, -f4) if [ ${#CID} -gt 4 ]; then LAC=$(printf "%04X" 0x$LAC)" ($(printf "%d" 0x$LAC))" CIDL=$(printf "%08X" 0x$CID) RNC=${CIDL:1:3} CID=${CIDL:4:4} CID="Short $(printf "%X" 0x$CID) ($(printf "%d" 0x$CID)), Long $(printf "%X" 0x$CIDL) ($(printf "%d" 0x$CIDL))" else LAC="" fi else LAC="" fi fi REGSTAT=$(echo "$REGV" | cut -d, -f2) if [ "$REGSTAT" == "5" -a "$COPS" != "-" ]; then COPS_MNC=$COPS_MNC" (Roaming)" fi if [ -n "$CID" -a -n "$CID5" ] && [ "$RAT" == "13" -o "$RAT" == "10" ]; then LAC="4G $LAC, 5G $LAC5" CID="4G $CID
5G $CID5" RNC="4G $RNC, 5G $RNC5" elif [ -n "$CID5" ]; then LAC=$LAC5 CID=$CID5 RNC=$RNC5 fi if [ -z "$LAC" ]; then LAC="-" CID="-" RNC="-" fi } #获取Quectel模块信息 # $1:AT串口 get_quectel_info() { debug "get quectel info" #设置AT串口 at_port="$1" define_connect="$2" #基本信息 quectel_base_info #SIM卡信息 quectel_sim_info if [ "$sim_status" != "ready" ]; then return fi #网络信息 quectel_network_info if [ "$connect_status" != "connect" ]; then return fi #小区信息 quectel_cell_info return # Quectel_Cellinfo # OX=$( sh modem_at.sh $at_port "AT+QCAINFO" | grep "+QCAINFO:" ) QCA=$(echo $OX" " | grep -o -i "+QCAINFO: \"S[CS]\{2\}\".\+NWSCANMODE" | tr " " ",") # OX=$( sh modem_at.sh $at_port 'AT+QCFG="nwscanmode"' | grep "+QCAINFO:" ) QNSM=$(echo $OX | grep -o -i "+QCFG: \"NWSCANMODE\",[0-9]") QNSM=$(echo "$QNSM" | grep -o "[0-9]") if [ -n "$QNSM" ]; then MODTYPE="6" case $QNSM in "0" ) NETMODE="1" ;; "1" ) NETMODE="3" ;; "2"|"5" ) NETMODE="5" ;; "3" ) NETMODE="7" ;; esac fi if [ -n "$QNWP" ]; then MODTYPE="6" case $QNWP in "AUTO" ) NETMODE="1" ;; "WCDMA" ) NETMODE="5" ;; "LTE" ) NETMODE="7" ;; "LTE:NR5G" ) NETMODE="8" ;; "NR5G" ) NETMODE="9" ;; esac fi # OX=$( sh modem_at.sh $at_port 'AT+QNWPREFCFG="mode_pref"' | grep "+QNWPREFCFG:" ) QNWP=$(echo $OX | grep -o -i "+QNWPREFCFG: \"MODE_PREF\",[A-Z5:]\+" | cut -d, -f2) # OX=$( sh modem_at.sh $at_port "AT+QRSRP" | grep "+QRSRP:" ) QRSRP=$(echo "$OX" | grep -o -i "+QRSRP:[^,]\+,-[0-9]\{1,5\},-[0-9]\{1,5\},-[0-9]\{1,5\}[^ ]*") if [ -n "$QRSRP" ] && [ "$RAT" != "WCDMA" ]; then QRSRP1=$(echo $QRSRP | cut -d, -f1 | grep -o "[-0-9]\+") QRSRP2=$(echo $QRSRP | cut -d, -f2) QRSRP3=$(echo $QRSRP | cut -d, -f3) QRSRP4=$(echo $QRSRP | cut -d, -f4) QRSRPtype=$(echo $QRSRP | cut -d, -f5) if [ "$QRSRPtype" == "NR5G" ]; then if [ -n "$NR_SA" ]; then RSCP=$QRSRP1 if [ -n "$QRPRP2" -a "$QRSRP2" != "-32768" ]; then RSCP1="RxD "$QRSRP2 fi if [ -n "$QRSRP3" -a "$QRSRP3" != "-32768" ]; then RSCP=$RSCP" dBm
"$QRSRP3 fi if [ -n "$QRSRP4" -a "$QRSRP4" != "-32768" ]; then RSCP1="RxD "$QRSRP4 fi else RSCP=$RSRPLTE if [ -n "$QRSRP1" -a "$QRSRP1" != "-32768" ]; then RSCP=$RSCP" (4G) dBm
"$QRSRP1 if [ -n "$QRSRP2" -a "$QRSRP2" != "-32768" ]; then RSCP="$RSCP,$QRSRP2" if [ -n "$QRSRP3" -a "$QRSRP3" != "-32768" ]; then RSCP="$RSCP,$QRSRP3" if [ -n "$QRSRP4" -a "$QRSRP4" != "-32768" ]; then RSCP="$RSCP,$QRSRP4" fi fi RSCP=$RSCP" (5G) " fi fi fi elif [ "$QRSRP2$QRSRP3$QRSRP4" != "-44-44-44" -a -z "$QENG5" ]; then RSCP=$QRSRP1 if [ "$QRSRP3$QRSRP4" == "-140-140" -o "$QRSRP3$QRSRP4" == "-44-44" -o "$QRSRP3$QRSRP4" == "-32768-32768" ]; then RSCP1="RxD "$(echo $QRSRP | cut -d, -f2) else RSCP=$RSCP" dBm (RxD "$QRSRP2" dBm)
"$QRSRP3 RSCP1="RxD "$QRSRP4 fi fi fi }