java版飞信协议实现

原始的代码不记得是哪个作者了,如果原作者看见了,我要说声谢谢
但这个真的做了大改动,我怕原作者也看不出来了~最近比较忙,如果谁愿意,去改改吧,不知道为什么,这个很不稳定,老是405错误,或者最近移动的问题?

给出代码:

package myFetion;

import java.io.BufferedReader;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.io.OutputStreamWriter;
import java.io.UnsupportedEncodingException;
import java.net.HttpURLConnection;
import java.net.URL;
import java.nio.ByteBuffer;
import java.security.MessageDigest;
import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Map;
import java.util.UUID;
import java.util.Map.Entry;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import org.apache.commons.codec.binary.Hex;
import org.dom4j.Attribute;
import org.dom4j.Document;
import org.dom4j.DocumentHelper;
import org.dom4j.Element;

public class libFx {

	// [start] 变量定义
	private static final String SIP_M = "M fetion.com.cn SIP-C/2.0";
	private static final String SIP_S = "S fetion.com.cn SIP-C/2.0";
	private static String URL_SD = "http://221.176.31.42/ht/sd.aspx";
	private static String URL_LOGIN = "https://uid.fetion.com.cn/ssiportal/SSIAppSignIn.aspx";
	private static String URL_CONFIG = "http://nav.fetion.com.cn/nav/getsystemconfig.aspx";

	private int call, seq;
	private String username, password;
	private String ssic, sid, guid, domain, uri;

	private HashMap<String, buddyInfo> allBuddys = new HashMap<String, buddyInfo>();

	// [end]

	private class resResult {
		int status;
		Map<String, List<String>> header;
		String response;
	}

	public class buddyInfo {
		String uri;
		String mobile;
		String localname;
		String nickname;
		String buddytype;
		String displayname;
	}

	public libFx(String username, String password) {
		this.username = username;
		this.password = password;
	}

	public void getSystemConfig() {
		String data = "<config><user mobile-no=\"" + username;
		data += "\" /><client type=\"PC\" version=\"3.2.0540\" platform=\"W5.1\" />";
		data += "<servers version=\"0\" /><service-no version=\"0\" /><parameters version=\"0\" />";
		data += "<hints version=\"0\" /><http-applications version=\"0\" /></config>";

		resResult res = httpRequest(URL_CONFIG, data, null);

		try {
			String[] resSplit = res.response.split("\r\n");
			String xmlData = resSplit[0];

			Document xml = DocumentHelper.parseText(xmlData);

			Element httptunnel = (Element) xml.selectObject("/config/servers/http-tunnel");
			URL_SD = httptunnel.getStringValue();

			Element ssiappsignin = (Element) xml.selectObject("/config/servers/ssi-app-sign-in");
			URL_LOGIN = ssiappsignin.getStringValue();

		} catch (Exception ex) {
			System.out.println(ex.getMessage());
		}
	}

	// [start] 登录,注册到服务器,退出
	public String Login() {
		String debugMsg = "";
		try {
			String data = "mobileno=" + username + "&pwd=" + password + "";
			resResult res = httpRequest(URL_LOGIN, data, null);

			if (res == null) {
				debugMsg = "login error";
				return debugMsg;
			}
			String header = res.header.values().toString();
			Pattern ssicPattern = Pattern.compile("ssic=(.*?);");
			Matcher matcher = ssicPattern.matcher(header);

			if (matcher.find()) {
				ssic = matcher.group(1);
			}

			Document document = DocumentHelper.parseText(res.response);
			Element root = document.getRootElement();
			Element user = root.element("user");
			// 示例:<user uri="sip:857179488@fetion.com.cn;p=6006" mobile-no="15910510159" user-status="101" user-id="607221518">
			uri = user.attribute("uri").getValue();
			int a = uri.indexOf("@");
			int b = uri.indexOf(";");

			sid = uri.substring(4, a);
			domain = uri.substring(a + 1, b);

		} catch (Exception ex) {
			debugMsg += ex.getMessage();
			return debugMsg;
		}

		return "OK" + debugMsg;
	}

	public String Register() {
		String debugMsg = "";

		String arg = "<args><device type=\"PC\" version=\"2009112603\" client-version=\"3.5.2540\" />";
		arg += "<caps value=\"simple-im;im-session;temp-group;personal-group;im-relay;xeno-im;direct-sms;sms2fetion\" />";
		arg += "<events value=\"contact;permission;system-message;personal-group;compact\" /><user-info attributes=\"all\" />";
		arg += "<presence><basic value=\"400\" desc=\"\" /></presence></args>";

		String response = null, nonce = null;

		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "1 R");
		String msg = createSipData("R fetion.com.cn SIP-C/2.0", fields, arg) + "SIPP";
		// 发送请求
		response = sendRequest(nextUrl("i"), msg).response;
		response = sendRequest(nextUrl("s"), "SIPP").response;

		Pattern noncePattern = Pattern.compile("nonce=\"(\\w+)\"");
		Matcher m = noncePattern.matcher(response);
		if (m.find()) {
			nonce = m.group(1);
		} else {
			return "not find noce!" + response;
		}

		String salt = "777A6D03";
		String cnonce = calc_cnonce();
		String calcResponse = calc_response(nonce, cnonce);
		String strA = "Digest algorithm=\"SHA1-sess\",response=\"" + calcResponse + "\",";
		strA += "cnonce=\"" + cnonce + "\",salt=\"" + salt + "\",ssic=\"" + ssic + "\"";

		fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "2 R");
		fields.put("A", strA);
		msg = createSipData("R fetion.com.cn SIP-C/2.0", fields, arg) + "SIPP";
		// 发送请求
		response = sendRequest(nextUrl("s"), msg).response;
		response = sendRequest(nextUrl("s"), "SIPP").response;
		if (response == null) {
			return "not 2R";
		}

		return "OK" + debugMsg;
	}

	public boolean logout() {
		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", "1");
		fields.put("Q", "2 R");
		fields.put("X", "0");
		String msg = createSipData("R fetion.com.cn SIP-C/2.0", fields, null) + "SIPP";

		String response = sendRequest(nextUrl("s"), msg).response;
		System.out.println("退出:" + response);
		if (response == null || response.equals("")) {
			return false;
		}
		return true;
	}

	// [end]

	// [start] 相关算法
	private String nextCall() {
		call += 1;
		return String.valueOf(call);
	}

	private String nextUrl(String t) {
		seq++;
		System.out.println(URL_SD + "?t=" + t + "&i=" + seq);

		return new StringBuffer(URL_SD).append("?t=").append(t).append("&i=").append(seq).toString();
	}

	private String calc_cnonce() {
		MessageDigest md5 = null;
		String md5Str = null;
		try {
			md5 = MessageDigest.getInstance("MD5");
			md5.update(UUID.randomUUID().toString().getBytes("UTF-8"));
			md5Str = new String(Hex.encodeHex(md5.digest())).toUpperCase();
		} catch (Exception e) {
			return null;
		}
		return md5Str;
	}

	private String calc_response(String nonce, String cnonce) {

		String temp = ":";
		String strTemp = "REGISTER";
		char[] saltChars = { 0x77, 0x7A, 0x6D, 0x03 };
		String salt = String.valueOf(saltChars);

		String h3 = null;
		try {
			int sidLength = sid.getBytes("UTF-8").length;
			int domainLength = domain.getBytes("UTF-8").length;
			int nonceLength = nonce.getBytes("UTF-8").length;
			int tempLength = temp.getBytes("UTF-8").length;
			int strTempLength = strTemp.getBytes("UTF-8").length;
			int cnonceLength = cnonce.getBytes("UTF-8").length;

			ByteBuffer buf = null;

			// 晕,这部有点多余可以省略,就是把原来加密过的字符串转成字节
			// byte[] decode = Hex.decodeHex(binstr.toUpperCase().toCharArray());

			MessageDigest sha1 = MessageDigest.getInstance("SHA-1");

			// 密码使用SHA-1加密
			sha1 = MessageDigest.getInstance("SHA-1");

			sha1.update(password.getBytes("UTF-8"));
			byte[] src = sha1.digest();
			// 加密后把{ 0x77, 0x7A, 0x6D, 0x03 }这四个字符加上用SHA-1加密过的密码
			buf = ByteBuffer.allocate(src.length + salt.getBytes("UTF-8").length);
			buf.put(salt.getBytes("UTF-8"));
			buf.put(src);
			buf.flip();
			sha1.update(buf);
			buf.clear();
			// 然后再把相加过的`字节数组`用SHA-1加密
			byte[] decode = sha1.digest();

			// 用SHA-1加密```形式如 sid:domain:decode
			buf = ByteBuffer.allocate(sidLength + domainLength + decode.length + (tempLength * 2));
			buf.put(sid.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(domain.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(decode);
			buf.flip();
			sha1.update(buf);

			byte[] keyBytes = sha1.digest();
			// 用MD5加密```形式如 key:nonce:cnonce 上面生成的就是key 生成h1
			MessageDigest md5 = MessageDigest.getInstance("MD5");
			buf = ByteBuffer.allocate(keyBytes.length + nonceLength + cnonceLength + (tempLength * 2));
			buf.put(keyBytes);
			buf.put(temp.getBytes("UTF-8"));
			buf.put(nonce.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(cnonce.getBytes("UTF-8"));
			buf.flip();
			md5.update(buf);
			buf.clear();

			String h1 = new String(Hex.encodeHex(md5.digest())).toUpperCase();

			// 用MD5加密```形式如 REGISTER:sid 生成h2
			buf = ByteBuffer.allocate(sidLength + strTempLength + tempLength);
			buf.put(strTemp.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(sid.getBytes("UTF-8"));
			buf.flip();
			md5.update(buf);
			buf.clear();

			String h2 = new String(Hex.encodeHex(md5.digest())).toUpperCase();

			// 用MD5加密```形式如 h1:nonce:h2 生成h2
			buf = ByteBuffer.allocate(h1.getBytes("UTF-8").length + nonceLength + h2.getBytes("UTF-8").length + (tempLength * 2));
			buf.put(h1.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(nonce.getBytes("UTF-8"));
			buf.put(temp.getBytes("UTF-8"));
			buf.put(h2.getBytes("UTF-8"));
			buf.flip();
			md5.update(buf);
			buf.clear();

			h3 = new String(Hex.encodeHex(md5.digest())).toUpperCase();

		} catch (Exception e) {
			e.printStackTrace();
		}

		return h3;

	}

	private String createSipData(String invite, HashMap<String, String> fields, String arg) {
		StringBuffer sip = new StringBuffer(invite).append("\r\n");
		for (Map.Entry<String, String> entry : fields.entrySet()) {
			sip.append(entry.getKey()).append(": ").append(entry.getValue()).append("\r\n");
		}
		if (arg != null) {
			try {
				sip.append("L: ").append(arg.getBytes("UTF-8").length).append("\r\n\r\n").append(arg);
			} catch (UnsupportedEncodingException e) {
				return null;
			}
		}

		return sip.toString();
	}

	// [end]

	// [start] http请求
	private resResult httpRequest(String strUrl, String data, Map<String, String> heads) {
		resResult res = new resResult();

		URL url = null;
		HttpURLConnection conn = null;
		for (int i = 0; i < 10; i++) {// 如果请求失败,则重试5次
			try {
				url = new URL(strUrl);
				conn = (HttpURLConnection) url.openConnection();

				conn.setDoOutput(true);// 设置输出
				conn.setUseCaches(false);// 不使用缓存
				conn.setRequestMethod("POST");

				// 循环设置请求头部,比如cookie
				if (heads != null) {
					for (Entry<String, String> entry : heads.entrySet())
						conn.setRequestProperty(entry.getKey(), entry.getValue());
				}

				OutputStreamWriter out = new OutputStreamWriter(conn.getOutputStream());
				out.write(data);// 写入请求(POST)数据
				out.flush();
				out.close();

				InputStream in = conn.getInputStream();
				BufferedReader br = new BufferedReader(new InputStreamReader(in, "utf-8"));
				String line = "", response = "";
				while ((line = br.readLine()) != null) {
					response += line + "\r\n";
				}

				Map<String, List<String>> resHeads = conn.getHeaderFields();

				res.status = conn.getResponseCode();
				System.out.println("conn_code:" + res.status);

				res.response = response;
				res.header = resHeads;

			} catch (Exception e) {
				System.out.println(e.getMessage());
			} finally {
				if (conn != null)
					conn.disconnect();
			}

			if (res.status == 200) {
				break;// 重试若干次,当返回200则跳出
			}
			try {
				Thread.sleep(1000);
			} catch (InterruptedException e) {
			}
		}
		return res;
	}

	private resResult sendRequest(String strUrl, String data) {
		if (guid == null) {
			guid = UUID.randomUUID().toString();
		}
		resResult res = new resResult();
		try {

			Map<String, String> cookies = new HashMap<String, String>();

			cookies.put("User-Agent", "IIC2.0/PC 3.5.2540");
			cookies.put("Cookie", "ssic=" + ssic);
			cookies.put("Content-Type", "application/oct-stream");
			cookies.put("Pragma", "xz4BBcV" + guid);

			// StringRequestEntity m_data = new StringRequestEntity(data, "text/xml", "utf-8");
			res = httpRequest(strUrl, data, cookies);

		} catch (Exception e) {
			return null;
		}
		return res;
	}

	// [end]

	// /以下是飞信应用API
	public HashMap<String, buddyInfo> getContactsInfo() {

		allBuddys = getContactsList();

		StringBuffer arg = new StringBuffer("<args><contacts attributes=\"all\">");
		for (Entry<String, buddyInfo> buddy : allBuddys.entrySet()) {
			arg.append("<contact uri=\"").append(buddy.getKey()).append("\" />");
		}
		arg.append("</contacts></args>");

		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "1 S");
		fields.put("N", "GetContactsInfo");
		String msg = createSipData(SIP_S, fields, arg.toString()) + "SIPP";

		try {
			sendRequest(nextUrl("s"), msg);
			Thread.sleep(2000);
			String response = sendRequest(nextUrl("s"), "SIPP").response;

			String[] resSplit = response.split("\r\n\r\n");
			String xmlData = resSplit[1].replace("</results>SIPP", "</results>");

			Document xml = DocumentHelper.parseText(xmlData);

			List contacts = xml.selectNodes("/results/contacts/contact");
			Iterator itc = contacts.iterator();
			while (itc.hasNext()) {
				Element elt = (Element) itc.next();
				Attribute uri = elt.attribute("uri");
				buddyInfo buddy = allBuddys.get(uri.getStringValue());

				Element personal = elt.element("personal");
				Attribute mobile = personal.attribute("mobile-no");
				Attribute nickname = personal.attribute("nickname");

				buddy.mobile = mobile.getStringValue();
				buddy.nickname = nickname.getStringValue();
				buddy.buddytype = "mobile";

				String display = buddy.localname;
				if (display.equals(""))
					display = buddy.nickname;
				if (display.equals(""))
					display = buddy.mobile;
				if (display.equals(""))
					display = "猪头啦";
				buddy.displayname = display;
			}

		} catch (Exception ex) {

		}

		return allBuddys;

	}

	private HashMap<String, buddyInfo> getContactsList() {
		String arg = "<args><contacts><buddy-lists /><buddies attributes=\"all\" />";
		arg += "<mobile-buddies attributes=\"all\" /><chat-friends /><blacklist /></contacts></args>";

		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "1 S");
		fields.put("N", "GetContactList");
		String msg = createSipData(SIP_S, fields, arg) + "SIPP";

		sendRequest(nextUrl("s"), msg);
		String response = sendRequest(nextUrl("s"), "SIPP").response;

		HashMap<String, buddyInfo> lstbuddys = new HashMap<String, buddyInfo>();

		try {
			String[] resSplit = response.split("\r\n\r\n");
			String xmlData = resSplit[1].replace("</results>SIPP", "</results>");

			Document xml = DocumentHelper.parseText(xmlData);

			// 获取飞信好友
			List buddys = xml.selectNodes("/results/contacts/buddies/buddy");
			Iterator itb = buddys.iterator();
			while (itb.hasNext()) {
				Element elt = (Element) itb.next();
				Attribute uri = elt.attribute("uri");
				Attribute localname = elt.attribute("local-name");

				buddyInfo buddy = new buddyInfo();
				buddy.uri = uri.getStringValue();
				buddy.localname = localname.getStringValue();
				buddy.buddytype = "buddy";
				lstbuddys.put(buddy.uri, buddy);
			}

			// 获取手机好友
			List mobiles = xml.selectNodes("/results/contacts/mobile-buddies/mobile-buddy");
			Iterator itm = mobiles.iterator();
			while (itm.hasNext()) {
				Element elt = (Element) itm.next();
				Attribute uri = elt.attribute("uri");
				Attribute localname = elt.attribute("local-name");

				buddyInfo buddy = new buddyInfo();
				buddy.uri = uri.getStringValue();
				buddy.localname = localname.getStringValue();
				buddy.buddytype = "mobile";
				lstbuddys.put(buddy.uri, buddy);
			}

		} catch (Exception ex) {

		}

		return lstbuddys;
	}

	private String getUri(String mobile) {
		if (allBuddys.entrySet().size() == 0)
			getContactsInfo();
		for (Entry<String, buddyInfo> entry : allBuddys.entrySet()) {
			if (entry.getValue().mobile.equals(mobile))
				return entry.getKey();
		}

		return null;
	}

	public boolean sendCatSms(String content) {
		return sendCatSms(null, content);
	}

	public boolean sendCatSms(String to, String content) {

		// T试了好像只能是标准的sip地址，不知道有没有什么办法能换成手机号，sip:57358215@fetion.com.cn;p=4009中4009的计算公式：
		// 13开头的手机号
		// p=手机号码前6位 - 134099
		// 15开头的手机号
		// p=手机号码前6位 - 153099

		// String toMobile = buddys.get(to);

		// if (toMobile == null || "".equals(toMobile))
		// return false;

		String sendto = to;
		if (!to.startsWith("sip"))
			sendto = getUri(to);
		if (sendto == null)
			return false;

		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "1 M");
		fields.put("T", to == null ? uri : sendto);
		fields.put("N", "SendCatSMS");
		String msg = createSipData(SIP_M, fields, content) + "SIPP";

		sendRequest(nextUrl("s"), msg);
		String response = sendRequest(nextUrl("s"), "SIPP").response;

		if (response.indexOf("Send SMS OK") > 0)
			return true;
		else
			return false;
	}

	public boolean sendSms(String to, String content) {
		int len = content.length();
		HashMap<String, String> fields = new HashMap<String, String>();
		fields.put("F", sid);
		fields.put("I", nextCall());
		fields.put("Q", "0 M");
		fields.put("T", uri);
		fields.put("C", "text/html-fragment");
		fields.put("K", "SaveHistory");
		fields.put("L", String.valueOf(len));
		String msg = createSipData(SIP_M, fields, content) + "SIPP";

		String response = sendRequest(nextUrl("s"), msg).response;
		response = sendRequest(nextUrl("s"), "SIPP").response;

		if (response.indexOf("Send SMS OK") > 0)
			return true;
		else
			return false;
	}
}