Execute (3): communication with server [marte.sid.inpe.br 800] doesn't start (using async value 0) while trying to execute the command:
GetOptimizedListOfSites sid.inpe.br/yolanda/2004/08.09.12.20 dpi.inpe.br/banon/2003/12.10.19.30.54 @q&WWtY!Y
errorInfo:
--too many nested evaluations (infinite loop?)
    while executing
"if [catch {socket $host $port} s] {
# couldn't open socket: invalid argument
# couldn't open socket: connection refused
# couldn't open socket: addres..."
    invoked from within
"if $async {
#		set s [socket -async $host $port]
# puts [list $host $port]
# puts "<!-- [string repeat a 4096] -->"	;# to have the previous puts displ..."
    (procedure "StartCommunication" line 13)
    invoked from within
"StartCommunication $serverName $urlibPort $async2 $encodingName"--

    while executing
"error "Execute (3): communication with server \[$serverName $urlibPort\] doesn't start (using async value $async2) while trying to execute the command..."
    invoked from within
"if [catch {StartCommunication $serverName $urlibPort $async2 $encodingName} localURLibClientSocketId] {
# puts OK-
# puts --$localURLibClientSocketId-..."
    (procedure "Execute" line 43)
    invoked from within
"Execute $serverAddress [list GetOptimizedListOfSites $ibi $mirror $administratorCodedPassword] 0"
    invoked from within
"if $scanAllArchivesFlag {
# list of all sites
				Load $homePath/col/$mirror/doc/@siteList.txt fileContent
				set optimizedListFlag 0
				foreach sit..."
    invoked from within
"if [file exists $homePath/col/$loCoInRep/auxdoc/xxx] {
			Load $homePath/col/$loCoInRep/auxdoc/xxx data binary
			set data [UnShift $data]
			set admi..."
    (procedure "FindURLPropertyList" line 114)
    invoked from within
"FindURLPropertyList $criterionList $currentRep $extendedSearchFlag"
    (procedure "ReturnURLPropertyList" line 51)
    invoked from within
"ReturnURLPropertyList $criterionList $extendedSearchFlag"
    (procedure "ReturnURLPropertyList2" line 43)
    invoked from within
"ReturnURLPropertyList2 $criterionList $useURLibServerFlag $useLocalServerOnlyFlag $extendedSearchFlag"
    (procedure "ResolveIBI" line 107)
    invoked from within
"ResolveIBI $parsedIBIURL $contextLanguage $displayWarningMessage {} $useURLibServerFlag"
    (procedure "FindSite2" line 22)
    invoked from within
"FindSite2 $previousEdition"
    invoked from within
"if ![string equal {} $previousEdition] {
				set siteRep [FindSite2 $previousEdition]
				if [string equal {} $siteRep] {
					set previousRepWarning ..."
    invoked from within
"if $flag {
# complete reference

			lappend output {<BR>}

			lappend output {<I>${How to Make the Citation of this Document using the INPE Standard -..."
    invoked from within
"if [regexp {^(Journal Article|Book|Book Section|Edited Book|Newspaper|Newspaper Article|Conference Proceedings|Thesis|Report|Electronic Source|Audiovi..."
    (procedure "iconet.com.br/banon/2003/04.18.13.10::CreateFullBibINPEEntry" line 37)
    invoked from within
"${BibINPERepository}::CreateFullBibINPEEntry ${rep-i} $path $mirrorRep $flag $languageRepository"
    ("fullBibINPE" arm line 8)
    invoked from within
"switch -exact $type site {
		set entry [CreateSiteEntry ${rep-i} $mirrorRep]
	} short {
if 1 {
# for on-line changes
		source $homePath/col/$URLibServ..."
    (procedure "GetEntry" line 29)
    invoked from within
"GetEntry ltid.inpe.br/sbsr/2004/11.19.19.28.14-0 ltid.inpe.br/sbsr/2004/12.02.12.19 fullBibINPE {} dpi.inpe.br/banon/1999/06.19.22.43 {{} {^$} 1 3.17...."
    ("eval" body line 1)
    invoked from within
"eval $cmd"

call stack
1: MirrorGet
call stack - end