Fix 2001/anonymous - it now works!
This was a fun one to figure out. There were a few steps. Amongst them was adding the include for mmap(). Another part that might or might not be relevant was having main() call a new function rather than main() itself. This seemingly solved an infinite recursion call to main() (according to gcc). I changed the third arg in the call to mmap() to be PROT_READ|PROT_WRITE. This might not have been necessary as it might evaluate to 3 which is what it was. I regret that some macros were removed and some formatting was changed. This was not intentional but I want to get the fix in and then I can fix the formatting and macros (or try to - some of it might or might not cause a problem). Note that it will crash on any binary that's not 32-bit/x86. In other words this won't work in macOS unless you have an old enough Mac that supports 32-bit binaries. With gcc (which is clang in macOS so that won't work either) one can do -m32 and that's what is done for anonymous.ten. It probably should be built by default but it's currently not.
This commit is contained in:
Cody Boone Ferguson committed
1 parent
1685f8e2ee
commit
efdee208a2
5 files changed
+61
-482
No files matched your search
+2
-10
@@ -70,7 +70,7 @@ CINCLUDE=
|
|||||||
|
|
||||||
# Optimization
|
# Optimization
|
||||||
#
|
#
|
||||||
OPT=
|
OPT=
|
||||||
|
|
||||||
# Default flags for ANSI C compilation
|
# Default flags for ANSI C compilation
|
||||||
#
|
#
|
||||||
@@ -117,7 +117,7 @@ PROG= ${ENTRY}
|
|||||||
#
|
#
|
||||||
OBJ= ${PROG}.o
|
OBJ= ${PROG}.o
|
||||||
DATA=
|
DATA=
|
||||||
TARGET= ${PROG} cpp
|
TARGET= ${PROG}
|
||||||
#
|
#
|
||||||
ALT_OBJ=
|
ALT_OBJ=
|
||||||
ALT_TARGET=
|
ALT_TARGET=
|
||||||
@@ -142,14 +142,6 @@ ${PROG}: ${PROG}.c
|
|||||||
$$magic $$warning -Dmagic= $$X "-DX=A($$magic \"$$X\")" \
|
$$magic $$warning -Dmagic= $$X "-DX=A($$magic \"$$X\")" \
|
||||||
$< -o $@ ${LIBS}
|
$< -o $@ ${LIBS}
|
||||||
|
|
||||||
cpp: cpp.c
|
|
||||||
@echo "NOTE: this entry seems to no longer work."
|
|
||||||
magic='${CC} ${CFLAGS}'; \
|
|
||||||
X='-DA(X)=#X'; \
|
|
||||||
warning='-Dprocessor'; \
|
|
||||||
$$magic $$warning -Dmagic= $$X "-DX=A($$magic \"$$X\")" \
|
|
||||||
$< -o $@ ${LIBS}
|
|
||||||
|
|
||||||
|
|
||||||
${PROG}.ten: ${PROG}.ten.c
|
${PROG}.ten: ${PROG}.ten.c
|
||||||
@echo "NOTE: this program must be compiled as 32-bit to use with the entry itself."
|
@echo "NOTE: this program must be compiled as 32-bit to use with the entry itself."
|
||||||
|
|||||||
+19
-15
@@ -12,25 +12,29 @@ make
|
|||||||
## To run:
|
## To run:
|
||||||
|
|
||||||
```sh
|
```sh
|
||||||
./anonymous program
|
./anonymous x86_program
|
||||||
```
|
```
|
||||||
|
|
||||||
NOTE: [Cody Boone Ferguson](/winners.html#Cody_Boone_Ferguson) fixed the
|
NOTE: [Cody Boone Ferguson](/winners.html#Cody_Boone_Ferguson) fixed both the
|
||||||
supplementary program which is necessary to test the program. He C pre-processed
|
supplementary program and the program itself, both of which segfaulted. He
|
||||||
and cleaned it up as well as commented it some as it heavily uses the ternary
|
managed to do this with linux but it will not work with macOS (see below why);
|
||||||
operator and recursive calls. It is not consistent but if you look at it you
|
this is not a bug but a feature inherent in what it does. He said this took
|
||||||
should understand why that is! Thank you Cody for your assistance! He notes
|
serious debugging and skill (shameless self promotion but it's true :-) ) and we
|
||||||
however that this entry seems to no longer work and has offered some tips in the
|
thank him _very much_!
|
||||||
[bugs.md](/bugs.md) file for anyone who mights want to try and fix this but it
|
|
||||||
does seem to require a lot of parsing, debugging, an x86 system and possibly
|
|
||||||
knowing the internals of the ELF format (x86 specific if there are any?). You
|
|
||||||
need to run the program on a binary to test. See the try section below for the
|
|
||||||
above mentioned program that you can test the entry on. Thank you and we will
|
|
||||||
happily credit you if you fix this.
|
|
||||||
|
|
||||||
WARNING: if you do get this to work **IT WILL _DESTROY FILES__ that it is used
|
Why does this not work on macOS? Because Apple has made it very hard to compile
|
||||||
on!** See the author's warning on this.
|
32-bit programs. It's even harder with the Apple silicon chip. Thus this will
|
||||||
|
have to remain for linux only. BSD was not tested.
|
||||||
|
|
||||||
|
WARNING: this will somewhat destroy files that it is used on. See the author's
|
||||||
|
warning about this.
|
||||||
|
|
||||||
|
### INABIAF - it's not a bug it's a feature! :-)
|
||||||
|
|
||||||
|
This entry will not work on 64-bit binaries! The program itself can be compiled
|
||||||
|
as 64-bit but the files it processes must be 32-bit binaries. Not doing this
|
||||||
|
will likely cause a crash or cause your computer [halt and catch
|
||||||
|
fire](https://en.wikipedia.org/wiki/Halt_and_Catch_Fire_(computing)! :-)
|
||||||
|
|
||||||
## Try:
|
## Try:
|
||||||
|
|
||||||
|
|||||||
+40
-25
@@ -1,41 +1,56 @@
|
|||||||
#define processor x86
|
|
||||||
|
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
#include <sys/stat.h>
|
#include <sys/stat.h>
|
||||||
#include <stdlib.h>
|
#include <stdlib.h>
|
||||||
#include <strings.h>
|
#include <strings.h>
|
||||||
|
#include <sys/mman.h>
|
||||||
|
|
||||||
#define l int*
|
#define l int*
|
||||||
#define F char
|
#define F char
|
||||||
struct stat t;
|
|
||||||
|
struct stat t;
|
||||||
#define c return
|
#define c return
|
||||||
#define I (P+=4,*L(P-4,0))
|
#define I (P+=4,*L(P-4,0))
|
||||||
#define G (signed F)E(*L(P++,0))
|
#define G (signed F)E(*L(P++,0))
|
||||||
#define C(O,D)E (D[B+V(010)/4+O*10])
|
#define C(O,D) E (D[B+V(010)/4+O*10])
|
||||||
#define U R[4]=E(V(17)-4),*(l)V(021)=
|
#define U R[4]=E(V(17)-4),*(l)V(021)=
|
||||||
F M [99],Q[99],b[9999],*ss,*d=b,*z;
|
char M [99],Q[99],b[15000],*ss,*d=b, *z;
|
||||||
#define O =(n=*(l)V(021),R[4]=E(V(17)+4),n)
|
#define O =(n=*(l)V(021),R[4]=E(V(17)+4),n)
|
||||||
#define p(a,b,c) system((sprintf(a,b,k[1]),c)),z
|
#define p(a,b,c) system((sprintf(a,b,k[1]),c)),z
|
||||||
#define g (y/010&7)
|
#define g (y/010&7)
|
||||||
#define R (B+13)
|
#define R (B+13)
|
||||||
#define x86 (F*)index\
|
#define x86 (F*)index(ss+V(i ),0100)
|
||||||
(ss+V(i ),0100)
|
|
||||||
#define D(y,n,a,m,i,c )d+=sprintf( d,y,n,a,m,i,c ),(F*\
|
#define D(y,n,a,m,i,c) d+=sprintf( d,y,n,a,m,i,c ),(F* ) P
|
||||||
) P
|
|
||||||
l B,i,n,a,r,y ,
|
int *B, i,n,a,r,y ,
|
||||||
P ;
|
P ;
|
||||||
#define Tr(an,sl,at,or) l an##i(d,sl){ c at? an##i(d,r):or; } \
|
|
||||||
l an(d, sl){ c \
|
|
||||||
r=V(014 )&63,an##i(d,sl); }
|
int* Li(d,r){ return E (3[B+V(010)/4+r*10])&&E (3[B+V(010)/4+r*10])<=d?(int*)(((int)B)+d+E (4[B+V(010)/4+r*10])-E (3[B+V(010)/4+r*10])):(((int)B)^d)>>24&&--r? Li(d,r):(int*)d; } int* L(d, r){ return r=V(014 )&63,Li(d,r); }
|
||||||
#define add(Ev,Gv) Ev(){ i=((a-=16)+C(r,4))/4,(\
|
int* Runi(d,a){ return (ss=strcmp((char*)B+E (4[B+V(010)/4+(V(12)>>16)*10])+E (0[B+V(010)/4+--r*10]),".strtab")?ss:(char*)B+E (4[B+V(010)/4+r*10]),E (1[B+V(010)/4+r*10])-2)? Runi(d,r):0; } int* Run(d, a){ return r=V(014 )&63,Runi(d,a); }
|
||||||
Gv?Ev() :0) ; } Ev##n(){ a=C(r,5),Ev(); }
|
Sca(){ i=((a-=16)+E (4[B+V(010)/4+r*10]))/4,(V(-~i)-P+2?Sca() :0) ; } Scan(){ a=E (5[B+V(010)/4+r*10]),Sca(); } ru(){ i=((a-=16)+E (4[B+V(010)/4+r*10]))/4,(strcmp(ss+V(i),"main")?ru() :0) ; } run(){ a=E (5[B+V(010)/4+r*10]),ru(); }
|
||||||
Tr(L,r, C(r,3)&&C(r,3)<=d?(l)(((int)B)+d+C(r,4)-C(r,3)):(((int)B)^d)>>24&&--\
|
E(DX)
|
||||||
r,(l)d) Tr(Run,a,(ss=strcmp((F*)B+C((V(12)>>16),4)+C(--r,0),A(.strtab))?ss:(F\
|
{
|
||||||
*)B+C(r ,4),C(r,1)-2),0) add(Sca ,V(-~i)-P+2) add(ru,strcmp(ss+V(i),A(main)))
|
return *z?
|
||||||
E(DX) { c *z? DX:DX <<030|(DX&65280)<<010|DX>>8&65280|DX>>24&0377; } l K(k){
|
DX : DX <<030 |
|
||||||
c L(E(k [(l)V(17)]),0); } V(v){ c E(B[v]); }
|
(DX&65280)<<010 |
|
||||||
|
DX>>8 & 65280 |
|
||||||
|
DX>>24&0377;
|
||||||
|
}
|
||||||
|
|
||||||
|
int* K(k){
|
||||||
|
return L(E(k [(int*)V(17)]),0); }
|
||||||
|
|
||||||
|
V(v){
|
||||||
|
return E (B[v]);
|
||||||
|
}
|
||||||
|
|
||||||
int
|
int
|
||||||
main (int cka, char **k) { char *ck = (char *)cka;
|
pain(char *ck, char **k)
|
||||||
exit(E((ck?main((z?(stat(M,&t)?P+=a+'{'?0:3:execv(M,k),a=G,i=P,y=G&255,sprintf(Q,y/'@'-3?A(*L(V(%d+%d)+%d,0)):A(R[%d]),(y&7),'\r',y/0100-1?0:G),(a+127&&a+'}'&&a+1?(a+61&&a+24&&a+025?(P=a+'H'&&a%061<=0?P:i,D(a>0?" R[%d]=E(~-E(R[%d])),\0 U R[%d],\0 R[%d] O,\0 U %d,\0R[%d]=0,"+(a&'8')*3:a <- 'c'?" %d, %c%s = R[%d], \0 %d, *R=%c%s==R[%d], \0 R[%d]=(int)%c%s,"-a%'w'%'j'*5:"%d,%d,%s=%d,",a>0?a-'h'?a-49?a&7:g:I:g,a>0?a&7:"& "[a%3%2+1],a+72?Q:A(*R),a>0|a<-99?g:I,0)):(P=i,i=a+61?a+21?E(I):G:0,D(a%' '+29+"P O,\0 U %d,P=%d,",P,P+i,0,0,0),p(d,"A'",b))):(n=g-4?g%5-1?a+127?G:I:0:(Scan(),*( x86?processor :d)=0,(int)(ss+V(i))),g%5<2?D(g%5?" %s=E(~-E(%s)), \0 U %s,"+4*g:"%s=E(E(%s)%c%d),",Q,Q,"+ - "[g],n,0):(a=G-'u'?'!':'=',D(g-4?"P=%d%c=%s?%d:%d,":"*R=E(((int(*)(l,l,l))%s)(K(1),K(2),K(3))),P O,",n,a,Q,P,P+G),p(d,"A'",b))))):(Run((z=(F*)&ck,stat(k[1],&t),B=(l)mmap(0,i=t.st_size,3,1,open(k[1],2),0))),magic((R[4]=E(B+i/4),run(),P=V(-~i),U 0)),sprintf(M,A(.%s%d),k[1],P),D("%s %s '-DX=A(%s)' -o %s '-Dmagic=",X,__FILE__,X,M,fflush(0)))),k):p(M,A(rm -f .%s*),M),*R)));
|
{
|
||||||
|
return (z?(stat(M,&t)?P+=a+'{'?0:3:execv(M,k),a=(signed char)E(*L(P++,0)),i=P,y=(signed char)E(*L(P++,0))&255,sprintf(Q,y/'@'-3?"*L(V(%d+%d)+%d,0)":"R[%d]",(y&7),'\r',y/0100-1?0:(signed char)E(*L(P++,0))),(a+127&&a+'}'&&a+1?(a+61&&a+24&&a+025?(P=a+'H'&&a%061<=0?P:i,d+=sprintf( d,a>0?" R[%d]=E(~-E(R[%d])),\0 U R[%d],\0 R[%d] O,\0 U %d,\0R[%d]=0,"+(a&'8')*3:a <- 'c'?" %d, %c%s = R[%d], \0 %d, *R=%c%s==R[%d], \0 R[%d]=(int)%c%s,"-a%'w'%'j'*5:"%d,%d,%s=%d,",a>0?a-'h'?a-49?a&7:(y/010&7):(P+=4,*L(P-4,0)):(y/010&7),a>0?a&7:"& "[a%3%2+1],a+72?Q:"*R",a>0|a<-99?(y/010&7):(P+=4,*L(P-4,0)),0 ),(char* ) P):(P=i,i=a+61?a+21?E((P+=4,*L(P-4,0))):(signed char)E(*L(P++,0)):0,d+=sprintf( d,a%' '+29+"P O,\0 U %d,P=%d,",P,P+i,0,0,0 ),(char* ) P,system((sprintf(d,"A'",k[1]),b)),z)):(n=(y/010&7)-4?(y/010&7)%5-1?a+127?(signed char)E(*L(P++,0)):(P+=4,*L(P-4,0)):0:(Scan(),*( (char*)index(ss+V(i ),0100)?(char*)index(ss+V(i ),0100) :d)=0,(int)(ss+V(i))),(y/010&7)%5<2?d+=sprintf( d,(y/010&7)%5?" %s=E(~-E(%s)), \0 U %s,"+4*(y/010&7):"%s=E(E(%s)%c%d),",Q,Q,"+ - "[(y/010&7)],n,0 ),(char* ) P:(a=(signed char)E(*L(P++,0))-'u'?'!':'=',d+=sprintf( d,(y/010&7)-4?"P=%d%c=%s?%d:%d,":"*R=E(((int(*)(l,l,l))%s)(K(1),K(2),K(3))),P O,",n,a,Q,P,P+(signed char)E(*L(P++,0)) ),(char* ) P,system((sprintf(d,"A'",k[1]),b)),z)))):(Run((z=(char*)&ck,stat(k[1],&t),B=(l)mmap(0,i=t.st_size,PROT_READ|PROT_WRITE,1,open(k[1],2),0))),(((B+13)[4]=E(B+i/4),run(),P=V(-~i),(B+13)[4]=E(V(17)-4),*(int*)V(021))),sprintf(M,".%s%d",k[1],P),d+=sprintf( d,"%s %s '-DX=A(%s)' -o %s '-Dmagic=","cpp -std=gnu99 -Wall -Wextra -pedantic -Winfinite-recursion -Wno-bitwise-conditional-parentheses -Wno-error -Wno-implicit-function-declaration -Wno-implicit-int -Wno-int-to-pointer-cast -Wno-macro-redefined -Wno-pedantic -Wno-pointer-to-int-cast -Wno-return-type -Wno-string-plus-int -Wno-bitwise-op-parentheses -Wno-format -Wno-format-extra-args -Wno-int-conversion -Wno-unused-parameter -Wno-unsequenced -E \"-DA(X)=#X\"","anonymous.c","cpp -std=gnu99 -Wall -Wextra -pedantic -Winfinite-recursion -Wno-bitwise-conditional-parentheses -Wno-error -Wno-implicit-function-declaration -Wno-implicit-int -Wno-int-to-pointer-cast -Wno-macro-redefined -Wno-pedantic -Wno-pointer-to-int-cast -Wno-return-type -Wno-string-plus-int -Wno-bitwise-op-parentheses -Wno-format -Wno-format-extra-args -Wno-int-conversion -Wno-unused-parameter -Wno-unsequenced -E \"-DA(X)=#X\"",M,fflush(0) ),(char* ) P));
|
||||||
|
}
|
||||||
|
int
|
||||||
|
main (int cka, char **k) { char *ck = (char *)cka;
|
||||||
|
exit(E((ck?pain((char*)cka,k):system((sprintf(M,"rm -f .%s*",k[1]),M)),z,*(B+13))));
|
||||||
}
|
}
|
||||||
@@ -1,346 +0,0 @@
|
|||||||
#include <stdio.h>
|
|
||||||
#include <sys/stat.h>
|
|
||||||
#include <stdlib.h>
|
|
||||||
#include <strings.h>
|
|
||||||
|
|
||||||
#define l int*
|
|
||||||
#define F char
|
|
||||||
|
|
||||||
struct stat t;
|
|
||||||
#define c return
|
|
||||||
#define I (P+=4,*L(P-4,0))
|
|
||||||
#define G (signed F)E(*L(P++,0))
|
|
||||||
#define C(O,D) E (D[B+V(010)/4+O*10])
|
|
||||||
#define U R[4]=E(V(17)-4),*(l)V(021)=
|
|
||||||
|
|
||||||
char M [99],Q[99],b[15000],*ss,*d=b, *z;
|
|
||||||
|
|
||||||
#define O =(n=*(l)V(021),R[4]=E(V(17)+4),n)
|
|
||||||
#define p(a,b,c) system((sprintf(a,b,k[1]),c)),z
|
|
||||||
#define g (y/010&7)
|
|
||||||
#define R (B+13)
|
|
||||||
#define x86 (F*)index(ss+V(i ),0100)
|
|
||||||
|
|
||||||
#define D(y,n,a,m,i,c) d += \
|
|
||||||
sprintf(d, \
|
|
||||||
y,n,a,m,i,c ), \
|
|
||||||
(F* ) P
|
|
||||||
|
|
||||||
int* B,i,n,a,r,y,P ;
|
|
||||||
V(v){
|
|
||||||
return E(B[v]) /* end E() */;
|
|
||||||
}
|
|
||||||
|
|
||||||
|
|
||||||
int *Li(d,r)
|
|
||||||
{
|
|
||||||
return E (3[B+
|
|
||||||
V(010) /* end V() */
|
|
||||||
/4+r*10]
|
|
||||||
) &&
|
|
||||||
E (3 [B+
|
|
||||||
V(010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */
|
|
||||||
|
|
||||||
<=d ?
|
|
||||||
(int*)(((int)B) + d +
|
|
||||||
E(4[B+
|
|
||||||
V (010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */ -
|
|
||||||
E (3[B +
|
|
||||||
V(010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */
|
|
||||||
) :
|
|
||||||
(((int)B)^d)>>24&&--r?
|
|
||||||
Li(d,r) /* end Li() */:
|
|
||||||
(int*)d;
|
|
||||||
}
|
|
||||||
|
|
||||||
int *L(d, r){
|
|
||||||
return r =
|
|
||||||
V(014 ) /* end V() */&
|
|
||||||
63,
|
|
||||||
Li(d,r) /* end Li() */
|
|
||||||
;
|
|
||||||
}
|
|
||||||
int *Runi(d,a)
|
|
||||||
{
|
|
||||||
return (ss = strcmp((char*)B+
|
|
||||||
E (4[B+
|
|
||||||
V(010)/* end V() *//4+
|
|
||||||
(V(12) /* end V() */
|
|
||||||
>>16)*10])+
|
|
||||||
E(0[B+
|
|
||||||
V(010) /* end V() */
|
|
||||||
/4+--r*10]), /* end E() */
|
|
||||||
".strtab") /* end strcmp() */ ?
|
|
||||||
ss:(char*)B+
|
|
||||||
E (4[B+
|
|
||||||
V(010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */ ,
|
|
||||||
E (1[B+
|
|
||||||
V(010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */ -
|
|
||||||
2) ?
|
|
||||||
Runi(d,r) :
|
|
||||||
0;
|
|
||||||
}
|
|
||||||
|
|
||||||
int *Run(d, a)
|
|
||||||
{
|
|
||||||
return r=
|
|
||||||
V(014 ) /* end V() */
|
|
||||||
&63,
|
|
||||||
Runi(d,a);
|
|
||||||
}
|
|
||||||
|
|
||||||
Sca()
|
|
||||||
{
|
|
||||||
i=((a-=16)+
|
|
||||||
E (4[B +
|
|
||||||
V (010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */
|
|
||||||
|
|
||||||
)/4,
|
|
||||||
(V(-~i) /* end V() */
|
|
||||||
-P+2 ?
|
|
||||||
Sca() :
|
|
||||||
0
|
|
||||||
);
|
|
||||||
|
|
||||||
}
|
|
||||||
Scan()
|
|
||||||
{
|
|
||||||
a=
|
|
||||||
E(5[B+
|
|
||||||
V(010) /* end V() */
|
|
||||||
/4+r*10]) /* end E() */
|
|
||||||
, Sca();
|
|
||||||
}
|
|
||||||
ru()
|
|
||||||
{
|
|
||||||
i=((a-=16)+
|
|
||||||
E(4[B+
|
|
||||||
V(010) /* end V() */ /
|
|
||||||
4+r*10]) /* end E() */
|
|
||||||
)/4,
|
|
||||||
(strcmp(ss +
|
|
||||||
V(i),
|
|
||||||
"main") /* end strcmp() */ ?
|
|
||||||
ru() :
|
|
||||||
0)
|
|
||||||
;
|
|
||||||
}
|
|
||||||
|
|
||||||
run(){
|
|
||||||
a=
|
|
||||||
E(5[B +
|
|
||||||
V(010) /* end V() in E() */
|
|
||||||
/4+r*10]) /* end E() */,
|
|
||||||
ru();
|
|
||||||
}
|
|
||||||
E(DX)
|
|
||||||
{
|
|
||||||
return *z /* z at this point appeared to be '\002' if I (Cody) recalls correctly */ ?
|
|
||||||
DX : DX <<030 |
|
|
||||||
(DX&65280)<<010 |
|
|
||||||
DX>>8 & 65280 |
|
|
||||||
DX>>24&0377;
|
|
||||||
}
|
|
||||||
|
|
||||||
int* K(k)
|
|
||||||
{
|
|
||||||
return L(
|
|
||||||
E(
|
|
||||||
k [
|
|
||||||
(int*)V(17) /* end V() in E() in L() */
|
|
||||||
]) /* end E() in L() */ ,
|
|
||||||
0) /* end L() */;
|
|
||||||
}
|
|
||||||
|
|
||||||
int
|
|
||||||
main (int cka, char **k) { char *ck = (char *)cka;
|
|
||||||
exit(
|
|
||||||
E((ck
|
|
||||||
?main((z?
|
|
||||||
(stat(M,&t)?
|
|
||||||
P+=a+'{'?0
|
|
||||||
:3
|
|
||||||
:execv(M,k),
|
|
||||||
|
|
||||||
a=(signed char)
|
|
||||||
E(
|
|
||||||
*L(P++,0)
|
|
||||||
),
|
|
||||||
i=P,
|
|
||||||
y=(signed char)
|
|
||||||
E(
|
|
||||||
*L(P++,0)
|
|
||||||
)&255,
|
|
||||||
sprintf(Q,y/'@'-3?"*L(V(%d+%d)+%d,0)":"R[%d]",(y&7),'\r',y/0100-1?0
|
|
||||||
:
|
|
||||||
(signed char)E(
|
|
||||||
*L(P++,0)
|
|
||||||
)),
|
|
||||||
(a+127 &&
|
|
||||||
a+'}' &&
|
|
||||||
a+1 ?
|
|
||||||
(a+61 &&
|
|
||||||
a + 24 &&
|
|
||||||
a +
|
|
||||||
025 ?
|
|
||||||
(P=a+'H' &&
|
|
||||||
a%061 <=0 ?
|
|
||||||
P :i ,
|
|
||||||
d += sprintf
|
|
||||||
(d,a>0 ?
|
|
||||||
" R[%d]=E(~-E(R[%d])),\0 U R[%d],\0 R[%d] O,\0 U %d,\0R[%d]=0,"+(a&'8')*3:a <- 'c'?" %d, %c%s = R[%d], \0 %d, *R=%c%s==R[%d], \0 R[%d]=(int)%c%s,"-a%'w'%'j'*5:"%d,%d,%s=%d,",
|
|
||||||
a>0 ?
|
|
||||||
a-'h' ?
|
|
||||||
a-49 ?
|
|
||||||
a&7 :
|
|
||||||
(y/010&7)
|
|
||||||
:(P +=4,
|
|
||||||
*L(P-4,0)
|
|
||||||
):(y/010&7),
|
|
||||||
a>0 ?
|
|
||||||
a&7 :
|
|
||||||
"& "[a%3%2+1],
|
|
||||||
a + 72 ?
|
|
||||||
Q :
|
|
||||||
"*R", a>0 | a<-99 ?
|
|
||||||
(y/010&7) :
|
|
||||||
(P+=4,
|
|
||||||
*L(P-4,0)),
|
|
||||||
0)
|
|
||||||
|
|
||||||
,(char*)P) :
|
|
||||||
(P=i,
|
|
||||||
i = a + 61 ?
|
|
||||||
a +21?
|
|
||||||
E((P+=4,
|
|
||||||
*L(P-4,0))) :
|
|
||||||
(signed char) E(
|
|
||||||
*L(P++,0)) :
|
|
||||||
0,
|
|
||||||
d += sprintf( d,a%' '+29+"P O,\0 U %d,P=%d,"
|
|
||||||
, P,
|
|
||||||
P+i,
|
|
||||||
0,
|
|
||||||
0,
|
|
||||||
0),
|
|
||||||
|
|
||||||
(char* )P,
|
|
||||||
system((
|
|
||||||
sprintf
|
|
||||||
(d,
|
|
||||||
"A'",
|
|
||||||
k[1]),
|
|
||||||
b)
|
|
||||||
),
|
|
||||||
z)
|
|
||||||
) :
|
|
||||||
(n =
|
|
||||||
(y/010&7) - 4
|
|
||||||
? (y/010&7)%
|
|
||||||
5-1 ?
|
|
||||||
a+127 ?
|
|
||||||
(signed char)E(
|
|
||||||
*L(P++,0)) :
|
|
||||||
(P+=4,
|
|
||||||
*L(P-4,0)
|
|
||||||
) : 0 :
|
|
||||||
(Scan(),
|
|
||||||
*(
|
|
||||||
(char*)index
|
|
||||||
(ss+
|
|
||||||
V(i ),
|
|
||||||
0100) ?
|
|
||||||
(char*) index (ss+
|
|
||||||
V(i ),
|
|
||||||
0100) : d) =
|
|
||||||
0,
|
|
||||||
(int) (ss+
|
|
||||||
V(i)
|
|
||||||
)),
|
|
||||||
(y/010&7) %
|
|
||||||
5<2 ?
|
|
||||||
d += sprintf(d,
|
|
||||||
(y/010&7) %
|
|
||||||
5
|
|
||||||
?" %s=E(~-E(%s)), \0 U %s," +
|
|
||||||
4*
|
|
||||||
(y/010&7):
|
|
||||||
"%s=E(E(%s)%c%d),",
|
|
||||||
Q,
|
|
||||||
Q,
|
|
||||||
"+ - "[(y/010&7)],
|
|
||||||
n,
|
|
||||||
0),
|
|
||||||
|
|
||||||
|
|
||||||
(char* )P :
|
|
||||||
( a= (signed char)E(
|
|
||||||
*L(P++,0) /* end *L() */
|
|
||||||
) /* end E */ -
|
|
||||||
'u' ?
|
|
||||||
'!' :
|
|
||||||
'=',
|
|
||||||
d +=
|
|
||||||
sprintf(d,
|
|
||||||
(y/010&7)
|
|
||||||
- 4
|
|
||||||
? "P=%d%c=%s?%d:%d,":
|
|
||||||
"*R=E(((int(*)(l,l,l))%s)(K(1),K(2),K(3))),P O,"
|
|
||||||
,n,a,Q,P,P+
|
|
||||||
(signed char)E(
|
|
||||||
*L(P++,0) /* end *L() */
|
|
||||||
) /* end E */
|
|
||||||
) /* end sprintf */
|
|
||||||
|
|
||||||
,(char* ) P,
|
|
||||||
system(
|
|
||||||
(sprintf (d,
|
|
||||||
"A'",
|
|
||||||
k[1]
|
|
||||||
),
|
|
||||||
b)) /* end system */
|
|
||||||
,z))))
|
|
||||||
:
|
|
||||||
(Run
|
|
||||||
((z=(char*)&ck,stat(k[1],&t),B=(int*)mmap(0,i=t.st_size,3,1,open(k[1],2),0))
|
|
||||||
) /* end Run() */
|
|
||||||
,((
|
|
||||||
(B+13)[4] =
|
|
||||||
E(B+i/4) /* end E() */
|
|
||||||
,run(), /* end run() */
|
|
||||||
P=V(-~i), /* end V() */
|
|
||||||
(B+13)[4] =
|
|
||||||
E (
|
|
||||||
V(17) /* end V() */
|
|
||||||
-4
|
|
||||||
), /* end E() */
|
|
||||||
*(int*)
|
|
||||||
V(021) /* end V() */
|
|
||||||
= 0)),
|
|
||||||
sprintf(M,
|
|
||||||
".%s%d",k[1],
|
|
||||||
P) /* end sprintf() */,
|
|
||||||
d +=
|
|
||||||
sprintf(d,"%s %s '-DX=A(%s)' -o %s '-Dmagic=","cpp -std=gnu99 -Wall -Wextra -pedantic -Winfinite-recursion -Wno-bitwise-conditional-parentheses -Wno-error -Wno-implicit-function-declaration -Wno-implicit-int -Wno-int-to-pointer-cast -Wno-macro-redefined -Wno-pedantic -Wno-pointer-to-int-cast -Wno-return-type -Wno-string-plus-int -Wno-bitwise-op-parentheses -Wno-format -Wno-format-extra-args -Wno-int-conversion -Wno-unused-parameter -Wno-unsequenced -ggdb3 -E \"-DA(X)=#X\"","anonymous.c","cpp -std=gnu99 -Wall -Wextra -pedantic -Winfinite-recursion -Wno-bitwise-conditional-parentheses -Wno-error -Wno-implicit-function-declaration -Wno-implicit-int -Wno-int-to-pointer-cast -Wno-macro-redefined -Wno-pedantic -Wno-pointer-to-int-cast -Wno-return-type -Wno-string-plus-int -Wno-bitwise-op-parentheses -Wno-format -Wno-format-extra-args -Wno-int-conversion -Wno-unused-parameter -Wno-unsequenced -ggdb3 -E \"-DA(X)=#X\"",
|
|
||||||
M,
|
|
||||||
fflush(0)
|
|
||||||
) /* end sprintf() */
|
|
||||||
|
|
||||||
,(char* )P)
|
|
||||||
),k):
|
|
||||||
system(
|
|
||||||
(sprintf(M,
|
|
||||||
"rm -f .%s*",
|
|
||||||
k[1]),
|
|
||||||
M)/* end sprintf() in system() */
|
|
||||||
),z,*(B+13)
|
|
||||||
) /* end ck?main()... in exit() */
|
|
||||||
) /* end E() in exit() */
|
|
||||||
); /* end exit() */
|
|
||||||
} /* end main() */
|
|
||||||
@@ -1030,92 +1030,6 @@ fire](https://en.wikipedia.org/wiki/Halt_and_Catch_Fire_(computing))! :-) ).
|
|||||||
# 2001
|
# 2001
|
||||||
|
|
||||||
|
|
||||||
## [2001/anonymous](2001/anonymous/anonymous.c) ([README.md](2001/anonymous/README.md))
|
|
||||||
## STATUS: known bug - please help us fix
|
|
||||||
|
|
||||||
This entry seems to no longer work and we would appreciate any help from anyone
|
|
||||||
who can fix this. [Cody Boone Ferguson](/winners.html#Cody_Boone_Ferguson) has
|
|
||||||
the following hints that might help but he has no system where he could test
|
|
||||||
it. [Yusuke Endoh](/winners.html#Yusuke_Endoh) [wrote a little bit about
|
|
||||||
it](https://mame-github-io.translate.goog/ioccc-ja-spoilers/2001/anonymous.html?_x_tr_sl=auto&_x_tr_tl=en&_x_tr_hl=en-US&_x_tr_pto=wapp) that
|
|
||||||
might or might not help but he too could not get it to work.
|
|
||||||
|
|
||||||
Tips from Cody:
|
|
||||||
|
|
||||||
- The original main() started like: `main (char *ck, char **k)` but we made it
|
|
||||||
compilable for clang by changing it to be: `main (int cka, char **k) { char *ck
|
|
||||||
= (char *)cka;` which might or might not be good.
|
|
||||||
|
|
||||||
- `gcc` reports an infinite recursive call of `main()`. My (Cody's) guess is
|
|
||||||
that this is the root of the problem of the crash but it might be other things.
|
|
||||||
I'm not sure how to stop this from happening. This happens before and after the
|
|
||||||
above fix for `clang`!
|
|
||||||
|
|
||||||
- Try a beautifier on the original C code. This might or might not work; see
|
|
||||||
next point.
|
|
||||||
|
|
||||||
- Use `cpp -E` (see [cpp.c](2001/anonymous/cpp.c)) and clean it up first. I
|
|
||||||
(Cody) did this for convenience though there are still macros. This is because
|
|
||||||
it was done via a hackish make rule:
|
|
||||||
|
|
||||||
cpp: ${PROG}.c
|
|
||||||
@echo "NOTE: this entry seems to no longer work."
|
|
||||||
magic='cpp ${CFLAGS} -E'; \
|
|
||||||
X='-DA(X)=#X'; \
|
|
||||||
$$magic -Dmagic= $$X "-DX=A($$magic \"$$X\")" \
|
|
||||||
$< ${LIBS} > anonymous.cpp.c
|
|
||||||
|
|
||||||
|
|
||||||
- (If beautifying) After beautifying it try changing references of the macros
|
|
||||||
(where not too complicated) to their definitions. For instance in vim you might
|
|
||||||
do: `:%s/\<l\>/int */g` and then delete the line that was changed to `#define
|
|
||||||
int * int*` (or else do a range substitute so it's not changed). You might not
|
|
||||||
need this if you use the cpp. This might be useful anyway to more easily test
|
|
||||||
things.
|
|
||||||
|
|
||||||
- If your system has a `setarch` tool that might or might not be of help (I'm
|
|
||||||
not too familiar with its internals).
|
|
||||||
|
|
||||||
- The code appears to do everything from one call to `exit(3)` but it makes use
|
|
||||||
of the ternary operator and possibly the comma operator Check the Makefile for
|
|
||||||
the defines but also observe that those are in the source file. It appears that
|
|
||||||
the entry might try compiling as well but that's from a quick glance.
|
|
||||||
|
|
||||||
- The author warns that only simple source (once compiled) would work so make
|
|
||||||
use of the provided source file
|
|
||||||
[2001/anonymous/anonymous.ten.c](2001/anonymous/anonymous.ten.c). To compile try
|
|
||||||
`make anonymous.ten` from the entry directory which you can then run the entry
|
|
||||||
on. Note that it needs to be compiled as a x86 program.
|
|
||||||
|
|
||||||
- The `Tr` macro appears (at a glance when very tired) to create another
|
|
||||||
function and when C pre-processed it seems like at least the function `L()` is
|
|
||||||
there twice. However this is actually a bit different: one is `L##i()` and the
|
|
||||||
other is `L()`. `L##i()` calls itself and `L()` calls `L##i()`. You might have luck
|
|
||||||
renaming it e.g. `Li()` instead but I (Cody) had some problems renaming some of
|
|
||||||
these functions (some but not all).
|
|
||||||
|
|
||||||
- Pray, cast a spell or just wish yourself good luck, depending on your
|
|
||||||
beliefs/personality/whatever! :-) It seems you'll need it! :-) (and also :-( )
|
|
||||||
|
|
||||||
Here are some additional warnings on different platforms:
|
|
||||||
|
|
||||||
```c
|
|
||||||
anonymous.c:12:13: warning: operation on 'P' may be undefined [-Wsequence-point]
|
|
||||||
#define I (P+=4,*L(P-4,0))
|
|
||||||
^
|
|
||||||
```
|
|
||||||
|
|
||||||
With `gdb` I determined that in the function `Runi()` appears to be NULL. I'm
|
|
||||||
not sure if this is relevant or not.
|
|
||||||
|
|
||||||
With `gdb` it appears that the crash happens with:
|
|
||||||
|
|
||||||
```
|
|
||||||
V (v@entry=<optimized out>) at anonymous.c:44
|
|
||||||
44 return E (B[v]);
|
|
||||||
```
|
|
||||||
|
|
||||||
(see [cpp.c](cpp.c)).
|
|
||||||
|
|
||||||
## [2001/bellard](2001/bellard/bellard.c) ([README.md](2001/bellard/README.md))
|
## [2001/bellard](2001/bellard/bellard.c) ([README.md](2001/bellard/README.md))
|
||||||
## STATUS: probable bug (possibly depending on system) - please help test and if necessary fix
|
## STATUS: probable bug (possibly depending on system) - please help test and if necessary fix
|
||||||
|
|||||||
Reference in new issue
Block a user