13e12c5d1SDavid du Colombier #include <u.h>
23e12c5d1SDavid du Colombier #include <libc.h>
33e12c5d1SDavid du Colombier #include <bio.h>
43e12c5d1SDavid du Colombier
57dd7cddfSDavid du Colombier char choice[2048];
63e12c5d1SDavid du Colombier char index[] = "/sys/games/lib/fortunes.index";
73e12c5d1SDavid du Colombier char fortunes[] = "/sys/games/lib/fortunes";
83e12c5d1SDavid du Colombier
93e12c5d1SDavid du Colombier void
main(int argc,char * argv[])103e12c5d1SDavid du Colombier main(int argc, char *argv[])
113e12c5d1SDavid du Colombier {
123e12c5d1SDavid du Colombier int i;
133e12c5d1SDavid du Colombier long offs;
143e12c5d1SDavid du Colombier uchar off[4];
157dd7cddfSDavid du Colombier int ix, nix;
163e12c5d1SDavid du Colombier int newindex, oldindex;
173e12c5d1SDavid du Colombier char *p;
189a747e4fSDavid du Colombier Dir *fbuf, *ixbuf;
19219b2ee8SDavid du Colombier Biobuf *f, g;
203e12c5d1SDavid du Colombier
213e12c5d1SDavid du Colombier newindex = 0;
223e12c5d1SDavid du Colombier oldindex = 0;
233e12c5d1SDavid du Colombier ix = offs = 0;
243e12c5d1SDavid du Colombier if((f=Bopen(argc>1?argv[1]:fortunes, OREAD)) == 0){
253e12c5d1SDavid du Colombier print("Misfortune!\n");
263e12c5d1SDavid du Colombier exits("misfortune");
273e12c5d1SDavid du Colombier }
289a747e4fSDavid du Colombier ixbuf = nil;
293e12c5d1SDavid du Colombier if(argc == 1){
303e12c5d1SDavid du Colombier ix = open(index, OREAD);
313e12c5d1SDavid du Colombier if(ix>=0){
329a747e4fSDavid du Colombier ixbuf = dirfstat(ix);
339a747e4fSDavid du Colombier fbuf = dirfstat(Bfildes(f));
349a747e4fSDavid du Colombier if(ixbuf == nil || fbuf == nil){
359a747e4fSDavid du Colombier print("Misfortune?\n");
369a747e4fSDavid du Colombier exits("misfortune");
379a747e4fSDavid du Colombier }
38*fe853e23SDavid du Colombier if(ixbuf->length == 0){
39*fe853e23SDavid du Colombier /* someone else is rewriting the index */
40*fe853e23SDavid du Colombier goto NoIndex;
41*fe853e23SDavid du Colombier }
42*fe853e23SDavid du Colombier oldindex = 1;
439a747e4fSDavid du Colombier if(fbuf->mtime > ixbuf->mtime){
447dd7cddfSDavid du Colombier nix = create(index, OWRITE, 0666);
457dd7cddfSDavid du Colombier if(nix >= 0){
463e12c5d1SDavid du Colombier close(ix);
477dd7cddfSDavid du Colombier ix = nix;
483e12c5d1SDavid du Colombier newindex = 1;
493e12c5d1SDavid du Colombier oldindex = 0;
503e12c5d1SDavid du Colombier }
513e12c5d1SDavid du Colombier }
523e12c5d1SDavid du Colombier }else{
533e12c5d1SDavid du Colombier ix = create(index, OWRITE, 0666);
543e12c5d1SDavid du Colombier if(ix >= 0)
553e12c5d1SDavid du Colombier newindex = 1;
563e12c5d1SDavid du Colombier }
573e12c5d1SDavid du Colombier }
583e12c5d1SDavid du Colombier if(oldindex){
59d9306527SDavid du Colombier seek(ix, truerand()%(ixbuf->length/sizeof(offs))*sizeof(offs), 0);
603e12c5d1SDavid du Colombier read(ix, off, sizeof(off));
613e12c5d1SDavid du Colombier Bseek(f, off[0]|(off[1]<<8)|(off[2]<<16)|(off[3]<<24), 0);
623e12c5d1SDavid du Colombier p = Brdline(f, '\n');
633e12c5d1SDavid du Colombier if(p){
643e12c5d1SDavid du Colombier p[Blinelen(f)-1] = 0;
653e12c5d1SDavid du Colombier strcpy(choice, p);
663e12c5d1SDavid du Colombier }else
673e12c5d1SDavid du Colombier strcpy(choice, "Misfortune!");
683e12c5d1SDavid du Colombier }else{
69*fe853e23SDavid du Colombier NoIndex:
70219b2ee8SDavid du Colombier Binit(&g, ix, 1);
71d9306527SDavid du Colombier srand(truerand());
723e12c5d1SDavid du Colombier for(i=1;;i++){
733e12c5d1SDavid du Colombier if(newindex)
74219b2ee8SDavid du Colombier offs = Boffset(f);
753e12c5d1SDavid du Colombier p = Brdline(f, '\n');
763e12c5d1SDavid du Colombier if(p == 0)
773e12c5d1SDavid du Colombier break;
783e12c5d1SDavid du Colombier p[Blinelen(f)-1] = 0;
793e12c5d1SDavid du Colombier if(newindex){
803e12c5d1SDavid du Colombier off[0] = offs;
813e12c5d1SDavid du Colombier off[1] = offs>>8;
823e12c5d1SDavid du Colombier off[2] = offs>>16;
833e12c5d1SDavid du Colombier off[3] = offs>>24;
84219b2ee8SDavid du Colombier Bwrite(&g, off, sizeof(off));
853e12c5d1SDavid du Colombier }
86d9306527SDavid du Colombier if(lrand()%i==0)
87219b2ee8SDavid du Colombier strcpy(choice, p);
883e12c5d1SDavid du Colombier }
893e12c5d1SDavid du Colombier }
903e12c5d1SDavid du Colombier print("%s\n", choice);
913e12c5d1SDavid du Colombier exits(0);
923e12c5d1SDavid du Colombier }
93