direct/test-framework/timothy_tests/quick_tests/lib.c

   1 /*
   2  * YAFFS: Yet another FFS. A NAND-flash specific file system.
   3  *
   4  * Copyright (C) 2002-2011 Aleph One Ltd.
   5  *   for Toby Churchill Ltd and Brightstar Engineering
   6  *
   7  * Created by Timothy Manning <timothy@yaffs.net>
   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 #include "lib.h"
  15
  16 static int EXIT_ON_ERROR = 1;
  17 static int  PRINT_LEVEL = 2;    //This sets the level of detail which is printed. There are 3 levels 0,1,2 and 3
  18                         //0 just prints the number of tests passed and failed.
  19                         //1 is the basic print level. it will print the details of a failed test.
  20                         //2 will print if a test passes and cleans.
  21 void set_print_level(int new_level)
  22 {
  23         PRINT_LEVEL=new_level;
  24 }
  25
  26 void set_exit_on_error(int num)
  27 {
  28         EXIT_ON_ERROR=num;
  29 }
  30
  31 int get_exit_on_error(void)
  32 {
  33         return EXIT_ON_ERROR;
  34 }
  35
  36
  37 int EROFS_setup(void)
  38 {
  39         int output= -1;
  40         output=yaffs_remount(YAFFS_MOUNT_POINT,1,1);
  41         if (output<0){
  42                 print_message("failed to remount yaffs\n",2);
  43                 return -1;
  44         }
  45         return 1;
  46 }
  47
  48 int EROFS_clean(void)
  49 {
  50         int output=-1;
  51         output= yaffs_remount(YAFFS_MOUNT_POINT,1,0);
  52         if (output<0){
  53                 print_message("failed to remount yaffs\n",2);
  54                 return -1;
  55         }
  56         return 1;
  57 }
  58
  59
  60 int set_up_ELOOP(void){
  61         int output1=1;
  62         int output2=1;
  63         int error =0;
  64
  65         output1=yaffs_symlink(ELOOP_PATH,ELOOP2_PATH);
  66         if (output1 <0){
  67                 error=yaffs_get_error();
  68                 if (abs(error)==EEXIST){
  69                         output1= 1;
  70                 } else {
  71                         output1=-1;
  72                 }
  73         }
  74
  75         output2=yaffs_symlink(ELOOP2_PATH,ELOOP_PATH);
  76
  77         if (output2 <0){
  78                 error=yaffs_get_error();
  79                 if (abs(error)==EEXIST){
  80                         output2= 1;
  81                 } else {
  82                         output2=-1;
  83                 }
  84         }
  85
  86
  87         yaffs_set_error(0);     /*reset the last error to 0 */
  88         return (output1|output2);
  89 }
  90
  91 void join_paths(char *path1,char *path2,char *new_path )
  92 {
  93
  94         //strcat(new_path,path1);       /*since all functions have this then pull it out*/
  95         if ( (path1[(sizeof(path1)/sizeof(char))-2]=='/') && path2[0]!='/') {
  96                 /*paths are compatiable. concatanate them. note -2 is because of \0*/
  97                 strcat(new_path,path1);
  98                 strcat(new_path,path2);
  99                 //char new_path[(sizeof(path1)/sizeof(char))+(sizeof(path2)/sizeof(char))];
 100                 //strcpy(new_path,strcat(path1,path2));
 101                 //return new_path;
 102         } else if ((path1[(sizeof(path1)/sizeof(char))-2]!='/') && path2[0]=='/') {
 103                 /*paths are compatiable. concatanate them*/
 104                 strcat(new_path,path1);
 105                 strcat(new_path,path2);
 106
 107         } else if ((path1[(sizeof(path1)/sizeof(char))-2]!='/') && path2[0]!='/') {
 108                         /*need to add a "/". */
 109                 strcat(new_path,path1);
 110                 strcat(new_path,"/");
 111                 strcat(new_path,path2);
 112
 113         } else if ((path1[(sizeof(path1)/sizeof(char))-2]=='/') && path2[0]=='/') {
 114                 /*need to remove a "/". */
 115                 /*yaffs does not mind the extra slash. */
 116                 strcat(new_path,path1);
 117                 strcat(new_path,path2);
 118
 119         } else {
 120                 //error
 121                 //return -1;
 122         }
 123 }
 124
 125 void print_message(char *message,char print_level)
 126 {
 127         if (print_level <= PRINT_LEVEL){
 128                 printf("%s",message);
 129         }
 130 }
 131
 132 /*same as forcing the rmdir of a directory*/
 133 int delete_dir(char *dir_name)
 134 {
 135         yaffs_DIR *d;
 136         struct yaffs_dirent *de;
 137         struct yaffs_stat s;
 138         char str[100];
 139         d = yaffs_opendir(dir_name);
 140         printf("%s\n",dir_name);
 141         if(!d)
 142         {
 143                 printf("%s\n",dir_name);
 144                 print_message("failed to open dir\n",2);
 145                 get_error();
 146                 return -1;
 147     }
 148
 149     while((de = yaffs_readdir(d)) != NULL) {
 150                 //stats the file
 151                 sprintf(str,"%s/%s",dir_name,de->d_name);
 152                 yaffs_lstat(str,&s);
 153
 154                 if ((s.st_mode & S_IFMT) == S_IFDIR){
 155                         //it is a directory. call the function recursivly.
 156                         delete_dir(str);
 157                         yaffs_rmdir(str);
 158                 }else{
 159                         yaffs_unlink(str);
 160                 }
 161         }
 162         yaffs_rmdir(dir_name);
 163         yaffs_closedir(d);
 164         return 1;
 165 }
 166
 167 void get_error(void)
 168 {
 169         int error_code=0;
 170         char message[30];
 171         message[0]='\0';
 172
 173         error_code=yaffs_get_error();
 174         sprintf(message,"yaffs_error code %d\n",error_code);
 175         print_message(message,1);
 176         sprintf(message,"error is : %s\n",yaffs_error_to_str(error_code));
 177         print_message(message,1);
 178 }
 179