4fd9af9ed5d403dd3ad9554727f7e3b0a8804245
[yaffs2.git] / direct / u-boot / fs / yaffs2 / yaffs_uboot_glue.c
1 /*
2  * YAFFS: Yet Another Flash File System. A NAND-flash specific file system.
3  *
4  * Copyright (C) 2002-2007 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  * yaffscfg.c  The configuration for the "direct" use of yaffs.
16  *
17  * This is set up for u-boot.
18  *
19  * This version now uses the ydevconfig mechanism to set up partitions.
20  */
21
22 #include <common.h>
23
24 #include <config.h>
25 #include "nand.h"
26 #include "yaffscfg.h"
27 #include "yaffsfs.h"
28 #include "yaffs_packedtags2.h"
29 #include "yaffs_mtdif.h"
30 #include "yaffs_mtdif2.h"
31 #if 0
32 #include <errno.h>
33 #else
34 #include "malloc.h"
35 #endif
36
37 unsigned yaffs_trace_mask = 0x0; /* Disable logging */
38 static int yaffs_errno = 0;
39
40
41 void yaffs_bug_fn(const char *fn, int n)
42 {
43         printf("yaffs bug at %s:%d\n", fn, n);
44 }
45
46 void *yaffsfs_malloc(size_t x)
47 {
48         return malloc(x);
49 }
50
51 void yaffsfs_free(void *x)
52 {
53         free(x);
54 }
55
56 void yaffsfs_SetError(int err)
57 {
58         yaffs_errno = err;
59 }
60
61 int yaffsfs_GetLastError(void)
62 {
63         return yaffs_errno;
64 }
65
66
67 int yaffsfs_GetError(void)
68 {
69         return yaffs_errno;
70 }
71
72 void yaffsfs_Lock(void)
73 {
74 }
75
76 void yaffsfs_Unlock(void)
77 {
78 }
79
80 __u32 yaffsfs_CurrentTime(void)
81 {
82         return 0;
83 }
84
85 void *yaffs_malloc(size_t size)
86 {
87         return malloc(size);
88 }
89
90 void yaffs_free(void *ptr)
91 {
92         free(ptr);
93 }
94
95 void yaffsfs_LocalInitialisation(void)
96 {
97         /* No locking used */
98 }
99
100
101 static const char *yaffs_file_type_str(struct yaffs_stat *stat)
102 {
103         switch(stat->st_mode & S_IFMT) {
104                 case S_IFREG: return "regular file";
105                 case S_IFDIR: return "directory";
106                 case S_IFLNK: return "symlink";
107                 default: return "unknown";
108         }
109 }
110
111 static const char *yaffs_error_str(void)
112 {
113         int error = yaffsfs_GetLastError();
114
115         if(error < 0)
116                 error = -error;
117
118         switch (error) {
119                 case EBUSY: return "Busy";
120                 case ENODEV: return "No such device";
121                 case EINVAL: return "Invalid parameter";
122                 case ENFILE: return "Too many open files";
123                 case EBADF:  return "Bad handle";
124                 case EACCES: return "Wrong permissions";
125                 case EXDEV:  return "Not on same device";
126                 case ENOENT: return "No such entry";
127                 case ENOSPC: return "Device full";
128                 case EROFS:  return "Read only file system";
129                 case ERANGE: return "Range error";
130                 case ENOTEMPTY: return "Not empty";
131                 case ENAMETOOLONG: return "Name too long";
132                 case ENOMEM: return "Out of memory";
133                 case EFAULT: return "Fault";
134                 case EEXIST: return "Name exists";
135                 case ENOTDIR: return "Not a directory";
136                 case EISDIR: return "Not permitted on a directory";
137                 case ELOOP:  return "Symlink loop";
138                 case 0: return "No error";
139                 default: return "Unknown error";
140         }
141 }
142
143 extern nand_info_t nand_info[];
144
145 void cmd_yaffs_tracemask(unsigned set, unsigned mask)
146 {
147         if(set)
148                 yaffs_trace_mask = mask;
149
150         printf("yaffs trace mask: %08x\n",yaffs_trace_mask);
151 }
152
153 static int yaffs_regions_overlap(int a, int b, int x, int y)
154 {
155         return
156                 (a <= x && x <= b) ||
157                 (a <= y && y <= b) ||
158                 (x <= a && a <= y) ||
159                 (x <= b && b <= y);
160 }
161
162 void cmd_yaffs_devconfig(char *_mp, int flash_dev,
163                         int start_block, int end_block)
164 {
165         struct mtd_info *mtd = NULL;
166         struct yaffs_dev *dev = NULL;
167         struct yaffs_dev *chk;
168         char *mp = NULL;
169         struct nand_chip *chip;
170
171         dev = calloc(1, sizeof(*dev));
172         mp = strdup(_mp);
173
174         mtd = &nand_info[flash_dev];
175
176         if(!dev || !mp) {
177                 /* Alloc error */
178                 printf("Failed to allocate memory\n");
179                 goto err;
180         }
181
182         if(flash_dev >= CONFIG_SYS_MAX_NAND_DEVICE) {
183                 printf("Flash device invalid\n");
184                 goto err;
185         }
186
187         if (end_block == 0)
188                 end_block = mtd->size / mtd->erasesize - 1;
189
190         if (end_block < start_block) {
191                 printf("Bad start/end\n");
192                 goto err;
193         }
194
195         chip =  mtd->priv;
196
197         /* Check for any conflicts */
198         yaffs_dev_rewind();
199         while (1) {
200                 chk = yaffs_next_dev();
201                 if(!chk)
202                         break;
203                 if(strcmp(chk->param.name, mp) == 0) {
204                         printf("Mount point name already used\n");
205                         goto err;
206                 }
207                 if(chk->driver_context == mtd &&
208                         yaffs_regions_overlap(
209                                 chk->param.start_block, chk->param.end_block,
210                                 start_block, end_block)) {
211                         printf("Region overlaps with partition %s\n",
212                                 chk->param.name);
213                         goto err;
214                 }
215
216         }
217
218         /* Seems sane, so configure */
219         memset(dev, 0, sizeof(*dev));
220         dev->param.name = mp;
221         dev->driver_context = mtd;
222         dev->param.start_block = start_block;
223         dev->param.end_block = end_block;
224         dev->param.chunks_per_block = mtd->erasesize / mtd->writesize;
225         dev->param.total_bytes_per_chunk = mtd->writesize;
226         dev->param.is_yaffs2 = 1;
227         dev->param.use_nand_ecc = 1;
228         dev->param.n_reserved_blocks = 5;
229         if (chip->ecc.layout->oobavail < sizeof(struct yaffs_packed_tags2))
230                 dev->param.inband_tags =1;
231         dev->param.n_caches = 10;
232         dev->param.write_chunk_tags_fn = nandmtd2_write_chunk_tags;
233         dev->param.read_chunk_tags_fn = nandmtd2_read_chunk_tags;
234         dev->param.erase_fn = nandmtd_EraseBlockInNAND;
235         dev->param.initialise_flash_fn = nandmtd_InitialiseNAND;
236         dev->param.bad_block_fn = nandmtd2_MarkNANDBlockBad;
237         dev->param.query_block_fn = nandmtd2_QueryNANDBlock;
238
239         yaffs_add_device(dev);
240
241         printf("Configures yaffs mount %s: dev %d start block %d, end block %d %s\n",
242                 mp, flash_dev, start_block, end_block,
243                 dev->param.inband_tags ? "using inband tags" : "");
244         return;
245
246 err:
247         free(dev);
248         free(mp);
249 }
250
251 void cmd_yaffs_dev_ls(void)
252 {
253         struct yaffs_dev *dev;
254         int flash_dev;
255         int free_space;
256
257         yaffs_dev_rewind();
258
259         while(1) {
260                 dev = yaffs_next_dev();
261                 if(!dev)
262                         return;
263                 flash_dev =
264                         ((unsigned) dev->driver_context - (unsigned) nand_info)/
265                                 sizeof(nand_info[0]);
266                 printf("%-10s %5d 0x%05x 0x%05x %s",
267                         dev->param.name, flash_dev,
268                         dev->param.start_block, dev->param.end_block,
269                         dev->param.inband_tags ? "using inband tags, " : "");
270
271                 free_space = yaffs_freespace(dev->param.name);
272                 if(free_space < 0)
273                         printf("not mounted\n");
274                 else
275                         printf("free 0x%x\n", free_space);
276
277         }
278 }
279
280 void make_a_file(char *yaffsName,char bval,int sizeOfFile)
281 {
282         int outh;
283         int i;
284         unsigned char buffer[100];
285
286         outh = yaffs_open(yaffsName,
287                                 O_CREAT | O_RDWR | O_TRUNC,
288                                 S_IREAD | S_IWRITE);
289         if (outh < 0) {
290                 printf("Error opening file: %d. %s\n", outh, yaffs_error_str());
291                 return;
292         }
293
294         memset(buffer,bval,100);
295
296         do{
297                 i = sizeOfFile;
298                 if(i > 100) i = 100;
299                 sizeOfFile -= i;
300
301                 yaffs_write(outh,buffer,i);
302
303         } while (sizeOfFile > 0);
304
305
306         yaffs_close(outh);
307 }
308
309 void read_a_file(char *fn)
310 {
311         int h;
312         int i = 0;
313         unsigned char b;
314
315         h = yaffs_open(fn, O_RDWR,0);
316         if(h<0)
317         {
318                 printf("File not found\n");
319                 return;
320         }
321
322         while(yaffs_read(h,&b,1)> 0)
323         {
324                 printf("%02x ",b);
325                 i++;
326                 if(i > 32)
327                 {
328                    printf("\n");
329                    i = 0;;
330                  }
331         }
332         printf("\n");
333         yaffs_close(h);
334 }
335
336 void cmd_yaffs_mount(char *mp)
337 {
338         int retval = yaffs_mount(mp);
339         if( retval < 0)
340                 printf("Error mounting %s, return value: %d, %s\n", mp,
341                         yaffsfs_GetError(), yaffs_error_str());
342 }
343
344
345 void cmd_yaffs_umount(char *mp)
346 {
347         if( yaffs_unmount(mp) == -1)
348                 printf("Error umounting %s, return value: %d, %s\n", mp,
349                         yaffsfs_GetError(), yaffs_error_str());
350 }
351
352 void cmd_yaffs_write_file(char *yaffsName,char bval,int sizeOfFile)
353 {
354         make_a_file(yaffsName,bval,sizeOfFile);
355 }
356
357
358 void cmd_yaffs_read_file(char *fn)
359 {
360         read_a_file(fn);
361 }
362
363
364 void cmd_yaffs_mread_file(char *fn, char *addr)
365 {
366         int h;
367         struct yaffs_stat s;
368
369         yaffs_stat(fn,&s);
370
371         printf ("Copy %s to 0x%p... ", fn, addr);
372         h = yaffs_open(fn, O_RDWR,0);
373         if(h<0)
374         {
375                 printf("File not found\n");
376                 return;
377         }
378
379         yaffs_read(h,addr,(int)s.st_size);
380         printf("\t[DONE]\n");
381
382         yaffs_close(h);
383 }
384
385
386 void cmd_yaffs_mwrite_file(char *fn, char *addr, int size)
387 {
388         int outh;
389
390         outh = yaffs_open(fn, O_CREAT | O_RDWR | O_TRUNC, S_IREAD | S_IWRITE);
391         if (outh < 0)
392         {
393                 printf("Error opening file: %d, %s\n", outh, yaffs_error_str());
394         }
395
396         yaffs_write(outh,addr,size);
397
398         yaffs_close(outh);
399 }
400
401
402 void cmd_yaffs_ls(const char *mountpt, int longlist)
403 {
404         int i;
405         yaffs_DIR *d;
406         yaffs_dirent *de;
407         struct yaffs_stat stat;
408         char tempstr[255];
409
410         d = yaffs_opendir(mountpt);
411
412         if(!d) {
413                 printf("opendir failed, %s\n", yaffs_error_str());
414                 return;
415         }
416
417         for(i = 0; (de = yaffs_readdir(d)) != NULL; i++) {
418                 if (longlist) {
419                         sprintf(tempstr, "%s/%s", mountpt, de->d_name);
420                         yaffs_lstat(tempstr, &stat);
421                         printf("%-25s\t%7ld",
422                                         de->d_name,
423                                         (long)stat.st_size);
424                         printf(" %5d %s\n",
425                                         stat.st_ino,
426                                         yaffs_file_type_str(&stat));
427                 } else {
428                         printf("%s\n",de->d_name);
429                 }
430         }
431
432         yaffs_closedir(d);
433 }
434
435
436 void cmd_yaffs_mkdir(const char *dir)
437 {
438         int retval = yaffs_mkdir(dir, 0);
439
440         if ( retval < 0)
441                 printf("yaffs_mkdir returning error: %d, %s\n",
442                         retval, yaffs_error_str());
443 }
444
445 void cmd_yaffs_rmdir(const char *dir)
446 {
447         int retval = yaffs_rmdir(dir);
448
449         if ( retval < 0)
450                 printf("yaffs_rmdir returning error: %d, %s\n",
451                         retval, yaffs_error_str());
452 }
453
454 void cmd_yaffs_rm(const char *path)
455 {
456         int retval = yaffs_unlink(path);
457
458         if ( retval < 0)
459                 printf("yaffs_unlink returning error: %d, %s\n",
460                         retval, yaffs_error_str());
461 }
462
463 void cmd_yaffs_mv(const char *oldPath, const char *newPath)
464 {
465         int retval = yaffs_rename(newPath, oldPath);
466
467         if ( retval < 0)
468                 printf("yaffs_unlink returning error: %d, %s\n",
469                         retval, yaffs_error_str());
470 }