onstomp 1.0.0pre1 → 1.0.0

data/spec/onstomp/full_stacks/ssl/client_key.pem

@@ -0,0 +1,27 @@
+-----BEGIN RSA PRIVATE KEY-----
+MIIEogIBAAKCAQEAr2Kt6gsrPaYO40qytboypatf8vBagyJM/wWdviW7aGH1Vi4i
+nCv5O6KXN6o3F0DNEpd2cxkkxVl4RUVdK5zf6dJW11y5ylNzoWJw31Kv+31rt2h6
+CGjoSqta6eakzTidLlVREUg8K1eoVTdCEQzpLOd500zILp6SStyLZnm/YuB1Sdc3
+Yk46R3rAL3WMKHBQiCSueusvpndgZHcN4sJO5WIF+icgXFNygBbmr/U1WqlqX2AF
+Ktj+qaQtqsSBNfxRinyfDEDqQGGH7ApgOUQusPZ3eQG2vxXSZc1q5CEFWVPZauc3
+6s6jsc/DcPwsQD0Sv/mEMsqDxuU9qij/eJ0DFwIDAQABAoIBAGSLes541rJB97kA
+AtHBy/VD+P6qIgmZaXCuBI+UzAp8Vgyw6DCF2R0CChTkZS7UfHxTDpnPaVAmCZgU
+uuQczBUc+6H9S5mdG+YCLFkq6y6O6Wi84XDey4S7FaSQEByCf0GnsZDpy2zBlQQ9
+aIej0i1nCmVDWGO5jn6STuxRkZGZz0+BPEe0kdZIGDl1NvBVy55Vpy4x2ccYa80D
+yZycWtkO65x0RKAZhnaVdDD1vbdvEGPlEmCsoGXn2ahx4AcuZPOIxSz9izksL9zy
+kraOBz5p5UX8MIOyx8xpKk3hYQRLaRTrpWtwJNJsLiNWozbCLcFvVuukyxYE6zRG
+NEc8/+kCgYEA1MmdocWY4nrUC1l4dv9rPwh5Z2/zt7N2CeafaJ4YSh69SUKzeBHC
+J79xvHA0b8cmEQyJ4BUJgLMm85ofi3f6pws8pPA6fLlwg+SeqLo9bjDNqIwEHvf/
+EVSmvJLQ11lUFauKziMyGPF1gYIbFUO/yXWGjEnRkEHQ/BRbZO/SmWMCgYEA0wCb
+L693uqzMHErXeYswAk9YDrbnsCSKOiSxoJdc8C6TUQ56YA5YsWovlNc8s+gs9Vhw
+6u5yhkdhaMA9AYJbHcCdw33w2p/PFTuau+ydKs5VMf+ruNo7yliWPON4e9s3KHIm
+NRabQJ7c5qAIKbiwk6prm2uL7s5Ved2VWG5Ut70CgYAGytjJTTFwKVOTeSurQMP/
+oxmc/6nb91KRRldYU5Oa6hhIumRYNNjpw+axiTNjTgwdBzVvfbxr60wXAph3L0FF
+C8rHyRNU3+aDj0yxPiCv38bw1mdbRbdSqk0YP+eCuEtC1dL8eYsj2LFTjP+oUh1R
+JPtChyi1XiR5p3yzYCRs2QKBgFYtxjRIt18AGnFnw+/5gEdBPtbrr19K3UX4HLBZ
+gfT7IOIXRrYaxfDYTMy+yCU2q74dPClH8HCVkNxmv8PxCOPy+ryQoKG6aarjaERe
+1KZaFYPRR8K9J3RykBIYWepEU5fqX16JeCmBePmc3RilPUFidobI+yMzFMgsT0YJ
+8gIFAoGAJFIE2FM3VyO4NGwcz4HDYRs/v+vFIw3uzm41YEU4NgTch5YM9dPveXrg
+q+pvPHaFQNpA3y/MgKKsvjO02NiiDvpZsH0s7y+Im5rnpa4kxEilgT5mkkZl0YOO
+nqjkRbifWeSOYh5MnGGdMGlcmqjoJHidFJ1LD6867FqpEvgSGek=
+-----END RSA PRIVATE KEY-----

data/spec/onstomp/full_stacks/ssl/demoCA/cacert.pem

@@ -0,0 +1,17 @@
+-----BEGIN CERTIFICATE-----
+MIICujCCAiOgAwIBAgIJAPxr+ytdcmk7MA0GCSqGSIb3DQEBBQUAMHYxCzAJBgNV
+BAYTAlVTMREwDwYDVQQIDAhOb3doZXJlczEQMA4GA1UEBwwHU3RvbXBlcjEYMBYG
+A1UECgwPU3RvbXBlciBUZXN0aW5nMRMwEQYDVQQLDApDQSBUZXN0aW5nMRMwEQYD
+VQQDDApTdG9tcGVyIENBMB4XDTExMDIyMTE2NDk0OVoXDTIxMDIxODE2NDk0OVow
+djELMAkGA1UEBhMCVVMxETAPBgNVBAgMCE5vd2hlcmVzMRAwDgYDVQQHDAdTdG9t
+cGVyMRgwFgYDVQQKDA9TdG9tcGVyIFRlc3RpbmcxEzARBgNVBAsMCkNBIFRlc3Rp
+bmcxEzARBgNVBAMMClN0b21wZXIgQ0EwgZ8wDQYJKoZIhvcNAQEBBQADgY0AMIGJ
+AoGBAKU9pySr+X6uFFTV3SMP4BV31u9PiU17UATEIIEj7jRmDWR9i9oxf7+k1+L0
+OzORjug10Bt27teD2JcWKTCSpO5uHJ3/uRpcqViECzdJtWXcG+s253Jj2xJRcBi4
+TBXP/VFsKYbHGYmA57GQzcaaXqptvQq7fuqsfgxqr82w83K7AgMBAAGjUDBOMB0G
+A1UdDgQWBBR8T1C/xleXa9kc8ZLvtWZHlHkVdDAfBgNVHSMEGDAWgBR8T1C/xleX
+a9kc8ZLvtWZHlHkVdDAMBgNVHRMEBTADAQH/MA0GCSqGSIb3DQEBBQUAA4GBAArO
+OvHvpbafdbxqVv6R9vch06hbPdtVh5pcM2AsNGfn3MhD9VmIAkrPgbVHHN8d9lFS
+MVZbnyGtkiJoZTlJV9tPD4Nq/aGSePu+U4gtFNRmD+wvh5VREcrOloqN4lX8/h2N
+aFMdwQa7qRZ40L/4RLslb5ZsiiFihbk9pY+AOD+d
+-----END CERTIFICATE-----

data/spec/onstomp/full_stacks/ssl/demoCA/index.txt

@@ -0,0 +1,2 @@
+V	210218165001Z		01	unknown	/C=US/ST=Nowheres/O=Stomper Testing/OU=SSL Testing/CN=My Broker
+V	210218165725Z		02	unknown	/C=US/ST=Nowheres/O=Stomper Testing/OU=SSL Testing/CN=My Client

data/spec/onstomp/full_stacks/ssl/demoCA/index.txt.attr

@@ -0,0 +1 @@
+unique_subject = yes

data/spec/onstomp/full_stacks/ssl/demoCA/index.txt.attr.old

@@ -0,0 +1 @@
+unique_subject = yes

data/spec/onstomp/full_stacks/ssl/demoCA/index.txt.old

@@ -0,0 +1 @@
+V	210218165001Z		01	unknown	/C=US/ST=Nowheres/O=Stomper Testing/OU=SSL Testing/CN=My Broker

data/spec/onstomp/full_stacks/ssl/demoCA/newcerts/01.pem

@@ -0,0 +1,72 @@
+Certificate:
+    Data:
+        Version: 3 (0x2)
+        Serial Number: 1 (0x1)
+        Signature Algorithm: sha1WithRSAEncryption
+        Issuer: C=US, ST=Nowheres, L=Stomper, O=Stomper Testing, OU=CA Testing, CN=Stomper CA
+        Validity
+            Not Before: Feb 21 16:50:01 2011 GMT
+            Not After : Feb 18 16:50:01 2021 GMT
+        Subject: C=US, ST=Nowheres, O=Stomper Testing, OU=SSL Testing, CN=My Broker
+        Subject Public Key Info:
+            Public Key Algorithm: rsaEncryption
+                Public-Key: (2048 bit)
+                Modulus:
+                    00:eb:dd:be:2d:87:54:13:ce:4c:e1:bd:c9:c8:e0:
+                    18:b0:50:f1:30:c8:6e:22:7a:bc:c6:ea:3f:e2:c4:
+                    24:d9:8c:41:94:54:d4:e0:7b:5c:6c:dd:bd:41:8f:
+                    bd:aa:98:c2:f0:e9:13:7e:36:5a:97:57:e4:6a:04:
+                    08:aa:12:2b:68:4b:9d:5a:40:92:41:57:5b:2e:d2:
+                    e1:f4:f8:c4:31:dd:6c:2d:4c:12:ab:80:72:71:39:
+                    4e:aa:14:b8:f6:35:e8:07:9f:a2:a3:b8:a6:08:8d:
+                    60:d5:53:01:38:8c:aa:17:e9:b0:b3:8c:e3:d9:4d:
+                    14:02:da:9a:ff:6f:5b:65:ba:c3:56:80:b0:de:8e:
+                    c8:25:3f:1b:a0:ac:80:1c:38:e0:77:4e:c6:5d:92:
+                    44:97:c3:f8:ba:9a:02:83:a8:1b:57:3b:38:d6:7d:
+                    7f:95:86:f4:c2:de:51:d0:ee:a1:30:b4:39:9a:f6:
+                    58:03:62:93:94:a5:72:72:a2:5c:7e:cf:54:7f:57:
+                    92:46:f8:f7:b1:79:56:20:bd:95:25:d5:11:5d:c0:
+                    5c:c7:cd:cf:44:8f:88:68:e1:6f:c0:ca:2e:db:fc:
+                    d0:19:82:36:b1:3f:20:82:df:ce:a6:55:44:02:51:
+                    8b:6c:4f:a1:26:b3:41:e8:0b:a8:0c:8f:67:65:92:
+                    ee:df
+                Exponent: 65537 (0x10001)
+        X509v3 extensions:
+            X509v3 Basic Constraints: 
+                CA:FALSE
+            Netscape Comment: 
+                OpenSSL Generated Certificate
+            X509v3 Subject Key Identifier: 
+                5C:28:4D:B8:A3:D7:CB:43:2C:1C:DB:0F:7B:75:99:85:44:4E:D8:A1
+            X509v3 Authority Key Identifier: 
+                keyid:7C:4F:50:BF:C6:57:97:6B:D9:1C:F1:92:EF:B5:66:47:94:79:15:74
+
+    Signature Algorithm: sha1WithRSAEncryption
+        51:2f:da:d1:a4:9f:97:77:00:69:bb:04:85:34:75:bd:2e:ad:
+        45:83:a7:95:f1:83:5d:52:1e:65:79:ee:5b:a0:f5:7b:82:53:
+        88:c3:fc:89:c8:4f:68:4e:80:8a:cb:53:4f:44:a8:6d:8c:be:
+        be:74:19:ff:75:52:14:3b:70:42:87:cf:fc:90:58:7e:c9:cd:
+        d4:a2:b8:15:74:e8:51:ce:9c:73:ca:a5:29:76:4a:f3:a4:26:
+        f3:70:c5:8e:5f:cf:fe:7d:81:de:43:9e:36:c0:87:7b:66:02:
+        7f:02:2d:64:48:19:be:74:4a:27:cd:c5:56:c5:ff:96:1a:02:
+        3a:2f
+-----BEGIN CERTIFICATE-----
+MIIDTzCCArigAwIBAgIBATANBgkqhkiG9w0BAQUFADB2MQswCQYDVQQGEwJVUzER
+MA8GA1UECAwITm93aGVyZXMxEDAOBgNVBAcMB1N0b21wZXIxGDAWBgNVBAoMD1N0
+b21wZXIgVGVzdGluZzETMBEGA1UECwwKQ0EgVGVzdGluZzETMBEGA1UEAwwKU3Rv
+bXBlciBDQTAeFw0xMTAyMjExNjUwMDFaFw0yMTAyMTgxNjUwMDFaMGQxCzAJBgNV
+BAYTAlVTMREwDwYDVQQIDAhOb3doZXJlczEYMBYGA1UECgwPU3RvbXBlciBUZXN0
+aW5nMRQwEgYDVQQLDAtTU0wgVGVzdGluZzESMBAGA1UEAwwJTXkgQnJva2VyMIIB
+IjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEA692+LYdUE85M4b3JyOAYsFDx
+MMhuInq8xuo/4sQk2YxBlFTU4HtcbN29QY+9qpjC8OkTfjZal1fkagQIqhIraEud
+WkCSQVdbLtLh9PjEMd1sLUwSq4BycTlOqhS49jXoB5+io7imCI1g1VMBOIyqF+mw
+s4zj2U0UAtqa/29bZbrDVoCw3o7IJT8boKyAHDjgd07GXZJEl8P4upoCg6gbVzs4
+1n1/lYb0wt5R0O6hMLQ5mvZYA2KTlKVycqJcfs9Uf1eSRvj3sXlWIL2VJdURXcBc
+x83PRI+IaOFvwMou2/zQGYI2sT8ggt/OplVEAlGLbE+hJrNB6AuoDI9nZZLu3wID
+AQABo3sweTAJBgNVHRMEAjAAMCwGCWCGSAGG+EIBDQQfFh1PcGVuU1NMIEdlbmVy
+YXRlZCBDZXJ0aWZpY2F0ZTAdBgNVHQ4EFgQUXChNuKPXy0MsHNsPe3WZhURO2KEw
+HwYDVR0jBBgwFoAUfE9Qv8ZXl2vZHPGS77VmR5R5FXQwDQYJKoZIhvcNAQEFBQAD
+gYEAUS/a0aSfl3cAabsEhTR1vS6tRYOnlfGDXVIeZXnuW6D1e4JTiMP8ichPaE6A
+istTT0SobYy+vnQZ/3VSFDtwQofP/JBYfsnN1KK4FXToUc6cc8qlKXZK86Qm83DF
+jl/P/n2B3kOeNsCHe2YCfwItZEgZvnRKJ83FVsX/lhoCOi8=
+-----END CERTIFICATE-----

data/spec/onstomp/full_stacks/ssl/demoCA/newcerts/02.pem

@@ -0,0 +1,72 @@
+Certificate:
+    Data:
+        Version: 3 (0x2)
+        Serial Number: 2 (0x2)
+        Signature Algorithm: sha1WithRSAEncryption
+        Issuer: C=US, ST=Nowheres, L=Stomper, O=Stomper Testing, OU=CA Testing, CN=Stomper CA
+        Validity
+            Not Before: Feb 21 16:57:25 2011 GMT
+            Not After : Feb 18 16:57:25 2021 GMT
+        Subject: C=US, ST=Nowheres, O=Stomper Testing, OU=SSL Testing, CN=My Client
+        Subject Public Key Info:
+            Public Key Algorithm: rsaEncryption
+                Public-Key: (2048 bit)
+                Modulus:
+                    00:af:62:ad:ea:0b:2b:3d:a6:0e:e3:4a:b2:b5:ba:
+                    32:a5:ab:5f:f2:f0:5a:83:22:4c:ff:05:9d:be:25:
+                    bb:68:61:f5:56:2e:22:9c:2b:f9:3b:a2:97:37:aa:
+                    37:17:40:cd:12:97:76:73:19:24:c5:59:78:45:45:
+                    5d:2b:9c:df:e9:d2:56:d7:5c:b9:ca:53:73:a1:62:
+                    70:df:52:af:fb:7d:6b:b7:68:7a:08:68:e8:4a:ab:
+                    5a:e9:e6:a4:cd:38:9d:2e:55:51:11:48:3c:2b:57:
+                    a8:55:37:42:11:0c:e9:2c:e7:79:d3:4c:c8:2e:9e:
+                    92:4a:dc:8b:66:79:bf:62:e0:75:49:d7:37:62:4e:
+                    3a:47:7a:c0:2f:75:8c:28:70:50:88:24:ae:7a:eb:
+                    2f:a6:77:60:64:77:0d:e2:c2:4e:e5:62:05:fa:27:
+                    20:5c:53:72:80:16:e6:af:f5:35:5a:a9:6a:5f:60:
+                    05:2a:d8:fe:a9:a4:2d:aa:c4:81:35:fc:51:8a:7c:
+                    9f:0c:40:ea:40:61:87:ec:0a:60:39:44:2e:b0:f6:
+                    77:79:01:b6:bf:15:d2:65:cd:6a:e4:21:05:59:53:
+                    d9:6a:e7:37:ea:ce:a3:b1:cf:c3:70:fc:2c:40:3d:
+                    12:bf:f9:84:32:ca:83:c6:e5:3d:aa:28:ff:78:9d:
+                    03:17
+                Exponent: 65537 (0x10001)
+        X509v3 extensions:
+            X509v3 Basic Constraints: 
+                CA:FALSE
+            Netscape Comment: 
+                OpenSSL Generated Certificate
+            X509v3 Subject Key Identifier: 
+                7A:FC:5D:4F:48:8F:41:43:EA:E5:A6:14:2D:30:19:E5:63:70:43:5C
+            X509v3 Authority Key Identifier: 
+                keyid:7C:4F:50:BF:C6:57:97:6B:D9:1C:F1:92:EF:B5:66:47:94:79:15:74
+
+    Signature Algorithm: sha1WithRSAEncryption
+        75:80:be:12:d8:7d:64:78:1f:62:97:a9:cd:0a:84:89:15:43:
+        ca:5b:a3:72:77:73:f1:aa:06:59:15:75:0b:1b:7d:79:c3:9f:
+        d5:3d:e5:70:df:64:ec:a4:27:d9:a3:49:02:b0:75:89:bd:dc:
+        9b:c4:79:33:14:38:93:2b:d8:3c:01:e6:d0:2a:56:06:6a:ba:
+        49:56:5a:f7:6c:49:dd:b0:5c:49:be:68:09:7d:75:2e:9f:49:
+        ed:e1:1e:49:6b:f1:cc:1c:1c:be:1e:ac:a9:ee:44:7b:15:32:
+        e0:b1:a6:9c:48:a4:1c:5a:55:66:0f:86:95:c0:02:e8:b7:a8:
+        b9:9d
+-----BEGIN CERTIFICATE-----
+MIIDTzCCArigAwIBAgIBAjANBgkqhkiG9w0BAQUFADB2MQswCQYDVQQGEwJVUzER
+MA8GA1UECAwITm93aGVyZXMxEDAOBgNVBAcMB1N0b21wZXIxGDAWBgNVBAoMD1N0
+b21wZXIgVGVzdGluZzETMBEGA1UECwwKQ0EgVGVzdGluZzETMBEGA1UEAwwKU3Rv
+bXBlciBDQTAeFw0xMTAyMjExNjU3MjVaFw0yMTAyMTgxNjU3MjVaMGQxCzAJBgNV
+BAYTAlVTMREwDwYDVQQIDAhOb3doZXJlczEYMBYGA1UECgwPU3RvbXBlciBUZXN0
+aW5nMRQwEgYDVQQLDAtTU0wgVGVzdGluZzESMBAGA1UEAwwJTXkgQ2xpZW50MIIB
+IjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAr2Kt6gsrPaYO40qytboypatf
+8vBagyJM/wWdviW7aGH1Vi4inCv5O6KXN6o3F0DNEpd2cxkkxVl4RUVdK5zf6dJW
+11y5ylNzoWJw31Kv+31rt2h6CGjoSqta6eakzTidLlVREUg8K1eoVTdCEQzpLOd5
+00zILp6SStyLZnm/YuB1Sdc3Yk46R3rAL3WMKHBQiCSueusvpndgZHcN4sJO5WIF
++icgXFNygBbmr/U1WqlqX2AFKtj+qaQtqsSBNfxRinyfDEDqQGGH7ApgOUQusPZ3
+eQG2vxXSZc1q5CEFWVPZauc36s6jsc/DcPwsQD0Sv/mEMsqDxuU9qij/eJ0DFwID
+AQABo3sweTAJBgNVHRMEAjAAMCwGCWCGSAGG+EIBDQQfFh1PcGVuU1NMIEdlbmVy
+YXRlZCBDZXJ0aWZpY2F0ZTAdBgNVHQ4EFgQUevxdT0iPQUPq5aYULTAZ5WNwQ1ww
+HwYDVR0jBBgwFoAUfE9Qv8ZXl2vZHPGS77VmR5R5FXQwDQYJKoZIhvcNAQEFBQAD
+gYEAdYC+Eth9ZHgfYpepzQqEiRVDylujcndz8aoGWRV1Cxt9ecOf1T3lcN9k7KQn
+2aNJArB1ib3cm8R5MxQ4kyvYPAHm0CpWBmq6SVZa92xJ3bBcSb5oCX11Lp9J7eEe
+SWvxzBwcvh6sqe5EexUy4LGmnEikHFpVZg+GlcAC6LeouZ0=
+-----END CERTIFICATE-----

data/spec/onstomp/full_stacks/ssl/demoCA/private/cakey.pem

@@ -0,0 +1,17 @@
+-----BEGIN ENCRYPTED PRIVATE KEY-----
+MIICxjBABgkqhkiG9w0BBQ0wMzAbBgkqhkiG9w0BBQwwDgQIfpo+T6ZjqGYCAggA
+MBQGCCqGSIb3DQMHBAgAjGO3xvusBASCAoBsphz6kWs5lU85No2RFHrsOmPE6Hbz
+JwUoc24za/Fxf+/ZkBS/E4ENSuCEBrhbUD2OkTRljG6XsyxFm2Do+SjrAAqy79yk
+teuuhwDr32hLlfLBU9QW1Y4tlyZq9APBjAjuklKC5Tbjyjgf3pwN0SGfGyzCZ4jY
+0dBseBq1E4p4Q14oFAsHWzw3HBBB8p5yhtjSGrchr6+fvjc+DcO69iXPoLH4erJc
+t49UFARdyTXJYVfuGDAUf05YewymlSFPiH9GvQeWiSTk3AESfOD3D+3UPW+30OT7
+XYrBLLrd+JPcLWFfwB2Y3a3dl9RBEGdxd7epSPb6TKsCz5RZZT1mf/EWt8JGOTWx
+SZ0i3QtKW0aiNXBEQHjCoxmyKNz0Hw0YtpsjabWloIKCq9Xbz3wUuIhYqDtKxm9c
+sHx6+kDl/fFubYwhw6VkfGL4ytTscoQ7m5bddE2+s04ZLZmZLFyQcAyPE9Ftlvez
+L2/LjloZQ3kgbgrO+bypmk9D6nx2vA4q6GbzXojKBYrUmfJ7zsF1MSSiF6HDzcY8
+rNYWghYo5ToDDdapPQYXCwh5q4J2f+n/86ynyykMyPcuQIs7bXiNfcCzn0DuG6/1
+XzAY8c27pGo1bpPWtIoFamdMWgpubUHWYydIgx+SP+CGqE2zuCEoUT5m8dC4RMKT
+r4mOqtrAIaYHU09nMIQ2oKqvO3sbv2K6rIesR5HwczoIMgcEzaS0IUpzE8x1BXZn
+cANiYnWlqTatOAJOuFCnSsMPd4XgP4rBEFqdvBho0pkSgrQ2eSEfCM5HBHt5JpAB
+JFgv/dEE+/ufP0jWSovRlfEeohQALlR8MNCPy+IN3NVBhF045y6kowE0
+-----END ENCRYPTED PRIVATE KEY-----

data/spec/onstomp/full_stacks/ssl/demoCA/serial

@@ -0,0 +1 @@
+03

data/spec/onstomp/full_stacks/ssl/demoCA/serial.old

@@ -0,0 +1 @@
+02

data/spec/onstomp/full_stacks/test_broker.rb

@@ -0,0 +1,251 @@
+# -*- encoding: utf-8 -*-
+
+# This is meant to provide basic testing of the full IO of an OnStomp client.
+# It is not designed to handle more than one client at a time.
+class TestBroker
+  class StopThread < StandardError; end
+  
+  attr_reader :messages, :sessions
+  
+  def initialize(port=61613)
+    @sessions = []
+    @messages = Hash.new { |h,k| h[k] = [] }
+    @subscribes = Hash.new { |h,k| h[k] = [] }
+    @sub_mutex = Mutex.new
+    @session_mutex = Mutex.new
+    @port = port
+    begin
+      @socket = TCPServer.new @port
+    rescue Exception => ex
+      $stdout.puts "Could not bind: #{ex}"
+    end
+    @session_class = Session10
+  end
+  
+  def kill_sessions
+    @session_mutex.synchronize do
+      @sessions.each do |s|
+        s.kill
+      end
+      @sessions.clear
+    end
+  end
+  
+  def enqueue_message s
+    @sub_mutex.synchronize do
+      msg = OnStomp::Components::Frame.new 'MESSAGE', {}, s.body
+      s.headers.each do |k,v|
+        msg.headers.append k, v
+      end
+      msg[:'message-id'] = "msg-#{Time.now.to_f}"
+      dest = msg[:destination]
+      #$stdout.puts "Enqueuing on #{dest}"
+      if !@subscribes[dest].empty?
+        session, subid = @subscribes[dest].first
+        deliver_message msg, session, subid
+      else
+        @messages[dest] << msg
+      end
+    end
+    #$stdout.puts "Done enqueueing!"
+  end
+  
+  def deliver_message msg, sess, subid
+    msg[:subscription] = subid
+    sess.transmit msg
+  end
+  
+  def messages_for dest
+    @messages[dest]
+  end
+  
+  def bodies_for dest
+    messages_for(dest).map { |m| m.body }
+  end
+  
+  def subscribe f, session
+    @sub_mutex.synchronize do
+      #$stdout.puts "Subscribing?"
+      dest = f[:destination]
+      @subscribes[dest] << [session, f[:id]]
+      #$stdout.puts "Any messages? #{@messages[dest].inspect}"
+      until @messages[dest].empty?
+        msg = @messages[dest].shift
+        deliver_message msg, session, f[:id]
+      end
+    end
+  end
+  
+  def unsubscribe f, session
+    @sub_mutex.synchronize do
+      @subscribes[f[:destination]].reject! do |pair|
+        pair.first == session && pair.last == f[:id]
+      end
+    end
+  end
+
+  def start
+    @listener = Thread.new do
+      begin
+        loop do
+          sess = @session_class.new(self, @socket.accept)
+          @session_mutex.synchronize do
+            @sessions << sess
+          end
+        end
+      rescue StopThread
+      rescue Exception
+        $stdout.puts "Listener failed: #{$!}"
+        stop
+      end
+    end
+  end
+  
+  def stop
+    @session.stop if @session
+    @listener.raise(StopThread.new) rescue nil
+    @listener.join rescue nil
+    @socket.close rescue nil
+  end
+  
+  def join
+    @sessions.each do |s|
+      s.join
+    end
+  end
+  
+  class Session10
+    include OnStomp::Interfaces::ClientEvents
+    
+    attr_reader :connection, :socket
+    def initialize server, sock
+      @server = server
+      @socket = sock
+      init_events
+      init_connection
+      # CONNECT/CONNECTED handshake
+      connect_frame = connected_frame = nil
+      @connection.io_process_read do |f|
+        connect_frame ||= f
+      end until connect_frame
+      
+      transmit OnStomp::Components::Frame.new('CONNECTED')
+      @connection.io_process_write do |f|
+        connected_frame ||= f
+      end until connected_frame
+      @processor.start
+    end
+    
+    def init_connection
+      @connection = OnStomp::Connections::Stomp_1_0.new(socket, self)
+      @processor = OnStomp::Components::ThreadedProcessor.new self
+    end
+    
+    def connected?
+      @connection.connected?
+    end
+    
+    def init_events
+      on_subscribe do |s,_|
+        #$stdout.puts "Got SUBSCRIBE: #{s.headers.to_hash.inspect}"
+        @server.subscribe s, self
+      end
+      
+      on_unsubscribe do |u, _|
+        #$stdout.puts "Got UNSUBSCRIBE: #{u.headers.to_hash.inspect}"
+        @server.unsubscribe u, self
+      end
+      
+      on_send do  |s,_|
+        #$stdout.puts "Got a SEND frame! #{s.body.inspect}"
+        @server.enqueue_message s
+      end
+      
+      on_disconnect do |d,_|
+        @connection.close
+      end
+      
+      before_receiving do |f,_|
+        if f.header? :receipt
+          transmit OnStomp::Components::Frame.new('RECEIPT',
+            :'receipt-id' => f[:receipt])
+        end
+      end
+    end
+    
+    def dispatch_transmitted f
+      trigger_after_transmitting f
+    end
+    
+    def dispatch_received f
+      trigger_before_receiving f
+      trigger_after_receiving f
+    end
+    
+    def transmit frame
+      frame.tap do
+        trigger_before_transmitting frame
+        connection.write_frame_nonblock(frame)
+      end
+    end
+    
+    def join
+      if @connection.connected?
+        #@connection.close
+        @processor.join
+      end
+    end
+    
+    def kill
+      @socket.close
+      @processor.stop
+    end
+    
+    def stop
+      if @connection.connected?
+        @connection.close
+        @processor.stop
+      end
+    end
+  end
+  
+  class Session11 < Session10
+    def init_events
+      super
+    end
+
+    def init_connection
+      @connection = OnStomp::Connections::Stomp_1_1.new(socket, self)
+      @processor = OnStomp::Components::ThreadedProcessor.new self
+    end
+  end
+  
+  class StompErrorOnConnectSession < Session10
+  end
+end
+
+class TestSSLBroker < TestBroker
+  SSL_CERT_FILES = {
+    :default => {
+      :c => File.expand_path('../ssl/broker_cert.pem', __FILE__),
+      :k => File.expand_path('../ssl/broker_key.pem', __FILE__)
+    }
+  }
+  
+  def initialize(port=61612, certs=:default)
+    @port = port
+    @tcp_socket = TCPServer.new(@port)
+    @ssl_context = OpenSSL::SSL::SSLContext.new
+    @ssl_context.verify_mode = OpenSSL::SSL::VERIFY_NONE
+    cert_files = SSL_CERT_FILES[certs]
+    @ssl_context.key = OpenSSL::PKey::RSA.new(File.read(cert_files[:k]))
+    @ssl_context.cert = OpenSSL::X509::Certificate.new(File.read(cert_files[:c]))
+    @socket = OpenSSL::SSL::SSLServer.new(@tcp_socket, @ssl_context)
+    @socket.start_immediately = true
+    @session = nil
+    @version = '1.1'
+    @session_class = StompSession
+    @sent_frames = []
+    @received_frames = []
+  end
+end