短信中VB.NET编码PDU（二）

EMS――ConcatenatedShortMessage部分
编码EMS较SMS复杂，但每条EMS的基础还是SMS，所以我直接继承了SMS类。区别主要是要处理好TP_UD和IE。对于ConcatenatedShortMessage，由于其IE和TP_UDHL占据了TP_UD的部分空间，所以每条短信英文只能容纳133字符，中文66字符。我们可以通过此信息得到短信条数。
如果TP_DCS为Unicode编码，则短信条目为：
TotalMessages = (TP_UD.Length / 4) / 66 +((TP_UD.Length / 4 Mod 66) = 0)+1
如果为7bit，则为：
TotalMessages = (tp_ud.Length / 266) -((tp_ud.Length Mod 266) = 0)+1
注意在程序中我为了简化以后的数组操作，就没有加一。
确定了短信条数以后通过一个循环就可以提取出每条短信的TP_UD。
Select Case tp_dcs
Case ENUM_TP_DCS.UCS2
tmpTP_UD = Mid(TP_UD, i * 66 * 4 + 1, 66 *4)'When TP_UDL is odd, the max length of an Unicode string in PDU code is 66Charactor.See [3GPP TS 23.040 V6.5.0 (2004-09] 9.2.3.24.1
Case ENUM_TP_DCS.DefaultAlphabet
tmpTP_UD = Mid(tp_ud, i * 133 * 2 + 1, 133* 2)
End Select
此后还需要编码IE部分，关键代码是确定TP_UDL的值。对于TP_DCS为7bit来说确定此值显得比较复杂，弄不好容易出现多一个少一个的错误。
If tp_dcs = ENUM_TP_DCS.UCS2 Then
TP_UDL = tmpTP_UD.Length / 2 + 6 + 1 '6:length of IE
End If
If tp_dcs = ENUM_TP_DCS.DefaultAlphabetThen
TP_UDL = Fix((tmpTP_UD.Length + 7 * 2) * 4/ 7) '6:length of IE
End If
然后根据3GPP里关于EMS的结构的说明就可以编写出EMS PDU的处理程序。详见原代码。
如果需要扩展EMS以适应更多种类的EMS，可以参考3GPP写出更为强大的编码程序。但最关键的还是需要处理好IE以及TP_UDL。
转自bbs.sendsms.cn