This commit was manufactured by cvs2svn to create branch 'RUBY'.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/branches/RUBY@9 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 36 insertions, 0 deletions

diff --git a/sample/cbreak.rb b/sample/cbreak.rb
new file mode 100644
index 0000000000..cbb15d2f41
--- /dev/null
+++ b/sample/cbreak.rb
@@ -0,0 +1,36 @@
+# ioctl example works on Sun
+
+CBREAK = 0x00000002
+ECHO = 0x00000008
+TIOCGETP = 0x40067408
+TIOCSETP = 0x80067409
+
+def cbreak ()
+  set_cbreak(TRUE)
+end
+
+def cooked ()
+  set_cbreak(FALSE)
+end
+
+def set_cbreak (on)
+  tty = "\0" * 256
+  STDIN.ioctl(TIOCGETP, tty)
+  ttys = tty.unpack("C4 S")
+  if on
+    ttys[4] |= CBREAK
+    ttys[4] &= ~ECHO
+  else
+    ttys[4] &= ~CBREAK
+    ttys[4] |= ECHO
+  end
+  tty = ttys.pack("C4 S")
+  STDIN.ioctl(TIOCSETP, tty)
+end
+cbreak();
+
+print("this is no-echo line: ");
+readline().print
+cooked();
+print("this is echo line: ");
+readline()