1 files changed, 26 insertions, 0 deletions
diff --git a/externals/gridflow/extra/server_1_grid.rb b/externals/gridflow/extra/server_1_grid.rb
new file mode 100644
index 00000000..f1f4a9fc
--- /dev/null
+++ b/externals/gridflow/extra/server_1_grid.rb
@@ -0,0 +1,26 @@
+# $Id: server_1_grid.rb,v 1.1 2005-10-04 02:02:15 matju Exp $
+
+require "socket"
+require "smpte" # in this folder
+
+picture = "\x7fGRID \000\003"
+picture << [240,320,3].pack("N*")
+make_smpte(picture) {|*rgb| rgb.pack "N*" }
+
+# File.open("blah.grid","w") {|f| f.write picture }
+
+serv = TCPServer.new 4242
+loop {
+  puts "waiting for connection (port 4242)"
+  sock = serv.accept
+  puts "incoming connection"
+  begin
+    loop {
+      sock.write picture
+      puts "wrote one picture"
+    }
+  rescue Errno::EPIPE # Broken Pipe
+    puts "connection closed (by client)"
+    # it's ok, go back to waiting.
+  end
+}