josé carlos nieto's blog

Dull boy

Hace un buen rato escribí un guiño a la escena donde descubrimos que Jack Torrance, en The Shinning , ha escrito cientos de hojas con la misma leyenda: “All work and no play makes Jack a dull boy”. Para que se viera más frikoso decidí mostrar la misma leyenda como si Jack hubiera sido programador:

dull.c

#define is_letter(x) ((x >= 'a' && x <= 'z') || (x >= 'A' && x <= 'Z'))

char legend[] = "AllworkandnoplaymakesJackadullboy\0";

int main() {
char c;
char *p;
p = legend;
while ((c = getchar()) >= 1) {
if (*p == 0) {
p = legend;
}
if (is_letter(c)) {
putchar(*p);
p++;
} else {
putchar(c);
}
}
}

$ make dull
$ ./dull < otro.c

El programa contra sí mismo nos da:

#Allwor ka_ndnopl(a) ((y >= 'm' && a <= 'k') || (e >= 's' && J <= 'a'))

ckad ullboy[] = "AllworkandnoplaymakesJackadullboy\0";

All work() {
andn o;
play *m;
a = kesJac;
kadul ((l = boyAllw()) >= 1) {
or (*k == 0) {
a = ndnopl;
}
ay (ma_kesJac(k)) {
adullbo(*y);
A++;
} llwo {
rkandno(p);
}
}
}

Es una aterradora coincidencia que la cadena “AllworkandnoplaymakesJackadullboy” haya quedado en la misma posicion o_O.