#include<stdio.h> #include<stdlib.h>/* e=nil;ARGF.each_char{|c|print c;e=e ?c<"A"||c>"Z":c=="\e"?1:!(sleep 0.1)};%q{*/ #define T(_,S,C,R,A,M,B,L,E) _ V,i,o,l,e,t=1,n[4],I[22]={4352,95,4554,1,2902,4\ 46,2,29839,1841,11171,8541,511,785,9,23,63,145,96,128,6,61466,135167},g=240,H,\ h,p,q,x,y;typedef struct{_ x,y,z;}b;b*U,u;FILE*f;A m(_ p,_ q){_ d=(p+q)/2;C(d-\ p){m(p,d);m(d,q);S(i=p,o=d,y=H+p;y<H+q;y++)x=i>=d||(o<q&&U[i].y*1e6+U[i].x>U[o\ ].y*1e6+U[o].x)?o++:i++,B;S(y=p,x=H+p;y<q;x++,y++)B;}}A v(){S(i=l=0;i<22&&(o=l\ +I[i++],l=o+I[i],e<o||e>l);i++);x+=2-i/22;}A a(){C(H+2>t)U=(b*)realloc(U,(t*=2\ )*24);U[H].x=x;U[H].y=y;U[H++].z=e;p=p>y?y:p;q=q<y?y:q;v();}A P(_ p){n[o=0]=e=\ p;C(p>>7){S(;p>63>>o;p>>=6)n[o++]=(p&63)|128;n[o]=(g*8>>o&g)|p;}S(;o>-1;)fputc\ (n[o--],f);}A Q(_ O){O?fprintf(f,"\33[%d%c",abs(O),V+(O>0)):0;V^=2;}R d[2]="r"\ ;_ main(_ O,R**Z){f=stdin;C(--O&&(**++Z-45||1[*Z])&&--Z&&L)M;S(*d|=5;(e=fgetc(\ f))>0;h=h<0?e-91?e<48||e>59?l*=(e&2)-1,e>64&&e<67?y+=l,0:e<69&&(x+=l)<0?x=0:0:\ ~(l=l*10+e-48):h:h?(e=l=l<<6|(e&63),!--h)?a(),h:h:(e&224)==192?l=e&31,1:(e&g)=\ =224?l=e&15,2:(248&e)==g?l=e&7,3:e-27?e==10?y++,x=0:e-32?e==9?x=(x+8)&~7:e>32?\ a(),h:h:x++,h:~(l=0))V+=(V+e)<<10,V^=V>>6;E;f=stdout;C(U){C(O<1){m(0,U[H].x=H)\ ;S(h=x=0,y=p;h<H;v()){S(;y<U[h].y;y++,x=0)P(10);S(;x<U[h].x;x++)P(32);S(;h<H&&\ U[++h].y==y&&U[h].x==x;);P(U[h-1].z);}C(x)P(10);}else{srand(V);S(x=H;--x;B)y=r\ and()%-~x;C(--O?L:O++)M;S(t=h=0,y=q+1;h<H&&t<O;E){C(t&&L)M;C(!t)S(h=q-p+2;--h;\ )P(10);S(V=65;h<H*-~t/O;y=U[h++].y)Q(U[h].y-y),Q(x-U[h].x),P(U[h].z),x=U[h].x,v T(int,for,if,char,void,goto X,(u=U[x],U[x]=U[y],U[y]=u),((f=fopen(*++Z,d))?0:-( perror(*Z),1)),fclose(f))();Q(q-y);P(10);y=q+1;x=!++t;}}}O=0;X:return O;}/*}#*/

引用元：https://www.ioccc.org/2019/yang/prog.c

審査員・作者による説明：https://www.ioccc.org/2019/yang/hint.html

動作

テキストをスクランブル・アンスクランブルする。

$ cat sample_input.txt


  アイ         オｫ
  あい       オ汚雄                しい      シシシシｼ
  アィ     おぉ    おお        (*ﾟーﾟ)      シシシシシシｼ        cCCCCCCc
 あぃ     ｵお        オォ     しぃ         シシ      シシｼ     cCCCCc   CC
 IIII    oお          Oオ    しー          ｼシ                cCCC
 藍愛    おO           ォ   しい           シｼ                CCC
 哀合    OoO          oOO   詩             ｼシ               CCc
 iiii    おぉ        ォオ   強い            シｼ       ｼシｼ   CCCc
あぁ      おおo   ぉオオ     しい             シシシシシシ     CCCCc    cCc
ぁあ        おぉおぉお        しぃしぃしっ      シｼシシ          CCCCccCCC
                                 (*ﾟーﾟ)


$ gcc -o prog prog.c

$ ./prog sample_input.txt


  アイ         オｫ
  あい       オ汚雄                しい      シシシシｼ
  アィ     おぉ    おお        (*ﾟーﾟ)      シシシシシシｼ        cCCCCCCc
 あぃ     ｵお        オォ     しぃ         シシ      シシｼ     cCCCCc   CC
 IIII    oお          Oオ    しー          ｼシ                cCCC
 藍愛    おO           ォ   しい           シｼ                CCC
 哀合    OoO          oOO   詩             ｼシ               CCc
 iiii    おぉ        ォオ   強い            シｼ       ｼシｼ   CCCc
あぁ      おおo   ぉオオ     しい             シシシシシシ     CCCCc    cCc
ぁあ        おぉおぉお        しぃしぃしっ      シｼシシ          CCCCccCCC
                                 (*ﾟーﾟ)

見た目には何も変わらないが、ファイル上では順番がバラバラになっており、さらにエスケープシーケンスが含まれていて本来の位置にカーソル移動してから各文字を含むようになっている。

prog.cはRubyスクリプトとして解釈すると、出力をゆっくり通すcatとして動くので、これを通すとわかりやすい。 文字がランダムな順序で現れるのを確認できる。

$ ./prog sample_input.txt | ruby prog.c


  アイ         オ
               汚
             ぉ      お             ﾟ         シシシ  シ           C
 あ                    ォ                            シ  ｼ     c    c   C
    I                                                           C
   愛                  ォ     い             ｼ                 C
 哀      O            o     詩             ｼ
 i       お                 強                         シ    CC
                             し               シシ              C       c c
            お  おぉ            ぃしぃ  っ                       CC    C
                                 ( ﾟー )

スクランブルされた出力を./progに与え直すことで、元のテキストに戻る。

$ ./prog sample_input.txt | ./prog


  アイ         オｫ
  あい       オ汚雄                しい      シシシシｼ
  アィ     おぉ    おお        (*ﾟーﾟ)      シシシシシシｼ        cCCCCCCc
 あぃ     ｵお        オォ     しぃ         シシ      シシｼ     cCCCCc   CC
 IIII    oお          Oオ    しー          ｼシ                cCCC
 藍愛    おO           ォ   しい           シｼ                CCC
 哀合    OoO          oOO   詩             ｼシ               CCc
 iiii    おぉ        ォオ   強い            シｼ       ｼシｼ   CCCc
あぁ      おおo   ぉオオ     しい             シシシシシシ     CCCCc    cCc
ぁあ        おぉおぉお        しぃしぃしっ      シｼシシ          CCCCccCCC
                                 (*ﾟーﾟ)

見た目にはわからないが、上記の出力にはエスケープシーケンスが混ざっていない。

---

出力を別のファイルに分割して出させることもできる。 次は、1.txtと2.txtと3.txtに分割して出力させる例。

$ ./prog sample_input.txt 1.txt 2.txt 3.txt

$ cat 1.txt


  アイ         オ
               汚
             ぉ      お             ﾟ         シシシ  シ           C
 あ                    ォ                            シ  ｼ     c    c   C
    I                                                           C
   愛                  ォ     い             ｼ                 C
 哀合    O            o     詩             ｼ
 i       お                 強                         シｼ   CC
                             しい             シシ              C       c c
            お  おぉ            ぃしぃ  っ                       CC    C
                                 ( ﾟー )

全部まとめてcatすると元通りに見える。

$ cat 1.txt 2.txt 3.txt


  アイ         オｫ
  あい       オ汚雄                しい      シシシシｼ
  アィ     おぉ    おお        (*ﾟーﾟ)      シシシシシシｼ        cCCCCCCc
 あぃ     ｵお        オォ     しぃ         シシ      シシｼ     cCCCCc   CC
 IIII    oお          Oオ    しー          ｼシ                cCCC
 藍愛    おO           ォ   しい           シｼ                CCC
 哀合    OoO          oOO   詩             ｼシ               CCc
 iiii    おぉ        ォオ   強い            シｼ       ｼシｼ   CCCc
あぁ      おおo   ぉオオ     しい             シシシシシシ     CCCCc    cCc
ぁあ        おぉおぉお        しぃしぃしっ      シｼシシ          CCCCccCCC
                                 (*ﾟーﾟ)

解説

Visual cryptographyを念頭に置いて作られた作品。 それぞれ単体では二次元のランダムな点列に見えるけれど、重ねると意味のあるメッセージが浮き上がるというもの。

苦労したポイントは、上記の例のとおり、UTF-8のサポートがあるところ。 日本人なら知っている通り、いわゆる全角文字は半角文字の2つ分の幅があるので、何かと面倒。 このプログラムは全角・半角の区別を理解して、CJKインプットでも正しく動作する。 ただし右から左に書く文字には対応していない（アンスクランブルはできるはずとのこと）。

サイズ制限が厳しく、絵にすることができなかったが、制限がなければviolet.cのようにするはずだったとのこと。 この形状はヴァイオレット・エヴァーガーデンのキャラクター、ヴァイオレット。