树莓派.GPRS.短信接收器

import java.io.ioexception;
import java.util.date;
import com.common.datetimeutil;
import com.common.stringutil;
import com.pi4j.io.serial.baud;
import com.pi4j.io.serial.databits;
import com.pi4j.io.serial.flowcontrol;
import com.pi4j.io.serial.parity;
import com.pi4j.io.serial.serial;
import com.pi4j.io.serial.serialconfig;
import com.pi4j.io.serial.serialfactory;
import com.pi4j.io.serial.serialport;
import com.pi4j.io.serial.stopbits;
import com.pi4j.util.commandargumentparser;
import com.pi4j.util.console;
/**
 * this example code demonstrates how to perform serial communications using the raspberry pi.
 *
 * @author robert savage
 */
public class seriallistensms {
 /**
  * this example program supports the following optional command arguments/options:
  * "--device (device-path)"     [default: /dev/ttyama0]
  * "--baud (baud-rate)"      [default: 38400]
  * "--data-bits (5|6|7|8)"     [default: 8]
  * "--parity (none|odd|even)"     [default: none]
  * "--stop-bits (1|2)"      [default: 1]
  * "--flow-control (none|hardware|software)" [default: none]
  *
  * @param args
  * @throws interruptedexception
  * @throws ioexception
  */
 public static void main(string args[]) throws interruptedexception, ioexception {
  // !! attention !!
  // by default, the serial port is configured as a console port
  // for interacting with the linux os shell. if you want to use
  // the serial port in a software program, you must disable the
  // os from using this port.
  //
  // please see this blog article for instructions on how to disable
  // the os console for this port:
  // https://www.cube-controls.com/2015/11/02/disable-serial-port-terminal-output-on-raspbian/
  // create pi4j console wrapper/helper
  // (this is a utility class to abstract some of the boilerplate code)
  final console console = new console();
  // print program title/header
  console.title("<-- the pi4j project -->", "监听串口(gpio15-tx / gpio16-rx)数据并写入memcached中");
  // allow for user to exit program using ctrl-c
  console.promptforexit();
  // create an instance of the serial communications class
  final serial serial = serialfactory.createinstance();
  byte [] data = new byte[1024];  //数据缓冲区  
  try {
   // create serial config object
   serialconfig config = new serialconfig();
   system.out.println(">>>"+serialport.getdefaultport());
   config.device(serialport.getdefaultport())  // "/dev/ttyacm0"
     .baud(baud._115200)
     .databits(databits._8)
     .parity(parity.none)
     .stopbits(stopbits._1)
     .flowcontrol(flowcontrol.none);
   // parse optional command argument options to override the default serial settings.
   if(args.length > 0){
    config = commandargumentparser.getserialconfig(config, args);
   }
   // display connection details
   console.box(" connecting to: " + config.tostring(),
     " data received on serial port will be displayed below.");
   // open the default serial device/port with the configuration settings
   serial.open(config);
   serial.flush();
   system.out.println("serial.isopen():"+serial.isopen());
   /**初始化gprs模块**/
   boolean isinit = initgprs(serial);
   long trydelay = 2000;
   while(!isinit){
    system.out.println("初始化gprs模块不成功, 请检查模块工作状态灯, 以及sim卡是否接触良好..."+trydelay);
    thread.sleep(trydelay+=1000);
    isinit = initgprs(serial);
    if(trydelay>(10*1000)){return;}  //检测10次都不成功时, 退出程序
   }
   /**初始化短信参数**/
   isinit = initgprs_sms(serial);
   trydelay = 2000;
   while(!isinit){
    system.out.println("初始化短信参数不成功, 请检查模块工作状态灯, 以及sim卡是否接触良好.");
    thread.sleep(trydelay+=1000);
    isinit = initgprs_sms(serial);
    if(trydelay>(10*1000)){return;}  //检测10次都不成功时, 退出程序
   }
   //每次开机时尝试读取一次存储卡中的短信
   string res = new string(sendcmd(serial, "at+cmgl=\"all\""), "gbk");
   system.out.println("at+cmgl=\"rec read\".res:"+res);
   if(res.indexof("ok")==-1){
    system.out.println("设置失败!");
   }
   //下面进入主程序
   system.out.println("进入短信监听程序:");
   long old_msg_delay = 60000;   //设置旧短信搜索间隔时间(毫秒),在sim卡内存中搜索数据
   long old_msg_count = 0;    //旧短信计时器
   int index = 1;
   data = null;
   while(true){
    system.out.print(".");
    if(!serial.isopen()){
     system.out.println("串口未打开, 退出程序");
     break;
    } 
    if(old_msg_count>=old_msg_delay){
     //
     system.out.println("发送获取sim卡内存中的所有信息的指令");
     sendcmd(serial, "at+cmgl=\"all\"");
     old_msg_count = 0;
    }else{
     old_msg_count+=1000;
     //system.out.println("old_msg_count..."+old_msg_count);
    }
    if(serial.available()>0){
     while(serial.available()>0){
      data=serial.read();    //此处接收到的数据上限是1024
      //system.out.print(new string(serial.read(), "utf-8"));
     }
     serial.flush();
    }
    if(data!=null){
     //接收到数据
     string cc = new string(data, "gbk");  //处理中文
     system.out.println("cc:"+cc);
     if(cc!=null && !cc.trim().equals("")){
      //处理数据
      /**
       * 有新短信时:
       * +ciev: "message",1
       * 
       * +cmti: "sm",1
       */
      if(cc.indexof("+cmti")!=-1){
       index = getindexfromnewsms(cc);
       system.out.println("发现新短信.index:"+index);
       sendcmd(serial, "at+cmgr="+index);
      }
      if(cc.indexof("+cmgr")!=-1){
       string[] contents = getcontentfromindex(index, cc);
       system.out.println("[at+cmgr=index]读取存在卡上的短信内容.分析后:");
       if(contents!=null){
        system.out.println("新短信内容:");
        for(string tt : contents){
         system.out.println(tt);
        }
        //保存读到的短信 -> 服务器
        if(senddatatoserver(contents)){
         //删除已读出的短信
         system.out.println("删除已读出的新短信.index:"+contents[0]);
         delsmsbyindex(serial, integer.parseint(contents[0]));
        }
       }else{
        system.out.println("新短信内容:null");
       }
      }
      /**
       * 查询旧短信时:
       * at+cmgl="all"
       * 
       * +cmgl: 1,"rec read","18620671820",,"2017/10/26,11:37:03+08",161,25
       * just because the people11
       * +cmgl: 2,"rec read","18620671820",,"2017/10/26,11:37:03+08",161,25
       * just because the people11
       */
      if(cc.indexof("cmgl:")!=-1){
       //获取第1条短信
       string[] contents = getcontentfromstoragesms(cc);
       system.out.println("[at+cmgl=\"all\"]存在卡上的短信内容.分析后:");
       for(string tt : contents){
        system.out.println(tt);
       }
       //保存读到的短信
       if(senddatatoserver(contents)){
        //删除已读出的短信
        system.out.println("删除已读出的旧短信.index:"+contents[0]);
        delsmsbyindex(serial, integer.parseint(contents[0]));
       }
      }
     }else{
      system.out.println("data:"+new string(data));
      system.out.println("data(byte[]) 转换成 string时出错");
     }
    }
    //if(cc!=null && !cc.trim().equals(""))system.out.println(cc);
    data = null;
    thread.sleep(1000);
   }
  }
  catch(ioexception ex) {
   console.println(" ==>> serial setup failed : " + ex.getmessage());
   return;
  }
 }
 /**
  * 把短信上传到服务器中
  * @param contents 数组
    [0] - 短信位置索引
    [1] - 电话号码
    [2] - 日期+时间 2017/10/26 11:37:03+08
    [3] - 短信内容
  * @return
  */
 public static boolean senddatatoserver(string[] contents){
  system.out.println("尝试上传短信数据");
  try{
   //移除时间中的时区 +08 2017/10/26 12:38:14+08...2017-10-26 12:38:14
   string d = contents[2].substring(0,contents[2].lastindexof("+"));
   d = d.replace("/", "-").replace(" ", "%20");
   stringbuffer url = new stringbuffer("http://192.168.6.2:9080/webservice.do?method=savesmsbank");
   string vno = datetimeutil.datetostring(new date(), "yyyymmdd");
   vno = stringutil.encodepassword(vno, "md5");
   url.append("&vno=").append(vno);
   url.append("&smstype=0");
   url.append("&port=2");
   url.append("&rectime=").append(d);  //need: 2013-12-05%2014:35:20
   url.append("&phone=").append(contents[1]);
   url.append("&serialno=0");
   url.append("&nums=0");
   url.append("&submitport=0");
   url.append("&sendid=").append(contents[1]);
   url.append("&sendtype=0");
   url.append("&sendno=0");
   string xx = new string(contents[3].getbytes(), "utf-8");
   url.append("&txt=").append(java.net.urlencoder.encode(xx, "utf-8"));
   system.out.println("senddatatoserver().url:"+url.tostring());
   string resurl = stringutil.getcontentbyurl2(url.tostring());
   system.out.println("senddatatoserver().resurl:"+resurl);
   if(resurl.trim().equals("200")){
    system.out.println("数据上传成功!");
    return true;
   }else if(resurl.trim().equals("401")){
    system.out.println("这个电话号码和短信内容已上传过, 数据重复!");
    system.out.println("清除sim卡上的短信!");
    return true;
   }
  }catch(exception e){
   e.printstacktrace();
   return false;
  }
  return false;
 }
 /**
  * 解析返回的短信内容
  * @return
  */
 public static string[] getcontentfromindex(int index, string res){
  try{
   system.out.println("尝试读取短信...getcontentfromindex.res:"+res);
   if(res.indexof("ok")!=-1){
    system.out.println("获取短信成功,解析内容...");
    /**
     * +cmgr: "rec read","18620671820",,"2017/10/26,11:37:03+08",161,17,0,0,"+8613010200500",145,25
     * just because the people11
     * 
     * +cmgr: "rec read","18620671820",,"2017/10/26,11:37:03+08",161,17,0,0,"+8613010200500",145,25
     * ---------------- ------------- - ---------- ----------- --- -- - - ---------------- --- --
     * [0]    [1]   [2] [3]  [4]   [5] [6][7][8] [9]   [10][11]
     */
    string[] ccs = res.split("\r\n");
    string phone = new string();
    string senddate = new string();
    string content = new string();
    boolean isvalid = false;   //数据获取成功
    for(int i=0;i<ccs.length;i++){
     if(ccs[i].indexof("cmgr:")!=-1){
      string[] temp1 = ccs[i].split(",");
      phone = temp1[1];
      senddate = temp1[3]+" "+temp1[4];
      content = ccs[i+1];
      isvalid = true;
      break;  //只处理1条
     }
    }
    if(!isvalid)return null;
    //处理双引号
    phone = phone.substring(1,phone.length()-1);
    senddate = senddate.substring(1,senddate.length()-1);
    string[] resu = new string[4];
    resu[0] = string.valueof(index);
    resu[1] = phone.trim();
    resu[2] = senddate;
    resu[3] = content;
    return resu;
   }else if(res.indexof("cms error")!=-1){
    //cms error:321 表示所读取的内存位置出错,一般是指定位置无短信内容所致
    system.out.println("获取短信失败,错误内容...");
    return null;
   }
  }catch(exception e){
   e.printstacktrace();
  }
  return null;
 }
 /**
  * 有新短信时,获取短信内容: 
  * +ciev: "message",1
  * 
  * +cmti: "sm",1
  * 
  * @return index 短信所在的内存位置 index
  */
 public static int getindexfromnewsms(string cc){
  try{
   string[] ccs = cc.split("\r\n");
   for(string v : ccs){
    if(v.indexof("cmti: \"sm\",")!=-1){
     string c = v.substring(v.indexof(",")+1);
     return integer.parseint(c);
    }
   }
  }catch(exception e){
   e.printstacktrace();
  }
  return 0;
 }
 /**
  * 查询旧短信, 每次只抓1条:
  * +cmgl: 4,"rec read","106907931100",,"2017/07/02,10:15:19+08"
  * -------- ---------- -------------- ----------- ------------
  * [0]  [1]  [2]   [3] [4]  [5]
  【小米】[小米移动]您2017年6月共消费1.32元，当前余额97.88元。其中：数据流量费1.32元；语音通信费0元；短/彩信费0元
  +cmgl: 5,"rec read","106908761100",,"2017/08/02,10:15:30+08"
  。查询账单 http://10046.mi.com 。
  +cmgl: 6,"rec read","106908761100",,"2017/08/02,10:15:30+08"
  【小米】[小米移动]您2017年7月共消费0.81元，当前余额97.01元。其中：数据流量费0.81元；语音通信费0元；短/彩信费0元
  ok
  @return 数组
    [0] - 短信位置索引
    [1] - 电话号码
    [2] - 日期+时间
    [3] - 短信内容
  */
 public static string[] getcontentfromstoragesms(string cc){
  string[] ccs = cc.split("\r\n");
  string smsindex = new string();
  string phone = new string();
  string senddate = new string();
  string content = new string();
  for(int i=0;i<ccs.length;i++){
   if(ccs[i].indexof("cmgl:")!=-1){
    //smsindex = integer.parseint(ccs[i].substring(ccs[i].indexof("cmgl:")+5, ccs[i].indexof(",")));
    smsindex = ccs[i].substring(ccs[i].indexof("cmgl:")+5, ccs[i].indexof(","));
    string[] temp1 = ccs[i].split(",");
    phone = temp1[2];
    senddate = temp1[4]+" "+temp1[5];
    content = ccs[i+1];
    break;  //只处理1条
   }
  }
  //处理双引号
  phone = phone.substring(1,phone.length()-1);
  senddate = senddate.substring(1,senddate.length()-1);
  string[] res = new string[4];
  res[0] = smsindex.trim();
  res[1] = phone.trim();
  res[2] = senddate;
  res[3] = content;
  return res;
 }
 /**
  * 删除指定位置上的短信
  * at+cmgd=4
  * @param index 短信索引位置
  * @return
  */
 public static boolean delsmsbyindex(serial serial, int index){
  string res = new string(sendcmd(serial, "at+cmgd="+index));
  system.out.println("at+cmgd="+index+":"+res);
  //if(res.indexof("ok")==-1){
  // system.out.println("删除["+index+"]位置的短信失败!");
  // return false;
  //}
  return true;
 }
 /**
  * 
  *   初始化gprs.模块
  *   at  100ms 握手 / sim卡检测等
  *   at+cpin? 100ms 查询是否检测到sim卡
  *   at+csq 100ms 信号质量测试，值为0-31,31表示最好
  *   at+ccid 100ms 读取sim的ccid(sim卡背面20位数字)，可以检测是否有sim卡或者是否接触良好
  *   at+creg? 500ms 检测是否注册网络
  * @return
  */
 public static boolean initgprs(serial serial){
  if(!serial.isopen()){return false;}  //串口未准备好
  byte[] buffs = new byte[128];
  try{
   system.out.println("try send at to module...");
   //char cmd[] = {'a', 't'};
   //byte cmd[] = "at".getbytes();
   //buffs = sendcmd(serial, "at".getbytes());
   system.out.print("\r\ngprs模块检测中...");
   buffs = sendcmd(serial, "at");
   string res = new string(buffs);
   if(res.indexof("ok")==-1){
    system.out.println("gprs模块未准备好, 请检查电源和串口波特率是否正确!");
    return false;
   }
   system.out.println(" ...[正常]\r\n");
   //system.out.println("at.res:"+res);
   system.out.print("\r\n检测sim卡...");
   res = new string(sendcmd(serial, "at+cpin?"));
   if(res.indexof("ready")==-1){
    system.out.println("sim卡未准备好!");
    return false;
   }
   system.out.println(" ...[正常]\r\n");
   //system.out.println("at+cpin?.res:"+res);
   system.out.print("\r\n信号质量测试，值为0-31,31表示最好...");
   res = new string(sendcmd(serial, "at+csq"));
   if(res.indexof("error")!=-1){
    system.out.println("信号质量测试检测失败");
    return false;
   }
   /**
    * +csq: 24,99
    */
   string[] vs = res.split("\r\n");
   for(string v : vs){
    if(v.indexof(":")!=-1){
     string x = v.substring(v.indexof(":")+1);
     //system.out.println("x:"+x);
     system.out.println(" ...信号强度:["+x.trim()+"]\r\n");
    }
   }
   //system.out.println("at+csq.res:"+res);
   res = new string(sendcmd(serial, "at+ccid"));
   system.out.println("at+ccid.res:"+res);
   res = new string(sendcmd(serial, "at+creg?"));
   system.out.println("at+creg.res:"+res);
  }catch(exception e){
   e.printstacktrace();
   return false;
  }
  return true;
 }
 /**
  * 
  * 初始化gprs.设置短信模式及短信接收参数
  *   at+cmgf=1    0-pdu, 1-文本格式
  *  at+csdh=1
  *  at+cpms="sm","sm","sm" 将信息保存在sim卡中, sm-表示存在sim卡上
  *  at+cnmi=2,1,0,1,1  收接通知,并存在指定位置(与at+cpms设置有关)
  * 
  * 设置好后, 收到短信:
  *   +ciev: "message",1
  *   +cmti: "sm",1   表示存储位置index=1
  * @return
  */
 public static boolean initgprs_sms(serial serial){
  if(!serial.isopen()){return false;}  //串口未准备好
  string res = new string();
  try{
   system.out.print("\r\n设置短信格式...");
   res = new string(sendcmd(serial, "at+cmgf=1"));
   if(res.indexof("ok")==-1){
    system.out.println("设置失败!");
    return false;
   }
   system.out.println(" ...[文本格式]\r\n");
   thread.sleep(100);
   system.out.print("\r\nat+csdh=1...");
   res = new string(sendcmd(serial, "at+csdh=1"));
   if(res.indexof("ok")==-1){
    system.out.println("设置失败!");
    return false;
   }
   system.out.println(" ...[done]\r\n");
   thread.sleep(100);
   system.out.print("\r\n设置信息保存位置...");
   res = new string(sendcmd(serial, "at+cpms=\"sm\",\"sm\",\"sm\""));
   if(res.indexof("ok")==-1){
    system.out.println("设置失败!");
    return false;
   }
   system.out.println(" ...[sim卡]\r\n");
   thread.sleep(100);
   system.out.print("\r\n收接通知,并存在指定位置...");
   res = new string(sendcmd(serial, "at+cnmi=2,1,0,1,1"));
   if(res.indexof("ok")==-1){
    system.out.println("设置失败!");
    return false;
   }
   system.out.println(" ...[done]\r\n");
   thread.sleep(100);
  }catch(exception e){
   e.printstacktrace();
   return false;
  }
  return true;
 }
 //public static byte[] sendcmd(serial serial, byte[] cmd){
 public static byte[] sendcmd(serial serial, string cmd){
  long overtime = 10000;  //每条指令超时上限 5秒
  long timecount = 0;   //计时器
  byte[] buffs = new byte[128];
  try {
   serial.writeln(cmd+"\r");
   //serial.writeln("at\r");
   timecount = 0;
   while(timecount<overtime){
    //system.out.print(serial.available());
    if(serial.available()>0){
     while(serial.available()>0){
      buffs = serial.read();
      //system.out.print(new string(serial.read()));
      //system.out.print(new string(buffs));
     }
     serial.flush();
     timecount = overtime;  //exit while
    }
    timecount += 100;
    thread.sleep(100);
   }
   //system.out.println("sendcmd:"+new string(buffs));
  } catch (illegalstateexception e) {
   // todo auto-generated catch block
   e.printstacktrace();
  } catch (exception e) {
   // todo auto-generated catch block
   e.printstacktrace();
  }
  return buffs;
 }
}
// end snippet: serial-snippet