Number: 2009

Date: 29-Aug-84 11':06':17

Submitter: Raim.pasa

Source: Raim.pasa

Subject: Host Lookup Failure

Assigned To: 

Attn: vanMelle.pa

Status: Open

In/By: 

Problem Type: Bug

Impact: Fatal

Difficulty: 

Frequency: 

Priority: Hopefully

System: Communications

Subsystem: PUP Protocols

Machine: 1100

Disk: 

Lisp Version: 21-Jun-84 10':50':28

Source Files: 

Microcode Version: 5121

Memory Size: 3072

File Server: 

Server Software Version: 

Disposition: '
["Sannella.PA" "29-Aug-84 13':50':56" Attn': Status':(New->Open) Priority':(->Hopefully) System':(Operating% System->Communications) Subsystem':(Other->PUP% Protocols)]

Description: '
'
A strange bug wherein the call from \GETDEVICEFROMNAME  to  \LEAFDEVICEP results in a large negative integer in \LEAFDEVICEP''s local storage.  Note': with PUPTRACE(T), there was no network activity associated with this problem. Backtrace follows.'
'
NIL'
48':BTV+'
   *local* -569756521'
   *local* PROTOCOLS'
   *local* NIL'
   *local* NIL'
GETHOSTINFO'
   HOST -569756521'
   *local* NIL'
   IFSPORT NIL'
   NAME/PASS NIL'
\OPENLEAFCONNECTION'
   *local* 207#272#'
   *local* {FDEV}#1,122264'
   *local* -569756521'
   *local* NIL'
   *local* NIL'
\LEAF.DEVICEP'
   *local* {207#272#}FONTS.WIDTHS'
   *local* NIL'
   *local* NIL'
   *local* 207#272#'
   *local* \LEAF.DEVICEP'
   *local* ({FDEV}#1,122264 {FDEV}#1,122360 '
{FDEV}#1,122454 {FDEV}#1,122644 {FDEV}#1,71000 '
{FDEV}#1,71074 {FDEV}#1,71170 {FDEV}#1,71264 '
{FDEV}#1,71360 {FDEV}#1,71454 --)'
   *local* {FDEV}#1,122264'
   *local* NIL'
\GETDEVICEFROMNAME'
   *local* {207#272#}FONTS.WIDTHS'
   *local* INPUT'
   *local* OLD'
   *local* NIL'
   *local* NIL'
   *local* {207#272#}FONTS.WIDTHS'
   *local* NIL'
   *local* NIL'
\OPENFILE'
   *local* {207#272#}FONTS.WIDTHS'
   *local* INPUT'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* OLD'
   *local* NIL'
   *local* NIL'
OPENSTREAM'
   *local* (DUMMY.FOR.ERRORSET)'
   *local* INTERNAL'
   *local* NIL'
ERRORSET'
   FROMFILE {207#272#}FONTS.WIDTHS'
   TOFILE {DSK}JUDY.WIDTHS'
   LISPXHIST ((COPYFILE &) ←  *LISPXPRINT* ("'
" "ILLEGAL ARG" "'
" -569748329 "'
"))'
   RESETY NIL'
   *local* NIL'
COPYFILE'
   *local* COPYFILE'
   *local* ({207#272#}FONTS.WIDTHS {DSK}JUDY.WIDTHS)'
   \INTERNAL ←'
   *local* COPYFILE'
   *local* 2'
APPLY'
   *local* COPYFILE'
   LISPXID ←'
   *local* ((FB &) (TV &) (NDIR &) (CONN &) (REMEMBER &)'
 (REMEMBER': &) (OK &) (AFTER &) (BEFORE &) (RETRIEVE &)'
 --)'
   *local* NIL'
   *local* NIL'
   HELPCLOCK -190650916'
   LISPXHIST ((COPYFILE &) ←  *LISPXPRINT* ("'
" "ILLEGAL ARG" "'
" -569748329 "'
"))'
   HELPFLAG T'
   *local* COPYFILE'
   LISPXLISTFLG NIL'
   LISPXLINE (({207#272#}FONTS.WIDTHS {DSK}JUDY.WIDTHS))'
   LISPY NIL'
   LISPZ NIL'
   LISPXVALUE NIL'
   LISPXTEM FIX'
   *local* NIL'
   *local* ((COPYFILE &) ←  *HISTORY* (FIX) *GROUP* (&) '
*ERROR* -569748329)'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
   *local* NIL'
LISPX'
   *local* (DUMMY.FOR.ERRORSET)'
   *local* T'
   *local* NIL'
ERRORSET'
   LISPXID ←'
EVALQT'
\REPEATEDLYEVALQT'
   *FORM* (\PROC.REPEATEDLYEVALQT)'
   *local* \PROC.REPEATEDLYEVALQT'
   *ARGVAL* NIL'
   *TAIL* NIL'
   *FN* \PROC.REPEATEDLYEVALQT'
\EVALFORM'
   *local* (DUMMY.FOR.ERRORSET)'
   *local* T'
   *local* NIL'
ERRORSET'
   *local* (\PROC.REPEATEDLYEVALQT)'
   *local* {PROCESS}#1,124400'
   \INTERRUPTABLE T'
   #MYHANDLE# {PROCESS}#1,124400'
   #FORM# (\PROC.REPEATEDLYEVALQT)'
   HELPFLAG BREAK!'
   \CURRENTDISPLAYLINE 6'
   \#DISPLAYLINES 8'
   \LINEBUF.OFD {STREAM}#7,5440'
   \PRIMREADTABLE {READTABLEP}#1,77770'
   \PRIMTERMTABLE {TERMTABLEP}#1,76740'
   \PRIMTERMSA {CHARTABLE}#1,116600'
   TtyDisplayStream {STREAM}#7,172440'
   \TERM.OFD {STREAM}#7,172440'
   \TTYWINDOW NIL'
   \PRIMOUT.OFD {STREAM}#7,172440'
   \PRIMIN.OFD {STREAM}#7,5440'
   *local* NIL'
   *local* NIL'
   *local* 6146'
\MAKE.PROCESS0

Workaround: 

Test Case: 

Edit-By: Sannella.PA

Edit-Date: 29-Aug-84 13':50':57