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 void dumpDir(const char *dname);
  26
  27 char xx[600];
  28
  29 void copy_in_a_file(char *yaffsName,char *inName)
  30 {
  31         int inh,outh;
  32         unsigned char buffer[100];
  33         int ni,no;
  34         inh = open(inName,O_RDONLY);
  35         outh = yaffs_open(yaffsName, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
  36
  37         while((ni = read(inh,buffer,100)) > 0)
  38         {
  39                 no = yaffs_write(outh,buffer,ni);
  40                 if(ni != no)
  41                 {
  42                         printf("problem writing yaffs file\n");
  43                 }
  44
  45         }
  46
  47         yaffs_close(outh);
  48         close(inh);
  49 }
  50
  51 void make_a_file(char *yaffsName,char bval,int sizeOfFile)
  52 {
  53         int outh;
  54         int i;
  55         unsigned char buffer[100];
  56
  57         outh = yaffs_open(yaffsName, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
  58
  59         memset(buffer,bval,100);
  60
  61         do{
  62                 i = sizeOfFile;
  63                 if(i > 100) i = 100;
  64                 sizeOfFile -= i;
  65
  66                 yaffs_write(outh,buffer,i);
  67
  68         } while (sizeOfFile > 0);
  69
  70
  71         yaffs_close(outh);
  72
  73 }
  74
  75 void make_pattern_file(char *fn,int size)
  76 {
  77         int outh;
  78         int marker;
  79         int i;
  80         outh = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
  81         yaffs_lseek(outh,size-1,SEEK_SET);
  82         yaffs_write(outh,"A",1);
  83
  84         for(i = 0; i < size; i+=256)
  85         {
  86                 marker = ~i;
  87                 yaffs_lseek(outh,i,SEEK_SET);
  88                 yaffs_write(outh,&marker,sizeof(marker));
  89         }
  90         yaffs_close(outh);
  91
  92 }
  93
  94 int check_pattern_file(char *fn)
  95 {
  96         int h;
  97         int marker;
  98         int i;
  99         int size;
 100         int ok = 1;
 101
 102         h = yaffs_open(fn, O_RDWR,0);
 103         size = yaffs_lseek(h,0,SEEK_END);
 104
 105         for(i = 0; i < size; i+=256)
 106         {
 107                 yaffs_lseek(h,i,SEEK_SET);
 108                 yaffs_read(h,&marker,sizeof(marker));
 109                 ok = (marker == ~i);
 110                 if(!ok)
 111                 {
 112                    printf("pattern check failed on file %s, size %d at position %d. Got %x instead of %x\n",
 113                                         fn,size,i,marker,~i);
 114                 }
 115         }
 116         yaffs_close(h);
 117         return ok;
 118 }
 119
 120
 121
 122
 123
 124 int dump_file_data(char *fn)
 125 {
 126         int h;
 127         int i = 0;
 128         int ok = 1;
 129         unsigned char b;
 130
 131         h = yaffs_open(fn, O_RDWR,0);
 132
 133
 134         printf("%s\n",fn);
 135         while(yaffs_read(h,&b,1)> 0)
 136         {
 137                 printf("%02x",b);
 138                 i++;
 139                 if(i > 32)
 140                 {
 141                    printf("\n");
 142                    i = 0;;
 143                  }
 144         }
 145         printf("\n");
 146         yaffs_close(h);
 147         return ok;
 148 }
 149
 150
 151
 152 void dump_file(const char *fn)
 153 {
 154         int i;
 155         int size;
 156         int h;
 157
 158         h = yaffs_open(fn,O_RDONLY,0);
 159         if(h < 0)
 160         {
 161                 printf("*****\nDump file %s does not exist\n",fn);
 162         }
 163         else
 164         {
 165                 size = yaffs_lseek(h,0,SEEK_SET);
 166                 printf("*****\nDump file %s size %d\n",fn,size);
 167                 for(i = 0; i < size; i++)
 168                 {
 169
 170                 }
 171         }
 172 }
 173
 174 void create_file_of_size(const char *fn,int syze)
 175 {
 176         int h;
 177         int n;
 178         int result;
 179
 180         char xx[200];
 181
 182         int iterations = (syze + strlen(fn) -1)/ strlen(fn);
 183
 184         h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
 185
 186         while (iterations > 0)
 187         {
 188                 sprintf(xx,"%s %8d",fn,iterations);
 189                 n = strlen(xx);
 190                 result = yaffs_write(h,xx,n);
 191                 if(result != n)
 192                         printf("Wrote %d, should have been %d\n",result,n);
 193                 iterations--;
 194         }
 195         yaffs_close (h);
 196 }
 197
 198 void verify_file_of_size(const char *fn,int syze)
 199 {
 200         int h;
 201         int result;
 202
 203         char xx[200];
 204         char yy[200];
 205         int l;
 206
 207         int iterations = (syze + strlen(fn) -1)/ strlen(fn);
 208
 209         h = yaffs_open(fn, O_RDONLY, S_IREAD | S_IWRITE);
 210
 211         while (iterations > 0)
 212         {
 213                 sprintf(xx,"%s %8d",fn,iterations);
 214                 l = strlen(xx);
 215
 216                 result = yaffs_read(h,yy,l);
 217                 yy[l] = 0;
 218
 219                 if(strcmp(xx,yy)){
 220                         printf("=====>>>>> verification of file %s failed near position %lld\n",fn,(long long)yaffs_lseek(h,0,SEEK_CUR));
 221                 }
 222                 iterations--;
 223         }
 224         yaffs_close (h);
 225 }
 226
 227 void create_resized_file_of_size(const char *fn,int syze1,int reSyze, int syze2)
 228 {
 229         int h;
 230
 231         int iterations;
 232
 233         h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
 234
 235         iterations = (syze1 + strlen(fn) -1)/ strlen(fn);
 236         while (iterations > 0)
 237         {
 238                 yaffs_write(h,fn,strlen(fn));
 239                 iterations--;
 240         }
 241
 242         yaffs_ftruncate(h,reSyze);
 243
 244         yaffs_lseek(h,0,SEEK_SET);
 245         iterations = (syze2 + strlen(fn) -1)/ strlen(fn);
 246         while (iterations > 0)
 247         {
 248                 yaffs_write(h,fn,strlen(fn));
 249                 iterations--;
 250         }
 251
 252         yaffs_close (h);
 253 }
 254
 255
 256 void do_some_file_stuff(const char *path)
 257 {
 258
 259         char fn[100];
 260
 261         sprintf(fn,"%s/%s",path,"f1");
 262         create_file_of_size(fn,10000);
 263
 264         sprintf(fn,"%s/%s",path,"fdel");
 265         create_file_of_size(fn,10000);
 266         yaffs_unlink(fn);
 267
 268         sprintf(fn,"%s/%s",path,"f2");
 269
 270         create_resized_file_of_size(fn,10000,3000,4000);
 271 }
 272
 273 void yaffs_backward_scan_test(const char *path)
 274 {
 275         char fn[100];
 276
 277         yaffs_StartUp();
 278
 279         yaffs_mount(path);
 280
 281         do_some_file_stuff(path);
 282
 283         sprintf(fn,"%s/ddd",path);
 284
 285         yaffs_mkdir(fn,0);
 286
 287         do_some_file_stuff(fn);
 288
 289         yaffs_unmount(path);
 290
 291         yaffs_mount(path);
 292 }
 293
 294 char xxzz[2000];
 295
 296
 297 void yaffs_device_flush_test(const char *path)
 298 {
 299         char fn[100];
 300         int h;
 301         int i;
 302
 303         yaffs_StartUp();
 304
 305         yaffs_mount(path);
 306
 307         do_some_file_stuff(path);
 308
 309         // Open and add some data to a few files
 310         for(i = 0; i < 10; i++) {
 311
 312                 sprintf(fn,"%s/ff%d",path,i);
 313
 314                 h = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IWRITE | S_IREAD);
 315                 yaffs_write(h,xxzz,2000);
 316                 yaffs_write(h,xxzz,2000);
 317         }
 318         yaffs_unmount(path);
 319
 320         yaffs_mount(path);
 321 }
 322
 323
 324
 325 void short_scan_test(const char *path, int fsize, int niterations)
 326 {
 327         int i;
 328         char fn[100];
 329
 330         sprintf(fn,"%s/%s",path,"f1");
 331
 332         yaffs_StartUp();
 333         for(i = 0; i < niterations; i++)
 334         {
 335                 printf("\n*****************\nIteration %d\n",i);
 336                 yaffs_mount(path);
 337                 printf("\nmount: Directory look-up of %s\n",path);
 338                 dumpDir(path);
 339                 make_a_file(fn,1,fsize);
 340                 yaffs_unmount(path);
 341         }
 342 }
 343
 344
 345
 346 void scan_pattern_test(const char *path, int fsize, int niterations)
 347 {
 348         int i;
 349         int j;
 350         char fn[3][100];
 351         int result;
 352
 353         sprintf(fn[0],"%s/%s",path,"f0");
 354         sprintf(fn[1],"%s/%s",path,"f1");
 355         sprintf(fn[2],"%s/%s",path,"f2");
 356
 357         yaffs_StartUp();
 358
 359         for(i = 0; i < niterations; i++)
 360         {
 361                 printf("\n*****************\nIteration %d\n",i);
 362                 yaffs_mount(path);
 363                 printf("\nmount: Directory look-up of %s\n",path);
 364                 dumpDir(path);
 365                 for(j = 0; j < 3; j++)
 366                 {
 367                         result = dump_file_data(fn[j]);
 368                         result = check_pattern_file(fn[j]);
 369                         make_pattern_file(fn[j],fsize);
 370                         result = dump_file_data(fn[j]);
 371                         result = check_pattern_file(fn[j]);
 372                 }
 373                 yaffs_unmount(path);
 374         }
 375 }
 376
 377 void fill_disk(const char *path,int nfiles)
 378 {
 379         int h;
 380         int n;
 381         int result;
 382         int f;
 383
 384         char str[50];
 385
 386         for(n = 0; n < nfiles; n++)
 387         {
 388                 sprintf(str,"%s/%d",path,n);
 389
 390                 h = yaffs_open(str, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
 391
 392                 printf("writing file %s handle %d ",str, h);
 393
 394                 while ((result = yaffs_write(h,xx,600)) == 600)
 395                 {
 396                         f = yaffs_freespace(path);
 397                 }
 398                 result = yaffs_close(h);
 399                 printf(" close %d\n",result);
 400         }
 401 }
 402
 403 void fill_disk_and_delete(const char *path, int nfiles, int ncycles)
 404 {
 405         int i,j;
 406         char str[50];
 407         int result;
 408
 409         for(i = 0; i < ncycles; i++)
 410         {
 411                 printf("@@@@@@@@@@@@@@ cycle %d\n",i);
 412                 fill_disk(path,nfiles);
 413
 414                 for(j = 0; j < nfiles; j++)
 415                 {
 416                         sprintf(str,"%s/%d",path,j);
 417                         result = yaffs_unlink(str);
 418                         printf("unlinking file %s, result %d\n",str,result);
 419                 }
 420         }
 421 }
 422
 423
 424 void fill_files(char *path,int flags, int maxIterations,int siz)
 425 {
 426         int i;
 427         int j;
 428         char str[50];
 429         int h;
 430
 431         i = 0;
 432
 433         do{
 434                 sprintf(str,"%s/%d",path,i);
 435                 h = yaffs_open(str, O_CREAT | O_TRUNC | O_RDWR,S_IREAD | S_IWRITE);
 436                 yaffs_close(h);
 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
 945         sprintf(a,"%s/a",mountpt);
 946         sprintf(b,"%s/b",mountpt);
 947
 948         yaffs_StartUp();
 949
 950         yaffs_mount(mountpt);
 951
 952         printf("Existing files\n");
 953         dumpDirFollow(mountpt);
 954
 955
 956         i = yaffs_open(a,O_CREAT | O_TRUNC | O_RDWR, 0);
 957         yaffs_close(i);
 958         i = yaffs_open(b,O_CREAT | O_TRUNC | O_RDWR, 0);
 959         yaffs_close(i);
 960         yaffs_rename(a,b); // rename over
 961         yaffs_rename(b,a); // rename back again (not renaimng over)
 962         yaffs_rename(a,b); // rename back again (not renaimng over)
 963
 964
 965         yaffs_unmount(mountpt);
 966
 967 }
 968
 969 int resize_stress_test(const char *path)
 970 {
 971    int a,b,i,j;
 972    int x;
 973    int r;
 974    char aname[100];
 975    char bname[100];
 976
 977    char abuffer[1000];
 978    char bbuffer[1000];
 979
 980    yaffs_StartUp();
 981
 982    yaffs_mount(path);
 983
 984    sprintf(aname,"%s%s",path,"/a");
 985    sprintf(bname,"%s%s",path,"/b");
 986
 987    memset(abuffer,'a',1000);
 988    memset(bbuffer,'b',1000);
 989
 990    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
 991    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
 992
 993    printf(" %s %d %s %d\n",aname,a,bname,b);
 994
 995    x = 0;
 996
 997    for(j = 0; j < 100; j++)
 998    {
 999                 yaffs_lseek(a,0,SEEK_END);
1000
1001
1002                 for(i = 0; i <20000; i++)
1003                 {
1004                    //r =        yaffs_lseek(b,i,SEEK_SET);
1005                         //r = yaffs_write(b,bbuffer,1000);
1006
1007                         if(x & 0x16)
1008                         {
1009                                 // shrink
1010                                 int syz = yaffs_lseek(a,0,SEEK_END);
1011
1012                                 syz -= 500;
1013                                 if(syz < 0) syz = 0;
1014                                 yaffs_ftruncate(a,syz);
1015
1016                         }
1017                         else
1018                         {
1019                                 //expand
1020                                 r = yaffs_lseek(a,i * 500,SEEK_SET);
1021                                 r = yaffs_write(a,abuffer,1000);
1022                         }
1023                         x++;
1024
1025                 }
1026    }
1027
1028    return 0;
1029
1030 }
1031
1032
1033 int resize_stress_test_no_grow_complex(const char *path,int iters)
1034 {
1035    int a,b,i,j;
1036    int x;
1037    int r;
1038    char aname[100];
1039    char bname[100];
1040
1041    char abuffer[1000];
1042    char bbuffer[1000];
1043
1044
1045    yaffs_StartUp();
1046
1047    yaffs_mount(path);
1048
1049    sprintf(aname,"%s%s",path,"/a");
1050    sprintf(bname,"%s%s",path,"/b");
1051
1052    memset(abuffer,'a',1000);
1053    memset(bbuffer,'b',1000);
1054
1055    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1056    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1057
1058    printf(" %s %d %s %d\n",aname,a,bname,b);
1059
1060    x = 0;
1061
1062    for(j = 0; j < iters; j++)
1063    {
1064                 yaffs_lseek(a,0,SEEK_END);
1065
1066
1067                 for(i = 0; i <20000; i++)
1068                 {
1069                    //r =        yaffs_lseek(b,i,SEEK_SET);
1070                         //r = yaffs_write(b,bbuffer,1000);
1071
1072                         if(!(x%20))
1073                         {
1074                                 // shrink
1075                                 int syz = yaffs_lseek(a,0,SEEK_END);
1076
1077                                 while(syz > 4000)
1078                                 {
1079
1080                                         syz -= 2050;
1081                                         if(syz < 0) syz = 0;
1082                                         yaffs_ftruncate(a,syz);
1083                                         syz = yaffs_lseek(a,0,SEEK_END);
1084                                         printf("shrink to %d\n",syz);
1085                                 }
1086
1087
1088                         }
1089                         else
1090                         {
1091                                 //expand
1092                                 r = yaffs_lseek(a,500,SEEK_END);
1093                                 r = yaffs_write(a,abuffer,1000);
1094                         }
1095                         x++;
1096
1097
1098                 }
1099
1100                 printf("file size is %lld\n",(long long)yaffs_lseek(a,0,SEEK_END));
1101
1102    }
1103
1104    return 0;
1105
1106 }
1107
1108 int resize_stress_test_no_grow(const char *path,int iters)
1109 {
1110    int a,b,i,j;
1111    int x;
1112    int r;
1113    char aname[100];
1114    char bname[100];
1115
1116    char abuffer[1000];
1117    char bbuffer[1000];
1118
1119    yaffs_StartUp();
1120
1121    yaffs_mount(path);
1122
1123    sprintf(aname,"%s%s",path,"/a");
1124    sprintf(bname,"%s%s",path,"/b");
1125
1126    memset(abuffer,'a',1000);
1127    memset(bbuffer,'b',1000);
1128
1129    a = yaffs_open(aname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1130    b = yaffs_open(bname, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1131
1132    printf(" %s %d %s %d\n",aname,a,bname,b);
1133
1134    x = 0;
1135
1136    for(j = 0; j < iters; j++)
1137    {
1138                 yaffs_lseek(a,0,SEEK_END);
1139
1140
1141                 for(i = 0; i <20000; i++)
1142                 {
1143                    //r =        yaffs_lseek(b,i,SEEK_SET);
1144                         //r = yaffs_write(b,bbuffer,1000);
1145
1146                         if(!(x%20))
1147                         {
1148                                 // shrink
1149                                 int syz = yaffs_lseek(a,0,SEEK_END);
1150
1151                                 while(syz > 4000)
1152                                 {
1153
1154                                         syz -= 2050;
1155                                         if(syz < 0) syz = 0;
1156                                         yaffs_ftruncate(a,syz);
1157                                         syz = yaffs_lseek(a,0,SEEK_END);
1158                                         printf("shrink to %d\n",syz);
1159                                 }
1160
1161
1162                         }
1163                         else
1164                         {
1165                                 //expand
1166                                 r = yaffs_lseek(a,-500,SEEK_END);
1167                                 r = yaffs_write(a,abuffer,1000);
1168                         }
1169                         x++;
1170
1171
1172                 }
1173                 printf("file size is %lld\n",(long long)yaffs_lseek(a,0,SEEK_END));
1174
1175    }
1176
1177    return 0;
1178
1179 }
1180
1181 int directory_rename_test(void)
1182 {
1183         int r;
1184         yaffs_StartUp();
1185
1186         yaffs_mount("/ram");
1187         yaffs_mkdir("/ram/a",0);
1188         yaffs_mkdir("/ram/a/b",0);
1189         yaffs_mkdir("/ram/c",0);
1190
1191         printf("\nDirectory look-up of /ram\n");
1192         dumpDir("/ram");
1193         dumpDir("/ram/a");
1194         dumpDir("/ram/a/b");
1195
1196         printf("Do rename (should fail)\n");
1197
1198         r = yaffs_rename("/ram/a","/ram/a/b/d");
1199         printf("\nDirectory look-up of /ram\n");
1200         dumpDir("/ram");
1201         dumpDir("/ram/a");
1202         dumpDir("/ram/a/b");
1203
1204         printf("Do rename (should not fail)\n");
1205
1206         r = yaffs_rename("/ram/c","/ram/a/b/d");
1207         printf("\nDirectory look-up of /ram\n");
1208         dumpDir("/ram");
1209         dumpDir("/ram/a");
1210         dumpDir("/ram/a/b");
1211
1212
1213         return 1;
1214
1215 }
1216
1217 int cache_read_test(void)
1218 {
1219         int a,b,c;
1220         int i;
1221         int sizeOfFiles = 500000;
1222         char buffer[100];
1223
1224         yaffs_StartUp();
1225
1226         yaffs_mount("/boot");
1227
1228         make_a_file("/boot/a",'a',sizeOfFiles);
1229         make_a_file("/boot/b",'b',sizeOfFiles);
1230
1231         a = yaffs_open("/boot/a",O_RDONLY,0);
1232         b = yaffs_open("/boot/b",O_RDONLY,0);
1233         c = yaffs_open("/boot/c", O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
1234
1235         do{
1236                 i = sizeOfFiles;
1237                 if (i > 100) i = 100;
1238                 sizeOfFiles  -= i;
1239                 yaffs_read(a,buffer,i);
1240                 yaffs_read(b,buffer,i);
1241                 yaffs_write(c,buffer,i);
1242         } while(sizeOfFiles > 0);
1243
1244
1245
1246         return 1;
1247
1248 }
1249
1250 int cache_bypass_bug_test(void)
1251 {
1252         // This test reporoduces a bug whereby YAFFS caching *was* buypassed
1253         // resulting in erroneous reads after writes.
1254         // This bug has been fixed.
1255
1256         int a;
1257         char buffer1[1000];
1258         char buffer2[1000];
1259
1260         memset(buffer1,0,sizeof(buffer1));
1261         memset(buffer2,0,sizeof(buffer2));
1262
1263         yaffs_StartUp();
1264
1265         yaffs_mount("/boot");
1266
1267         // Create a file of 2000 bytes.
1268         make_a_file("/boot/a",'X',2000);
1269
1270         a = yaffs_open("/boot/a",O_RDWR, S_IREAD | S_IWRITE);
1271
1272         // Write a short sequence to the file.
1273         // This will go into the cache.
1274         yaffs_lseek(a,0,SEEK_SET);
1275         yaffs_write(a,"abcdefghijklmnopqrstuvwxyz",20);
1276
1277         // Read a short sequence from the file.
1278         // This will come from the cache.
1279         yaffs_lseek(a,0,SEEK_SET);
1280         yaffs_read(a,buffer1,30);
1281
1282         // Read a page size sequence from the file.
1283         yaffs_lseek(a,0,SEEK_SET);
1284         yaffs_read(a,buffer2,512);
1285
1286         printf("buffer 1 %s\n",buffer1);
1287         printf("buffer 2 %s\n",buffer2);
1288
1289         if(strncmp(buffer1,buffer2,20))
1290         {
1291                 printf("Cache bypass bug detected!!!!!\n");
1292         }
1293
1294
1295         return 1;
1296 }
1297
1298
1299 int free_space_check(void)
1300 {
1301         int f;
1302
1303                 yaffs_StartUp();
1304                 yaffs_mount("/boot");
1305             fill_disk("/boot/",2);
1306             f = yaffs_freespace("/boot");
1307
1308             printf("%d free when disk full\n",f);
1309             return 1;
1310 }
1311
1312 int truncate_test(void)
1313 {
1314         int a;
1315         int r;
1316         int i;
1317         int l;
1318
1319         char y[10];
1320
1321         yaffs_StartUp();
1322         yaffs_mount("/boot");
1323
1324         yaffs_unlink("/boot/trunctest");
1325
1326         a = yaffs_open("/boot/trunctest", O_CREAT | O_TRUNC | O_RDWR,  S_IREAD | S_IWRITE);
1327
1328         yaffs_write(a,"abcdefghijklmnopqrstuvwzyz",26);
1329
1330         yaffs_ftruncate(a,3);
1331         l= yaffs_lseek(a,0,SEEK_END);
1332
1333         printf("truncated length is %d\n",l);
1334
1335         yaffs_lseek(a,5,SEEK_SET);
1336         yaffs_write(a,"1",1);
1337
1338         yaffs_lseek(a,0,SEEK_SET);
1339
1340         r = yaffs_read(a,y,10);
1341
1342         printf("read %d bytes:",r);
1343
1344         for(i = 0; i < r; i++) printf("[%02X]",y[i]);
1345
1346         printf("\n");
1347
1348         return 0;
1349
1350 }
1351
1352
1353
1354
1355
1356 void fill_disk_test(const char *mountpt)
1357 {
1358         int i;
1359         yaffs_StartUp();
1360
1361         for(i = 0; i < 5; i++)
1362         {
1363                 yaffs_mount(mountpt);
1364                 fill_disk_and_delete(mountpt,100,i+1);
1365                 yaffs_unmount(mountpt);
1366         }
1367
1368 }
1369
1370
1371
1372 void lookup_test(const char *mountpt)
1373 {
1374         int i;
1375         int h;
1376         char a[100];
1377
1378
1379         yaffs_DIR *d;
1380         yaffs_dirent *de;
1381
1382         yaffs_StartUp();
1383
1384         yaffs_mount(mountpt);
1385
1386         d = yaffs_opendir(mountpt);
1387
1388         if(!d)
1389         {
1390                 printf("opendir failed\n");
1391         }
1392         else
1393         {
1394
1395                 for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1396                 {
1397                         printf("unlinking %s\n",de->d_name);
1398                         yaffs_unlink(de->d_name);
1399                 }
1400
1401                 printf("%d files deleted\n",i);
1402         }
1403
1404
1405         for(i = 0; i < 2000; i++){
1406         sprintf(a,"%s/%d",mountpt,i);
1407                 h =  yaffs_open(a,O_CREAT | O_TRUNC | O_RDWR, 0);
1408                 yaffs_close(h);
1409         }
1410
1411         yaffs_rewinddir(d);
1412         for(i = 0; (de = yaffs_readdir(d)) != NULL; i++)
1413         {
1414                 printf("%d  %s\n",i,de->d_name);
1415         }
1416
1417         printf("%d files listed\n\n\n",i);
1418
1419         yaffs_rewinddir(d);
1420         yaffs_readdir(d);
1421         yaffs_readdir(d);
1422         yaffs_readdir(d);
1423
1424         for(i = 0; i < 2000; i++){
1425                 sprintf(a,"%s/%d",mountpt,i);
1426                 yaffs_unlink(a);
1427         }
1428
1429
1430         yaffs_unmount(mountpt);
1431
1432 }
1433
1434 void link_test(const char *mountpt)
1435 {
1436         int i;
1437         int h;
1438         char a[100];
1439         char b[100];
1440         char c[100];
1441
1442         sprintf(a,"%s/aaa",mountpt);
1443         sprintf(b,"%s/bbb",mountpt);
1444         sprintf(c,"%s/ccc",mountpt);
1445
1446         yaffs_StartUp();
1447
1448         yaffs_mount(mountpt);
1449
1450
1451         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1452         for(i = 0; i < 100; i++)
1453                 yaffs_write(h,a,100);
1454
1455         yaffs_close(h);
1456
1457         yaffs_unlink(b);
1458         yaffs_unlink(c);
1459         yaffs_link(a,b);
1460         yaffs_link(a,c);
1461         yaffs_unlink(b);
1462         yaffs_unlink(c);
1463         yaffs_unlink(a);
1464
1465
1466         yaffs_unmount(mountpt);
1467         yaffs_mount(mountpt);
1468
1469         printf("link test done\n");
1470
1471 }
1472
1473 void freespace_test(const char *mountpt)
1474 {
1475         int i;
1476         int h;
1477         char a[100];
1478
1479         int  f0;
1480         int f1;
1481         int f2;
1482         int f3;
1483         sprintf(a,"%s/aaa",mountpt);
1484
1485         yaffs_StartUp();
1486
1487         yaffs_mount(mountpt);
1488
1489         f0 = yaffs_freespace(mountpt);
1490
1491         h = yaffs_open(a, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1492
1493         for(i = 0; i < 100; i++)
1494                 yaffs_write(h,a,100);
1495
1496         yaffs_close(h);
1497
1498         f1 = yaffs_freespace(mountpt);
1499
1500         yaffs_unlink(a);
1501
1502         f2 = yaffs_freespace(mountpt);
1503
1504
1505         yaffs_unmount(mountpt);
1506         yaffs_mount(mountpt);
1507
1508         f3 = yaffs_freespace(mountpt);
1509
1510         printf("%d\n%d\n%d\n%d\n",f0, f1,f2,f3);
1511
1512
1513 }
1514
1515 void simple_rw_test(const char *mountpt)
1516 {
1517         int i;
1518         int h;
1519         char a[100];
1520
1521         int x;
1522         int result;
1523
1524         sprintf(a,"%s/aaa",mountpt);
1525
1526         yaffs_StartUp();
1527
1528         yaffs_mount(mountpt);
1529
1530         yaffs_unlink(a);
1531
1532         h = yaffs_open(a,O_CREAT| O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1533
1534         for(i = 100000;i < 200000; i++){
1535                 result = yaffs_write(h,&i,sizeof(i));
1536
1537                 if(result != 4)
1538                 {
1539                         printf("write error\n");
1540                         exit(1);
1541                 }
1542         }
1543
1544         //yaffs_close(h);
1545
1546         // h = yaffs_open(a,O_RDWR, S_IREAD | S_IWRITE);
1547
1548
1549         yaffs_lseek(h,0,SEEK_SET);
1550
1551         for(i = 100000; i < 200000; i++){
1552                 result = yaffs_read(h,&x,sizeof(x));
1553
1554                 if(result != 4 || x != i){
1555                         printf("read error %d %x %x\n",i,result,x);
1556                 }
1557         }
1558
1559         printf("Simple rw test passed\n");
1560
1561
1562
1563 }
1564
1565
1566 void scan_deleted_files_test(const char *mountpt)
1567 {
1568         char fn[100];
1569         char sub[100];
1570
1571         const char *p;
1572
1573         int i;
1574         int j;
1575         int k;
1576         int h;
1577
1578         sprintf(sub,"%s/sdir",mountpt);
1579         yaffs_StartUp();
1580
1581         for(j = 0; j < 10; j++)
1582         {
1583                 printf("\n\n>>>>>>> Run %d <<<<<<<<<<<<<\n\n",j);
1584                 yaffs_mount(mountpt);
1585                 yaffs_mkdir(sub,0);
1586
1587
1588                 p = (j & 0) ? mountpt: sub;
1589
1590                 for(i = 0; i < 100; i++)
1591                 {
1592                   sprintf(fn,"%s/%d",p,i);
1593
1594                   if(i & 1)
1595                   {
1596                           h = yaffs_open(fn,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1597                           for(k = 0; k < 1000; k++)
1598                                   yaffs_write(h,fn,100);
1599                           yaffs_close(h);
1600                   }
1601                   else
1602                         yaffs_mkdir(fn,0);
1603                 }
1604
1605                 for(i = 0; i < 10; i++)
1606                 {
1607                   sprintf(fn,"%s/%d",p,i);
1608                   if(i & 1)
1609                         yaffs_unlink(fn);
1610                   else
1611                         yaffs_rmdir(fn);
1612
1613                 }
1614
1615                 yaffs_unmount(mountpt);
1616         }
1617
1618
1619
1620
1621 }
1622
1623
1624 void write_10k(int h)
1625 {
1626    int i;
1627    const char *s="0123456789";
1628    for(i = 0; i < 1000; i++)
1629      yaffs_write(h,s,10);
1630
1631 }
1632 void write_200k_file(const char *fn, const char *fdel, const char *fdel1)
1633 {
1634    int h1;
1635    int i;
1636    int offs;
1637
1638    h1 = yaffs_open(fn, O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
1639
1640    for(i = 0; i < 100000; i+= 10000)
1641    {
1642         write_10k(h1);
1643    }
1644
1645    offs = yaffs_lseek(h1,0,SEEK_CUR);
1646    if( offs != 100000)
1647    {
1648         printf("Could not write file\n");
1649    }
1650
1651    yaffs_unlink(fdel);
1652    for(i = 0; i < 100000; i+= 10000)
1653    {
1654         write_10k(h1);
1655    }
1656
1657    offs = yaffs_lseek(h1,0,SEEK_CUR);
1658    if( offs != 200000)
1659    {
1660         printf("Could not write file\n");
1661    }
1662
1663    yaffs_close(h1);
1664    yaffs_unlink(fdel1);
1665
1666 }
1667
1668
1669 void verify_200k_file(const char *fn)
1670 {
1671    int h1;
1672    int i;
1673    char x[11];
1674    const char *s="0123456789";
1675    int errCount = 0;
1676
1677    h1 = yaffs_open(fn, O_RDONLY, 0);
1678
1679    for(i = 0; i < 200000 && errCount < 10; i+= 10)
1680    {
1681         yaffs_read(h1,x,10);
1682         if(strncmp(x,s,10) != 0)
1683         {
1684                 printf("File %s verification failed at %d\n",fn,i);
1685                 errCount++;
1686         }
1687    }
1688    if(errCount >= 10)
1689         printf("Too many errors... aborted\n");
1690
1691    yaffs_close(h1);
1692
1693 }
1694
1695
1696 void check_resize_gc_bug(const char *mountpt)
1697 {
1698
1699         char a[30];
1700         char b[30];
1701         char c[30];
1702
1703         int i;
1704
1705         sprintf(a,"%s/a",mountpt);
1706         sprintf(b,"%s/b",mountpt);
1707         sprintf(c,"%s/c",mountpt);
1708
1709
1710
1711
1712         yaffs_StartUp();
1713         yaffs_mount(mountpt);
1714         yaffs_unlink(a);
1715         yaffs_unlink(b);
1716
1717         for(i = 0; i < 50; i++)
1718         {
1719            printf("A\n");write_200k_file(a,"",c);
1720            printf("B\n");verify_200k_file(a);
1721            printf("C\n");write_200k_file(b,a,c);
1722            printf("D\n");verify_200k_file(b);
1723            yaffs_unmount(mountpt);
1724            yaffs_mount(mountpt);
1725            printf("E\n");verify_200k_file(a);
1726            printf("F\n");verify_200k_file(b);
1727         }
1728
1729 }
1730
1731
1732 void multi_mount_test(const char *mountpt,int nmounts)
1733 {
1734
1735         char a[30];
1736
1737         int i;
1738         int j;
1739
1740         sprintf(a,"%s/a",mountpt);
1741
1742         yaffs_StartUp();
1743
1744         for(i = 0; i < nmounts; i++){
1745                 int h0;
1746                 int h1;
1747                 int len0;
1748                 int len1;
1749
1750                 static char xx[1000];
1751
1752                 printf("############### Iteration %d   Start\n",i);
1753                 if(1 || i == 0 || i == 5)
1754                         yaffs_mount(mountpt);
1755
1756                 dump_directory_tree(mountpt);
1757
1758
1759                 yaffs_mkdir(a,0);
1760
1761                 sprintf(xx,"%s/0",a);
1762                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1763
1764                 sprintf(xx,"%s/1",a);
1765                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1766
1767 #if 0
1768                 for(j = 0; j < 200; j++){
1769                    yaffs_write(h0,xx,1000);
1770                    yaffs_write(h1,xx,1000);
1771                 }
1772 #else
1773                 while(yaffs_write(h0,xx,1000) > 0){
1774
1775                    yaffs_write(h1,xx,1000);
1776                 }
1777 #endif
1778                 len0 = yaffs_lseek(h0,0,SEEK_END);
1779                 len1 = yaffs_lseek(h1,0,SEEK_END);
1780
1781                 yaffs_lseek(h0,0,SEEK_SET);
1782                 yaffs_lseek(h1,0,SEEK_SET);
1783
1784                 for(j = 0; j < 200; j++){
1785                    yaffs_read(h0,xx,1000);
1786                    yaffs_read(h1,xx,1000);
1787                 }
1788
1789
1790         //      yaffs_truncate(h0,0);
1791                 yaffs_close(h0);
1792                 yaffs_close(h1);
1793
1794                 printf("########### %d\n",i);
1795                 dump_directory_tree(mountpt);
1796
1797                 if(1 || i == 4 || i == nmounts -1)
1798                         yaffs_unmount(mountpt);
1799         }
1800 }
1801
1802
1803 void small_mount_test(const char *mountpt,int nmounts)
1804 {
1805
1806         char a[30];
1807
1808         int i;
1809         int j;
1810
1811         int h0;
1812         int h1;
1813         int len0;
1814         int len1;
1815         int nread;
1816
1817         sprintf(a,"%s/a",mountpt);
1818
1819         yaffs_StartUp();
1820
1821
1822
1823         for(i = 0; i < nmounts; i++){
1824
1825                 static char xx[1000];
1826
1827                 printf("############### Iteration %d   Start\n",i);
1828                 if(1 || i == 0 || i == 5)
1829                         yaffs_mount(mountpt);
1830
1831                 dump_directory_tree(mountpt);
1832
1833                 yaffs_mkdir(a,0);
1834
1835                 sprintf(xx,"%s/0",a);
1836                 if(i ==0){
1837
1838                         h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1839                         for(j = 0; j < 130; j++)
1840                                 yaffs_write(h0,xx,1000);
1841                         yaffs_close(h0);
1842                 }
1843
1844                 h0 = yaffs_open(xx,O_RDONLY,0);
1845
1846                 sprintf(xx,"%s/1",a);
1847                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1848
1849                 while((nread = yaffs_read(h0,xx,1000)) > 0)
1850                         yaffs_write(h1,xx,nread);
1851
1852
1853                 len0 = yaffs_lseek(h0,0,SEEK_END);
1854                 len1 = yaffs_lseek(h1,0,SEEK_END);
1855
1856                 yaffs_lseek(h0,0,SEEK_SET);
1857                 yaffs_lseek(h1,0,SEEK_SET);
1858
1859                 for(j = 0; j < 200; j++){
1860                    yaffs_read(h0,xx,1000);
1861                    yaffs_read(h1,xx,1000);
1862                 }
1863
1864                 yaffs_close(h0);
1865                 yaffs_close(h1);
1866
1867                 printf("########### %d\n",i);
1868                 dump_directory_tree(mountpt);
1869
1870                 if(1 || i == 4 || i == nmounts -1)
1871                         yaffs_unmount(mountpt);
1872         }
1873 }
1874
1875
1876 int early_exit;
1877
1878 void small_overwrite_test(const char *mountpt,int nmounts)
1879 {
1880
1881         char a[30];
1882         int i;
1883         int j;
1884
1885         int h0;
1886         int h1;
1887
1888
1889         sprintf(a,"%s/a",mountpt);
1890
1891         yaffs_StartUp();
1892
1893
1894
1895         for(i = 0; i < nmounts; i++){
1896
1897                 static char xx[8000];
1898
1899                 printf("############### Iteration %d   Start\n",i);
1900                 if(1)
1901                         yaffs_mount(mountpt);
1902
1903                 dump_directory_tree(mountpt);
1904
1905                 yaffs_mkdir(a,0);
1906
1907                 sprintf(xx,"%s/0",a);
1908                 h0 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1909                 sprintf(xx,"%s/1",a);
1910                 h1 = yaffs_open(xx, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1911
1912                 for(j = 0; j < 1000000; j+=1000){
1913                         yaffs_ftruncate(h0,j);
1914                         yaffs_lseek(h0,j,SEEK_SET);
1915                         yaffs_write(h0,xx,7000);
1916                         yaffs_write(h1,xx,7000);
1917
1918                         if(early_exit)
1919                                 exit(0);
1920                 }
1921
1922                 yaffs_close(h0);
1923
1924                 printf("########### %d\n",i);
1925                 dump_directory_tree(mountpt);
1926
1927                 if(1)
1928                         yaffs_unmount(mountpt);
1929         }
1930 }
1931
1932
1933 void seek_overwrite_test(const char *mountpt,int nmounts)
1934 {
1935
1936         char a[30];
1937
1938         int i;
1939         int j;
1940
1941         int h0;
1942
1943
1944         sprintf(a,"%s/f",mountpt);
1945
1946         yaffs_StartUp();
1947
1948         yaffs_mount(mountpt);
1949
1950
1951         for(i = 0; i < nmounts; i++){
1952
1953                 h0 = yaffs_open(a, O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
1954
1955                 for(j = 0; j < 100000; j++){
1956                         yaffs_lseek(h0,0,SEEK_SET);
1957                         yaffs_write(h0,xx,5000);
1958                         yaffs_lseek(h0,0x100000,SEEK_SET);
1959                         yaffs_write(h0,xx,5000);
1960
1961                         if(early_exit)
1962                                 exit(0);
1963                 }
1964
1965                 yaffs_close(h0);
1966
1967         }
1968 }
1969
1970
1971 void yaffs_touch(const char *fn)
1972 {
1973         yaffs_chmod(fn, S_IREAD | S_IWRITE);
1974 }
1975
1976 void checkpoint_fill_test(const char *mountpt,int nmounts)
1977 {
1978
1979         char a[50];
1980         char b[50];
1981         char c[50];
1982
1983         int i;
1984         int j;
1985         int h;
1986
1987         sprintf(a,"%s/a",mountpt);
1988
1989
1990
1991
1992         yaffs_StartUp();
1993
1994         for(i = 0; i < nmounts; i++){
1995                 printf("############### Iteration %d   Start\n",i);
1996                 yaffs_mount(mountpt);
1997                 dump_directory_tree(mountpt);
1998                 yaffs_mkdir(a,0);
1999
2000                 sprintf(b,"%s/zz",a);
2001
2002                 h = yaffs_open(b,O_CREAT | O_RDWR,S_IREAD |S_IWRITE);
2003
2004
2005                 while(yaffs_write(h,c,50) == 50){}
2006
2007                 yaffs_close(h);
2008
2009                 for(j = 0; j < 2; j++){
2010                         printf("touch %d\n",j);
2011                         yaffs_touch(b);
2012                         yaffs_unmount(mountpt);
2013                         yaffs_mount(mountpt);
2014                 }
2015
2016                 dump_directory_tree(mountpt);
2017                 yaffs_unmount(mountpt);
2018         }
2019 }
2020
2021
2022 int make_file2(const char *name1, const char *name2,int syz)
2023 {
2024
2025         char xx[2500];
2026         int i;
2027         int h1=-1,h2=-1;
2028         int n = 1;
2029
2030
2031         if(name1)
2032                 h1 = yaffs_open(name1,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2033         if(name2)
2034                 h2 = yaffs_open(name2,O_CREAT | O_TRUNC | O_RDWR, S_IREAD | S_IWRITE);
2035
2036         while(syz > 0 && n > 0){
2037                 i = (syz > 2500) ? 2500 : syz;
2038                 n = yaffs_write(h1,xx,i);
2039                 n = yaffs_write(h2,xx,i);
2040                 syz -= 500;
2041         }
2042         yaffs_close(h1);
2043         yaffs_close(h2);
2044         return 0;
2045 }
2046
2047
2048 extern void SetCheckpointReservedBlocks(int n);
2049
2050 void checkpoint_upgrade_test(const char *mountpt,int nmounts)
2051 {
2052
2053         char a[50];
2054         char b[50];
2055         char c[50];
2056         char d[50];
2057
2058         int j;
2059
2060         sprintf(a,"%s/a",mountpt);
2061
2062
2063
2064
2065         printf("Create start condition\n");
2066         yaffs_StartUp();
2067         SetCheckpointReservedBlocks(0);
2068         yaffs_mount(mountpt);
2069         yaffs_mkdir(a,0);
2070         sprintf(b,"%s/zz",a);
2071         sprintf(c,"%s/xx",a);
2072         make_file2(b,c,2000000);
2073         sprintf(d,"%s/aa",a);
2074         make_file2(d,NULL,500000000);
2075         dump_directory_tree(mountpt);
2076
2077         printf("Umount/mount attempt full\n");
2078         yaffs_unmount(mountpt);
2079
2080         SetCheckpointReservedBlocks(10);
2081         yaffs_mount(mountpt);
2082
2083         printf("unlink small file\n");
2084         yaffs_unlink(c);
2085         dump_directory_tree(mountpt);
2086
2087         printf("Umount/mount attempt\n");
2088         yaffs_unmount(mountpt);
2089         yaffs_mount(mountpt);
2090
2091         for(j = 0; j < 500; j++){
2092                 printf("***** touch %d\n",j);
2093                 dump_directory_tree(mountpt);
2094                 yaffs_touch(b);
2095                 yaffs_unmount(mountpt);
2096                 yaffs_mount(mountpt);
2097         }
2098
2099         for(j = 0; j < 500; j++){
2100                 printf("***** touch %d\n",j);
2101                 dump_directory_tree(mountpt);
2102                 yaffs_touch(b);
2103                 yaffs_unmount(mountpt);
2104                 yaffs_mount(mountpt);
2105         }
2106 }
2107
2108 void huge_array_test(const char *mountpt,int n)
2109 {
2110
2111         char a[50];
2112
2113
2114         int i;
2115         int space;
2116
2117         int fnum;
2118
2119         sprintf(a,"mount point %s",mountpt);
2120
2121
2122
2123         yaffs_StartUp();
2124
2125         yaffs_mount(mountpt);
2126
2127         while(n>0){
2128                 n--;
2129                 fnum = 0;
2130                 printf("\n\n START run\n\n");
2131                 while((space = yaffs_freespace(mountpt)) > 25000000){
2132                         sprintf(a,"%s/file%d",mountpt,fnum);
2133                         fnum++;
2134                         printf("create file %s, free space %d\n",a,space);
2135                         create_file_of_size(a,10000000);
2136                         printf("verifying file %s\n",a);
2137                         verify_file_of_size(a,10000000);
2138                 }
2139
2140                 printf("\n\n verification/deletion\n\n");
2141
2142                 for(i = 0; i < fnum; i++){
2143                         sprintf(a,"%s/file%d",mountpt,i);
2144                         printf("verifying file %s\n",a);
2145                         verify_file_of_size(a,10000000);
2146                         printf("deleting file %s\n",a);
2147                         yaffs_unlink(a);
2148                 }
2149                 printf("\n\n done \n\n");
2150
2151
2152         }
2153 }
2154
2155
2156 void random_write(int h)
2157 {
2158         static char buffer[12000];
2159         int n;
2160
2161         n = random() & 0x1FFF;
2162         yaffs_write(h,buffer,n);
2163 }
2164
2165 void random_seek(int h)
2166 {
2167         int n;
2168         n = random() & 0xFFFFF;
2169         yaffs_lseek(h,n,SEEK_SET);
2170 }
2171
2172 void random_truncate(int h, char * name)
2173 {
2174         int n;
2175         int flen;
2176         n = random() & 0xFFFFF;
2177         flen = yaffs_lseek(h,0,SEEK_END);
2178         if(n > flen)
2179                 n = flen / 2;
2180         yaffs_ftruncate(h,n);
2181         yaffs_lseek(h,n,SEEK_SET);
2182 }
2183
2184
2185 #define NSMALLFILES 10
2186 void random_small_file_test(const char *mountpt,int iterations)
2187 {
2188
2189         char a[NSMALLFILES][50];
2190
2191
2192         int i;
2193         int n;
2194         int h[NSMALLFILES];
2195         int r;
2196
2197
2198         yaffs_StartUp();
2199
2200         yaffs_mount(mountpt);
2201
2202         for(i = 0; i < NSMALLFILES; i++){
2203                 h[i]=-1;
2204                 strcpy(a[i],"");
2205         }
2206
2207         for(n = 0; n < iterations; n++){
2208
2209                 for(i = 0; i < NSMALLFILES; i++) {
2210                         r = random();
2211
2212                         if(strlen(a[i]) == 0){
2213                                 sprintf(a[i],"%s/%dx%d",mountpt,n,i);
2214                                 h[i] = yaffs_open(a[i],O_RDWR | O_CREAT | O_TRUNC, S_IREAD | S_IWRITE);
2215                         }
2216
2217                         if(h[i] < -1)
2218                                 printf("Could not open yaffs file %d %d error %d\n",n,i,h[i]);
2219                         else {
2220                                 r = r & 7;
2221                                 switch(r){
2222                                         case 0:
2223                                         case 1:
2224                                         case 2:
2225                                                 random_write(h[i]);
2226                                                 break;
2227                                         case 3:
2228                                                 random_truncate(h[i],a[i]);
2229                                                 break;
2230                                         case 4:
2231                                         case 5: random_seek(h[i]);
2232                                                 break;
2233                                         case 6:
2234                                                 yaffs_close(h[i]);
2235                                                 h[i] = -1;
2236                                                 break;
2237                                         case 7:
2238                                                 yaffs_close(h[i]);
2239                                                 yaffs_unlink(a[i]);
2240                                                 strcpy(a[i],"");
2241                                                 h[i] = -1;
2242                                 }
2243                         }
2244                 }
2245
2246         }
2247
2248         for(i = 0; i < NSMALLFILES; i++)
2249                 yaffs_close(h[i]);
2250
2251         yaffs_unmount(mountpt);
2252 }
2253
2254
2255
2256 int main(int argc, char *argv[])
2257 {
2258         //return long_test(argc,argv);
2259
2260         //return cache_read_test();
2261
2262         //resize_stress_test_no_grow("/flash/flash",20);
2263
2264         //huge_directory_test_on_path("/ram2k");
2265
2266          //yaffs_backward_scan_test("/flash/flash");
2267         // yaffs_device_flush_test("/flash/flash");
2268
2269         rename_over_test("/flash/yaffs1");
2270
2271          //scan_pattern_test("/flash",10000,10);
2272         //short_scan_test("/flash/flash",40000,200);
2273           //small_mount_test("/flash/flash",1000);
2274           //small_overwrite_test("/flash/flash",1000);
2275           //seek_overwrite_test("/flash/flash",1000);
2276          //checkpoint_fill_test("/flash/flash",20);
2277          //checkpoint_upgrade_test("/flash/flash",20);
2278           //small_overwrite_test("/flash/flash",1000);
2279           //checkpoint_fill_test("/flash/flash",20);
2280         // random_small_file_test("/flash/flash",10000);
2281          // huge_array_test("/flash/flash",10);
2282
2283
2284
2285
2286         //long_test_on_path("/ram2k");
2287         // long_test_on_path("/flash");
2288         //simple_rw_test("/flash/flash");
2289         //fill_disk_test("/flash/flash");
2290         // rename_over_test("/flash");
2291         //lookup_test("/flash");
2292         //freespace_test("/flash/flash");
2293
2294         //link_test("/flash/flash");
2295
2296
2297
2298
2299         // cache_bypass_bug_test();
2300
2301          //free_space_check();
2302
2303          //check_resize_gc_bug("/flash");
2304
2305          return 0;
2306
2307 }