From c76a3765c4eafa95cbaea1bf84f9568ed8279035 Mon Sep 17 00:00:00 2001
From: Andy Herkey <a.herkey@comcast.net>
Date: Thu, 16 Oct 2008 18:39:06 -0400
Subject: [PATCH] Applied Andy Herkey's new modemtest.rb script to contrib/

This script is from his Oct 8, 2008 email to the mailing list.
---
 ChangeLog            |  2 ++
 contrib/modemtest.rb | 55 ++++++++++++++++++++++++++++++++++++++++++----------
 2 files changed, 47 insertions(+), 10 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 4f403a54..97a71ce2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -3,6 +3,8 @@ Release: version 0.15 - 2008/10/??
 2008/10/16
 	- applied Andy Herkey's modemtest.rb ruby script to contrib/
 		from his Aug 9, 2008 email to the mailing list
+	- applied Andy Herkey's new modemtest.rb script to contrib/
+		from his Oct 8, 2008 email to the mailing list
 2008/09/24
 	- version bump:
 		- configure.ac
diff --git a/contrib/modemtest.rb b/contrib/modemtest.rb
index 5f75580b..aaee1c4c 100755
--- a/contrib/modemtest.rb
+++ b/contrib/modemtest.rb
@@ -1,7 +1,7 @@
 #!/usr/bin/env ruby
 
 #Change the $PPP variable to point to where pppob is installed.
-$PPP="/usr/local/sbin/pppob -l /tmp/modemtest.log"
+$PPP="/usr/local/sbin/pppob -vP xxxxx -l /tmp/modemtest.log"
 
 class IPmodem
 
@@ -36,13 +36,50 @@ class IPmodem
    end
 end
 
-
-commands = [ "AT", "AT&F", "ATZ", "ATE0V1", "ATS0=0", "ATE0V1", "ATI1",
-             "AT+CIMI", "AT+CGMI", "AT+CGDCONT?", "AT+GMI", "AT+GMM",
-             "AT+GMR", "AT+GSN", "AT+CBC", "AT+CBIP", "AT+GCAP=?", "AT+CSQ",
-             "AT+CSQ?", "AT+CSQ=?", "AT+CSS", "AT+CSS?", "AT+CSS=?",
-             "AT+CCED?", "AT+ESR", "AT+CIND=?", "AT+FCLASS=?", "AT&V",
-             "AT+CGMR", "AT+CAD?", "AT$QCMIPGETP=1" ]
+commands = [
+	"+++AT",
+	"AT",
+	"AT&F",
+	"ATZ",
+	"ATS0=0",
+	"ATE0",
+	"ATE0V1",
+	"ATE0V1Q0X4",
+	"AT+CRC=1",
+	"AT+SPSERVICE",
+	"AT+SPSERVICE",
+	"AT$QCMIPP?",
+	"AT$QCMIPP=?",
+	"AT+CSQ",
+	"AT+CSQ?",
+	"AT+CSQ=?",
+	"AT+CSS",
+	"AT+CSS?",
+	"AT+CSS=?",
+	"ATI1",
+	"ATI2",
+	"ATI3",
+	"AT+CAD?",
+	"AT+CIMI",
+	"AT+CGMI",
+	"AT+CGMR",
+	"AT+CGDCONT?",
+	"AT+GMI",
+	"AT+GMM",
+	"AT+GMR",
+	"AT+GSN",
+	"AT+CBC",
+	"AT+CBIP",
+	"AT+CCED?",
+	"AT+ESR",
+	"AT+CIND=?",
+	"AT+FCLASS=?",
+	"AT+GCAP=?",
+	"AT$SPMDN?",
+	"AT$QCMIPGETP=1",
+	"AT&V",
+	"ATH"
+]
 
 modem = IPmodem.new
 puts("Testing the Blackberry Modem by sending AT commands through pppob.") 
@@ -55,5 +92,3 @@ commands.each {|c|
          puts("--------------------------------------------")
 
          }
-
-
-- 
2.11.4.GIT