Fix problem where symllink alias pointer was being used after free
[yaffs2.git] / direct / dtest.c
1 /*
2  * YAFFS: Yet another FFS. A NAND-flash specific file system. 
3  *
4  * Copyright (C) 2002 Aleph One Ltd.
5  *   for Toby Churchill Ltd and Brightstar Engineering
6  *
7  * Created by Charles Manning <charles@aleph1.co.uk>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License version 2 as
11  * published by the Free Software Foundation.
12  *
13  */
14
15
16
17
18 #include <stdio.h>
19 #include <string.h>
20 #include <unistd.h>
21 #include <fcntl.h>
22
23 #include "yaffsfs.h"
24
25
26 void dumpDir(const char *dname);
27
28 char xx[600];
29
30 void copy_in_a_file(char *yaffsName,char *inName)
31 {
32         int inh,outh;
33         unsigned char buffer[100];
34         int ni,no;
35         inh = open(inName,O_RDONLY);
36         outh = yaffs_open(yaffsName, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
37         
38         while((ni = read(inh,buffer,100)) > 0)
39         {
40                 no = yaffs_write(outh,buffer,ni);
41                 if(ni != no)
42                 {
43                         printf("problem writing yaffs file\n");
44                 }
45                 
46         }
47         
48         yaffs_close(outh);
49         close(inh);
50 }
51
52 void make_a_file(char *yaffsName,char bval,int sizeOfFile)
53 {
54         int outh;
55         int i;
56         unsigned char buffer[100];
57
58         outh = yaffs_open(yaffsName, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
59         
60         memset(buffer,bval,100);
61         
62         do{
63                 i = sizeOfFile;
64                 if(i > 100) i = 100;
65                 sizeOfFile -= i;
66                 
67                 yaffs_write(outh,buffer,i);
68                 
69         } while (sizeOfFile > 0);
70         
71                 
72         yaffs_close(outh);
73
74 }
75
76 void make_pattern_file(char *fn,int size)
77 {
78         int outh;
79         int marker;
80         int i;
81         outh = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
82         yaffs_lseek(outh,size-1,SEEK_SET);
83         yaffs_write(outh,"A",1);
84         
85         for(i = 0; i < size; i+=256)
86         {
87                 marker = ~i;
88                 yaffs_lseek(outh,i,SEEK_SET);
89                 yaffs_write(outh,&marker,sizeof(marker));
90         }
91         yaffs_close(outh);
92         
93 }
94
95 int check_pattern_file(char *fn)
96 {
97         int h;
98         int marker;
99         int i;
100         int size;
101         int ok = 1;
102         
103         h = yaffs_open(fn, O_RDWR,0);
104         size = yaffs_lseek(h,0,SEEK_END);
105                 
106         for(i = 0; i < size; i+=256)
107         {
108                 yaffs_lseek(h,i,SEEK_SET);
109                 yaffs_read(h,&marker,sizeof(marker));
110                 ok = (marker == ~i);
111                 if(!ok)
112                 {
113                    printf("pattern check failed on file %s, size %d at position %d. Got %x instead of %x\n",
114                                         fn,size,i,marker,~i);
115                 }
116         }
117         yaffs_close(h);
118         return ok;
119 }
120
121
122
123
124
125 int dump_file_data(char *fn)
126 {
127         int h;
128         int i = 0;
129         int ok = 1;
130         unsigned char b;
131         
132         h = yaffs_open(fn, O_RDWR,0);
133
134                                 
135         printf("%s\n",fn);
136         while(yaffs_read(h,&b,1)> 0)
137         {
138                 printf("%02x",b);
139                 i++;
140                 if(i > 32) 
141                 {
142                    printf("\n");
143                    i = 0;;
144                  }
145         }
146         printf("\n");
147         yaffs_close(h);
148         return ok;
149 }
150
151
152
153 void dump_file(const char *fn)
154 {
155         int i;
156         int size;
157         int h;
158         
159         h = yaffs_open(fn,O_RDONLY,0);
160         if(h < 0)
161         {
162                 printf("*****\nDump file %s does not exist\n",fn);
163         }
164         else
165         {
166                 size = yaffs_lseek(h,0,SEEK_SET);
167                 printf("*****\nDump file %s size %d\n",fn,size);
168                 for(i = 0; i < size; i++)
169                 {
170                         
171                 }
172         }
173 }
174
175 void create_file_of_size(const char *fn,int syze)
176 {
177         int h;
178         int n;
179         int result;
180         
181         char xx[200];
182         
183         int iterations = (syze + strlen(fn) -1)/ strlen(fn);
184         
185         h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
186                 
187         while (iterations > 0)
188         {
189                 sprintf(xx,"%s %8d",fn,iterations);
190                 n = strlen(xx);
191                 result = yaffs_write(h,xx,n);
192                 if(result != n)
193                         printf("Wrote %d, should have been %d\n",result,n);
194                 iterations--;
195         }
196         yaffs_close (h);
197 }
198
199 void verify_file_of_size(const char *fn,int syze)
200 {
201         int h;
202         int result;
203         
204         char xx[200];
205         char yy[200];
206         int l;
207         
208         int iterations = (syze + strlen(fn) -1)/ strlen(fn);
209         
210         h = yaffs_open(fn, O_RDONLY, S_IREAD | S_IWRITE);
211                 
212         while (iterations > 0)
213         {
214                 sprintf(xx,"%s %8d",fn,iterations);
215                 l = strlen(xx);
216                 
217                 result = yaffs_read(h,yy,l);
218                 yy[l] = 0;
219                 
220                 if(strcmp(xx,yy)){
221                         printf("=====>>>>> verification of file %s failed near position %lld\n",fn,(long long)yaffs_lseek(h,0,SEEK_CUR));
222                 }
223                 iterations--;
224         }
225         yaffs_close (h);
226 }
227
228 void create_resized_file_of_size(const char *fn,int syze1,int reSyze, int syze2)
229 {
230         int h;
231         
232         int iterations;
233         
234         h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
235                 
236         iterations = (syze1 + strlen(fn) -1)/ strlen(fn);
237         while (iterations > 0)
238         {
239                 yaffs_write(h,fn,strlen(fn));
240                 iterations--;
241         }
242         
243         yaffs_ftruncate(h,reSyze);
244         
245         yaffs_lseek(h,0,SEEK_SET);
246         iterations = (syze2 + strlen(fn) -1)/ strlen(fn);
247         while (iterations > 0)
248         {
249                 yaffs_write(h,fn,strlen(fn));
250                 iterations--;
251         }
252         
253         yaffs_close (h);
254 }
255
256
257 void do_some_file_stuff(const char *path)
258 {
259
260         char fn[100];
261
262         sprintf(fn,"%s/%s",path,"f1");
263         create_file_of_size(fn,10000);
264
265         sprintf(fn,"%s/%s",path,"fdel");
266         create_file_of_size(fn,10000);
267         yaffs_unlink(fn);
268
269         sprintf(fn,"%s/%s",path,"f2");
270         
271         create_resized_file_of_size(fn,10000,3000,4000);
272 }
273
274 void yaffs_backward_scan_test(const char *path)
275 {
276         char fn[100];
277         
278         yaffs_StartUp();        
279         
280         yaffs_mount(path);
281         
282         do_some_file_stuff(path);
283         
284         sprintf(fn,"%s/ddd",path);
285         
286         yaffs_mkdir(fn,0);
287         
288         do_some_file_stuff(fn);
289         
290         yaffs_unmount(path);
291         
292         yaffs_mount(path);
293 }
294
295 char xxzz[2000];
296
297
298 void yaffs_device_flush_test(const char *path)
299 {
300         char fn[100];
301         int h;
302         int i;
303         
304         yaffs_StartUp();        
305         
306         yaffs_mount(path);
307         
308         do_some_file_stuff(path);
309         
310         // Open and add some data to a few files
311         for(i = 0; i < 10; i++) {
312         
313                 sprintf(fn,"%s/ff%d",path,i);
314
315                 h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IWRITE | S_IREAD);
316                 yaffs_write(h,xxzz,2000);
317                 yaffs_write(h,xxzz,2000);
318         }
319         yaffs_unmount(path);
320         
321         yaffs_mount(path);
322 }
323
324
325
326 void short_scan_test(const char *path, int fsize, int niterations)
327 {
328         int i;
329         char fn[100];
330         
331         sprintf(fn,"%s/%s",path,"f1");
332         
333         yaffs_StartUp();
334         for(i = 0; i < niterations; i++)
335         {
336                 printf("\n*****************\nIteration %d\n",i);
337                 yaffs_mount(path);
338                 printf("\nmount: Directory look-up of %s\n",path);
339                 dumpDir(path);
340                 make_a_file(fn,1,fsize);
341                 yaffs_unmount(path);
342         }
343 }
344
345
346
347 void scan_pattern_test(const char *path, int fsize, int niterations)
348 {
349         int i;
350         int j;
351         char fn[3][100];
352         int result;
353         
354         sprintf(fn[0],"%s/%s",path,"f0");
355         sprintf(fn[1],"%s/%s",path,"f1");
356         sprintf(fn[2],"%s/%s",path,"f2");
357         
358         yaffs_StartUp();
359         
360         for(i = 0; i < niterations; i++)
361         {
362                 printf("\n*****************\nIteration %d\n",i);
363                 yaffs_mount(path);
364                 printf("\nmount: Directory look-up of %s\n",path);
365                 dumpDir(path);
366                 for(j = 0; j < 3; j++)
367                 {
368                         result = dump_file_data(fn[j]);
369                         result = check_pattern_file(fn[j]);
370                         make_pattern_file(fn[j],fsize); 
371                         result = dump_file_data(fn[j]);
372                         result = check_pattern_file(fn[j]);
373                 }
374                 yaffs_unmount(path);
375         }
376 }
377
378 void fill_disk(const char *path,int nfiles)
379 {
380         int h;
381         int n;
382         int result;
383         int f;
384         
385         char str[50];
386         
387         for(n = 0; n < nfiles; n++)
388         {
389                 sprintf(str,"%s/%d",path,n);
390                 
391                 h = yaffs_open(str, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
392                 
393                 printf("writing file %s handle %d ",str, h);
394                 
395                 while ((result = yaffs_write(h,xx,600)) == 600)
396                 {
397                         f = yaffs_freespace(path);
398                 }
399                 result = yaffs_close(h);
400                 printf(" close %d\n",result);
401         }
402 }
403
404 void fill_disk_and_delete(const char *path, int nfiles, int ncycles)
405 {
406         int i,j;
407         char str[50];
408         int result;
409         
410         for(i = 0; i < ncycles; i++)
411         {
412                 printf("@@@@@@@@@@@@@@ cycle %d\n",i);
413                 fill_disk(path,nfiles);
414                 
415                 for(j = 0; j < nfiles; j++)
416                 {
417                         sprintf(str,"%s/%d",path,j);
418                         result = yaffs_unlink(str);
419                         printf("unlinking file %s, result %d\n",str,result);
420                 }
421         }
422 }
423
424
425 void fill_files(char *path,int flags, int maxIterations,int siz)
426 {
427         int i;
428         int j;
429         char str[50];
430         int h;
431         
432         i = 0;
433         
434         do{
435                 sprintf(str,"%s/%d",path,i);
436                 h = yaffs_open(str, O_CREAT | O_TRUNC | O_RDWR,S_IREAD | S_IWRITE);
437
438                 if(h >= 0)
439                 {
440                         for(j = 0; j < siz; j++)
441                         {
442                                 yaffs_write(h,str,1);
443                         }
444                 }
445                 
446                 if( flags & 1)
447                 {
448                         yaffs_unlink(str);
449                 }
450                 i++;
451         } while(h >= 0 && i < maxIterations);
452         
453         if(flags & 2)
454         {
455                 i = 0;
456                 do{
457                         sprintf(str,"%s/%d",path,i);
458                         printf("unlink %s\n",str);
459                         i++;
460                 } while(yaffs_unlink(str) >= 0);
461         }
462 }
463
464 void leave_unlinked_file(char *path,int maxIterations,int siz)
465 {
466         int i;
467         char str[50];
468         int h;
469         
470         i = 0;
471         
472         do{
473                 sprintf(str,"%s/%d",path,i);
474                 printf("create %s\n",str);
475                 h = yaffs_open(str, O_CREAT | O_TRUNC | O_RDWR,S_IREAD | S_IWRITE);
476                 if(h >= 0)
477                 {
478                         yaffs_unlink(str);
479                 }
480                 i++;
481         } while(h < 0 && i < maxIterations);
482         
483         if(h >= 0)
484         {
485                 for(i = 0; i < siz; i++)
486                 {
487                         yaffs_write(h,str,1);
488                 }
489         }
490         
491         printf("Leaving file %s open\n",str);
492
493 }
494
495 void dumpDirFollow(const char *dname)
496 {
497         yaffs_DIR *d;
498         yaffs_dirent *de;
499         struct yaffs_stat s;
500         char str[100];
501                         
502         d = yaffs_opendir(dname);
503         
504         if(!d)
505         {
506                 printf("opendir failed\n");
507         }
508         else
509         {
510                 while((de = yaffs_readdir(d)) != NULL)
511                 {
512                         sprintf(str,"%s/%s",dname,de->d_name);
513                         
514                         yaffs_stat(str,&s);
515                         
516                         printf("%s ino %d length %d mode %X ",de->d_name,(int)s.st_ino,(int)s.st_size,s.st_mode);
517                         switch(s.st_mode & S_IFMT)
518                         {
519                                 case S_IFREG: printf("data file"); break;
520                                 case S_IFDIR: printf("directory"); break;
521                                 case S_IFLNK: printf("symlink -->");
522                                                           if(yaffs_readlink(str,str,100) < 0)
523                                                                 printf("no alias");
524                                                           else
525                                                                 printf("\"%s\"",str);    
526                                                           break;
527                                 default: printf("unknown"); break;
528                         }
529                         
530                         printf("\n");           
531                 }
532                 
533                 yaffs_closedir(d);
534         }
535         printf("\n");
536         
537         printf("Free space in %s is %d\n\n",dname,(int)yaffs_freespace(dname));
538
539 }
540
541
542 void dump_directory_tree_worker(const char *dname,int recursive)
543 {
544         yaffs_DIR *d;
545         yaffs_dirent *de;
546         struct yaffs_stat s;
547         char str[1000];
548                         
549         d = yaffs_opendir(dname);
550         
551         if(!d)
552         {
553                 printf("opendir failed\n");
554         }
555         else
556         {
557                 while((de = yaffs_readdir(d)) != NULL)
558                 {
559                         sprintf(str,"%s/%s",dname,de->d_name);
560                         
561                         yaffs_lstat(str,&s);
562                         
563                         printf("%s inode %d obj %x length %d mode %X ",str,s.st_ino,de->d_dont_use,(int)s.st_size,s.st_mode);
564                         switch(s.st_mode & S_IFMT)
565                         {
566                                 case S_IFREG: printf("data file"); break;
567                                 case S_IFDIR: printf("directory"); break;
568                                 case S_IFLNK: printf("symlink -->");
569                                                           if(yaffs_readlink(str,str,100) < 0)
570                                                                 printf("no alias");
571                                                           else
572                                                                 printf("\"%s\"",str);    
573                                                           break;
574                                 default: printf("unknown"); break;
575                         }
576                         
577                         printf("\n");
578
579                         if((s.st_mode & S_IFMT) == S_IFDIR && recursive)
580                                 dump_directory_tree_worker(str,1);
581                                                         
582                 }
583                 
584                 yaffs_closedir(d);
585         }
586
587 }
588
589 static void dump_directory_tree(const char *dname)
590 {
591         dump_directory_tree_worker(dname,1);
592         printf("\n");
593         printf("Free space in %s is %d\n\n",dname,(int)yaffs_freespace(dname));
594 }
595
596 void dumpDir(const char *dname)
597 {       dump_directory_tree_worker(dname,0);
598         printf("\n");
599         printf("Free space in %s is %d\n\n",dname,(int)yaffs_freespace(dname));
600 }
601
602
603 static void PermissionsCheck(const char *path, mode_t tmode, int tflags,int expectedResult)
604 {
605         int fd;
606         
607         if(yaffs_chmod(path,tmode)< 0) printf("chmod failed\n");
608         
609         fd = yaffs_open(path,tflags,0);
610         
611         if((fd >= 0) != (expectedResult > 0))
612         {
613                 printf("Permissions check %x %x %d failed\n",tmode,tflags,expectedResult);
614         }
615         else
616         {
617                 printf("Permissions check %x %x %d OK\n",tmode,tflags,expectedResult);
618         }
619         
620         
621         yaffs_close(fd);
622         
623         
624 }
625
626 int long_test(int argc, char *argv[])
627 {
628
629         int f;
630         int r;
631         char buffer[20];
632         
633         char str[100];
634         
635         int h;
636         mode_t temp_mode;
637         struct yaffs_stat ystat;
638         
639         yaffs_StartUp();
640         
641         yaffs_mount("/boot");
642         yaffs_mount("/data");
643         yaffs_mount("/flash");
644         yaffs_mount("/ram");
645         
646         printf("\nDirectory look-up of /boot\n");
647         dumpDir("/boot");
648         printf("\nDirectory look-up of /data\n");
649         dumpDir("/data");
650         printf("\nDirectory look-up of /flash\n");
651         dumpDir("/flash");
652
653         //leave_unlinked_file("/flash",20000,0);
654         //leave_unlinked_file("/data",20000,0);
655         
656         leave_unlinked_file("/ram",20,0);
657         
658
659         f = yaffs_open("/boot/b1", O_RDONLY,0);
660         
661         printf("open /boot/b1 readonly, f=%d\n",f);
662         
663         f = yaffs_open("/boot/b1", O_CREAT,S_IREAD | S_IWRITE);
664         
665         printf("open /boot/b1 O_CREAT, f=%d\n",f);
666         
667         
668         r = yaffs_write(f,"hello",1);
669         printf("write %d attempted to write to a read-only file\n",r);
670         
671         r = yaffs_close(f);
672         
673         printf("close %d\n",r);
674
675         f = yaffs_open("/boot/b1", O_RDWR,0);
676         
677         printf("open /boot/b1 O_RDWR,f=%d\n",f);
678         
679         
680         r = yaffs_write(f,"hello",2);
681         printf("write %d attempted to write to a writeable file\n",r);
682         r = yaffs_write(f,"world",3);
683         printf("write %d attempted to write to a writeable file\n",r);
684         
685         r= yaffs_lseek(f,0,SEEK_END);
686         printf("seek end %d\n",r);
687         memset(buffer,0,20);
688         r = yaffs_read(f,buffer,10);
689         printf("read %d \"%s\"\n",r,buffer);
690         r= yaffs_lseek(f,0,SEEK_SET);
691         printf("seek set %d\n",r);
692         memset(buffer,0,20);
693         r = yaffs_read(f,buffer,10);
694         printf("read %d \"%s\"\n",r,buffer);
695         memset(buffer,0,20);
696         r = yaffs_read(f,buffer,10);
697         printf("read %d \"%s\"\n",r,buffer);
698
699         // Check values reading at end.
700         // A read past end of file should return 0 for 0 bytes read.
701                 
702         r= yaffs_lseek(f,0,SEEK_END);
703         r = yaffs_read(f,buffer,10);
704         printf("read at end returned  %d\n",r); 
705         r= yaffs_lseek(f,500,SEEK_END);
706         r = yaffs_read(f,buffer,10);
707         printf("read past end returned  %d\n",r);       
708         
709         r = yaffs_close(f);
710         
711         printf("close %d\n",r);
712         
713         copy_in_a_file("/boot/yyfile","xxx");
714         
715         // Create a file with a long name
716         
717         copy_in_a_file("/boot/file with a long name","xxx");
718         
719         
720         printf("\nDirectory look-up of /boot\n");
721         dumpDir("/boot");
722
723         // Check stat
724         r = yaffs_stat("/boot/file with a long name",&ystat);
725         
726         // Check rename
727         
728         r = yaffs_rename("/boot/file with a long name","/boot/r1");
729         
730         printf("\nDirectory look-up of /boot\n");
731         dumpDir("/boot");
732         
733         // Check unlink
734         r = yaffs_unlink("/boot/r1");
735         
736         printf("\nDirectory look-up of /boot\n");
737         dumpDir("/boot");
738
739         // Check mkdir
740         
741         r = yaffs_mkdir("/boot/directory1",0);
742         
743         printf("\nDirectory look-up of /boot\n");
744         dumpDir("/boot");
745         printf("\nDirectory look-up of /boot/directory1\n");
746         dumpDir("/boot/directory1");
747
748         // add a file to the directory                  
749         copy_in_a_file("/boot/directory1/file with a long name","xxx");
750         
751         printf("\nDirectory look-up of /boot\n");
752         dumpDir("/boot");
753         printf("\nDirectory look-up of /boot/directory1\n");
754         dumpDir("/boot/directory1");
755         
756         //  Attempt to delete directory (should fail)
757         
758         r = yaffs_rmdir("/boot/directory1");
759         
760         printf("\nDirectory look-up of /boot\n");
761         dumpDir("/boot");
762         printf("\nDirectory look-up of /boot/directory1\n");
763         dumpDir("/boot/directory1");
764         
765         // Delete file first, then rmdir should work
766         r = yaffs_unlink("/boot/directory1/file with a long name");
767         r = yaffs_rmdir("/boot/directory1");
768         
769         
770         printf("\nDirectory look-up of /boot\n");
771         dumpDir("/boot");
772         printf("\nDirectory look-up of /boot/directory1\n");
773         dumpDir("/boot/directory1");
774
775 #if 0
776         fill_disk_and_delete("/boot",20,20);
777                         
778         printf("\nDirectory look-up of /boot\n");
779         dumpDir("/boot");
780 #endif
781
782         yaffs_symlink("yyfile","/boot/slink");
783         
784         yaffs_readlink("/boot/slink",str,100);
785         printf("symlink alias is %s\n",str);
786         
787         
788         
789         
790         printf("\nDirectory look-up of /boot\n");
791         dumpDir("/boot");
792         printf("\nDirectory look-up of /boot (using stat instead of lstat)\n");
793         dumpDirFollow("/boot");
794         printf("\nDirectory look-up of /boot/directory1\n");
795         dumpDir("/boot/directory1");
796
797         h = yaffs_open("/boot/slink",O_RDWR,0);
798         
799         printf("file length is %d\n",(int)yaffs_lseek(h,0,SEEK_END));
800         
801         yaffs_close(h);
802         
803         yaffs_unlink("/boot/slink");
804
805         
806         printf("\nDirectory look-up of /boot\n");
807         dumpDir("/boot");
808         
809         // Check chmod
810         
811         yaffs_stat("/boot/yyfile",&ystat);
812         temp_mode = ystat.st_mode;
813         
814         yaffs_chmod("/boot/yyfile",0x55555);
815         printf("\nDirectory look-up of /boot\n");
816         dumpDir("/boot");
817         
818         yaffs_chmod("/boot/yyfile",temp_mode);
819         printf("\nDirectory look-up of /boot\n");
820         dumpDir("/boot");
821         
822         // Permission checks...
823         PermissionsCheck("/boot/yyfile",0, O_WRONLY,0);
824         PermissionsCheck("/boot/yyfile",0, O_RDONLY,0);
825         PermissionsCheck("/boot/yyfile",0, O_RDWR,0);
826
827         PermissionsCheck("/boot/yyfile",S_IREAD, O_WRONLY,0);
828         PermissionsCheck("/boot/yyfile",S_IREAD, O_RDONLY,1);
829         PermissionsCheck("/boot/yyfile",S_IREAD, O_RDWR,0);
830
831         PermissionsCheck("/boot/yyfile",S_IWRITE, O_WRONLY,1);
832         PermissionsCheck("/boot/yyfile",S_IWRITE, O_RDONLY,0);
833         PermissionsCheck("/boot/yyfile",S_IWRITE, O_RDWR,0);
834         
835         PermissionsCheck("/boot/yyfile",S_IREAD | S_IWRITE, O_WRONLY,1);
836         PermissionsCheck("/boot/yyfile",S_IREAD | S_IWRITE, O_RDONLY,1);
837         PermissionsCheck("/boot/yyfile",S_IREAD | S_IWRITE, O_RDWR,1);
838
839         yaffs_chmod("/boot/yyfile",temp_mode);
840         
841         //create a zero-length file and unlink it (test for scan bug)
842         
843         h = yaffs_open("/boot/zlf",O_CREAT | O_TRUNC | O_RDWR,0);
844         yaffs_close(h);
845         
846         yaffs_unlink("/boot/zlf");
847         
848         
849         yaffs_DumpDevStruct("/boot");
850         
851         fill_disk_and_delete("/boot",20,20);
852         
853         yaffs_DumpDevStruct("/boot");
854         
855         fill_files("/boot",1,10000,0);
856         fill_files("/boot",1,10000,5000);
857         fill_files("/boot",2,10000,0);
858         fill_files("/boot",2,10000,5000);
859         
860         leave_unlinked_file("/data",20000,0);
861         leave_unlinked_file("/data",20000,5000);
862         leave_unlinked_file("/data",20000,5000);
863         leave_unlinked_file("/data",20000,5000);
864         leave_unlinked_file("/data",20000,5000);
865         leave_unlinked_file("/data",20000,5000);
866         
867         yaffs_DumpDevStruct("/boot");
868         yaffs_DumpDevStruct("/data");
869         
870                 
871                 
872         return 0;
873
874 }
875
876 int huge_directory_test_on_path(char *path)
877 {
878
879         yaffs_DIR *d;
880         yaffs_dirent *de;
881         struct yaffs_stat s;
882
883         int f;
884         int i;
885
886         int total = 0;
887         int lastTotal = 0;
888         
889         char str[100];
890
891         
892         yaffs_StartUp();
893         
894         yaffs_mount(path);
895         
896         // Create a large number of files
897         
898         for(i = 0; i < 2000; i++)
899         {
900           sprintf(str,"%s/%d",path,i);
901           
902            f = yaffs_open(str,O_CREAT,S_IREAD | S_IWRITE);
903            yaffs_close(f);
904         }
905         
906         
907         
908         d = yaffs_opendir(path);
909         i = 0;
910         if (d) {
911         while((de = yaffs_readdir(d)) != NULL) {
912         if (total >lastTotal+100*9*1024||(i & 1023)==0){
913         printf("files = %d, total = %d\n",i, total);
914         lastTotal = total;
915         }
916                 i++;
917                 sprintf(str,"%s/%s",path,de->d_name);
918                 yaffs_lstat(str,&s);
919                 switch(s.st_mode & S_IFMT){
920                 case S_IFREG:
921         //printf("data file");
922         total += s.st_size;
923         break;
924         }
925         }
926         
927         yaffs_closedir(d);
928         }
929         
930         return 0;
931 }
932
933 int yaffs_scan_test(const char *path)
934 {
935         return 0;
936 }
937
938
939 void rename_over_test(const char *mountpt)
940 {
941         int i;
942         char a[100];
943         char b[100];
944         char c[100];
945         
946         sprintf(a,"%s/a",mountpt);
947         sprintf(b,"%s/b",mountpt);
948         sprintf(c,"%s/c",mountpt);
949         
950         yaffs_StartUp();
951         
952         yaffs_mount(mountpt);
953         
954         printf("Existing files\n");
955         dumpDirFollow(mountpt);
956         
957         
958         
959         i = yaffs_open(c,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
960         printf("File c handle is %d\n",i);
961         yaffs_close(i);
962         i = yaffs_open(a,O_CREAT | O_TRUNC | O_RDWR,  S_IREAD | S_IWRITE); 
963         yaffs_close(i);
964         i = yaffs_open(b,O_CREAT | O_TRUNC | O_RDWR,  S_IREAD | S_IWRITE);
965         yaffs_close(i);
966         yaffs_rename(a,b); // rename over
967         yaffs_rename(b,a); // rename back again (not renaimng over)
968         yaffs_rename(a,b); // rename back again (not renaimng over)
969         
970         
971         yaffs_unmount(mountpt);
972         
973 }
974
975
976 int resize_stress_test(const char *path)
977 {
978    int a,b,i,j;
979    int x;
980    int r;
981    char aname[100];
982    char bname[100];
983    
984    char abuffer[1000];
985    char bbuffer[1000];
986    
987    yaffs_StartUp();
988    
989    yaffs_mount(path);
990    
991    sprintf(aname,"%s%s",path,"/a");
992    sprintf(bname,"%s%s",path,"/b");
993    
994    memset(abuffer,'a',1000);
995    memset(bbuffer,'b',1000);
996    
997    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
998    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
999    
1000    printf(" %s %d %s %d\n",aname,a,bname,b);
1001   
1002    x = 0;
1003    
1004    for(j = 0; j < 100; j++)
1005    {
1006                 yaffs_lseek(a,0,SEEK_END);
1007
1008                 
1009                 for(i = 0; i <20000; i++)
1010                 {
1011                    //r =        yaffs_lseek(b,i,SEEK_SET);
1012                         //r = yaffs_write(b,bbuffer,1000);
1013                         
1014                         if(x & 0x16)
1015                         {
1016                                 // shrink
1017                                 int syz = yaffs_lseek(a,0,SEEK_END);
1018                                 
1019                                 syz -= 500;
1020                                 if(syz < 0) syz = 0;
1021                                 yaffs_ftruncate(a,syz);
1022                                 
1023                         }
1024                         else
1025                         {
1026                                 //expand
1027                                 r = yaffs_lseek(a,i * 500,SEEK_SET);
1028                                 r = yaffs_write(a,abuffer,1000);
1029                         }
1030                         x++;
1031                         
1032                 }
1033    }
1034    
1035    return 0;
1036    
1037 }
1038
1039 int root_perm_remount(const char *path)
1040 {
1041    struct yaffs_stat s;
1042    
1043    yaffs_StartUp();
1044    
1045    yaffs_mount(path);
1046    
1047    yaffs_stat(path,&s);
1048    printf("root perms after mount %x\n",s.st_mode);
1049    
1050    yaffs_chmod(path, 0777);
1051
1052    yaffs_stat(path,&s);
1053    printf("root perms after setting to 0777 is  %x\n",s.st_mode);
1054    
1055    yaffs_unmount(path);
1056       
1057    return 0;
1058    
1059 }
1060
1061
1062 int resize_stress_test_no_grow_complex(const char *path,int iters)
1063 {
1064    int a,b,i,j;
1065    int x;
1066    int r;
1067    char aname[100];
1068    char bname[100];
1069    
1070    char abuffer[1000];
1071    char bbuffer[1000];
1072
1073    
1074    yaffs_StartUp();
1075    
1076    yaffs_mount(path);
1077    
1078    sprintf(aname,"%s%s",path,"/a");
1079    sprintf(bname,"%s%s",path,"/b");
1080    
1081    memset(abuffer,'a',1000);
1082    memset(bbuffer,'b',1000);
1083    
1084    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1085    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1086    
1087    printf(" %s %d %s %d\n",aname,a,bname,b);
1088   
1089    x = 0;
1090    
1091    for(j = 0; j < iters; j++)
1092    {
1093                 yaffs_lseek(a,0,SEEK_END);
1094
1095                 
1096                 for(i = 0; i <20000; i++)
1097                 {
1098                    //r =        yaffs_lseek(b,i,SEEK_SET);
1099                         //r = yaffs_write(b,bbuffer,1000);
1100                         
1101                         if(!(x%20))
1102                         {
1103                                 // shrink
1104                                 int syz = yaffs_lseek(a,0,SEEK_END);
1105                                 
1106                                 while(syz > 4000)
1107                                 {
1108                                 
1109                                         syz -= 2050;
1110                                         if(syz < 0) syz = 0;
1111                                         yaffs_ftruncate(a,syz);
1112                                         syz = yaffs_lseek(a,0,SEEK_END);
1113                                         printf("shrink to %d\n",syz);
1114                                 }
1115                                 
1116                                 
1117                         }
1118                         else
1119                         {
1120                                 //expand
1121                                 r = yaffs_lseek(a,500,SEEK_END);
1122                                 r = yaffs_write(a,abuffer,1000);
1123                         }
1124                         x++;
1125                         
1126                                         
1127                 }
1128                 
1129                 printf("file size is %lld\n",(long long)yaffs_lseek(a,0,SEEK_END));
1130
1131    }
1132    
1133    return 0;
1134    
1135 }
1136
1137 int resize_stress_test_no_grow(const char *path,int iters)
1138 {
1139    int a,b,i,j;
1140    int x;
1141    int r;
1142    char aname[100];
1143    char bname[100];
1144    
1145    char abuffer[1000];
1146    char bbuffer[1000];
1147    
1148    yaffs_StartUp();
1149    
1150    yaffs_mount(path);
1151    
1152    sprintf(aname,"%s%s",path,"/a");
1153    sprintf(bname,"%s%s",path,"/b");
1154    
1155    memset(abuffer,'a',1000);
1156    memset(bbuffer,'b',1000);
1157    
1158    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1159    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1160    
1161    printf(" %s %d %s %d\n",aname,a,bname,b);
1162   
1163    x = 0;
1164    
1165    for(j = 0; j < iters; j++)
1166    {
1167                 yaffs_lseek(a,0,SEEK_END);
1168
1169                 
1170                 for(i = 0; i <20000; i++)
1171                 {
1172                    //r =        yaffs_lseek(b,i,SEEK_SET);
1173                         //r = yaffs_write(b,bbuffer,1000);
1174                         
1175                         if(!(x%20))
1176                         {
1177                                 // shrink
1178                                 int syz = yaffs_lseek(a,0,SEEK_END);
1179                                 
1180                                 while(syz > 4000)
1181                                 {
1182                                 
1183                                         syz -= 2050;
1184                                         if(syz < 0) syz = 0;
1185                                         yaffs_ftruncate(a,syz);
1186                                         syz = yaffs_lseek(a,0,SEEK_END);
1187                                         printf("shrink to %d\n",syz);
1188                                 }
1189                                 
1190                                 
1191                         }
1192                         else
1193                         {
1194                                 //expand
1195                                 r = yaffs_lseek(a,-500,SEEK_END);
1196                                 r = yaffs_write(a,abuffer,1000);
1197                         }
1198                         x++;
1199                         
1200                                         
1201                 }
1202                 printf("file size is %lld\n",(long long)yaffs_lseek(a,0,SEEK_END));
1203
1204    }
1205    
1206    return 0;
1207    
1208 }
1209
1210 int directory_rename_test(void)
1211 {
1212         int r;
1213         yaffs_StartUp();
1214         
1215         yaffs_mount("/ram");
1216         yaffs_mkdir("/ram/a",0);
1217         yaffs_mkdir("/ram/a/b",0);
1218         yaffs_mkdir("/ram/c",0);
1219         
1220         printf("\nDirectory look-up of /ram\n");
1221         dumpDir("/ram");
1222         dumpDir("/ram/a");
1223         dumpDir("/ram/a/b");
1224
1225         printf("Do rename (should fail)\n");
1226                 
1227         r = yaffs_rename("/ram/a","/ram/a/b/d");
1228         printf("\nDirectory look-up of /ram\n");
1229         dumpDir("/ram");
1230         dumpDir("/ram/a");
1231         dumpDir("/ram/a/b");
1232
1233         printf("Do rename (should not fail)\n");
1234                 
1235         r = yaffs_rename("/ram/c","/ram/a/b/d");
1236         printf("\nDirectory look-up of /ram\n");
1237         dumpDir("/ram");
1238         dumpDir("/ram/a");
1239         dumpDir("/ram/a/b");
1240         
1241         
1242         return 1;
1243         
1244 }
1245
1246 int cache_read_test(void)
1247 {
1248         int a,b,c;
1249         int i;
1250         int sizeOfFiles = 500000;
1251         char buffer[100];
1252         
1253         yaffs_StartUp();
1254         
1255         yaffs_mount("/boot");
1256         
1257         make_a_file("/boot/a",'a',sizeOfFiles);
1258         make_a_file("/boot/b",'b',sizeOfFiles);
1259
1260         a = yaffs_open("/boot/a",O_RDONLY,0);
1261         b = yaffs_open("/boot/b",O_RDONLY,0);
1262         c = yaffs_open("/boot/c", O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
1263
1264         do{
1265                 i = sizeOfFiles;
1266                 if (i > 100) i = 100;
1267                 sizeOfFiles  -= i;
1268                 yaffs_read(a,buffer,i);
1269                 yaffs_read(b,buffer,i);
1270                 yaffs_write(c,buffer,i);
1271         } while(sizeOfFiles > 0);
1272         
1273         
1274         
1275         return 1;
1276         
1277 }
1278
1279 int cache_bypass_bug_test(void)
1280 {
1281         // This test reporoduces a bug whereby YAFFS caching *was* buypassed
1282         // resulting in erroneous reads after writes.
1283         // This bug has been fixed.
1284         
1285         int a;
1286         char buffer1[1000];
1287         char buffer2[1000];
1288         
1289         memset(buffer1,0,sizeof(buffer1));
1290         memset(buffer2,0,sizeof(buffer2));
1291                 
1292         yaffs_StartUp();
1293         
1294         yaffs_mount("/boot");
1295         
1296         // Create a file of 2000 bytes.
1297         make_a_file("/boot/a",'X',2000);
1298
1299         a = yaffs_open("/boot/a",O_RDWR, S_IREAD | S_IWRITE);
1300         
1301         // Write a short sequence to the file.
1302         // This will go into the cache.
1303         yaffs_lseek(a,0,SEEK_SET);
1304         yaffs_write(a,"abcdefghijklmnopqrstuvwxyz",20); 
1305
1306         // Read a short sequence from the file.
1307         // This will come from the cache.
1308         yaffs_lseek(a,0,SEEK_SET);
1309         yaffs_read(a,buffer1,30); 
1310
1311         // Read a page size sequence from the file.
1312         yaffs_lseek(a,0,SEEK_SET);
1313         yaffs_read(a,buffer2,512); 
1314         
1315         printf("buffer 1 %s\n",buffer1);
1316         printf("buffer 2 %s\n",buffer2);
1317         
1318         if(strncmp(buffer1,buffer2,20))
1319         {
1320                 printf("Cache bypass bug detected!!!!!\n");
1321         }
1322         
1323         
1324         return 1;
1325 }
1326
1327
1328 int free_space_check(void)
1329 {
1330         int f;
1331         
1332                 yaffs_StartUp();
1333                 yaffs_mount("/boot");
1334             fill_disk("/boot/",2);
1335             f = yaffs_freespace("/boot");
1336             
1337             printf("%d free when disk full\n",f);           
1338             return 1;
1339 }
1340
1341 int truncate_test(void)
1342 {
1343         int a;
1344         int r;
1345         int i;
1346         int l;
1347
1348         char y[10];
1349
1350         yaffs_StartUp();
1351         yaffs_mount("/boot");
1352
1353         yaffs_unlink("/boot/trunctest");
1354         
1355         a = yaffs_open("/boot/trunctest", O_CREAT | O_TRUNC | O_RDWR,  S_IREAD | S_IWRITE);
1356         
1357         yaffs_write(a,"abcdefghijklmnopqrstuvwzyz",26);
1358         
1359         yaffs_ftruncate(a,3);
1360         l= yaffs_lseek(a,0,SEEK_END);
1361         
1362         printf("truncated length is %d\n",l);
1363
1364         yaffs_lseek(a,5,SEEK_SET);
1365         yaffs_write(a,"1",1);
1366
1367         yaffs_lseek(a,0,SEEK_SET);
1368         
1369         r = yaffs_read(a,y,10);
1370
1371         printf("read %d bytes:",r);
1372
1373         for(i = 0; i < r; i++) printf("[%02X]",y[i]);
1374
1375         printf("\n");
1376
1377         return 0;
1378
1379 }
1380
1381
1382
1383
1384
1385 void fill_disk_test(const char *mountpt)
1386 {
1387         int i;
1388         yaffs_StartUp();
1389         
1390         for(i = 0; i < 5; i++)
1391         {
1392                 yaffs_mount(mountpt);
1393                 fill_disk_and_delete(mountpt,100,i+1);
1394                 yaffs_unmount(mountpt);
1395         }
1396         
1397 }
1398
1399
1400 void fill_files_test(const char *mountpt)
1401 {
1402         int i;
1403         yaffs_StartUp();
1404         
1405         for(i = 0; i < 5; i++)
1406         {
1407                 yaffs_mount(mountpt);
1408                 fill_files(mountpt,2,3,100);
1409                 yaffs_unmount(mountpt);
1410         }
1411         
1412 }
1413
1414 void fill_empty_files_test(const char *mountpt)
1415 {
1416         int i;
1417         yaffs_StartUp();
1418         char name[100];
1419         int result = 0;
1420         
1421         int d,f;
1422
1423         for(i = 0; i < 5; i++)
1424         {
1425                 yaffs_mount(mountpt);
1426                 for(d = 0; result >= 0 && d < 1000; d++){
1427                         sprintf(name,"%s/%d",mountpt,d);
1428                         result= yaffs_mkdir(name,0);
1429                         printf("creating directory %s result %d\n",name,result);
1430                         
1431                         for(f = 0; result >= 0 && f < 100; f++){
1432                                 sprintf(name,"%s/%d/%d",mountpt,d,f);
1433                                 result= yaffs_open(name,O_CREAT, 0);
1434                                 yaffs_close(result);
1435                                 printf("creating file %s result %d\n",name,result);
1436                         }
1437                 }
1438                 yaffs_unmount(mountpt);
1439         }
1440         
1441 }
1442
1443 void long_name_test(const char *mountpt)
1444 {
1445         int i;
1446         yaffs_StartUp();
1447         char fullName[1000];
1448         char name[300];
1449         int result = 0;
1450         
1451         int d,f;
1452         
1453         // Make a 256 byte name
1454         memset(name,0,sizeof(name));
1455         for(i = 0; i < 256; i++)
1456                 name[i] = '0' + i % 10;
1457                 
1458         sprintf(fullName,"%s/%s",mountpt,name);
1459
1460         for(i = 0; i < 1; i++)
1461         {
1462                 yaffs_mount(mountpt);
1463                 
1464                 printf("Files at start\n");
1465                 dumpDir(mountpt);
1466                 
1467                 printf("Creating file %s\n",fullName);
1468                 
1469                 f = yaffs_open(fullName,O_CREAT | O_RDWR,0);
1470                 yaffs_close(f);
1471                 
1472                 printf("Result %d\n",f);
1473                         
1474                 printf("Files\n");
1475                 dumpDir(mountpt);
1476                 
1477                 printf("Deleting %s\n",fullName);
1478                 result = yaffs_unlink(fullName);
1479                 printf("Result %d\n",result);
1480                 
1481                 printf("Files\n");
1482                 
1483                 dumpDir(mountpt);
1484                 
1485                 yaffs_unmount(mountpt);
1486         }
1487         
1488 }
1489
1490
1491
1492 void lookup_test(const char *mountpt)
1493 {
1494         int i;
1495         int h;
1496         char a[100];
1497         
1498
1499         yaffs_DIR *d;
1500         yaffs_dirent *de;
1501
1502         yaffs_StartUp();
1503         
1504         yaffs_mount(mountpt);
1505                                 
1506         d = yaffs_opendir(mountpt);
1507         
1508         if(!d)
1509         {
1510                 printf("opendir failed\n");
1511         }
1512         else
1513         {
1514                 
1515                 for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1516                 {
1517                         printf("unlinking %s\n",de->d_name);
1518                         yaffs_unlink(de->d_name);
1519                 }
1520                 
1521                 printf("%d files deleted\n",i);
1522         }
1523         
1524         
1525         for(i = 0; i < 2000; i++){
1526         sprintf(a,"%s/%d",mountpt,i);
1527                 h =  yaffs_open(a,O_CREAT | O_TRUNC | O_RDWR, 0);
1528                 yaffs_close(h);
1529         }
1530
1531         yaffs_rewinddir(d);
1532         for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1533         {
1534                 printf("%d  %s\n",i,de->d_name);
1535         }       
1536         
1537         printf("%d files listed\n\n\n",i);
1538         
1539         yaffs_rewinddir(d);
1540         yaffs_readdir(d);
1541         yaffs_readdir(d);
1542         yaffs_readdir(d);
1543         
1544         for(i = 0; i < 2000; i++){
1545                 sprintf(a,"%s/%d",mountpt,i);
1546                 yaffs_unlink(a);
1547         }
1548         
1549                 
1550         yaffs_unmount(mountpt);
1551         
1552 }
1553
1554 void link_test(const char *mountpt)
1555 {
1556         int i;
1557         int h;
1558         char a[100];
1559         char b[100];
1560         char c[100];
1561
1562         sprintf(a,"%s/aaa",mountpt);
1563         sprintf(b,"%s/bbb",mountpt);
1564         sprintf(c,"%s/ccc",mountpt);
1565         
1566         yaffs_StartUp();
1567         
1568         yaffs_mount(mountpt);
1569         
1570         
1571         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1572         for(i = 0; i < 100; i++)
1573                 yaffs_write(h,a,100);
1574         
1575         yaffs_close(h);
1576         
1577         yaffs_unlink(b);
1578         yaffs_unlink(c);
1579         yaffs_link(a,b);
1580         yaffs_link(a,c);
1581         yaffs_unlink(b);
1582         yaffs_unlink(c);
1583         yaffs_unlink(a);
1584         
1585         
1586         yaffs_unmount(mountpt);
1587         yaffs_mount(mountpt);
1588         
1589         printf("link test done\n");     
1590         
1591 }
1592
1593 void freespace_test(const char *mountpt)
1594 {
1595         int i;
1596         int h;
1597         char a[100];
1598         
1599         int  f0;
1600         int f1;
1601         int f2;
1602         int f3;
1603         sprintf(a,"%s/aaa",mountpt);
1604         
1605         yaffs_StartUp();
1606         
1607         yaffs_mount(mountpt);
1608         
1609         f0 = yaffs_freespace(mountpt);
1610         
1611         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1612         
1613         for(i = 0; i < 100; i++)
1614                 yaffs_write(h,a,100);
1615         
1616         yaffs_close(h);
1617         
1618         f1 = yaffs_freespace(mountpt);
1619         
1620         yaffs_unlink(a);
1621         
1622         f2 = yaffs_freespace(mountpt);
1623         
1624                 
1625         yaffs_unmount(mountpt);
1626         yaffs_mount(mountpt);
1627         
1628         f3 = yaffs_freespace(mountpt);
1629         
1630         printf("%d\n%d\n%d\n%d\n",f0, f1,f2,f3);
1631         
1632         
1633 }
1634
1635 void simple_rw_test(const char *mountpt)
1636 {
1637         int i;
1638         int h;
1639         char a[100];
1640         
1641         int x;
1642         int result;
1643
1644         sprintf(a,"%s/aaa",mountpt);
1645         
1646         yaffs_StartUp();
1647         
1648         yaffs_mount(mountpt);
1649         
1650         yaffs_unlink(a);
1651         
1652         h = yaffs_open(a,O_CREAT| O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1653         
1654         for(i = 100000;i < 200000; i++){
1655                 result = yaffs_write(h,&i,sizeof(i));
1656                 
1657                 if(result != 4)
1658                 {
1659                         printf("write error\n");
1660                         exit(1);
1661                 }
1662         }
1663         
1664         //yaffs_close(h);
1665         
1666         // h = yaffs_open(a,O_RDWR, S_IREAD | S_IWRITE);
1667         
1668         
1669         yaffs_lseek(h,0,SEEK_SET);
1670         
1671         for(i = 100000; i < 200000; i++){
1672                 result = yaffs_read(h,&x,sizeof(x));
1673                 
1674                 if(result != 4 || x != i){
1675                         printf("read error %d %x %x\n",i,result,x);
1676                 }
1677         }
1678         
1679         printf("Simple rw test passed\n");
1680         
1681         
1682         
1683 }
1684
1685
1686 void scan_deleted_files_test(const char *mountpt)
1687 {
1688         char fn[100];
1689         char sub[100];
1690         
1691         const char *p;
1692         
1693         int i;
1694         int j;
1695         int k;
1696         int h;
1697         
1698         sprintf(sub,"%s/sdir",mountpt);
1699         yaffs_StartUp();
1700         
1701         for(j = 0; j < 10; j++)
1702         {
1703                 printf("\n\n>>>>>>> Run %d <<<<<<<<<<<<<\n\n",j);
1704                 yaffs_mount(mountpt);
1705                 yaffs_mkdir(sub,0);
1706                 
1707                 
1708                 p = (j & 0) ? mountpt: sub;
1709         
1710                 for(i = 0; i < 100; i++)
1711                 {
1712                   sprintf(fn,"%s/%d",p,i);  
1713                   
1714                   if(i & 1)
1715                   {
1716                           h = yaffs_open(fn,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1717                           for(k = 0; k < 1000; k++)
1718                                   yaffs_write(h,fn,100);
1719                           yaffs_close(h);
1720                   }
1721                   else
1722                         yaffs_mkdir(fn,0);
1723                 }
1724                 
1725                 for(i = 0; i < 10; i++)
1726                 {
1727                   sprintf(fn,"%s/%d",p,i);  
1728                   if(i & 1) 
1729                         yaffs_unlink(fn);
1730                   else
1731                         yaffs_rmdir(fn);
1732                   
1733                 }
1734                                 
1735                 yaffs_unmount(mountpt);
1736         }
1737         
1738         
1739         
1740
1741 }
1742
1743
1744 void write_10k(int h)
1745 {
1746    int i;
1747    const char *s="0123456789";
1748    for(i = 0; i < 1000; i++)
1749      yaffs_write(h,s,10);
1750
1751 }
1752 void write_200k_file(const char *fn, const char *fdel, const char *fdel1)
1753 {
1754    int h1;
1755    int i;
1756    int offs;
1757    
1758    h1 = yaffs_open(fn, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1759    
1760    for(i = 0; i < 100000; i+= 10000)
1761    {
1762         write_10k(h1);
1763    }
1764    
1765    offs = yaffs_lseek(h1,0,SEEK_CUR);
1766    if( offs != 100000)
1767    {
1768         printf("Could not write file\n");
1769    }
1770    
1771    yaffs_unlink(fdel);
1772    for(i = 0; i < 100000; i+= 10000)
1773    {
1774         write_10k(h1);
1775    }
1776    
1777    offs = yaffs_lseek(h1,0,SEEK_CUR);
1778    if( offs != 200000)
1779    {
1780         printf("Could not write file\n");
1781    }
1782    
1783    yaffs_close(h1);
1784    yaffs_unlink(fdel1);
1785    
1786 }
1787
1788
1789 void verify_200k_file(const char *fn)
1790 {
1791    int h1;
1792    int i;
1793    char x[11];
1794    const char *s="0123456789";
1795    int errCount = 0;
1796    
1797    h1 = yaffs_open(fn, O_RDONLY, 0);
1798    
1799    for(i = 0; i < 200000 && errCount < 10; i+= 10)
1800    {
1801         yaffs_read(h1,x,10);
1802         if(strncmp(x,s,10) != 0)
1803         {
1804                 printf("File %s verification failed at %d\n",fn,i);
1805                 errCount++;
1806         }
1807    }
1808    if(errCount >= 10)
1809         printf("Too many errors... aborted\n");
1810       
1811    yaffs_close(h1);        
1812         
1813 }
1814
1815
1816 void check_resize_gc_bug(const char *mountpt)
1817 {
1818
1819         char a[30];
1820         char b[30];
1821         char c[30];
1822         
1823         int i;
1824         
1825         sprintf(a,"%s/a",mountpt);
1826         sprintf(b,"%s/b",mountpt);
1827         sprintf(c,"%s/c",mountpt);
1828         
1829
1830         
1831         
1832         yaffs_StartUp();
1833         yaffs_mount(mountpt);
1834         yaffs_unlink(a);
1835         yaffs_unlink(b);
1836         
1837         for(i = 0; i < 50; i++)
1838         {  
1839            printf("A\n");write_200k_file(a,"",c);
1840            printf("B\n");verify_200k_file(a);
1841            printf("C\n");write_200k_file(b,a,c);
1842            printf("D\n");verify_200k_file(b);
1843            yaffs_unmount(mountpt);
1844            yaffs_mount(mountpt);
1845            printf("E\n");verify_200k_file(a);
1846            printf("F\n");verify_200k_file(b);
1847         }
1848                 
1849 }
1850
1851
1852 void multi_mount_test(const char *mountpt,int nmounts)
1853 {
1854
1855         char a[30];
1856         
1857         int i;
1858         int j;
1859         
1860         sprintf(a,"%s/a",mountpt);
1861
1862         yaffs_StartUp();
1863         
1864         for(i = 0; i < nmounts; i++){
1865                 int h0;
1866                 int h1;
1867                 int len0;
1868                 int len1;
1869                 
1870                 static char xx[1000];
1871                 
1872                 printf("############### Iteration %d   Start\n",i);
1873                 if(1 || i == 0 || i == 5) 
1874                         yaffs_mount(mountpt);
1875
1876                 dump_directory_tree(mountpt);
1877                 
1878                 
1879                 yaffs_mkdir(a,0);
1880                 
1881                 sprintf(xx,"%s/0",a);
1882                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1883                 
1884                 sprintf(xx,"%s/1",a);
1885                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1886
1887 #if 0           
1888                 for(j = 0; j < 200; j++){
1889                    yaffs_write(h0,xx,1000);
1890                    yaffs_write(h1,xx,1000);
1891                 }
1892 #else
1893                 while(yaffs_write(h0,xx,1000) > 0){
1894                    
1895                    yaffs_write(h1,xx,1000);
1896                 }
1897 #endif
1898                 len0 = yaffs_lseek(h0,0,SEEK_END);
1899                 len1 = yaffs_lseek(h1,0,SEEK_END);
1900                 
1901                 yaffs_lseek(h0,0,SEEK_SET);
1902                 yaffs_lseek(h1,0,SEEK_SET);
1903
1904                 for(j = 0; j < 200; j++){
1905                    yaffs_read(h0,xx,1000);
1906                    yaffs_read(h1,xx,1000);
1907                 }
1908                 
1909                 
1910         //      yaffs_truncate(h0,0);
1911                 yaffs_close(h0);
1912                 yaffs_close(h1);
1913                 
1914                 printf("########### %d\n",i);
1915                 dump_directory_tree(mountpt);
1916
1917                 if(1 || i == 4 || i == nmounts -1)
1918                         yaffs_unmount(mountpt);
1919         }
1920 }
1921
1922
1923 void small_mount_test(const char *mountpt,int nmounts)
1924 {
1925
1926         char a[30];
1927         
1928         int i;
1929         int j;
1930
1931         int h0;
1932         int h1;
1933         int len0;
1934         int len1;
1935         int nread;
1936         
1937         sprintf(a,"%s/a",mountpt);
1938
1939         yaffs_StartUp();
1940         
1941         
1942         
1943         for(i = 0; i < nmounts; i++){
1944                 
1945                 static char xx[1000];
1946                 
1947                 printf("############### Iteration %d   Start\n",i);
1948                 if(1 || i == 0 || i == 5) 
1949                         yaffs_mount(mountpt);
1950
1951                 dump_directory_tree(mountpt);
1952                 
1953                 yaffs_mkdir(a,0);
1954                 
1955                 sprintf(xx,"%s/0",a);
1956                 if(i ==0){
1957                 
1958                         h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1959                         for(j = 0; j < 130; j++)
1960                                 yaffs_write(h0,xx,1000);
1961                         yaffs_close(h0);
1962                 }
1963                 
1964                 h0 = yaffs_open(xx,O_RDONLY,0);
1965                 
1966                 sprintf(xx,"%s/1",a);
1967                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1968                 
1969                 while((nread = yaffs_read(h0,xx,1000)) > 0)
1970                         yaffs_write(h1,xx,nread);
1971                 
1972                 
1973                 len0 = yaffs_lseek(h0,0,SEEK_END);
1974                 len1 = yaffs_lseek(h1,0,SEEK_END);
1975                 
1976                 yaffs_lseek(h0,0,SEEK_SET);
1977                 yaffs_lseek(h1,0,SEEK_SET);
1978
1979                 for(j = 0; j < 200; j++){
1980                    yaffs_read(h0,xx,1000);
1981                    yaffs_read(h1,xx,1000);
1982                 }
1983                 
1984                 yaffs_close(h0);
1985                 yaffs_close(h1);
1986                 
1987                 printf("########### %d\n",i);
1988                 dump_directory_tree(mountpt);
1989
1990                 if(1 || i == 4 || i == nmounts -1)
1991                         yaffs_unmount(mountpt);
1992         }
1993 }
1994
1995
1996 int early_exit;
1997
1998 void small_overwrite_test(const char *mountpt,int nmounts)
1999 {
2000
2001         char a[30];
2002         int i;
2003         int j;
2004
2005         int h0;
2006         int h1;
2007
2008         
2009         sprintf(a,"%s/a",mountpt);
2010
2011         yaffs_StartUp();
2012         
2013         
2014         
2015         for(i = 0; i < nmounts; i++){
2016                 
2017                 static char xx[8000];
2018                 
2019                 printf("############### Iteration %d   Start\n",i);
2020                 if(1)
2021                         yaffs_mount(mountpt);
2022
2023                 dump_directory_tree(mountpt);
2024                 
2025                 yaffs_mkdir(a,0);
2026                 
2027                 sprintf(xx,"%s/0",a);
2028                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2029                 sprintf(xx,"%s/1",a);
2030                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2031                 
2032                 for(j = 0; j < 1000000; j+=1000){
2033                         yaffs_ftruncate(h0,j);
2034                         yaffs_lseek(h0,j,SEEK_SET);
2035                         yaffs_write(h0,xx,7000);
2036                         yaffs_write(h1,xx,7000);
2037                         
2038                         if(early_exit)
2039                                 exit(0);
2040                 }
2041                 
2042                 yaffs_close(h0);
2043                 
2044                 printf("########### %d\n",i);
2045                 dump_directory_tree(mountpt);
2046
2047                 if(1)
2048                         yaffs_unmount(mountpt);
2049         }
2050 }
2051
2052
2053 void seek_overwrite_test(const char *mountpt,int nmounts)
2054 {
2055
2056         char a[30];
2057         
2058         int i;
2059         int j;
2060
2061         int h0;
2062
2063         
2064         sprintf(a,"%s/f",mountpt);
2065
2066         yaffs_StartUp();
2067         
2068         yaffs_mount(mountpt);
2069         
2070         
2071         for(i = 0; i < nmounts; i++){
2072                 
2073                 h0 = yaffs_open(a, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2074                         
2075                 for(j = 0; j < 100000; j++){
2076                         yaffs_lseek(h0,0,SEEK_SET);
2077                         yaffs_write(h0,xx,5000);
2078                         yaffs_lseek(h0,0x100000,SEEK_SET);
2079                         yaffs_write(h0,xx,5000);
2080                         
2081                         if(early_exit)
2082                                 exit(0);
2083                 }
2084                 
2085                 yaffs_close(h0);
2086                 
2087         }
2088 }
2089
2090
2091 void yaffs_touch(const char *fn)
2092 {
2093         yaffs_chmod(fn, S_IREAD | S_IWRITE);
2094 }
2095
2096 void checkpoint_fill_test(const char *mountpt,int nmounts)
2097 {
2098
2099         char a[50];
2100         char b[50];
2101         char c[50];
2102         
2103         int i;
2104         int j;
2105         int h;
2106         
2107         sprintf(a,"%s/a",mountpt);
2108         
2109
2110         
2111         
2112         yaffs_StartUp();
2113         
2114         for(i = 0; i < nmounts; i++){
2115                 printf("############### Iteration %d   Start\n",i);
2116                 yaffs_mount(mountpt);
2117                 dump_directory_tree(mountpt);
2118                 yaffs_mkdir(a,0);
2119                 
2120                 sprintf(b,"%s/zz",a);
2121                 
2122                 h = yaffs_open(b,O_CREAT | O_RDWR,S_IREAD |S_IWRITE);
2123                 
2124                 
2125                 while(yaffs_write(h,c,50) == 50){}
2126                 
2127                 yaffs_close(h);
2128                 
2129                 for(j = 0; j < 2; j++){
2130                         printf("touch %d\n",j);
2131                         yaffs_touch(b);
2132                         yaffs_unmount(mountpt);
2133                         yaffs_mount(mountpt);
2134                 }
2135
2136                 dump_directory_tree(mountpt);           
2137                 yaffs_unmount(mountpt);
2138         }
2139 }
2140
2141
2142 int make_file2(const char *name1, const char *name2,int syz)
2143 {
2144
2145         char xx[2500];
2146         int i;
2147         int h1=-1,h2=-1;
2148         int n = 1;
2149
2150
2151         if(name1)
2152                 h1 = yaffs_open(name1,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2153         if(name2)
2154                 h2 = yaffs_open(name2,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2155         
2156         while(syz > 0 && n > 0){
2157                 i = (syz > 2500) ? 2500 : syz;
2158                 n = yaffs_write(h1,xx,i);
2159                 n = yaffs_write(h2,xx,i);
2160                 syz -= 500;
2161         }
2162         yaffs_close(h1);
2163         yaffs_close(h2);
2164         return 0;
2165 }
2166
2167
2168 extern void SetCheckpointReservedBlocks(int n);
2169
2170 void checkpoint_upgrade_test(const char *mountpt,int nmounts)
2171 {
2172
2173         char a[50];
2174         char b[50];
2175         char c[50];
2176         char d[50];
2177
2178         int j;
2179         
2180         sprintf(a,"%s/a",mountpt);
2181         
2182
2183         
2184         
2185         printf("Create start condition\n");
2186         yaffs_StartUp();
2187         SetCheckpointReservedBlocks(0);
2188         yaffs_mount(mountpt);
2189         yaffs_mkdir(a,0);
2190         sprintf(b,"%s/zz",a);
2191         sprintf(c,"%s/xx",a);
2192         make_file2(b,c,2000000);
2193         sprintf(d,"%s/aa",a);
2194         make_file2(d,NULL,500000000);
2195         dump_directory_tree(mountpt);
2196         
2197         printf("Umount/mount attempt full\n");
2198         yaffs_unmount(mountpt);
2199         
2200         SetCheckpointReservedBlocks(10);
2201         yaffs_mount(mountpt);
2202         
2203         printf("unlink small file\n");
2204         yaffs_unlink(c);
2205         dump_directory_tree(mountpt);
2206                 
2207         printf("Umount/mount attempt\n");
2208         yaffs_unmount(mountpt);
2209         yaffs_mount(mountpt);
2210         
2211         for(j = 0; j < 500; j++){
2212                 printf("***** touch %d\n",j);
2213                 dump_directory_tree(mountpt);
2214                 yaffs_touch(b);
2215                 yaffs_unmount(mountpt);
2216                 yaffs_mount(mountpt);
2217         }
2218
2219         for(j = 0; j < 500; j++){
2220                 printf("***** touch %d\n",j);
2221                 dump_directory_tree(mountpt);
2222                 yaffs_touch(b);
2223                 yaffs_unmount(mountpt);
2224                 yaffs_mount(mountpt);
2225         }
2226 }
2227         
2228 void huge_array_test(const char *mountpt,int n)
2229 {
2230
2231         char a[50];
2232
2233         
2234         int i;
2235         int space;
2236         
2237         int fnum;
2238         
2239         sprintf(a,"mount point %s",mountpt);
2240         
2241
2242         
2243         yaffs_StartUp();
2244
2245         yaffs_mount(mountpt);
2246         
2247         while(n>0){
2248                 n--;
2249                 fnum = 0;
2250                 printf("\n\n START run\n\n");
2251                 while((space = yaffs_freespace(mountpt)) > 25000000){
2252                         sprintf(a,"%s/file%d",mountpt,fnum);
2253                         fnum++;
2254                         printf("create file %s, free space %d\n",a,space);
2255                         create_file_of_size(a,10000000);
2256                         printf("verifying file %s\n",a);
2257                         verify_file_of_size(a,10000000);
2258                 }
2259                 
2260                 printf("\n\n verification/deletion\n\n");
2261                 
2262                 for(i = 0; i < fnum; i++){
2263                         sprintf(a,"%s/file%d",mountpt,i);
2264                         printf("verifying file %s\n",a);
2265                         verify_file_of_size(a,10000000);
2266                         printf("deleting file %s\n",a);
2267                         yaffs_unlink(a);
2268                 }
2269                 printf("\n\n done \n\n");
2270                         
2271                    
2272         }
2273 }
2274
2275
2276 void random_write(int h)
2277 {
2278         static char buffer[12000];
2279         int n;
2280         
2281         n = random() & 0x1FFF;
2282         yaffs_write(h,buffer,n);
2283 }
2284
2285 void random_seek(int h)
2286 {
2287         int n;
2288         n = random() & 0xFFFFF;
2289         yaffs_lseek(h,n,SEEK_SET);
2290 }
2291
2292 void random_truncate(int h, char * name)
2293 {
2294         int n;
2295         int flen;
2296         n = random() & 0xFFFFF;
2297         flen = yaffs_lseek(h,0,SEEK_END);
2298         if(n > flen)
2299                 n = flen / 2;
2300         yaffs_ftruncate(h,n);
2301         yaffs_lseek(h,n,SEEK_SET);
2302 }
2303
2304
2305 #define NSMALLFILES 10  
2306 void random_small_file_test(const char *mountpt,int iterations)
2307 {
2308
2309         char a[NSMALLFILES][50];
2310
2311         
2312         int i;
2313         int n;
2314         int h[NSMALLFILES];
2315         int r;
2316         
2317         
2318         yaffs_StartUp();
2319
2320         yaffs_mount(mountpt);
2321         
2322         for(i = 0; i < NSMALLFILES; i++){
2323                 h[i]=-1;
2324                 strcpy(a[i],"");
2325         }
2326         
2327         for(n = 0; n < iterations; n++){
2328                                 
2329                 for(i = 0; i < NSMALLFILES; i++) {
2330                         r = random();
2331                         
2332                         if(strlen(a[i]) == 0){
2333                                 sprintf(a[i],"%s/%dx%d",mountpt,n,i);
2334                                 h[i] = yaffs_open(a[i],O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2335                         }
2336                         
2337                         if(h[i] < -1)
2338                                 printf("Could not open yaffs file %d %d error %d\n",n,i,h[i]);
2339                         else {
2340                                 r = r & 7;
2341                                 switch(r){
2342                                         case 0:
2343                                         case 1:
2344                                         case 2:
2345                                                 random_write(h[i]);
2346                                                 break;
2347                                         case 3:
2348                                                 random_truncate(h[i],a[i]);
2349                                                 break;
2350                                         case 4:
2351                                         case 5: random_seek(h[i]);
2352                                                 break;
2353                                         case 6:
2354                                                 yaffs_close(h[i]);
2355                                                 h[i] = -1;
2356                                                 break;
2357                                         case 7:
2358                                                 yaffs_close(h[i]);
2359                                                 yaffs_unlink(a[i]);
2360                                                 strcpy(a[i],"");
2361                                                 h[i] = -1;
2362                                 }
2363                         }
2364                 }
2365                    
2366         }
2367         
2368         for(i = 0; i < NSMALLFILES; i++)
2369                 yaffs_close(h[i]);
2370                 
2371         yaffs_unmount(mountpt);
2372 }
2373
2374 void rmdir_test(const char *mountpt)
2375 {
2376         char name[100];
2377         yaffs_StartUp();
2378         
2379         yaffs_mount(mountpt);
2380         
2381         strcpy(name,mountpt);
2382         strcat(name,"/");
2383         strcat(name,"hello");
2384         yaffs_mkdir(name,0666);
2385         yaffs_rmdir(name);
2386         yaffs_unmount(mountpt);
2387 }
2388         
2389
2390 int random_seed;
2391 int simulate_power_failure;
2392
2393 int main(int argc, char *argv[])
2394 {
2395         random_seed = time(NULL);
2396         //return long_test(argc,argv);
2397         
2398         //return cache_read_test();
2399         
2400         // resize_stress_test_no_grow("/flash/flash",20);
2401         //root_perm_remount("/flash/flash");
2402         
2403         //huge_directory_test_on_path("/ram2k");
2404         
2405          //yaffs_backward_scan_test("/flash/flash");
2406         // yaffs_device_flush_test("/flash/flash");
2407
2408         //rename_over_test("//////////////////flash///////////////////yaffs1///////////");
2409         
2410         //fill_empty_files_test("/yaffs2/");
2411         long_name_test("/yaffs2");
2412         
2413          //scan_pattern_test("/flash",10000,10);
2414         //short_scan_test("/flash/flash",40000,200);
2415           //small_mount_test("/flash/flash",1000);
2416           //small_overwrite_test("/flash/flash",1000);
2417           //seek_overwrite_test("/flash/flash",1000);
2418          //checkpoint_fill_test("/flash/flash",20);
2419          //checkpoint_upgrade_test("/flash/flash",20);
2420           //small_overwrite_test("/flash/flash",1000);
2421           //checkpoint_fill_test("/flash/flash",20);
2422         // random_small_file_test("/flash/flash",10000);
2423          // huge_array_test("/flash/flash",10);
2424
2425
2426
2427         
2428         //long_test_on_path("/ram2k");
2429         // long_test_on_path("/flash");
2430         //simple_rw_test("/flash/flash");
2431         //fill_disk_test("/flash/flash");
2432         // rename_over_test("/flash");
2433         //lookup_test("/flash");
2434         //freespace_test("/flash/flash");
2435         
2436         //link_test("/flash/flash");
2437         
2438         
2439         
2440         
2441         // cache_bypass_bug_test();
2442         
2443          //free_space_check();
2444          
2445          //check_resize_gc_bug("/flash");
2446          
2447          return 0;
2448         
2449 }