From fa47f6ea2ee29607de4d97a79d24b83f0b8c25f9 Mon Sep 17 00:00:00 2001 From: Roman Haefeli Date: Tue, 1 Feb 2011 21:52:52 +0000 Subject: those abstractions actually belong to the 'net' section svn path=/trunk/externals/mrpeach/; revision=14850 --- net/tcpsocket.OSC.pd | 89 ++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 89 insertions(+) create mode 100644 net/tcpsocket.OSC.pd (limited to 'net/tcpsocket.OSC.pd') diff --git a/net/tcpsocket.OSC.pd b/net/tcpsocket.OSC.pd new file mode 100644 index 0000000..f3e47da --- /dev/null +++ b/net/tcpsocket.OSC.pd @@ -0,0 +1,89 @@ +#N canvas 636 71 455 534 10; +#X obj 50 49 == \$2; +#X obj 7 28 route in socket; +#X obj 7 76 spigot; +#N canvas 622 183 512 335 reset 0; +#X obj 23 41 route \$2; +#X obj 23 63 route reset; +#X obj 23 83 t b b; +#X msg 55 170 done; +#X obj 23 113 outlet; +#X text 161 33 this is used to:; +#X text 87 114 a) reset the sockethandler on a new connection; +#X text 88 129 (for instance \, if the previous connection was quitted +in the middle of a packet).; +#X text 55 213 b) check for the socketserver \, if a sockethandler +on specified socket already exists.; +#X obj 55 191 s \$1.TCPSOCKET; +#X obj 23 19 r \$1.TCPSOCKET; +#X connect 0 0 1 0; +#X connect 1 0 2 0; +#X connect 2 0 4 0; +#X connect 2 1 3 0; +#X connect 3 0 9 0; +#X connect 10 0 0 0; +#X restore 40 102 pd reset; +#X obj 104 280 route socket ip; +#X obj 41 367 list append; +#X obj 58 323 list append; +#X obj 7 299 t a b b b; +#X obj 7 414 list prepend out; +#X obj 41 391 list prepend socket.out; +#X obj 58 345 list prepend ip.out; +#X obj 7 442 list trim; +#X text 16 220 the lower part makes [tcpsocketserver] behave like [tcpserver] +; +#X obj -2 136 cnv 15 450 70 empty empty empty 20 12 0 14 -204786 -66577 +0; +#X text 70 162 <- PUT HERE THE PROTOCOL SPECIFIC DELIMITER CODE; +#X text 15 197 -------------------------------------------------------- +; +#X text 13 129 -------------------------------------------------------- +; +#X obj 7 6 r \$1.TCPSOCKET; +#X obj 7 465 s \$1.TCPSOCKET; +#X obj 104 256 r \$1.TCPSOCKET; +#X text 200 454 Author: Roman Haefeli; +#X text 55 75 <- only pass stream of own socket; +#N canvas 389 116 266 236 OSC 0; +#X obj 27 18 inlet; +#X obj 27 186 outlet; +#X obj 144 23 inlet; +#X text 194 23 reset; +#X obj 27 123 mrpeach/slipdec 16384; +#X obj 27 151 spigot 1; +#X obj 144 45 t b b b; +#X msg 163 67 192 192; +#X msg 183 99 0; +#X msg 144 100 1; +#X connect 0 0 4 0; +#X connect 2 0 6 0; +#X connect 4 0 5 0; +#X connect 5 0 1 0; +#X connect 6 0 9 0; +#X connect 6 1 7 0; +#X connect 6 2 8 0; +#X connect 7 0 4 0; +#X connect 8 0 5 1; +#X connect 9 0 5 1; +#X restore 7 161 pd OSC; +#X text 201 474 Version: 2011-01-05; +#X connect 0 0 2 1; +#X connect 1 0 2 0; +#X connect 1 1 0 0; +#X connect 2 0 22 0; +#X connect 3 0 22 1; +#X connect 4 0 5 1; +#X connect 4 1 6 1; +#X connect 5 0 9 0; +#X connect 6 0 10 0; +#X connect 7 0 8 0; +#X connect 7 2 5 0; +#X connect 7 3 6 0; +#X connect 8 0 11 0; +#X connect 9 0 11 0; +#X connect 10 0 11 0; +#X connect 11 0 18 0; +#X connect 17 0 1 0; +#X connect 19 0 4 0; +#X connect 22 0 7 0; -- cgit v1.2.1