grammar: Add simple parsing tests (without looking at the result)
This commit is contained in:
Holger Hans Peter Freyther
parent
4358c45f62
commit
85a359e287
|
|
@ -104,4 +104,119 @@ PP.PPCompositeParserTest subclass: SIPGrammarTest [
|
|||
self assert: (hdr at: 7) first first = 'Content-Length'.
|
||||
self assert: (hdr at: 7) first third = ' 0'.
|
||||
]
|
||||
|
||||
testInviteOK [
|
||||
| data res |
|
||||
data := #(16r53 16r49 16r50 16r2F 16r32 16r2E 16r30 16r20 16r32 16r30 16r30 16r20 16r4F 16r4B 16r0D 16r0A
|
||||
16r56 16r69 16r61 16r3A 16r20 16r53 16r49 16r50 16r2F 16r32 16r2E 16r30 16r2F 16r55 16r44 16r50
|
||||
16r20 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r32 16r35 16r34 16r2E 16r32 16r34 16r3B 16r72
|
||||
16r70 16r6F 16r72 16r74 16r3D 16r35 16r30 16r36 16r30 16r3B 16r62 16r72 16r61 16r6E 16r63 16r68
|
||||
16r3D 16r7A 16r39 16r68 16r47 16r34 16r62 16r4B 16r66 16r77 16r6A 16r6C 16r78 16r64 16r72 16r76
|
||||
16r0D 16r0A 16r46 16r72 16r6F 16r6D 16r3A 16r20 16r22 16r7A 16r65 16r63 16r6B 16r65 16r22 16r20
|
||||
16r3C 16r73 16r69 16r70 16r3A 16r31 16r30 16r30 16r30 16r40 16r6F 16r6E 16r2D 16r77 16r61 16r76
|
||||
16r65 16r73 16r2E 16r63 16r6F 16r6D 16r3E 16r3B 16r74 16r61 16r67 16r3D 16r77 16r6D 16r79 16r63
|
||||
16r6C 16r0D 16r0A 16r54 16r6F 16r3A 16r20 16r3C 16r73 16r69 16r70 16r3A 16r39 16r31 16r39 16r38
|
||||
16r40 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31 16r2E 16r37 16r32 16r3E 16r3B 16r74 16r61
|
||||
16r67 16r3D 16r61 16r74 16r30 16r39 16r74 16r63 16r79 16r38 16r31 16r44 16r44 16r58 16r46 16r0D
|
||||
16r0A 16r43 16r61 16r6C 16r6C 16r2D 16r49 16r44 16r3A 16r20 16r6F 16r66 16r63 16r77 16r6E 16r70
|
||||
16r6D 16r75 16r6C 16r6D 16r63 16r65 16r61 16r73 16r67 16r40 16r78 16r69 16r61 16r6F 16r79 16r75
|
||||
16r0D 16r0A 16r43 16r53 16r65 16r71 16r3A 16r20 16r39 16r38 16r33 16r20 16r49 16r4E 16r56 16r49
|
||||
16r54 16r45 16r0D 16r0A 16r43 16r6F 16r6E 16r74 16r61 16r63 16r74 16r3A 16r20 16r3C 16r73 16r69
|
||||
16r70 16r3A 16r39 16r31 16r39 16r38 16r40 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31 16r2E
|
||||
16r37 16r32 16r3A 16r35 16r30 16r36 16r30 16r3B 16r74 16r72 16r61 16r6E 16r73 16r70 16r6F 16r72
|
||||
16r74 16r3D 16r75 16r64 16r70 16r3E 16r0D 16r0A 16r55 16r73 16r65 16r72 16r2D 16r41 16r67 16r65
|
||||
16r6E 16r74 16r3A 16r20 16r46 16r72 16r65 16r65 16r53 16r57 16r49 16r54 16r43 16r48 16r2D 16r6D
|
||||
16r6F 16r64 16r5F 16r73 16r6F 16r66 16r69 16r61 16r2F 16r31 16r2E 16r30 16r2E 16r68 16r65 16r61
|
||||
16r64 16r2D 16r67 16r69 16r74 16r2D 16r64 16r66 16r66 16r34 16r31 16r61 16r66 16r20 16r32 16r30
|
||||
16r31 16r31 16r2D 16r30 16r34 16r2D 16r32 16r30 16r20 16r31 16r34 16r2D 16r31 16r31 16r2D 16r32
|
||||
16r34 16r20 16r2B 16r30 16r32 16r30 16r30 16r0D 16r0A 16r41 16r63 16r63 16r65 16r70 16r74 16r3A
|
||||
16r20 16r61 16r70 16r70 16r6C 16r69 16r63 16r61 16r74 16r69 16r6F 16r6E 16r2F 16r73 16r64 16r70
|
||||
16r0D 16r0A 16r41 16r6C 16r6C 16r6F 16r77 16r3A 16r20 16r49 16r4E 16r56 16r49 16r54 16r45 16r2C
|
||||
16r20 16r41 16r43 16r4B 16r2C 16r20 16r42 16r59 16r45 16r2C 16r20 16r43 16r41 16r4E 16r43 16r45
|
||||
16r4C 16r2C 16r20 16r4F 16r50 16r54 16r49 16r4F 16r4E 16r53 16r2C 16r20 16r4D 16r45 16r53 16r53
|
||||
16r41 16r47 16r45 16r2C 16r20 16r55 16r50 16r44 16r41 16r54 16r45 16r2C 16r20 16r49 16r4E 16r46
|
||||
16r4F 16r2C 16r20 16r52 16r45 16r47 16r49 16r53 16r54 16r45 16r52 16r2C 16r20 16r52 16r45 16r46
|
||||
16r45 16r52 16r2C 16r20 16r4E 16r4F 16r54 16r49 16r46 16r59 16r2C 16r20 16r50 16r55 16r42 16r4C
|
||||
16r49 16r53 16r48 16r2C 16r20 16r53 16r55 16r42 16r53 16r43 16r52 16r49 16r42 16r45 16r0D 16r0A
|
||||
16r53 16r75 16r70 16r70 16r6F 16r72 16r74 16r65 16r64 16r3A 16r20 16r74 16r69 16r6D 16r65 16r72
|
||||
16r2C 16r20 16r70 16r72 16r65 16r63 16r6F 16r6E 16r64 16r69 16r74 16r69 16r6F 16r6E 16r2C 16r20
|
||||
16r70 16r61 16r74 16r68 16r2C 16r20 16r72 16r65 16r70 16r6C 16r61 16r63 16r65 16r73 16r0D 16r0A
|
||||
16r41 16r6C 16r6C 16r6F 16r77 16r2D 16r45 16r76 16r65 16r6E 16r74 16r73 16r3A 16r20 16r74 16r61
|
||||
16r6C 16r6B 16r2C 16r20 16r68 16r6F 16r6C 16r64 16r2C 16r20 16r70 16r72 16r65 16r73 16r65 16r6E
|
||||
16r63 16r65 16r2C 16r20 16r64 16r69 16r61 16r6C 16r6F 16r67 16r2C 16r20 16r6C 16r69 16r6E 16r65
|
||||
16r2D 16r73 16r65 16r69 16r7A 16r65 16r2C 16r20 16r63 16r61 16r6C 16r6C 16r2D 16r69 16r6E 16r66
|
||||
16r6F 16r2C 16r20 16r73 16r6C 16r61 16r2C 16r20 16r69 16r6E 16r63 16r6C 16r75 16r64 16r65 16r2D
|
||||
16r73 16r65 16r73 16r73 16r69 16r6F 16r6E 16r2D 16r64 16r65 16r73 16r63 16r72 16r69 16r70 16r74
|
||||
16r69 16r6F 16r6E 16r2C 16r20 16r70 16r72 16r65 16r73 16r65 16r6E 16r63 16r65 16r2E 16r77 16r69
|
||||
16r6E 16r66 16r6F 16r2C 16r20 16r6D 16r65 16r73 16r73 16r61 16r67 16r65 16r2D 16r73 16r75 16r6D
|
||||
16r6D 16r61 16r72 16r79 16r2C 16r20 16r72 16r65 16r66 16r65 16r72 16r0D 16r0A 16r43 16r6F 16r6E
|
||||
16r74 16r65 16r6E 16r74 16r2D 16r54 16r79 16r70 16r65 16r3A 16r20 16r61 16r70 16r70 16r6C 16r69
|
||||
16r63 16r61 16r74 16r69 16r6F 16r6E 16r2F 16r73 16r64 16r70 16r0D 16r0A 16r43 16r6F 16r6E 16r74
|
||||
16r65 16r6E 16r74 16r2D 16r44 16r69 16r73 16r70 16r6F 16r73 16r69 16r74 16r69 16r6F 16r6E 16r3A
|
||||
16r20 16r73 16r65 16r73 16r73 16r69 16r6F 16r6E 16r0D 16r0A 16r43 16r6F 16r6E 16r74 16r65 16r6E
|
||||
16r74 16r2D 16r4C 16r65 16r6E 16r67 16r74 16r68 16r3A 16r20 16r32 16r34 16r35 16r0D 16r0A 16r52
|
||||
16r65 16r6D 16r6F 16r74 16r65 16r2D 16r50 16r61 16r72 16r74 16r79 16r2D 16r49 16r44 16r3A 16r20
|
||||
16r22 16r39 16r31 16r39 16r38 16r22 16r20 16r3C 16r73 16r69 16r70 16r3A 16r39 16r31 16r39 16r38
|
||||
16r40 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31 16r2E 16r37 16r32 16r3E 16r3B 16r70 16r61
|
||||
16r72 16r74 16r79 16r3D 16r63 16r61 16r6C 16r6C 16r69 16r6E 16r67 16r3B 16r70 16r72 16r69 16r76
|
||||
16r61 16r63 16r79 16r3D 16r6F 16r66 16r66 16r3B 16r73 16r63 16r72 16r65 16r65 16r6E 16r3D 16r6E
|
||||
16r6F 16r0D 16r0A 16r0D 16r0A 16r76 16r3D 16r30 16r0D 16r0A 16r6F 16r3D 16r46 16r72 16r65 16r65
|
||||
16r53 16r57 16r49 16r54 16r43 16r48 16r20 16r31 16r33 16r30 16r37 16r36 16r32 16r35 16r30 16r30
|
||||
16r35 16r20 16r31 16r33 16r30 16r37 16r36 16r32 16r35 16r30 16r30 16r36 16r20 16r49 16r4E 16r20
|
||||
16r49 16r50 16r34 16r20 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31 16r2E 16r37 16r32 16r0D
|
||||
16r0A 16r73 16r3D 16r46 16r72 16r65 16r65 16r53 16r57 16r49 16r54 16r43 16r48 16r0D 16r0A 16r63
|
||||
16r3D 16r49 16r4E 16r20 16r49 16r50 16r34 16r20 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31
|
||||
16r2E 16r37 16r32 16r0D 16r0A 16r74 16r3D 16r30 16r20 16r30 16r0D 16r0A 16r6D 16r3D 16r61 16r75
|
||||
16r64 16r69 16r6F 16r20 16r31 16r38 16r32 16r35 16r38 16r20 16r52 16r54 16r50 16r2F 16r41 16r56
|
||||
16r50 16r20 16r38 16r20 16r31 16r30 16r31 16r0D 16r0A 16r61 16r3D 16r72 16r74 16r70 16r6D 16r61
|
||||
16r70 16r3A 16r38 16r20 16r50 16r43 16r4D 16r41 16r2F 16r38 16r30 16r30 16r30 16r0D 16r0A 16r61
|
||||
16r3D 16r72 16r74 16r70 16r6D 16r61 16r70 16r3A 16r31 16r30 16r31 16r20 16r74 16r65 16r6C 16r65
|
||||
16r70 16r68 16r6F 16r6E 16r65 16r2D 16r65 16r76 16r65 16r6E 16r74 16r2F 16r38 16r30 16r30 16r30
|
||||
16r0D 16r0A 16r61 16r3D 16r66 16r6D 16r74 16r70 16r3A 16r31 16r30 16r31 16r20 16r30 16r2D 16r31
|
||||
16r36 16r0D 16r0A 16r61 16r3D 16r73 16r69 16r6C 16r65 16r6E 16r63 16r65 16r53 16r75 16r70 16r70
|
||||
16r3A 16r6F 16r66 16r66 16r20 16r2D 16r20 16r2D 16r20 16r2D 16r20 16r2D 16r0D 16r0A 16r61 16r3D
|
||||
16r70 16r74 16r69 16r6D 16r65 16r3A 16r32 16r30 16r0D 16r0A) asByteArray asString.
|
||||
|
||||
res := self parse: data.
|
||||
res inspect.
|
||||
]
|
||||
|
||||
testByeOkay [
|
||||
| data res |
|
||||
|
||||
data := #(16r53 16r49 16r50 16r2F 16r32 16r2E 16r30 16r20 16r32 16r30 16r30 16r20 16r4F 16r4B 16r0D 16r0A
|
||||
16r56 16r69 16r61 16r3A 16r20 16r53 16r49 16r50 16r2F 16r32 16r2E 16r30 16r2F 16r55 16r44 16r50
|
||||
16r20 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r32 16r35 16r34 16r2E 16r32 16r34 16r3B 16r72
|
||||
16r70 16r6F 16r72 16r74 16r3D 16r35 16r30 16r36 16r30 16r3B 16r62 16r72 16r61 16r6E 16r63 16r68
|
||||
16r3D 16r7A 16r39 16r68 16r47 16r34 16r62 16r4B 16r65 16r6A 16r66 16r77 16r6A 16r66 16r76 16r71
|
||||
16r0D 16r0A 16r46 16r72 16r6F 16r6D 16r3A 16r20 16r22 16r7A 16r65 16r63 16r6B 16r65 16r22 16r20
|
||||
16r3C 16r73 16r69 16r70 16r3A 16r31 16r30 16r30 16r30 16r40 16r6F 16r6E 16r2D 16r77 16r61 16r76
|
||||
16r65 16r73 16r2E 16r63 16r6F 16r6D 16r3E 16r3B 16r74 16r61 16r67 16r3D 16r77 16r6D 16r79 16r63
|
||||
16r6C 16r0D 16r0A 16r54 16r6F 16r3A 16r20 16r3C 16r73 16r69 16r70 16r3A 16r39 16r31 16r39 16r38
|
||||
16r40 16r31 16r37 16r32 16r2E 16r31 16r36 16r2E 16r31 16r2E 16r37 16r32 16r3E 16r3B 16r74 16r61
|
||||
16r67 16r3D 16r61 16r74 16r30 16r39 16r74 16r63 16r79 16r38 16r31 16r44 16r44 16r58 16r46 16r0D
|
||||
16r0A 16r43 16r61 16r6C 16r6C 16r2D 16r49 16r44 16r3A 16r20 16r6F 16r66 16r63 16r77 16r6E 16r70
|
||||
16r6D 16r75 16r6C 16r6D 16r63 16r65 16r61 16r73 16r67 16r40 16r78 16r69 16r61 16r6F 16r79 16r75
|
||||
16r0D 16r0A 16r43 16r53 16r65 16r71 16r3A 16r20 16r39 16r38 16r34 16r20 16r42 16r59 16r45 16r0D
|
||||
16r0A 16r55 16r73 16r65 16r72 16r2D 16r41 16r67 16r65 16r6E 16r74 16r3A 16r20 16r46 16r72 16r65
|
||||
16r65 16r53 16r57 16r49 16r54 16r43 16r48 16r2D 16r6D 16r6F 16r64 16r5F 16r73 16r6F 16r66 16r69
|
||||
16r61 16r2F 16r31 16r2E 16r30 16r2E 16r68 16r65 16r61 16r64 16r2D 16r67 16r69 16r74 16r2D 16r64
|
||||
16r66 16r66 16r34 16r31 16r61 16r66 16r20 16r32 16r30 16r31 16r31 16r2D 16r30 16r34 16r2D 16r32
|
||||
16r30 16r20 16r31 16r34 16r2D 16r31 16r31 16r2D 16r32 16r34 16r20 16r2B 16r30 16r32 16r30 16r30
|
||||
16r0D 16r0A 16r41 16r6C 16r6C 16r6F 16r77 16r3A 16r20 16r49 16r4E 16r56 16r49 16r54 16r45 16r2C
|
||||
16r20 16r41 16r43 16r4B 16r2C 16r20 16r42 16r59 16r45 16r2C 16r20 16r43 16r41 16r4E 16r43 16r45
|
||||
16r4C 16r2C 16r20 16r4F 16r50 16r54 16r49 16r4F 16r4E 16r53 16r2C 16r20 16r4D 16r45 16r53 16r53
|
||||
16r41 16r47 16r45 16r2C 16r20 16r55 16r50 16r44 16r41 16r54 16r45 16r2C 16r20 16r49 16r4E 16r46
|
||||
16r4F 16r2C 16r20 16r52 16r45 16r47 16r49 16r53 16r54 16r45 16r52 16r2C 16r20 16r52 16r45 16r46
|
||||
16r45 16r52 16r2C 16r20 16r4E 16r4F 16r54 16r49 16r46 16r59 16r2C 16r20 16r50 16r55 16r42 16r4C
|
||||
16r49 16r53 16r48 16r2C 16r20 16r53 16r55 16r42 16r53 16r43 16r52 16r49 16r42 16r45 16r0D 16r0A
|
||||
16r53 16r75 16r70 16r70 16r6F 16r72 16r74 16r65 16r64 16r3A 16r20 16r74 16r69 16r6D 16r65 16r72
|
||||
16r2C 16r20 16r70 16r72 16r65 16r63 16r6F 16r6E 16r64 16r69 16r74 16r69 16r6F 16r6E 16r2C 16r20
|
||||
16r70 16r61 16r74 16r68 16r2C 16r20 16r72 16r65 16r70 16r6C 16r61 16r63 16r65 16r73 16r0D 16r0A
|
||||
16r43 16r6F 16r6E 16r74 16r65 16r6E 16r74 16r2D 16r4C 16r65 16r6E 16r67 16r74 16r68 16r3A 16r20
|
||||
16r30 16r0D 16r0A 16r0D 16r0A) asByteArray asString.
|
||||
|
||||
res := self parse: data.
|
||||
res inspect.
|
||||
]
|
||||
]
|
||||
|
|
|
|||
Reference in New Issue