Mercurial > hg > Members > kono > nitros9-code

changeset 2578:48e3cadb6222

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed issue in inetd.a
author boisy
date Sun, 07 Aug 2011 09:21:33 +0000
parents 7ebb02168028
children 2b4283c91c98
files level1/cmds/inetd.a
diffstat 1 files changed, 16 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/level1/cmds/inetd.a	Mon Aug 01 12:04:15 2011 +0000
+++ b/level1/cmds/inetd.a	Sun Aug 07 09:21:33 2011 +0000
@@ -11,6 +11,9 @@
 *
 *   2      2010/01/22  Boisy G. Pitre
 * Now reads inetd.conf file.
+*
+*   3      2011/08/07  Boisy G. Pitre
+* Fixed bug where conf file wasn't being processed correctly.
 
                nam       inetd
                ttl       internet daemon
@@ -18,7 +21,7 @@
 tylg           set       $01       Prgrm+Objct
 atrv           set       $80+rev   ReEnt+rev
 rev            set       $00
-edition        set       2
+edition        set       3
 
                psect     inetd_a,$01,$80,1,200,start
 
@@ -288,6 +291,9 @@
                lbsr      TCPListen
 ret0           rts
 
+retcc          clrb
+               rts
+
 * Fork Proccess that matches target port
 * Extract first parameter at X and see if it matches target port
 * if so, read rest of line and fork the process
@@ -305,10 +311,18 @@
                lbsr      PRINTS
                fcb       C$CR
                fcb       $00
+               lbsr      PRINTS
+               fcc       /Comparing to port /
+               fcb       $00
+               ldd       targetport,u
+               lbsr      PRINT_DEC
+               lbsr      PRINTS
+               fcb       C$CR
+               fcb       $00
                puls      d
                ENDC
                cmpd      targetport,u
-               lbne      ret
+               lbne      retcc
 * point Y to byte after comma
 portloop       lda       ,y+
                cmpa      #C$CR