ELF@"@8@uu""huhuhuppB ;?T?; ?T @; AT A; QAT]AT\A|cAgAqUSAG `p   ' 0TYA|HAVAqUPAG  'TYA- >4 )HT\A4 )TbA4 oG '`HTaA4 )- >U ]AB 0> EL < L  H H T[A4 )B 0L < L  H H T@4 )B 0L < L  H H T@4 ); CAH T@4 ); @AH T@4 ) > B L H  B L H B 0L < L  H B @>EL <L H  H H T*A4 )B0L < LHHT@4 )B0L < LH HTA4 )H T#A4 );!AHT*A4 );(AHT1A4 );/AHT8A4 )H T5A| T@T8A4oU*AG' T,A| T@T /A4 oU!AGT *A|  T @T -A4 oU AG ;(A;.A;4A'  ' B @L < L  H H H B0L <:LHG H T'A4 )B 0L < L  H H T&A4 ); $AH T-A4 )HT*A| Tk@T -A4 oUAGT (A|  T ]@T +A4 oU AG   'CA T"AG 'p B0>EL<uLG HB0L<{LG H+PT A| T*@T A4oU@GTA| T@T?4oU@Gp'P T@| T@T?4nU@HB HH)T@G p'D ##P' T @|  T ?T@4 oU @G '@|O>@qU@G'@  T@G '@  T@G '@|'>@qU@G'@ `Tu@G' B0>EL<FLGHB0L<LLGH+0B HHTe@| Tz?TX?4oUZ@GB HHTT@| Ti?TG?4nUI@HB HH)TA@Gp' ##P't@  T@G 'im@  T"@G 'x@ > E< <  ##j@'T?G' EB0L L GHB0L L GH+PT?| T?T>4oU?G| B|/},GG|}GT?| T>T>4nU?HB HH %T@; s=; @B H H  B H H  B H H  $T@; c=; @B H H  B H H  B H H  $B H H `)T?G' pP' |`' y'?  Tk?G '?  Tn?G '@  @ |   |  7| %T @|  T e>T @4 oU ?G T ?|  T W>T@4 oU ?G 'p T ?|  T A>T ?4 oU ?G  | 9jDT ?|  T ,>T ?4 oU ?G T ?|  T >T?4 oU ?G T?| T>T?4oU?G'p T ?|  T =T?4 oU ?G T?| T=T?4oU?GT?| T=T?4oU?Gp' T ?|  T =T?4 oU ?G Ta?| T=Td?4oUV?G'  '? ? | ;?T R?|  T =TU?4 oU G?G T?| T=T?4oU?GTN?| Tw=TQ?4oUC?Gp'P TD?| Ta=TG?4oU9?GTB?| TS=TE?4oU7?GT@?| TE=TC?4oU5?Gp`' T6?| T/=T9?4oU+?GTb?| T!=Te?4oUW?Gp' '? @T =G '0B 0> EL < L  G H  B 0L < L  G H  + B 0L < L  H B HH T =|  T <T <4 oU =G B H H  T=| T<T <4 nU=H  B H H  )T=G' ##p' T >|  T <T?4 oU >G T?' B @>EL <L H GH ;>+T >|  T <T>4 oU >G B0L <=LH`'  '   )T==G' B0L <LGHB0L < L G H +PT '=|  T H<T*=4 oU =G G ' H B H H )T =G' ~p' T =| T<T=4oU=G' p'>  T<G ''{>  T<G 'B>  Tq>| T;Tt>4oUf>GG 'n> T<G' B0>EL<iLGHB0L<oLH+@T<| T;T<4oU<GT<| T;T;4oU<GGp'@ T|<| T;To;4nUq<HB HH)Ti<G' ##P' T\<| Tm;T_<4oUQ<GGp`'=  T2<G '|=  T5<G '= '> T=| T5;T=4oU=GT=| T';T =4 oU=GT =|  T ;T =4 oU =G T =|  T ;T =4 oU =G T='W| NT='K| @T='?| 2T='3| $|}E K t M > > a rG|}EKtMa rG| } E KtMa rG | } E KtMa r G t > a r GG'E K t M  a r GG'E K t M  a r G G'E K t vM  a r nG G'++++ T&=| T?:T)=4oU=G+T!=| T.:T$=4oU=G ')##  ')  ')  ')  ') ' &< &= &< & = &< &= &< &<&<&<& =&<&<& <&<&<&<&<&<&<% =% =%=%<=|d9=qU~<G' =  Tn:G '=  Tq:G '<  | '@GG @'=T<| T^9T<4oU<G'`|}GGB HHB HHT<| T<9T <4 oU<GT <|  T .9T <4 oU <G T <|  T 9T <4 oU <G T <|  T 9T <4 oU <G @'  4   @' T<| T8T <4 oU<GT <|  T 8T <4 oU <G T <|  T 8T <4 oU <G   ' T 9 P' B0> EL < L HB 0L < L  H +B0L < L HB H H T9| T8T 84 oU9GB H H T|9| T8T o84 nUq9H B H H )Tj9P' ## ' TW<| Tn8TZ<4oUL<G @' TO<| TZ8TR<4oUD<TN<|8K<qUE<G  < ; H<>E<<'G' |~}{G' |B0L L HT$<|7!<qU<G`' |4|!}GGBPLLHHHT<|j6<qU;GT<@'\T9;v6;9B HHB HHB HH$0T;| T7T;4oU;G  'G'G'&;&;;  T8G ';  T8G '; `T;| T7T;4oU;G !G'T;| Tu7T;4oU;GGP`@';  T;| T]7T;4oU;GG '; B@>EL<BLHHT;|6;qU;GP'0 T;|6;qU;GP@'0T;|6;qU;G;;P''; `;;T;|6;qU;G`P'T;|6;qU;GGG@0p '; PT;|6;qU;GP'P|'T;|y69qU;G'P;;T_;|f6\;qUV;G0P` ''|; 0GGG 0'};|4p;qU:G'u; G' t;  | '@B@>EL<LGHHTi:|4f:qU`:GTg: 0'J;  GG 'D;  'd; B >LH B LH T 3;|  T 6T6;4 oU (;G '  |*T(;| T6T+;4oU;G'  HT;| T5T";4oU;GG'  BP>EL<SLH HHBPL<LH HH+@'    )G '  | +T :|  T 5T:4 oU :G '  H T :|  T 5T:4 oU :G G' # # ': PT:| T}5T:4oU:GG'@|.T:| Tf5T:4oU:GG'@GHT:| TP5T:4oUx:GGGG@P '': PTM:| T25TP:4oUB:GG'@|.TB:| T5TE:4oU7:GG'@GHT8:| T5T;:4oU-:GGGG@P '';: 'h: B >LH B LH T 9|  T 4T94 oU 9G '  |+T:| T4T:4oU :G'  HT :| T4T:4oU:G'  HBP>EL<VLH HHBPL<LH HH+@'    )G '  | +T 9|  T j4T94 oU 9G G'  T 9|  T U4T94 oU 9G G' # #   '9 PTP9| T54TS94oUE9GG'@|1Tu9| T4Tx94oUj9GG'@GHTk9| T4Tn94oU`9GG'@GH''}9 `T9| T3T94oU8GG'@|.T?9| T3TB94oU49GGGGP'T59| T3T894oU*9GGGGP`0''89 '9 T 39|  T 3T 694 oU (9G T99' B 0> EL < L  H  B 0L < L  H  +  T "9|  T m3T %94 oU 9G '` | T 9|  T V3T94 oU 9G '`  | V} MST9| T:3T 94oU8G;9p`'  B H H  9'G '  | T 8|  T 3T84 oU 8G '   | } MG`'  B H HPT 8|  T 2T 84 oU 8G ' )T 3|  T 2T 34 oU 3G ' # #    '8 0TQ8| T2TT84oUF8GTW8G 0'8  T3| T2T34oU|3GG '8 `T8| T2T84oUt8GG`'P|Ts8| Th2Tv84oUh8GGP`p@''w8   | T4| TE2T44oU4G'@ TO8| T22TR84oUD8GT4p`'p |8G '8 T +7|  T 2T.74 oU 7G 'p | T L4|  T 1TO44 oU A4G `pP' ' ' 8;7B@>EL< LHH0 '7  B@>EL< LGHGHG'U8 T7| T1T74oU7G;7T7G'@  GGp'P |T7| T1T74oU7G;7'P T*4| Tu1T-44oU4G`' T#4| Tb1T&44oU4G`' T4| TO1T44oU4G`' T4| T<1T44oU 4G`' G'P T7| T"1T74oU7GT7| T1T74oU7G ;7'` B@>EL<%LHH`P@'T{7| T0T~74oUp7GG`P'Tz7'7 Tz7| T0Tu74oUo7G;p7T:1| T0T=14oU/1GG G P@'p p` P'^7 G']7  T2| T0T24oU2GT2'M7 V.;.1U.U.U.V.;.1U.U.U.U.V.;.1U.U.V..V..V.;.1U.T.1U.V.|V.;.1U.T.1U.V..V..V..V/.V.n;.1U.U/U.U.U.U.V.a;.1U.U.V..V..VZ/.V.S;.1U.U.V..V..VB/.V.E;.1U.U.V..V..V*/.V.7;.1U.U.V..V..V/.V.);.1U.U.V.$;.1U.U.V..V..V..V.;.1U.U.V..V..V..V. ;.1U.U.U.V.;.1U.U.V..V..V..V.;.1U.U.V..V..V..V..V..V..V..V..V..V..V..V.;.1U.T.1U.V.;.1U.U.V.;.1U.U.V.;.1U.U.V.;.1U.U.V.;.1U.U.V..V..V..V..V.;.1U.T.1U.V.;.1U.U.V.V.V.;.1U.V.;.1U.V.;.1U.V.;.1U.V.;.1U.V.0V.V.;.1U.V.;.1U.V.;.1U.V.WV.;.1U.V.V.;.1U.V.V.;.1U.V.;.1U.V.;.1U.V.;.1U.V.V.V.V.;.1U.V.;.1U.V.V.;.1U.V.;.1U.V.;.1U.V.;.1U.V.;.1U.V.V/V3/;./1U2/V4/VK/;F/1UJ/TH/1UF/UF/Vp/D/VG/;B/1UF/TD/1UB/UB/VX/@/VC/;>/1UB/T@/1U>/U>/V@//VG/;B/1UF/VJ/;E/1UI/VM/;H/1UL/VP/;K/1UO/VS/;N/1UR/VV/;Q/1UU/VY/;T/1UX/V\/;W/1U[/V_/;Z/1U^/Vb/;]/1Ua/Vi/;d/1Uh/Tf/1Ud/Ud/Vf/b/Vi/Vp/;k/1Uo/Vs/;n/1Ur/V|/;w/1U{/V}/;x/1U|/V~/V/;|/1U/V/;/1U/V/;/1U/V/;/1U/V/;/1U/V/;/1U/V/;/1U/V/;/1U/V/;/1U/U1U0U0U/V/;/U/U/U/V/V//V/;/1U/U/V/V//V/V//V/V//V/V//V/V 0;01U 0V0; 01U0V0;01U0V0;01U0V0;01U0V0;01U0V0;01U0V"0;01U!0V%0; 01U$0V(0;#01U'0V+0V00V30V:0VC0;>01UB0VD0VS0?0VF0VO0A0Vd0;_01Uc0Vg0;b01Uf0Vp0;k01Uo0Vy0V0V0V0V0V0V0V0V0V0V0;01U0V0;01U0V0;01U0V 1;11U 1V1; 11U1V1; 11U1V1;11U1V01;+11U/1V11;,11U01V41;/11U31V71;211U61V:1;511U91V;1VB1;=11UA1VW1;R11UV1VZ1;U11UY1Vc1;^11Ub1Vx1;s11Uw1Vy1V~1;y11U}1V1;|11U1V1V1;11U1V1;11U1V1V1;11U1V1;11U1;/1U1V1'system'repl'server'filename'system/repl/server.scm'imports'ice-9'threads'rdelim'match'iconv'rnrs' bytevectors' binary-ports'srfi'srfi-1'srfi-26'exports'make-tcp-server-socket'make-unix-domain-server-socket' run-server' spawn-server'stop-server-and-clients!' declarative?'guile'define-module*'set-current-module'*open-sockets*' sockets-lock' make-mutex' close-socket!'add-open-socket!' run-server*' serve-client'with-temporary-port-encoding'with-saved-port-line+column'drain-input-and-close'permissive-http-request-line?'ucs-range->char-set' make-regexp' string-append'2^(OPTIONS|GET|HEAD|POST|PUT|DELETE|TRACE|CONNECT) '[^ ]+ '!HTTP/[0123456789]+.[0123456789]+$'check-for-http-request'guard-against-http-request'maybe-check-for-http-request' add-hook!'before-read-hook' assq-remove!' close-port' lock-mutex' unlock-mutex' match-error'no matching pattern'host'addr'port' inet-pton'AF_INET'INADDR_LOOPBACK'socket'PF_INET' SOCK_STREAM' setsockopt' SOL_SOCKET' SO_REUSEADDR'bind'path'/tmp/guile-socket'PF_UNIX'AF_UNIX'%set-port-property!'guard-against-http-request?'with-continuation-barrier' cancel-thread'current-input-port'current-output-port'current-error-port'current-warning-port' *repl-stack*' start-repl'wrong-type-arg'struct-ref/immediate'=Wrong type argument in position 2 (expecting boxed field): ~S' out-of-range'Argument 2 out of range: ~S'8Wrong type argument in position 1 (expecting struct): ~S' parameterize'Not a parameter: ~S' parameter?'pipe'fcntl'F_SETFL' O_NONBLOCK'F_GETFL' sigaction'SIGPIPE'SIG_IGN'listen'select'memq'catch'%thread-handler'close'car'6Wrong type argument in position 1 (expecting pair): ~S'display' force-output'accept'call-with-output-string' string-split'for-each'Failed to accept client:'format'print-exception' string-null?';;; ~a 'call-with-new-thread' port-closed?' port-encoding'set-port-encoding!' port-line' port-column'set-port-line!'set-port-column!'setvbuf'block' char-ready?'get-bytevector-some'bytevector->string' ISO-8859-1'string-concatenate-reverse' string-every' regexp-exec'%port-property'read-delimited' 'peek'%make-void-port'rw'call-with-port' dup->port'w' unread-string'done' @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ @@ POSSIBLE BREAK-IN ATTEMPT ON THE REPL SERVER @@ @@ BY AN HTTP INTER-PROTOCOL EXPLOITATION ATTACK. See: @@ @@ @@ @@ Possible HTTP request received: ~S @@ The associated socket has been closed. @@ @@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ Pl,H  8 T x  @H($<pD`,\,l$!! " # ##$%h%$&\&#&'p'+(/(1(2<+3+44,5`-6.7/9p/;/=0?`0A0C(1D1ET2F2G3H(4J|4L4N5P|5R5TH6U6V6W7X7Y8Zh9[9\D:]|:_:a;c|;e;f =g>hd>i>k>mp@o@p@qHArAsAt,BuDBvBw$Dx" *" *VVVV *) ) ) ) * (  *((((* iiii     ***"******  *** *`7`7`7`7" E`7p        EE  EEE  2!E     H0dL  p      4LE,H `H,H0dLd  = 8    $ p   E6X D,`H| l E,\  (D D,H0  p,8  `$ 8 @  x`  l$,  d   $"!""""""P9hE(\(\" @[*ppz<huhupEYM`SUZCk0( z ^_EX hEhH8HhJhJb"@*O ` 0i 0hr h   (  (  /   T LT 6 SL0U0^tw*t%.L 5L {    P!P!<(<(p(p(( (T)T))M)*f*++,,,-, -9  -(-N(--\-..@.@.0 402x2,3,3P3NP35Y 35,7',7X8X8x8x8<  E<h<$ h<<@<=Y=d?#d??#? @6 @CKJCHDqHDdDdDD    %) - )  :HOS XS iS   OSOS S S % ) % ) % ) SS S  % ) % ) $,4 <(D0L8P@XHtH|HH0"****08*(BJHRJ`hp(`hpxh   *     "                  OSS% ) % ) % )  % ) (00<H"P X dl 0  H0($,0  $,0 OSS% ) % )    080<"H*P(X(d"l |@  OSS  % )% )     (, 0(4088LXP`h@tH|HP@@H@@@HP@HHXHHH  @Hhp@  % ) % ) % )% ) % ) % ) % ) % ) % ) % ) % )   0Pdlt| @   (  HP   (   ((0((PX   (  8`% ) % ) % ) % ) % ) % ) % ) % ) 4<PX`hlt 8@   (  @H 0 OSSS% ) % )  % ) OS% ) S SS% )  % )  084@"L*T(\(h2p0*((0((08X`@H88P88hx8RRPP88P888PZh8hpPZXX"   P   pph  % ) (08@DH OSS% ) % ) % )  % )  (0<HPX d|(08@(    % )% )% )% )        % ) % )   (08@DL`hpx|   (   @(@(@(@((22<B*:JHPZZ\RRPXbbdZZX`jjlb:82*x(bbd**x(bbd**x(bbd**    @ @ @ $,0  ( @@DH% )  % ) % ) % ) % )  % ) % ) % ) OSSS% ) % ) % ) % )) SOS  ) % )  (0 8@D0Xt x|(0800@000@@H@@@HHPHHHPPXPPxPp00@000@@H@@@HHPHHhX0BJHR0JH00P000P00H000Hhh`0`p0000 0 H P Z ` j r  x  x x     x x  x  x x x        @ (   % ) % ) (08@D H(L0dx% ) (08@DHOS   $0D`hl    8@D(`h     08<(Th( $,0  OS) ( @@DP\dt    O% ) % ) % ) OSS % ) % )    "(,(<PX `hlH   0  H   0  HX 2:82H H@% ) % ) % )  (08@D H(\p (% ) % ) % )  (08@D H(\p (  O% ) % ) % ) OSS % ) % )    ",(<PX `hlH   0  H   0  H  2:82H X8% ) % ) % )  (08@D H(\p ( (% ) % ) % )  (08@D H(\p0( % ) OSS% ) % ) % )  % )  % ) % )  (08@D L0dp|0 0  (  (0((P8PP8( (% ) (08@DLP% ) (08@DH% ) % )  (08@D(H0`t% ) % ) % ) % ) ,@HPX\ ppx88 OS $"0"OS (08@% ) % ) % ) % ) % ) % ) % ) % ) OS% )  (08@D L(T8X0lx|((0 0 0 0 (( 08@ **% ) % )  (08@DLT h p(x   (H % ) (08@DLP.@.,3cP3cX8x8<i=d?VHDVdD3@[ x8445 8QP X 4 4b hx 4 4{ \<\44`x\44X4!8l!4!4!d8"$)4X)4)<*`*0+,-4-8-..0(/(((/1,2,E4$E84688,a@9 a`9<hP=`=w>L@X@P@xlD0ELEXE%... . Guile 3.0.7close-socket!lock-mutex@@ice-9/threadsunlock-mutex@@ice-9/threadsadd-open-socket!stop-server-and-clients!make-tcp-server-socketmake-unix-domain-server-socketserve-clientparameter?@@guilerun-serverrun-server*shutdown-servercall-with-new-thread@@ice-9/threadsspawn-serverwith-temporary-port-encodingwith-saved-port-line+columndrain-input-and-closemaybe-check-for-http-requestcheck-for-http-requestguard-against-http-requesto system/repl/server.scmice-9/boot-9.scmice-9/threads.scmice-9/match.upstream.scm };,a,,,b,,,b,$,;a;[JYY!J}%J}h!  w}~!-$YwwwJ"' Z--) Xmw> Y }w,;U;(w:-,S;+;U;-S;`$;];/;;:%,[;#];%[;z= ywb; /),$,~,$,~, H ,`; CixJ;b; `;!K&i0%! Z+x!.x6Z+x!.x7=M];h/;;:%,[;<,~Yv.gGU;Z(wI-,S;#;];%[;w*;)h;U;x(h:-,S;d+;U;-S;w;=< v, v, v, v,&  -  vw+;U;-S;(w0hz =Zx%w' v+{`h],+wVh/;;+%,[,oY   pJfyw?J pJ J}h,xx,$,~,  Z Zh;s,Y,#;];%[;+w<,K h%;$h0{ 8.BpJ.<,.-pY ;p,#;90pwV-w2h,&;>M h!<  h  Vz h< h  x< Y!<  h  < Y< h   h< h hz h <  i x< Y< h h< Y <  Z ,V sh2h< w~i6, ;~Jh< w~iw;=tw,r>;q= h @ h <  wJi; ]  ,Ki h<@(C-x ? KA"0, ; ,0,ZZZZ#ll!+- ,ZhZhY;!4xwRw>wB<, 844)08EhX 4 4V( h 4 4o \T\440`t44XL 8 4 4 dP!<(4p(4(T)`)0*+,4,8 -(--0.(@.0,2,9,3$9P358,7,UX8 Ux8<hh<`<k=d?X?P @xCHDdDXDclose-socket!lock-mutex@@ice-9/threadsunlock-mutex@@ice-9/threadsadd-open-socket!stop-server-and-clients!make-tcp-server-socketmake-unix-domain-server-socketserve-clientparameter?@@guilerun-serverrun-server*shutdown-servercall-with-new-thread@@ice-9/threadsspawn-serverwith-temporary-port-encodingwith-saved-port-line+columndrain-input-and-closemaybe-check-for-http-requestcheck-for-http-requestguard-against-http-requestclosureargcachevarproctmpnamemodboxsockets-lockclose-socket!moduletagcodeadd-open-socket!stop-server-and-clients!make-tcp-server-socketmake-unix-domain-server-socketrun-serverrun-server*objcachedunboxedcheck-for-http-requestguard-against-http-requestmaybe-check-for-http-requestsunspecifiedpairprimarg0arg1force-closevalnilvwxvalshostaddrportpathclientthreadt-733ce3ad9f392e4-130t-733ce3ad9f392e4-131t-733ce3ad9f392e4-132t-733ce3ad9f392e4-133vtablerfieldsnfieldsptrwordbitsmaskrest-733ce3ad9f392e4-13dt-733ce3ad9f392e4-13et-733ce3ad9f392e4-13ft-733ce3ad9f392e4-140t-733ce3ad9f392e4-156server-socketfalseserve-clientshutdown-read-pipeshutdown-write-pipeready-portskeyargsarg2encodingthunksaved-encodingsaved-linesocketchunksresultlinet-733ce3ad9f392e4-215Call THUNK in a dynamic environment in which the encoding of PORT is temporarily set to ENCODING.Save the line and column of PORT before entering THUNK, and restore their previous values upon normal or non-local exit from THUNK.Drain input from SOCKET using ISO-8859-1 encoding until it would block, and then close it. Return the drained input as a string.Return true if LINE might plausibly be an HTTP request-line, otherwise return #f.Apply check-for-http-request to SOCKET if previously requested by guard-against-http-request. This procedure is intended to be added to before-read-hook.Check for a possible HTTP request in the initial input from SOCKET. If one is found, close the socket and print a report to STDERR (fdes 2). Otherwise, put back the bytes.Arrange for the Guile REPL to check for an HTTP request in the initial input from SOCKET, in which case the socket will be closed. This guards against HTTP inter-protocol exploitation attacks, a scenario whereby an attacker can, via an HTML page, cause a web browser to send data to TCP servers listening on a loopback interface or private network..guile.procprops.rodata.data.rtl-text.guile.frame-maps.dynamic.strtab.symtab.guile.arities.strtab.guile.arities.guile.docstrs.strtab.guile.docstrs.debug_info.debug_abbrev.debug_str.debug_loc.debug_line.shstrtab