PDU mód

PDU mód používá stejné příkazy a odpovědi jako v textovém módu. Rozdíl je ve formátu. V PDU módu celá zpráva včetně hlavičky je jako binární řetězec.

MS: Mobile Station – Mobilní stanice

SME: Short Message Entity -

SMSC: Short Message Service Center – Středisko zpráv

MMI: Man Machine Interface – Rozhraní člověk - stroj

PDUs: Protocol Data Units – Komunikační rámce

SM-AL: Short Message Aplication Layer - Aplikační vrstva krátkých zpráv

SM-TL: Short Message Transport Layer - Transportní vrstva krátkých zpráv

SM-RL: Short Message Relay Layer - Relační vrstva krátkých zpráv

SM-LL: Short Message Link Layer - Fyzická vrstva krátkých zpráv

Abyste mohli používat SMS, musíte nejprve zadat adresu střediska zpráv – pomocí AT příkazu

Typ PDU:

Typ PDU:

MTI: bit 1 = 0 a bit 0 = 1

• Délka – počet oktetů nutných pro číslo střediska zpráv plus 1 oktet na typ čísla
• Typ čísla

Pozor! Pokud uvedete délku NULA, použije se středisko zpráv nastavené příkazem zAT+CSCA

Popis oktetu Typ PDU – jak pro odeslanou, tak pro přijatou zprávu:

Tučně jsou položky podporované mobilem.

Pozor! Ne každý typ PDU je podporován střediskem!!!

V mobilu je normálně toto číslo generováno, vy musíte však toto číslo nastavit. Třeba na 00H

Velikost: 1 Byte

Jestliže byte je nastaven na jednu ze sedmi „Nahraď textovou zprávu TypX“ , potom MS zkontroluje přítomnost zprávy, která má stejné SC, OA a mající stejné PID a nahradí tuto zprávu zprávou novou. Pokud se nenalezla zpráva k nahrazení, uloží se zpráva jako každá jiná (s PID = 00H)

Pozor! Není zaručeno, že středisko zpráv (SMSC) podporuje všechny PID kódy.

Kódování určuje kódování uživatelských dat UD a případně i typ (třídu) zprávy:

Běžné kódování UD je 7bitové s kódovou stránkou uvedenou v příloze. Je-li použito toto kódování, je 8 znaků uloženo v 7 oktetech (bajtech)a zpráva tak může obsahovat 160 znaků (místo 140 v 8bitovém kódování).

V 8bitovém kódování můžeme použít klasickou ASCII tabulku.

Třída 0 – zobrazení na displej – textová zpráva se zobrazí přímo na displeji

Třída 1 až třída 3 – krátká textová zpráva je uložena ve více zařízeních – ME, SIM a TE (Terminal Equipment).

Pokud je podporována třída 2 a vyberete třídu 1 nebo 3, je zpráva obsloužena stejně jako třída 2.

Pozor! – Je doporučeno používat buď třídu 2 nebo kódování „0000“ (bity 7..4)

Kurzívou je příklad, který znamená: 21.května 1997 13:45:33

Platnost zprávy – udává, jak dlouho musí SMSC (středisko zpráv) zaručit existenci zprávy ve středisku, předtím než se doručí adresátovi.

Platnost zprávy je určena buď jako celé číslo, nebo 7bajtový řetězec a to podle VPF (viz bajt PDU typ). V prvním případě je to číslo, udávající periodu od okamžiku, kdy SCTS přijme zprávu. Ve druhém případě se VP skládá ze sedmi bajtů vyjadřující absolutní čas.

VPF = 10 (relativní čas)

1 bajt – např. AAH (AA hexa, taky 0xAA :-) – jsou čtyři dny

Tabulka udávající význam jednotlivých hodnot:

VPF = 11 (absolutní čas)

Příklad:

Znamená hallo – viz příklady níže.

Pole UDL (jednobajtové číslo) udává počet znkaů obsažených v UD.

OK

at+cmgs=140 ENTER - ”text zprávy”, 140 je maximální délka (v bajtech) následující PDU zprávy:

> 0011000781214365F70000AA05E8329BFD06 - napište PDU zprávu a ukončete znakem ”ctrl Z”

+CMGS: 0

OK

at+cpms? - Jsou nějaké zprávy na SIM kartě?

+CPMS: "SM" , 1 , 7 , "SM" , 1 , 7 - na SIMce je 1 uložená PDU zpráva a můžeme jich uložit maximálně 7

OK

at+cmgr=1 - přečteme zprávu z pozice č. 1

+CMGR: 0 ,, 24

00040C9194718215219200006930824161840005E8329BFD06

OK

at+cmgw=140 - uložíme zprávu na SIM

> 079194710167000011000781214365F700F6AA0568656C6C6F - vložíme PDU zprávy a ukončíme znakem ”ctrl Z”

+CMGW: 2

OK

at+cmgr=2 - přečteme zprávu z 2. pozice

+CMGR: 2 ,, 17

0011000781214365F700F6AA0568656C6C6F - toto je PDU z 2. pozice

OK

at+cmss=2 - pošli zprávu z 2. Pozice

+CMSS: 3

OK

(*

poznamka: UD8Bit je typu boolean true znamena 8bit kodovani

false znamena 7bit kodovani

funkce jsou vytrzeny z meho objektu a poopraveny, ale mely by fungovat.

nevim, jestli je to elegantni reseni, ale nevedel jsem jak je 7bit kodovani delano,

tak jsem delal pokusy az to telefon sezral. V tom stadiu jsem s tim prestal (proc menit

neco co uz funguje, i kdyz to neni napsany treba nejlip a srozumitelne)

function EncodeUD( UD:string ): string; //vytvori UD pro PDU

function DecodeUD(const S: string):string; //z UD ve formatu PDU precte zakodovany text

neni zde implemenmtovana tabulka znaku pro 7bit kodovani (nektere znaky maji jiny kod nez v ASCII)

*)

function HexToInt64( Str:String ):Int64;

var

i:integer;

begin

Result:=0;

if Length(Str)=0 then exit;

i:=1;

repeat

Result:=Result*16;

case Str[i] of

'0'..'9': inc( Result, ord(Str[i]) - ord('0') );

'A'..'F': inc( Result, ord(Str[i]) - ord('A') + 10 );

'a'..'f': inc( Result, ord(Str[i]) - ord('a') + 10 );

else raise Exception.create( 'Unknown hex character' );

end;

inc(i);

until i>length(Str);

end;

function HexToWord( Str:String ):Word;

begin

result:=HexToCardinal( Str ) and $FFFF;

end;

function DecodeUD(const S: string):string;

var

chNr, ch, prevch, tgtCh:Byte;

pd, pom:string;

i:Integer;

begin

try

result:='';

i:=1;

prevch:=0;

chNr:=0; //kolikaty znak cteme - dulezite pro 7bit

while i<Length(S) do begin

pd:=Copy( S, i, 2 );

Inc( i, 2 );

ch:=HexToWord( pd ) and $FF;

if not UD8Bit then begin

tgtCh:=ch and ($FF shr (chNr+1));

tgtCh:=(tgtCh shl chNr) or (prevCh shr (8-chNr));

end

else tgtCh:=ch;

chNr:=chNr + 1;

result:=result+chr(tgtCh);

prevCh:=ch;

if not(UD8Bit) and (chNr=7) then begin

result:=result+chr(Ch shr 1);

chNr:=0;

prevCh:=0;

end;

end;

except

end;

end;

function EncodeUD( UD:string ): string;

var

i:Integer;

buff:array [0..255] of byte;

ch:byte;

chNr:byte;

totChrNr:byte;

begin

result:='';

if not UD8Bit then begin

chNr:=0; //kolikaty znak cteme - dulezite pro 7bit

fillChar( buff[0], 256, 0 );

totChrNr:=1;

i:=1;

while i<=Length( UD ) do begin

ch:=ord(UD[i]);

if chNr=0 then begin

buff[totChrNr]:=ch and $7F;

inc( chNr );

end

else begin

buff[totChrNr-1]:=(buff[totChrNr-1] and ($FF shr chNr)) or ( (ch and setBits( 0, chNr-1 )) shl (8-chNr ));

buff[totChrNr]:=ch and setBits( chNr, 6 ) shr chNr;

inc( chNr );

if (chNr=7) then begin

chNr:=0;

if i<Length( UD ) then begin

inc( i );

buff[totChrNr]:=(buff[totChrNr] and 1) or (ord(UD[i]) shl 1 );

end;

end;

end;

inc( totChrNr );

inc( i );

end; //while i

for i:=1 to totchrNr-1 do

result:=result+IntToHex( buff[i], 2 );

end

else

for i:=1 to Length( UD ) do

result:=result+IntToHex( ord(UD[i]), 2 );

end;