From b594c332cacf5294d8d6e3139f3100a307567ed4 Mon Sep 17 00:00:00 2001 From: def Date: Tue, 3 Feb 2015 17:27:29 +0100 Subject: [PATCH 1/6] Add termios wrapper --- lib/posix/termios.nim | 255 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 255 insertions(+) create mode 100644 lib/posix/termios.nim diff --git a/lib/posix/termios.nim b/lib/posix/termios.nim new file mode 100644 index 0000000000..492a1456f4 --- /dev/null +++ b/lib/posix/termios.nim @@ -0,0 +1,255 @@ +{.deadCodeElim: on.} +import posix + +type + Speed* = cuint + Tcflag* = cuint + +const + NCCS* = 32 + +type + Termios* = object {.importc: "struct termios", header: "termios.h>", final, pure.} + iflag*: Tcflag # input mode flags + oflag*: Tcflag # output mode flags + cflag*: Tcflag # control mode flags + lflag*: Tcflag # local mode flags + line*: cuchar # line discipline + cc*: array[NCCS, cuchar] # control characters + ispeed*: Speed # input speed + ospeed*: Speed # output speed + + +# cc characters + +const + VINTR* = 0 + VQUIT* = 1 + VERASE* = 2 + VKILL* = 3 + VEOF* = 4 + VTIME* = 5 + VMIN* = 6 + VSWTC* = 7 + VSTART* = 8 + VSTOP* = 9 + VSUSP* = 10 + VEOL* = 11 + VREPRINT* = 12 + VDISCARD* = 13 + VWERASE* = 14 + VLNEXT* = 15 + VEOL2* = 16 + +# iflag bits + +const + IGNBRK* = 1 + BRKINT* = 2 + IGNPAR* = 4 + PARMRK* = 10 + INPCK* = 20 + ISTRIP* = 40 + INLCR* = 100 + IGNCR* = 200 + ICRNL* = 400 + IUCLC* = 1000 + IXON* = 2000 + IXANY* = 4000 + IXOFF* = 10000 + IMAXBEL* = 20000 + IUTF8* = 40000 + +# oflag bits + +const + OPOST* = 1 + OLCUC* = 2 + ONLCR* = 4 + OCRNL* = 10 + ONOCR* = 20 + ONLRET* = 40 + OFILL* = 100 + OFDEL* = 200 + NLDLY* = 400 + NL0* = 0 + NL1* = 400 + CRDLY* = 3000 + CR0* = 0 + CR1* = 1000 + CR2* = 2000 + CR3* = 3000 + TABDLY* = 14000 + TAB0* = 0 + TAB1* = 4000 + TAB2* = 10000 + TAB3* = 14000 + BSDLY* = 20000 + BS0* = 0 + BS1* = 20000 + FFDLY* = 0o000000100000 + FF0* = 0 + FF1* = 0o000000100000 + VTDLY* = 40000 + VT0* = 0 + VT1* = 40000 + XTABS* = 14000 + +# cflag bit meaning + +const + CBAUD* = 10017 + B0* = 0 + B50* = 1 + B75* = 2 + B110* = 3 + B134* = 4 + B150* = 5 + B200* = 6 + B300* = 7 + B600* = 10 + B1200* = 11 + B1800* = 12 + B2400* = 13 + B4800* = 14 + B9600* = 15 + B19200* = 16 + B38400* = 17 + EXTA* = B19200 + EXTB* = B38400 + CSIZE* = 60 + CS5* = 0 + CS6* = 20 + CS7* = 40 + CS8* = 60 + CSTOPB* = 100 + CREAD* = 200 + PARENB* = 400 + PARODD* = 1000 + HUPCL* = 2000 + CLOCAL* = 4000 + CBAUDEX* = 10000 + B57600* = 10001 + B115200* = 10002 + B230400* = 10003 + B460800* = 10004 + B500000* = 10005 + B576000* = 10006 + B921600* = 10007 + B1000000* = 10010 + B1152000* = 10011 + B1500000* = 10012 + B2000000* = 10013 + B2500000* = 10014 + B3000000* = 10015 + B3500000* = 10016 + B4000000* = 10017 + MAX_BAUD* = B4000000 + CIBAUD* = 2003600000 + CMSPAR* = 0o010000000000 + CRTSCTS* = 0o020000000000 + +# lflag bits + +const + ISIG* = 1 + ICANON* = 2 + XCASE* = 4 + ECHO* = 10 + ECHOE* = 20 + ECHOK* = 40 + ECHONL* = 100 + NOFLSH* = 200 + TOSTOP* = 400 + ECHOCTL* = 1000 + ECHOPRT* = 2000 + ECHOKE* = 4000 + FLUSHO* = 10000 + PENDIN* = 40000 + IEXTEN* = 0o000000100000 + EXTPROC* = 0o000000200000 + +# tcflow() and TCXONC use these + +const + TCOOFF* = 0 + TCOON* = 1 + TCIOFF* = 2 + TCION* = 3 + +# tcflush() and TCFLSH use these + +const + TCIFLUSH* = 0 + TCOFLUSH* = 1 + TCIOFLUSH* = 2 + +# tcsetattr uses these + +const + TCSANOW* = 0 + TCSADRAIN* = 1 + TCSAFLUSH* = 2 + +# Compare a character C to a value VAL from the `cc' array in a +# `struct termios'. If VAL is _POSIX_VDISABLE, no character can match it. + +template CCEQ*(val, c: expr): expr = + ((c) == (val) and (val) != POSIX_VDISABLE) + +# Return the output baud rate stored in *TERMIOS_P. + +proc cfgetospeed*(termios: ptr Termios): Speed {.importc: "cfgetospeed", + header: "".} +# Return the input baud rate stored in *TERMIOS_P. + +proc cfgetispeed*(termios: ptr Termios): Speed {.importc: "cfgetispeed", + header: "".} +# Set the output baud rate stored in *TERMIOS_P to SPEED. + +proc cfsetospeed*(termios: ptr Termios; speed: Speed): cint {. + importc: "cfsetospeed", header: "".} +# Set the input baud rate stored in *TERMIOS_P to SPEED. + +proc cfsetispeed*(termios: ptr Termios; speed: Speed): cint {. + importc: "cfsetispeed", header: "".} +# Set both the input and output baud rates in *TERMIOS_OP to SPEED. + +proc cfsetspeed*(termios: ptr Termios; speed: Speed): cint {. + importc: "cfsetspeed", header: "".} +# Put the state of FD into *TERMIOS_P. + +proc tcgetattr*(fd: cint; termios: ptr Termios): cint {. + importc: "tcgetattr", header: "".} +# Set the state of FD to *TERMIOS_P. +# Values for OPTIONAL_ACTIONS (TCSA*) are in . + +proc tcsetattr*(fd: cint; optional_actions: cint; termios: ptr Termios): cint {. + importc: "tcsetattr", header: "".} +# Set *TERMIOS_P to indicate raw mode. + +proc cfmakeraw*(termios: ptr Termios) {.importc: "cfmakeraw", + header: "".} +# Send zero bits on FD. + +proc tcsendbreak*(fd: cint; duration: cint): cint {.importc: "tcsendbreak", + header: "".} +# Wait for pending output to be written on FD. +# +# This function is a cancellation point and therefore not marked with +# . + +proc tcdrain*(fd: cint): cint {.importc: "tcdrain", header: "".} +# Flush pending data on FD. +# Values for QUEUE_SELECTOR (TC{I,O,IO}FLUSH) are in . + +proc tcflush*(fd: cint; queue_selector: cint): cint {.importc: "tcflush", + header: "".} +# Suspend or restart transmission on FD. +# Values for ACTION (TC[IO]{OFF,ON}) are in . + +proc tcflow*(fd: cint; action: cint): cint {.importc: "tcflow", + header: "".} +# Get process group ID for session leader for controlling terminal FD. + +proc tcgetsid*(fd: cint): TPid {.importc: "tcgetsid", header: "".} From 3b68d9e93c603117a301aa5048bfd61774434eb2 Mon Sep 17 00:00:00 2001 From: def Date: Tue, 3 Feb 2015 17:29:09 +0100 Subject: [PATCH 2/6] Add copyright header --- lib/posix/termios.nim | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/lib/posix/termios.nim b/lib/posix/termios.nim index 492a1456f4..88aed73c8d 100644 --- a/lib/posix/termios.nim +++ b/lib/posix/termios.nim @@ -1,3 +1,12 @@ +# +# +# Nim's Runtime Library +# (c) Copyright 2015 Andreas Rumpf +# +# See the file "copying.txt", included in this +# distribution, for details about the copyright. +# + {.deadCodeElim: on.} import posix From dcd23ae1f1b52f48f3d32a753ae4db065b3985f8 Mon Sep 17 00:00:00 2001 From: def Date: Tue, 3 Feb 2015 17:47:27 +0100 Subject: [PATCH 3/6] Add readPasswordFromStdin to rdstdin --- lib/impure/rdstdin.nim | 42 ++++++++++++++++++++++++++++++++++++++---- 1 file changed, 38 insertions(+), 4 deletions(-) diff --git a/lib/impure/rdstdin.nim b/lib/impure/rdstdin.nim index 07ef13fd97..258da22072 100644 --- a/lib/impure/rdstdin.nim +++ b/lib/impure/rdstdin.nim @@ -31,9 +31,27 @@ when defined(Windows): stdout.write(prompt) result = readLine(stdin, line) + proc getch(): cint {.header: "", importc: "_getch".} + + proc readPasswordFromStdin*(prompt: string, password: var TaintedString) = + ## Reads a `password` from stdin without printing it. `password` must not + ## be ``nil``! + password.setLen(0) + var c: char + echo prompt + while true: + c = getch().char + case c + of '\r', chr(0xA): + break + of '\b': + password.setLen(result.len - 1) + else: + password.add(c) + else: - import readline, history - + import readline, history, termios, unsigned + proc readLineFromStdin*(prompt: string): TaintedString {. tags: [ReadIOEffect, WriteIOEffect].} = var buffer = readline.readLine(prompt) @@ -55,8 +73,24 @@ else: result = true # initialization: - # disable auto-complete: + # disable auto-complete: proc doNothing(a, b: cint): cint {.cdecl, procvar.} = discard - + discard readline.bind_key('\t'.ord, doNothing) + proc readPasswordFromStdin*(prompt: string, password: var TaintedString) = + password.setLen(0) + let fd = stdin.getFileHandle() + var cur, old: Termios + discard fd.tcgetattr(cur.addr) + old = cur + cur.lflag = cur.lflag and not Tcflag(ECHO) + discard fd.tcsetattr(TCSADRAIN, cur.addr) + stdout.write prompt + discard stdin.readLine(password) + discard fd.tcsetattr(TCSADRAIN, old.addr) + +proc readPasswordFromStdin*(prompt: string): TaintedString = + ## Reads a password from stdin without printing it. + result = TaintedString("") + readPasswordFromStdin(prompt, result) From 4712c6951280befa162687cc98611e052fe71788 Mon Sep 17 00:00:00 2001 From: def Date: Wed, 4 Feb 2015 11:18:24 +0100 Subject: [PATCH 4/6] Fix typo --- lib/posix/termios.nim | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/posix/termios.nim b/lib/posix/termios.nim index 88aed73c8d..94258772fb 100644 --- a/lib/posix/termios.nim +++ b/lib/posix/termios.nim @@ -18,7 +18,7 @@ const NCCS* = 32 type - Termios* = object {.importc: "struct termios", header: "termios.h>", final, pure.} + Termios* = object {.importc: "struct termios", header: "", final, pure.} iflag*: Tcflag # input mode flags oflag*: Tcflag # output mode flags cflag*: Tcflag # control mode flags From 8f18c936c3e15c71141323c1cbdca757938bcc0a Mon Sep 17 00:00:00 2001 From: def Date: Wed, 4 Feb 2015 11:25:58 +0100 Subject: [PATCH 5/6] Change termios proc capitalization --- lib/posix/termios.nim | 28 ++++++++++++++-------------- 1 file changed, 14 insertions(+), 14 deletions(-) diff --git a/lib/posix/termios.nim b/lib/posix/termios.nim index 94258772fb..2a44624764 100644 --- a/lib/posix/termios.nim +++ b/lib/posix/termios.nim @@ -204,61 +204,61 @@ const # `struct termios'. If VAL is _POSIX_VDISABLE, no character can match it. template CCEQ*(val, c: expr): expr = - ((c) == (val) and (val) != POSIX_VDISABLE) + c == val and val != POSIX_VDISABLE # Return the output baud rate stored in *TERMIOS_P. -proc cfgetospeed*(termios: ptr Termios): Speed {.importc: "cfgetospeed", +proc cfGetOspeed*(termios: ptr Termios): Speed {.importc: "cfgetospeed", header: "".} # Return the input baud rate stored in *TERMIOS_P. -proc cfgetispeed*(termios: ptr Termios): Speed {.importc: "cfgetispeed", +proc cfGetIspeed*(termios: ptr Termios): Speed {.importc: "cfgetispeed", header: "".} # Set the output baud rate stored in *TERMIOS_P to SPEED. -proc cfsetospeed*(termios: ptr Termios; speed: Speed): cint {. +proc cfSetOspeed*(termios: ptr Termios; speed: Speed): cint {. importc: "cfsetospeed", header: "".} # Set the input baud rate stored in *TERMIOS_P to SPEED. -proc cfsetispeed*(termios: ptr Termios; speed: Speed): cint {. +proc cfSetIspeed*(termios: ptr Termios; speed: Speed): cint {. importc: "cfsetispeed", header: "".} # Set both the input and output baud rates in *TERMIOS_OP to SPEED. -proc cfsetspeed*(termios: ptr Termios; speed: Speed): cint {. +proc cfSetSpeed*(termios: ptr Termios; speed: Speed): cint {. importc: "cfsetspeed", header: "".} # Put the state of FD into *TERMIOS_P. -proc tcgetattr*(fd: cint; termios: ptr Termios): cint {. +proc tcGetAttr*(fd: cint; termios: ptr Termios): cint {. importc: "tcgetattr", header: "".} # Set the state of FD to *TERMIOS_P. # Values for OPTIONAL_ACTIONS (TCSA*) are in . -proc tcsetattr*(fd: cint; optional_actions: cint; termios: ptr Termios): cint {. +proc tcSetAttr*(fd: cint; optional_actions: cint; termios: ptr Termios): cint {. importc: "tcsetattr", header: "".} # Set *TERMIOS_P to indicate raw mode. -proc cfmakeraw*(termios: ptr Termios) {.importc: "cfmakeraw", +proc cfMakeRaw*(termios: ptr Termios) {.importc: "cfmakeraw", header: "".} # Send zero bits on FD. -proc tcsendbreak*(fd: cint; duration: cint): cint {.importc: "tcsendbreak", +proc tcSendBreak*(fd: cint; duration: cint): cint {.importc: "tcsendbreak", header: "".} # Wait for pending output to be written on FD. # # This function is a cancellation point and therefore not marked with # . -proc tcdrain*(fd: cint): cint {.importc: "tcdrain", header: "".} +proc tcDrain*(fd: cint): cint {.importc: "tcdrain", header: "".} # Flush pending data on FD. # Values for QUEUE_SELECTOR (TC{I,O,IO}FLUSH) are in . -proc tcflush*(fd: cint; queue_selector: cint): cint {.importc: "tcflush", +proc tcFlush*(fd: cint; queue_selector: cint): cint {.importc: "tcflush", header: "".} # Suspend or restart transmission on FD. # Values for ACTION (TC[IO]{OFF,ON}) are in . -proc tcflow*(fd: cint; action: cint): cint {.importc: "tcflow", +proc tcFlow*(fd: cint; action: cint): cint {.importc: "tcflow", header: "".} # Get process group ID for session leader for controlling terminal FD. -proc tcgetsid*(fd: cint): TPid {.importc: "tcgetsid", header: "".} +proc tcGetSid*(fd: cint): TPid {.importc: "tcgetsid", header: "".} From 5b26c1360b5f56368f533aa26690431eb5ae5f7c Mon Sep 17 00:00:00 2001 From: def Date: Wed, 4 Feb 2015 19:18:09 +0100 Subject: [PATCH 6/6] Rename termios template CCEQ to cceq --- lib/posix/termios.nim | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/posix/termios.nim b/lib/posix/termios.nim index 2a44624764..830e8a2076 100644 --- a/lib/posix/termios.nim +++ b/lib/posix/termios.nim @@ -203,7 +203,7 @@ const # Compare a character C to a value VAL from the `cc' array in a # `struct termios'. If VAL is _POSIX_VDISABLE, no character can match it. -template CCEQ*(val, c: expr): expr = +template cceq*(val, c: expr): expr = c == val and val != POSIX_VDISABLE # Return the output baud rate stored in *TERMIOS_P.