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