[openwrt/openwrt] comgt: add new script to send ussd request and get the answer

[LEDE Commits]

ynezz pushed a commit to openwrt/openwrt.git, branch master:
https://git.openwrt.org/667fbb8151c7348283985f28c43aeb848f948350

commit 667fbb8151c7348283985f28c43aeb848f948350
Author: Kirill Lukonin <klukonin at gmail.com>
AuthorDate: Fri Mar 20 14:08:52 2020 +0500

    comgt: add new script to send ussd request and get the answer
    
    New script for comgt. Should help to fetch balance or any additional information with USSD.
    This script uses the standard AT command which should be supported by all modems.
    
    Run-tested on: Mikrotik wAP LTE KIT
    
    Signed-off-by: Kirill Lukonin <klukonin at gmail.com>
    [fixed from/sob]
    Signed-off-by: Petr Štetiar <ynezz at true.cz>
---
 package/network/utils/comgt/files/ussd.gcom | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/package/network/utils/comgt/files/ussd.gcom b/package/network/utils/comgt/files/ussd.gcom
new file mode 100644
index 0000000000..c5be80b2d7
--- /dev/null
+++ b/package/network/utils/comgt/files/ussd.gcom
@@ -0,0 +1,21 @@
+opengt
+ set com 115200n81
+ set comecho off
+ set senddelay 0.02
+ waitquiet 0.2 0.2
+ flash 0.1
+
+:start
+ send "AT+CUSD=1,"
+ send $env("ussd")
+ send ",15"
+ send "^m"
+ waitfor 120 "+CUSD:"
+ if % = -1 goto timeout
+ get 1 "^m" $s
+ print $s
+ exit 0
+
+:timeout
+ print "ERROR: no USSD response, timeout.\n"
+ exit 1