Mercurial > hg > Members > kono > nitros9-code
changeset 2721:06d492093592 lwtools-port
Fixed echo problem with TCPOpen now always turning echo off
| author | Boisy Pitre <boisy.pitre@nuance.com> |
|---|---|
| date | Thu, 26 Jul 2012 13:37:49 -0500 |
| parents | 482a547d5155 |
| children | 82b12ff069d7 |
| files | level1/cmds/inetd.a lib/net.a |
| diffstat | 2 files changed, 21 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/level1/cmds/inetd.a Thu Jul 26 12:19:43 2012 -0500 +++ b/level1/cmds/inetd.a Thu Jul 26 13:37:49 2012 -0500 @@ -83,7 +83,6 @@ lbsr TCPOpen lbcs errex sta netpath,u - leax SetupPorts,pcr lbsr ProcInetd lbcs errex @@ -421,7 +420,7 @@ fcb $00 puls d ENDC - lbsr SetEcho + lbsr SetEchoOn lbcs ret lbsr SetAutoLF lbcs ret
--- a/lib/net.a Thu Jul 26 12:19:43 2012 -0500 +++ b/lib/net.a Thu Jul 26 13:37:49 2012 -0500 @@ -34,13 +34,13 @@ os9 I$SetStt rts -* Set Echo +* Set Echo On * * Entry: A = path to network device * Exit: * Success: CC carry clear * Failure: CC carry set, B = error code -SetEcho: pshs a,x +SetEchoOn: pshs a,x bsr getopts bcs rawex ldb #1 @@ -49,6 +49,21 @@ puls a,x,pc +* Set Echo Off +* +* Entry: A = path to network device +* Exit: +* Success: CC carry clear +* Failure: CC carry set, B = error code +SetEchoOff: pshs a,x + bsr getopts + bcs rawex + clrb + stb PD.EKO-PD.OPT,x + bsr setopts + puls a,x,pc + + * Set Auto Linefeed * * Entry: A = path to network device @@ -92,6 +107,9 @@ lda #UPDAT. leax devnam,pcr os9 I$Open + bcs openerr + bsr SetEchoOff +openerr puls x,y,pc