638cf4a515d580f069a8c4608ed87b81c846e0de
[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(const 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 void lookup_test(const char *mountpt)
1492 {
1493         int i;
1494         int h;
1495         char a[100];
1496         
1497
1498         yaffs_DIR *d;
1499         yaffs_dirent *de;
1500
1501         yaffs_StartUp();
1502         
1503         yaffs_mount(mountpt);
1504                                 
1505         d = yaffs_opendir(mountpt);
1506         
1507         if(!d)
1508         {
1509                 printf("opendir failed\n");
1510         }
1511         else
1512         {
1513                 
1514                 for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1515                 {
1516                         printf("unlinking %s\n",de->d_name);
1517                         yaffs_unlink(de->d_name);
1518                 }
1519                 
1520                 printf("%d files deleted\n",i);
1521         }
1522         
1523         
1524         for(i = 0; i < 2000; i++){
1525         sprintf(a,"%s/%d",mountpt,i);
1526                 h =  yaffs_open(a,O_CREAT | O_TRUNC | O_RDWR, 0);
1527                 yaffs_close(h);
1528         }
1529
1530         yaffs_rewinddir(d);
1531         for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1532         {
1533                 printf("%d  %s\n",i,de->d_name);
1534         }       
1535         
1536         printf("%d files listed\n\n\n",i);
1537         
1538         yaffs_rewinddir(d);
1539         yaffs_readdir(d);
1540         yaffs_readdir(d);
1541         yaffs_readdir(d);
1542         
1543         for(i = 0; i < 2000; i++){
1544                 sprintf(a,"%s/%d",mountpt,i);
1545                 yaffs_unlink(a);
1546         }
1547         
1548                 
1549         yaffs_unmount(mountpt);
1550         
1551 }
1552
1553 void link_test0(const char *mountpt)
1554 {
1555         int i;
1556         char namea[300];
1557         char nameb[300];
1558         int result = 0;
1559         
1560
1561         yaffs_StartUp();
1562         yaffs_mount(mountpt);
1563         
1564                 
1565         sprintf(namea,"%s/a",mountpt);
1566         sprintf(nameb,"%s/b",mountpt);
1567
1568         printf("mounted\n");
1569         dumpDir(mountpt);
1570
1571         yaffs_unlink(namea);
1572         printf("a unlinked\n");
1573         dumpDir(mountpt);
1574
1575         yaffs_unlink(nameb);
1576         printf("b unlinked\n");
1577         dumpDir(mountpt);
1578         
1579         result = yaffs_open(namea,O_CREAT| O_RDWR,0666);
1580         yaffs_close(result);
1581         printf("a created\n");
1582         dumpDir(mountpt);
1583
1584         yaffs_link(namea,nameb);
1585         printf("linked\n");
1586         dumpDir(mountpt);
1587         yaffs_unlink(namea);
1588         printf("a ulinked\n");
1589         dumpDir(mountpt);
1590         yaffs_unlink(nameb);
1591         printf("b unlinked\n");
1592         dumpDir(mountpt);
1593
1594         yaffs_unmount(mountpt);
1595 }
1596
1597
1598 void link_test1(const char *mountpt)
1599 {
1600         int i;
1601         int h;
1602         char a[100];
1603         char b[100];
1604         char c[100];
1605
1606         sprintf(a,"%s/aaa",mountpt);
1607         sprintf(b,"%s/bbb",mountpt);
1608         sprintf(c,"%s/ccc",mountpt);
1609         
1610         yaffs_StartUp();
1611         
1612         yaffs_mount(mountpt);
1613         
1614         
1615         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1616         for(i = 0; i < 100; i++)
1617                 yaffs_write(h,a,100);
1618         
1619         yaffs_close(h);
1620         
1621         yaffs_unlink(b);
1622         yaffs_unlink(c);
1623         yaffs_link(a,b);
1624         yaffs_link(a,c);
1625         yaffs_unlink(b);
1626         yaffs_unlink(c);
1627         yaffs_unlink(a);
1628         
1629         
1630         yaffs_unmount(mountpt);
1631         yaffs_mount(mountpt);
1632         
1633         printf("link test done\n");     
1634         
1635 }
1636
1637 void freespace_test(const char *mountpt)
1638 {
1639         int i;
1640         int h;
1641         char a[100];
1642         
1643         int  f0;
1644         int f1;
1645         int f2;
1646         int f3;
1647         sprintf(a,"%s/aaa",mountpt);
1648         
1649         yaffs_StartUp();
1650         
1651         yaffs_mount(mountpt);
1652         
1653         f0 = yaffs_freespace(mountpt);
1654         
1655         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1656         
1657         for(i = 0; i < 100; i++)
1658                 yaffs_write(h,a,100);
1659         
1660         yaffs_close(h);
1661         
1662         f1 = yaffs_freespace(mountpt);
1663         
1664         yaffs_unlink(a);
1665         
1666         f2 = yaffs_freespace(mountpt);
1667         
1668                 
1669         yaffs_unmount(mountpt);
1670         yaffs_mount(mountpt);
1671         
1672         f3 = yaffs_freespace(mountpt);
1673         
1674         printf("%d\n%d\n%d\n%d\n",f0, f1,f2,f3);
1675         
1676         
1677 }
1678
1679 void simple_rw_test(const char *mountpt)
1680 {
1681         int i;
1682         int h;
1683         char a[100];
1684         
1685         int x;
1686         int result;
1687
1688         sprintf(a,"%s/aaa",mountpt);
1689         
1690         yaffs_StartUp();
1691         
1692         yaffs_mount(mountpt);
1693         
1694         yaffs_unlink(a);
1695         
1696         h = yaffs_open(a,O_CREAT| O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1697         
1698         for(i = 100000;i < 200000; i++){
1699                 result = yaffs_write(h,&i,sizeof(i));
1700                 
1701                 if(result != 4)
1702                 {
1703                         printf("write error\n");
1704                         exit(1);
1705                 }
1706         }
1707         
1708         //yaffs_close(h);
1709         
1710         // h = yaffs_open(a,O_RDWR, S_IREAD | S_IWRITE);
1711         
1712         
1713         yaffs_lseek(h,0,SEEK_SET);
1714         
1715         for(i = 100000; i < 200000; i++){
1716                 result = yaffs_read(h,&x,sizeof(x));
1717                 
1718                 if(result != 4 || x != i){
1719                         printf("read error %d %x %x\n",i,result,x);
1720                 }
1721         }
1722         
1723         printf("Simple rw test passed\n");
1724         
1725         
1726         
1727 }
1728
1729
1730 void scan_deleted_files_test(const char *mountpt)
1731 {
1732         char fn[100];
1733         char sub[100];
1734         
1735         const char *p;
1736         
1737         int i;
1738         int j;
1739         int k;
1740         int h;
1741         
1742         sprintf(sub,"%s/sdir",mountpt);
1743         yaffs_StartUp();
1744         
1745         for(j = 0; j < 10; j++)
1746         {
1747                 printf("\n\n>>>>>>> Run %d <<<<<<<<<<<<<\n\n",j);
1748                 yaffs_mount(mountpt);
1749                 yaffs_mkdir(sub,0);
1750                 
1751                 
1752                 p = (j & 0) ? mountpt: sub;
1753         
1754                 for(i = 0; i < 100; i++)
1755                 {
1756                   sprintf(fn,"%s/%d",p,i);  
1757                   
1758                   if(i & 1)
1759                   {
1760                           h = yaffs_open(fn,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1761                           for(k = 0; k < 1000; k++)
1762                                   yaffs_write(h,fn,100);
1763                           yaffs_close(h);
1764                   }
1765                   else
1766                         yaffs_mkdir(fn,0);
1767                 }
1768                 
1769                 for(i = 0; i < 10; i++)
1770                 {
1771                   sprintf(fn,"%s/%d",p,i);  
1772                   if(i & 1) 
1773                         yaffs_unlink(fn);
1774                   else
1775                         yaffs_rmdir(fn);
1776                   
1777                 }
1778                                 
1779                 yaffs_unmount(mountpt);
1780         }
1781         
1782         
1783         
1784
1785 }
1786
1787
1788 void write_10k(int h)
1789 {
1790    int i;
1791    const char *s="0123456789";
1792    for(i = 0; i < 1000; i++)
1793      yaffs_write(h,s,10);
1794
1795 }
1796 void write_200k_file(const char *fn, const char *fdel, const char *fdel1)
1797 {
1798    int h1;
1799    int i;
1800    int offs;
1801    
1802    h1 = yaffs_open(fn, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1803    
1804    for(i = 0; i < 100000; i+= 10000)
1805    {
1806         write_10k(h1);
1807    }
1808    
1809    offs = yaffs_lseek(h1,0,SEEK_CUR);
1810    if( offs != 100000)
1811    {
1812         printf("Could not write file\n");
1813    }
1814    
1815    yaffs_unlink(fdel);
1816    for(i = 0; i < 100000; i+= 10000)
1817    {
1818         write_10k(h1);
1819    }
1820    
1821    offs = yaffs_lseek(h1,0,SEEK_CUR);
1822    if( offs != 200000)
1823    {
1824         printf("Could not write file\n");
1825    }
1826    
1827    yaffs_close(h1);
1828    yaffs_unlink(fdel1);
1829    
1830 }
1831
1832
1833 void verify_200k_file(const char *fn)
1834 {
1835    int h1;
1836    int i;
1837    char x[11];
1838    const char *s="0123456789";
1839    int errCount = 0;
1840    
1841    h1 = yaffs_open(fn, O_RDONLY, 0);
1842    
1843    for(i = 0; i < 200000 && errCount < 10; i+= 10)
1844    {
1845         yaffs_read(h1,x,10);
1846         if(strncmp(x,s,10) != 0)
1847         {
1848                 printf("File %s verification failed at %d\n",fn,i);
1849                 errCount++;
1850         }
1851    }
1852    if(errCount >= 10)
1853         printf("Too many errors... aborted\n");
1854       
1855    yaffs_close(h1);        
1856         
1857 }
1858
1859
1860 void check_resize_gc_bug(const char *mountpt)
1861 {
1862
1863         char a[30];
1864         char b[30];
1865         char c[30];
1866         
1867         int i;
1868         
1869         sprintf(a,"%s/a",mountpt);
1870         sprintf(b,"%s/b",mountpt);
1871         sprintf(c,"%s/c",mountpt);
1872         
1873
1874         
1875         
1876         yaffs_StartUp();
1877         yaffs_mount(mountpt);
1878         yaffs_unlink(a);
1879         yaffs_unlink(b);
1880         
1881         for(i = 0; i < 50; i++)
1882         {  
1883            printf("A\n");write_200k_file(a,"",c);
1884            printf("B\n");verify_200k_file(a);
1885            printf("C\n");write_200k_file(b,a,c);
1886            printf("D\n");verify_200k_file(b);
1887            yaffs_unmount(mountpt);
1888            yaffs_mount(mountpt);
1889            printf("E\n");verify_200k_file(a);
1890            printf("F\n");verify_200k_file(b);
1891         }
1892                 
1893 }
1894
1895
1896 void multi_mount_test(const char *mountpt,int nmounts)
1897 {
1898
1899         char a[30];
1900         
1901         int i;
1902         int j;
1903         
1904         sprintf(a,"%s/a",mountpt);
1905
1906         yaffs_StartUp();
1907         
1908         for(i = 0; i < nmounts; i++){
1909                 int h0;
1910                 int h1;
1911                 int len0;
1912                 int len1;
1913                 
1914                 static char xx[1000];
1915                 
1916                 printf("############### Iteration %d   Start\n",i);
1917                 if(1 || i == 0 || i == 5) 
1918                         yaffs_mount(mountpt);
1919
1920                 dump_directory_tree(mountpt);
1921                 
1922                 
1923                 yaffs_mkdir(a,0);
1924                 
1925                 sprintf(xx,"%s/0",a);
1926                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1927                 
1928                 sprintf(xx,"%s/1",a);
1929                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1930
1931 #if 0           
1932                 for(j = 0; j < 200; j++){
1933                    yaffs_write(h0,xx,1000);
1934                    yaffs_write(h1,xx,1000);
1935                 }
1936 #else
1937                 while(yaffs_write(h0,xx,1000) > 0){
1938                    
1939                    yaffs_write(h1,xx,1000);
1940                 }
1941 #endif
1942                 len0 = yaffs_lseek(h0,0,SEEK_END);
1943                 len1 = yaffs_lseek(h1,0,SEEK_END);
1944                 
1945                 yaffs_lseek(h0,0,SEEK_SET);
1946                 yaffs_lseek(h1,0,SEEK_SET);
1947
1948                 for(j = 0; j < 200; j++){
1949                    yaffs_read(h0,xx,1000);
1950                    yaffs_read(h1,xx,1000);
1951                 }
1952                 
1953                 
1954         //      yaffs_truncate(h0,0);
1955                 yaffs_close(h0);
1956                 yaffs_close(h1);
1957                 
1958                 printf("########### %d\n",i);
1959                 dump_directory_tree(mountpt);
1960
1961                 if(1 || i == 4 || i == nmounts -1)
1962                         yaffs_unmount(mountpt);
1963         }
1964 }
1965
1966
1967 void small_mount_test(const char *mountpt,int nmounts)
1968 {
1969
1970         char a[30];
1971         
1972         int i;
1973         int j;
1974
1975         int h0;
1976         int h1;
1977         int len0;
1978         int len1;
1979         int nread;
1980         
1981         sprintf(a,"%s/a",mountpt);
1982
1983         yaffs_StartUp();
1984         
1985         
1986         
1987         for(i = 0; i < nmounts; i++){
1988                 
1989                 static char xx[1000];
1990                 
1991                 printf("############### Iteration %d   Start\n",i);
1992                 if(1 || i == 0 || i == 5) 
1993                         yaffs_mount(mountpt);
1994
1995                 dump_directory_tree(mountpt);
1996                 
1997                 yaffs_mkdir(a,0);
1998                 
1999                 sprintf(xx,"%s/0",a);
2000                 if(i ==0){
2001                 
2002                         h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2003                         for(j = 0; j < 130; j++)
2004                                 yaffs_write(h0,xx,1000);
2005                         yaffs_close(h0);
2006                 }
2007                 
2008                 h0 = yaffs_open(xx,O_RDONLY,0);
2009                 
2010                 sprintf(xx,"%s/1",a);
2011                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2012                 
2013                 while((nread = yaffs_read(h0,xx,1000)) > 0)
2014                         yaffs_write(h1,xx,nread);
2015                 
2016                 
2017                 len0 = yaffs_lseek(h0,0,SEEK_END);
2018                 len1 = yaffs_lseek(h1,0,SEEK_END);
2019                 
2020                 yaffs_lseek(h0,0,SEEK_SET);
2021                 yaffs_lseek(h1,0,SEEK_SET);
2022
2023                 for(j = 0; j < 200; j++){
2024                    yaffs_read(h0,xx,1000);
2025                    yaffs_read(h1,xx,1000);
2026                 }
2027                 
2028                 yaffs_close(h0);
2029                 yaffs_close(h1);
2030                 
2031                 printf("########### %d\n",i);
2032                 dump_directory_tree(mountpt);
2033
2034                 if(1 || i == 4 || i == nmounts -1)
2035                         yaffs_unmount(mountpt);
2036         }
2037 }
2038
2039
2040 int early_exit;
2041
2042 void small_overwrite_test(const char *mountpt,int nmounts)
2043 {
2044
2045         char a[30];
2046         int i;
2047         int j;
2048
2049         int h0;
2050         int h1;
2051
2052         
2053         sprintf(a,"%s/a",mountpt);
2054
2055         yaffs_StartUp();
2056         
2057         
2058         
2059         for(i = 0; i < nmounts; i++){
2060                 
2061                 static char xx[8000];
2062                 
2063                 printf("############### Iteration %d   Start\n",i);
2064                 if(1)
2065                         yaffs_mount(mountpt);
2066
2067                 dump_directory_tree(mountpt);
2068                 
2069                 yaffs_mkdir(a,0);
2070                 
2071                 sprintf(xx,"%s/0",a);
2072                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2073                 sprintf(xx,"%s/1",a);
2074                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2075                 
2076                 for(j = 0; j < 1000000; j+=1000){
2077                         yaffs_ftruncate(h0,j);
2078                         yaffs_lseek(h0,j,SEEK_SET);
2079                         yaffs_write(h0,xx,7000);
2080                         yaffs_write(h1,xx,7000);
2081                         
2082                         if(early_exit)
2083                                 exit(0);
2084                 }
2085                 
2086                 yaffs_close(h0);
2087                 
2088                 printf("########### %d\n",i);
2089                 dump_directory_tree(mountpt);
2090
2091                 if(1)
2092                         yaffs_unmount(mountpt);
2093         }
2094 }
2095
2096
2097 void seek_overwrite_test(const char *mountpt,int nmounts)
2098 {
2099
2100         char a[30];
2101         
2102         int i;
2103         int j;
2104
2105         int h0;
2106
2107         
2108         sprintf(a,"%s/f",mountpt);
2109
2110         yaffs_StartUp();
2111         
2112         yaffs_mount(mountpt);
2113         
2114         
2115         for(i = 0; i < nmounts; i++){
2116                 
2117                 h0 = yaffs_open(a, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2118                         
2119                 for(j = 0; j < 100000; j++){
2120                         yaffs_lseek(h0,0,SEEK_SET);
2121                         yaffs_write(h0,xx,5000);
2122                         yaffs_lseek(h0,0x100000,SEEK_SET);
2123                         yaffs_write(h0,xx,5000);
2124                         
2125                         if(early_exit)
2126                                 exit(0);
2127                 }
2128                 
2129                 yaffs_close(h0);
2130                 
2131         }
2132 }
2133
2134
2135 void yaffs_touch(const char *fn)
2136 {
2137         yaffs_chmod(fn, S_IREAD | S_IWRITE);
2138 }
2139
2140 void checkpoint_fill_test(const char *mountpt,int nmounts)
2141 {
2142
2143         char a[50];
2144         char b[50];
2145         char c[50];
2146         
2147         int i;
2148         int j;
2149         int h;
2150         
2151         sprintf(a,"%s/a",mountpt);
2152         
2153
2154         
2155         
2156         yaffs_StartUp();
2157         
2158         for(i = 0; i < nmounts; i++){
2159                 printf("############### Iteration %d   Start\n",i);
2160                 yaffs_mount(mountpt);
2161                 dump_directory_tree(mountpt);
2162                 yaffs_mkdir(a,0);
2163                 
2164                 sprintf(b,"%s/zz",a);
2165                 
2166                 h = yaffs_open(b,O_CREAT | O_RDWR,S_IREAD |S_IWRITE);
2167                 
2168                 
2169                 while(yaffs_write(h,c,50) == 50){}
2170                 
2171                 yaffs_close(h);
2172                 
2173                 for(j = 0; j < 2; j++){
2174                         printf("touch %d\n",j);
2175                         yaffs_touch(b);
2176                         yaffs_unmount(mountpt);
2177                         yaffs_mount(mountpt);
2178                 }
2179
2180                 dump_directory_tree(mountpt);           
2181                 yaffs_unmount(mountpt);
2182         }
2183 }
2184
2185
2186 int make_file2(const char *name1, const char *name2,int syz)
2187 {
2188
2189         char xx[2500];
2190         int i;
2191         int h1=-1,h2=-1;
2192         int n = 1;
2193
2194
2195         if(name1)
2196                 h1 = yaffs_open(name1,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2197         if(name2)
2198                 h2 = yaffs_open(name2,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2199         
2200         while(syz > 0 && n > 0){
2201                 i = (syz > 2500) ? 2500 : syz;
2202                 n = yaffs_write(h1,xx,i);
2203                 n = yaffs_write(h2,xx,i);
2204                 syz -= 500;
2205         }
2206         yaffs_close(h1);
2207         yaffs_close(h2);
2208         return 0;
2209 }
2210
2211
2212 extern void SetCheckpointReservedBlocks(int n);
2213
2214 void checkpoint_upgrade_test(const char *mountpt,int nmounts)
2215 {
2216
2217         char a[50];
2218         char b[50];
2219         char c[50];
2220         char d[50];
2221
2222         int j;
2223         
2224         sprintf(a,"%s/a",mountpt);
2225         
2226
2227         
2228         
2229         printf("Create start condition\n");
2230         yaffs_StartUp();
2231         SetCheckpointReservedBlocks(0);
2232         yaffs_mount(mountpt);
2233         yaffs_mkdir(a,0);
2234         sprintf(b,"%s/zz",a);
2235         sprintf(c,"%s/xx",a);
2236         make_file2(b,c,2000000);
2237         sprintf(d,"%s/aa",a);
2238         make_file2(d,NULL,500000000);
2239         dump_directory_tree(mountpt);
2240         
2241         printf("Umount/mount attempt full\n");
2242         yaffs_unmount(mountpt);
2243         
2244         SetCheckpointReservedBlocks(10);
2245         yaffs_mount(mountpt);
2246         
2247         printf("unlink small file\n");
2248         yaffs_unlink(c);
2249         dump_directory_tree(mountpt);
2250                 
2251         printf("Umount/mount attempt\n");
2252         yaffs_unmount(mountpt);
2253         yaffs_mount(mountpt);
2254         
2255         for(j = 0; j < 500; j++){
2256                 printf("***** touch %d\n",j);
2257                 dump_directory_tree(mountpt);
2258                 yaffs_touch(b);
2259                 yaffs_unmount(mountpt);
2260                 yaffs_mount(mountpt);
2261         }
2262
2263         for(j = 0; j < 500; j++){
2264                 printf("***** touch %d\n",j);
2265                 dump_directory_tree(mountpt);
2266                 yaffs_touch(b);
2267                 yaffs_unmount(mountpt);
2268                 yaffs_mount(mountpt);
2269         }
2270 }
2271         
2272 void huge_array_test(const char *mountpt,int n)
2273 {
2274
2275         char a[50];
2276
2277         
2278         int i;
2279         int space;
2280         
2281         int fnum;
2282         
2283         sprintf(a,"mount point %s",mountpt);
2284         
2285
2286         
2287         yaffs_StartUp();
2288
2289         yaffs_mount(mountpt);
2290         
2291         while(n>0){
2292                 n--;
2293                 fnum = 0;
2294                 printf("\n\n START run\n\n");
2295                 while((space = yaffs_freespace(mountpt)) > 25000000){
2296                         sprintf(a,"%s/file%d",mountpt,fnum);
2297                         fnum++;
2298                         printf("create file %s, free space %d\n",a,space);
2299                         create_file_of_size(a,10000000);
2300                         printf("verifying file %s\n",a);
2301                         verify_file_of_size(a,10000000);
2302                 }
2303                 
2304                 printf("\n\n verification/deletion\n\n");
2305                 
2306                 for(i = 0; i < fnum; i++){
2307                         sprintf(a,"%s/file%d",mountpt,i);
2308                         printf("verifying file %s\n",a);
2309                         verify_file_of_size(a,10000000);
2310                         printf("deleting file %s\n",a);
2311                         yaffs_unlink(a);
2312                 }
2313                 printf("\n\n done \n\n");
2314                         
2315                    
2316         }
2317 }
2318
2319
2320 void random_write(int h)
2321 {
2322         static char buffer[12000];
2323         int n;
2324         
2325         n = random() & 0x1FFF;
2326         yaffs_write(h,buffer,n);
2327 }
2328
2329 void random_seek(int h)
2330 {
2331         int n;
2332         n = random() & 0xFFFFF;
2333         yaffs_lseek(h,n,SEEK_SET);
2334 }
2335
2336 void random_truncate(int h, char * name)
2337 {
2338         int n;
2339         int flen;
2340         n = random() & 0xFFFFF;
2341         flen = yaffs_lseek(h,0,SEEK_END);
2342         if(n > flen)
2343                 n = flen / 2;
2344         yaffs_ftruncate(h,n);
2345         yaffs_lseek(h,n,SEEK_SET);
2346 }
2347
2348
2349 #define NSMALLFILES 10  
2350 void random_small_file_test(const char *mountpt,int iterations)
2351 {
2352
2353         char a[NSMALLFILES][50];
2354
2355         
2356         int i;
2357         int n;
2358         int h[NSMALLFILES];
2359         int r;
2360         
2361         
2362         yaffs_StartUp();
2363
2364         yaffs_mount(mountpt);
2365         
2366         for(i = 0; i < NSMALLFILES; i++){
2367                 h[i]=-1;
2368                 strcpy(a[i],"");
2369         }
2370         
2371         for(n = 0; n < iterations; n++){
2372                                 
2373                 for(i = 0; i < NSMALLFILES; i++) {
2374                         r = random();
2375                         
2376                         if(strlen(a[i]) == 0){
2377                                 sprintf(a[i],"%s/%dx%d",mountpt,n,i);
2378                                 h[i] = yaffs_open(a[i],O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2379                         }
2380                         
2381                         if(h[i] < -1)
2382                                 printf("Could not open yaffs file %d %d error %d\n",n,i,h[i]);
2383                         else {
2384                                 r = r & 7;
2385                                 switch(r){
2386                                         case 0:
2387                                         case 1:
2388                                         case 2:
2389                                                 random_write(h[i]);
2390                                                 break;
2391                                         case 3:
2392                                                 random_truncate(h[i],a[i]);
2393                                                 break;
2394                                         case 4:
2395                                         case 5: random_seek(h[i]);
2396                                                 break;
2397                                         case 6:
2398                                                 yaffs_close(h[i]);
2399                                                 h[i] = -1;
2400                                                 break;
2401                                         case 7:
2402                                                 yaffs_close(h[i]);
2403                                                 yaffs_unlink(a[i]);
2404                                                 strcpy(a[i],"");
2405                                                 h[i] = -1;
2406                                 }
2407                         }
2408                 }
2409                    
2410         }
2411         
2412         for(i = 0; i < NSMALLFILES; i++)
2413                 yaffs_close(h[i]);
2414                 
2415         yaffs_unmount(mountpt);
2416 }
2417
2418 void rmdir_test(const char *mountpt)
2419 {
2420         char name[100];
2421         yaffs_StartUp();
2422         
2423         yaffs_mount(mountpt);
2424         
2425         strcpy(name,mountpt);
2426         strcat(name,"/");
2427         strcat(name,"hello");
2428         yaffs_mkdir(name,0666);
2429         yaffs_rmdir(name);
2430         yaffs_unmount(mountpt);
2431 }
2432         
2433
2434 int random_seed;
2435 int simulate_power_failure;
2436
2437 int main(int argc, char *argv[])
2438 {
2439         random_seed = time(NULL);
2440         //return long_test(argc,argv);
2441         
2442         //return cache_read_test();
2443         
2444         // resize_stress_test_no_grow("/flash/flash",20);
2445         //root_perm_remount("/flash/flash");
2446         
2447         //huge_directory_test_on_path("/ram2k");
2448         
2449          //yaffs_backward_scan_test("/flash/flash");
2450         // yaffs_device_flush_test("/flash/flash");
2451
2452         //rename_over_test("//////////////////flash///////////////////yaffs1///////////");
2453         
2454         //fill_empty_files_test("/yaffs2/");
2455         //long_name_test("/yaffs2");
2456         link_test0("/yaffs2");
2457         link_test1("yaffs2");
2458          //scan_pattern_test("/flash",10000,10);
2459         //short_scan_test("/flash/flash",40000,200);
2460           //small_mount_test("/flash/flash",1000);
2461           //small_overwrite_test("/flash/flash",1000);
2462           //seek_overwrite_test("/flash/flash",1000);
2463          //checkpoint_fill_test("/flash/flash",20);
2464          //checkpoint_upgrade_test("/flash/flash",20);
2465           //small_overwrite_test("/flash/flash",1000);
2466           //checkpoint_fill_test("/flash/flash",20);
2467         // random_small_file_test("/flash/flash",10000);
2468          // huge_array_test("/flash/flash",10);
2469
2470
2471
2472         
2473         //long_test_on_path("/ram2k");
2474         // long_test_on_path("/flash");
2475         //simple_rw_test("/flash/flash");
2476         //fill_disk_test("/flash/flash");
2477         // rename_over_test("/flash");
2478         //lookup_test("/flash");
2479         //freespace_test("/flash/flash");
2480         
2481         //link_test("/flash/flash");
2482         
2483         
2484         
2485         
2486         // cache_bypass_bug_test();
2487         
2488          //free_space_check();
2489          
2490          //check_resize_gc_bug("/flash");
2491          
2492          return 0;
2493         
2494 }