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