From 0987c4a0f35fa24c7095aab974031a937ea0a062 Mon Sep 17 00:00:00 2001
From: Martin Peach <mrpeach@users.sourceforge.net>
Date: Tue, 3 Feb 2009 14:05:29 +0000
Subject: These were updated by roman roman.haefeli@gmail.com

[tcpsocket.OSC]
- fixed limitation of maximum size for incoming list for serialization.
handles now arbitrary list lengths correctly.

[tcpsocket.FUDI]
- fixed limitation of maximum size for incoming list for serialization.
handles now arbitrary list lengths correctly.
- fixed delimiting problem: semicolons prepended by backslashes are
correctly omitted for delimiter evaluation.

svn path=/trunk/externals/mrpeach/; revision=10727
---
 osc/tcpsocket.OSC.pd | 104 ++++++++++++++++++++++++++++++---------------------
 1 file changed, 62 insertions(+), 42 deletions(-)

(limited to 'osc/tcpsocket.OSC.pd')

diff --git a/osc/tcpsocket.OSC.pd b/osc/tcpsocket.OSC.pd
index 069af4f..1b838e3 100644
--- a/osc/tcpsocket.OSC.pd
+++ b/osc/tcpsocket.OSC.pd
@@ -44,43 +44,12 @@ on specified socket already exists.;
 #X obj 7 465 s \$1.TCPSOCKET;
 #X obj 104 256 r \$1.TCPSOCKET;
 #X text 200 454 Author: Roman Haefeli;
-#X text 201 474 Version: 2009-01-11;
 #X text 55 75 <- only pass stream of own socket;
 #N canvas 395 78 268 176 OSC 0;
 #X obj 27 18 inlet;
 #X obj 27 156 outlet;
 #X obj 144 23 inlet;
 #X text 194 23 reset;
-#N canvas 628 406 424 313 drip 0;
-#X obj 12 15 inlet;
-#X obj 12 226 outlet;
-#X obj 107 16 table \$0.buffer 65536;
-#X obj 76 82 s \$0.buffer;
-#X obj 76 61 list prepend 0;
-#X obj 12 37 t a a;
-#X text 9 265 this 'drip' approach might use more memory \, but hopefully
-less cpu cycles.;
-#X obj 12 102 list length;
-#X obj 12 150 until;
-#X obj 12 126 t a b;
-#X obj 12 173 f;
-#X obj 60 176 + 1;
-#X msg 61 150 0;
-#X obj 12 202 tabread \$0.buffer;
-#X connect 0 0 5 0;
-#X connect 4 0 3 0;
-#X connect 5 0 7 0;
-#X connect 5 1 4 0;
-#X connect 7 0 9 0;
-#X connect 8 0 10 0;
-#X connect 9 0 8 0;
-#X connect 9 1 12 0;
-#X connect 10 0 11 0;
-#X connect 10 0 13 0;
-#X connect 11 0 10 1;
-#X connect 12 0 10 1;
-#X connect 13 0 1 0;
-#X restore 27 49 pd drip;
 #N canvas 820 354 408 355 parse_frameheader 0;
 #X obj 14 10 inlet;
 #X obj 14 304 outlet;
@@ -194,21 +163,72 @@ less cpu cycles.;
 #X restore 27 129 pd form_packet;
 #X obj 169 85 b;
 #X obj 144 50 b;
-#X connect 0 0 4 0;
-#X connect 2 0 8 0;
+#N canvas 389 242 191 341 serialize 0;
+#X obj 5 100 t a a;
+#X obj 37 122 list prepend 0;
+#X obj 37 143 s \$0.inbuffer;
+#X obj 5 174 list length;
+#X obj 5 218 until;
+#X obj 5 195 t a b;
+#X obj 5 241 f;
+#X obj 50 244 + 1;
+#X msg 49 218 0;
+#X obj 5 267 tabread \$0.inbuffer;
+#X obj 5 50 inlet;
+#X obj 5 289 outlet;
+#N canvas 294 258 396 232 list_serialize_raw 0;
+#X obj 13 73 until;
+#X obj 13 97 list append;
+#X obj 13 47 t b a;
+#X obj 13 23 inlet;
+#X obj 13 169 outlet;
+#X obj 156 122 b;
+#X text 12 190 cut incoming list into pieces of a maximum of the buffersize.
+;
+#X obj 13 121 list split 65536;
+#X connect 0 0 1 0;
+#X connect 1 0 7 0;
+#X connect 2 0 0 0;
+#X connect 2 1 1 1;
+#X connect 3 0 2 0;
+#X connect 5 0 0 1;
+#X connect 7 0 4 0;
+#X connect 7 1 1 1;
+#X connect 7 2 5 0;
+#X connect 7 2 4 0;
+#X restore 5 74 pd list_serialize_raw;
+#X obj 5 12 table \$0.inbuffer 65536;
+#X connect 0 0 3 0;
+#X connect 0 1 1 0;
+#X connect 1 0 2 0;
+#X connect 3 0 5 0;
+#X connect 4 0 6 0;
+#X connect 5 0 4 0;
+#X connect 5 1 8 0;
+#X connect 6 0 7 0;
+#X connect 6 0 9 0;
+#X connect 7 0 6 1;
+#X connect 8 0 6 1;
+#X connect 9 0 11 0;
+#X connect 10 0 12 0;
+#X connect 12 0 0 0;
+#X restore 27 45 pd serialize;
+#X connect 0 0 8 0;
+#X connect 2 0 7 0;
 #X connect 4 0 5 0;
-#X connect 5 0 6 0;
-#X connect 5 1 6 1;
-#X connect 6 0 1 0;
-#X connect 6 1 7 0;
-#X connect 7 0 5 1;
-#X connect 8 0 5 1;
+#X connect 4 1 5 1;
+#X connect 5 0 1 0;
+#X connect 5 1 6 0;
+#X connect 6 0 4 1;
+#X connect 7 0 4 1;
+#X connect 8 0 4 0;
 #X restore 7 161 pd OSC;
+#X text 201 474 Version: 2009-02-02;
 #X connect 0 0 2 1;
 #X connect 1 0 2 0;
 #X connect 1 1 0 0;
-#X connect 2 0 23 0;
-#X connect 3 0 23 1;
+#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;
@@ -222,4 +242,4 @@ less cpu cycles.;
 #X connect 11 0 18 0;
 #X connect 17 0 1 0;
 #X connect 19 0 4 0;
-#X connect 23 0 7 0;
+#X connect 22 0 7 0;
-- 
cgit v1.2.1