direct/dtest.c

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