xref: /openbmc/u-boot/fs/yaffs2/yaffs_yaffs1.c (revision 87a62bce)
1 /*
2  * YAFFS: Yet Another Flash File System. 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 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 #include "yaffs_yaffs1.h"
15 #include "yportenv.h"
16 #include "yaffs_trace.h"
17 #include "yaffs_bitmap.h"
18 #include "yaffs_getblockinfo.h"
19 #include "yaffs_nand.h"
20 #include "yaffs_attribs.h"
21 
22 int yaffs1_scan(struct yaffs_dev *dev)
23 {
24 	struct yaffs_ext_tags tags;
25 	int blk;
26 	int chunk;
27 	int c;
28 	int deleted;
29 	enum yaffs_block_state state;
30 	LIST_HEAD(hard_list);
31 	struct yaffs_block_info *bi;
32 	u32 seq_number;
33 	struct yaffs_obj_hdr *oh;
34 	struct yaffs_obj *in;
35 	struct yaffs_obj *parent;
36 	int alloc_failed = 0;
37 	struct yaffs_shadow_fixer *shadow_fixers = NULL;
38 	u8 *chunk_data;
39 
40 	yaffs_trace(YAFFS_TRACE_SCAN,
41 		"yaffs1_scan starts  intstartblk %d intendblk %d...",
42 		dev->internal_start_block, dev->internal_end_block);
43 
44 	chunk_data = yaffs_get_temp_buffer(dev);
45 
46 	dev->seq_number = YAFFS_LOWEST_SEQUENCE_NUMBER;
47 
48 	/* Scan all the blocks to determine their state */
49 	bi = dev->block_info;
50 	for (blk = dev->internal_start_block; blk <= dev->internal_end_block;
51 	     blk++) {
52 		yaffs_clear_chunk_bits(dev, blk);
53 		bi->pages_in_use = 0;
54 		bi->soft_del_pages = 0;
55 
56 		yaffs_query_init_block_state(dev, blk, &state, &seq_number);
57 
58 		bi->block_state = state;
59 		bi->seq_number = seq_number;
60 
61 		if (bi->seq_number == YAFFS_SEQUENCE_BAD_BLOCK)
62 			bi->block_state = state = YAFFS_BLOCK_STATE_DEAD;
63 
64 		yaffs_trace(YAFFS_TRACE_SCAN_DEBUG,
65 			"Block scanning block %d state %d seq %d",
66 			blk, state, seq_number);
67 
68 		if (state == YAFFS_BLOCK_STATE_DEAD) {
69 			yaffs_trace(YAFFS_TRACE_BAD_BLOCKS,
70 				"block %d is bad", blk);
71 		} else if (state == YAFFS_BLOCK_STATE_EMPTY) {
72 			yaffs_trace(YAFFS_TRACE_SCAN_DEBUG, "Block empty ");
73 			dev->n_erased_blocks++;
74 			dev->n_free_chunks += dev->param.chunks_per_block;
75 		}
76 		bi++;
77 	}
78 
79 	/* For each block.... */
80 	for (blk = dev->internal_start_block;
81 	     !alloc_failed && blk <= dev->internal_end_block; blk++) {
82 
83 		cond_resched();
84 
85 		bi = yaffs_get_block_info(dev, blk);
86 		state = bi->block_state;
87 
88 		deleted = 0;
89 
90 		/* For each chunk in each block that needs scanning.... */
91 		for (c = 0;
92 			!alloc_failed && c < dev->param.chunks_per_block &&
93 			state == YAFFS_BLOCK_STATE_NEEDS_SCAN; c++) {
94 			/* Read the tags and decide what to do */
95 			chunk = blk * dev->param.chunks_per_block + c;
96 
97 			yaffs_rd_chunk_tags_nand(dev, chunk, NULL, &tags);
98 
99 			/* Let's have a good look at this chunk... */
100 
101 			if (tags.ecc_result == YAFFS_ECC_RESULT_UNFIXED ||
102 			    tags.is_deleted) {
103 				/* YAFFS1 only...
104 				 * A deleted chunk
105 				 */
106 				deleted++;
107 				dev->n_free_chunks++;
108 			} else if (!tags.chunk_used) {
109 				/* An unassigned chunk in the block
110 				 * This means that either the block is empty or
111 				 * this is the one being allocated from
112 				 */
113 
114 				if (c == 0) {
115 					/* We're looking at the first chunk in
116 					 *the block so the block is unused */
117 					state = YAFFS_BLOCK_STATE_EMPTY;
118 					dev->n_erased_blocks++;
119 				} else {
120 					/* this is the block being allocated */
121 					yaffs_trace(YAFFS_TRACE_SCAN,
122 						" Allocating from %d %d",
123 						blk, c);
124 					state = YAFFS_BLOCK_STATE_ALLOCATING;
125 					dev->alloc_block = blk;
126 					dev->alloc_page = c;
127 					dev->alloc_block_finder = blk;
128 
129 				}
130 
131 				dev->n_free_chunks +=
132 				    (dev->param.chunks_per_block - c);
133 			} else if (tags.chunk_id > 0) {
134 				/* chunk_id > 0 so it is a data chunk... */
135 				unsigned int endpos;
136 
137 				yaffs_set_chunk_bit(dev, blk, c);
138 				bi->pages_in_use++;
139 
140 				in = yaffs_find_or_create_by_number(dev,
141 							tags.obj_id,
142 							YAFFS_OBJECT_TYPE_FILE);
143 				/* PutChunkIntoFile checks for a clash
144 				 * (two data chunks with the same chunk_id).
145 				 */
146 
147 				if (!in)
148 					alloc_failed = 1;
149 
150 				if (in) {
151 					if (!yaffs_put_chunk_in_file
152 					    (in, tags.chunk_id, chunk, 1))
153 						alloc_failed = 1;
154 				}
155 
156 				endpos =
157 				    (tags.chunk_id - 1) *
158 				    dev->data_bytes_per_chunk +
159 				    tags.n_bytes;
160 				if (in &&
161 				    in->variant_type ==
162 				     YAFFS_OBJECT_TYPE_FILE &&
163 				    in->variant.file_variant.scanned_size <
164 				      endpos) {
165 					in->variant.file_variant.scanned_size =
166 					    endpos;
167 					if (!dev->param.use_header_file_size) {
168 						in->variant.
169 						    file_variant.file_size =
170 						    in->variant.
171 						    file_variant.scanned_size;
172 					}
173 
174 				}
175 			} else {
176 				/* chunk_id == 0, so it is an ObjectHeader.
177 				 * Make the object
178 				 */
179 				yaffs_set_chunk_bit(dev, blk, c);
180 				bi->pages_in_use++;
181 
182 				yaffs_rd_chunk_tags_nand(dev, chunk,
183 							 chunk_data, NULL);
184 
185 				oh = (struct yaffs_obj_hdr *)chunk_data;
186 
187 				in = yaffs_find_by_number(dev, tags.obj_id);
188 				if (in && in->variant_type != oh->type) {
189 					/* This should not happen, but somehow
190 					 * Wev'e ended up with an obj_id that
191 					 * has been reused but not yet deleted,
192 					 * and worse still it has changed type.
193 					 * Delete the old object.
194 					 */
195 
196 					yaffs_del_obj(in);
197 					in = NULL;
198 				}
199 
200 				in = yaffs_find_or_create_by_number(dev,
201 								tags.obj_id,
202 								oh->type);
203 
204 				if (!in)
205 					alloc_failed = 1;
206 
207 				if (in && oh->shadows_obj > 0) {
208 
209 					struct yaffs_shadow_fixer *fixer;
210 					fixer =
211 						kmalloc(sizeof
212 						(struct yaffs_shadow_fixer),
213 						GFP_NOFS);
214 					if (fixer) {
215 						fixer->next = shadow_fixers;
216 						shadow_fixers = fixer;
217 						fixer->obj_id = tags.obj_id;
218 						fixer->shadowed_id =
219 						    oh->shadows_obj;
220 						yaffs_trace(YAFFS_TRACE_SCAN,
221 							" Shadow fixer: %d shadows %d",
222 							fixer->obj_id,
223 							fixer->shadowed_id);
224 
225 					}
226 
227 				}
228 
229 				if (in && in->valid) {
230 					/* We have already filled this one.
231 					 * We have a duplicate and need to
232 					 * resolve it. */
233 
234 					unsigned existing_serial = in->serial;
235 					unsigned new_serial =
236 					    tags.serial_number;
237 
238 					if (((existing_serial + 1) & 3) ==
239 					    new_serial) {
240 						/* Use new one - destroy the
241 						 * exisiting one */
242 						yaffs_chunk_del(dev,
243 								in->hdr_chunk,
244 								1, __LINE__);
245 						in->valid = 0;
246 					} else {
247 						/* Use existing - destroy
248 						 * this one. */
249 						yaffs_chunk_del(dev, chunk, 1,
250 								__LINE__);
251 					}
252 				}
253 
254 				if (in && !in->valid &&
255 				    (tags.obj_id == YAFFS_OBJECTID_ROOT ||
256 				     tags.obj_id ==
257 				     YAFFS_OBJECTID_LOSTNFOUND)) {
258 					/* We only load some info, don't fiddle
259 					 * with directory structure */
260 					in->valid = 1;
261 					in->variant_type = oh->type;
262 
263 					in->yst_mode = oh->yst_mode;
264 					yaffs_load_attribs(in, oh);
265 					in->hdr_chunk = chunk;
266 					in->serial = tags.serial_number;
267 
268 				} else if (in && !in->valid) {
269 					/* we need to load this info */
270 
271 					in->valid = 1;
272 					in->variant_type = oh->type;
273 
274 					in->yst_mode = oh->yst_mode;
275 					yaffs_load_attribs(in, oh);
276 					in->hdr_chunk = chunk;
277 					in->serial = tags.serial_number;
278 
279 					yaffs_set_obj_name_from_oh(in, oh);
280 					in->dirty = 0;
281 
282 					/* directory stuff...
283 					 * hook up to parent
284 					 */
285 
286 					parent =
287 					    yaffs_find_or_create_by_number
288 					    (dev, oh->parent_obj_id,
289 					     YAFFS_OBJECT_TYPE_DIRECTORY);
290 					if (!parent)
291 						alloc_failed = 1;
292 					if (parent && parent->variant_type ==
293 					    YAFFS_OBJECT_TYPE_UNKNOWN) {
294 						/* Set up as a directory */
295 						parent->variant_type =
296 						    YAFFS_OBJECT_TYPE_DIRECTORY;
297 						INIT_LIST_HEAD(&parent->
298 							variant.dir_variant.
299 							children);
300 					} else if (!parent ||
301 						parent->variant_type !=
302 						YAFFS_OBJECT_TYPE_DIRECTORY) {
303 						/* Hoosterman, a problem....
304 						 * We're trying to use a
305 						 * non-directory as a directory
306 						 */
307 
308 						yaffs_trace(YAFFS_TRACE_ERROR,
309 							"yaffs tragedy: attempting to use non-directory as a directory in scan. Put in lost+found."
310 							);
311 						parent = dev->lost_n_found;
312 					}
313 
314 					yaffs_add_obj_to_dir(parent, in);
315 
316 					switch (in->variant_type) {
317 					case YAFFS_OBJECT_TYPE_UNKNOWN:
318 						/* Todo got a problem */
319 						break;
320 					case YAFFS_OBJECT_TYPE_FILE:
321 						if (dev->param.
322 						    use_header_file_size)
323 							in->variant.
324 							file_variant.file_size
325 							= yaffs_oh_to_size(oh);
326 						break;
327 					case YAFFS_OBJECT_TYPE_HARDLINK:
328 						in->variant.
329 						    hardlink_variant.equiv_id =
330 						    oh->equiv_id;
331 						list_add(&in->hard_links,
332 								&hard_list);
333 						break;
334 					case YAFFS_OBJECT_TYPE_DIRECTORY:
335 						/* Do nothing */
336 						break;
337 					case YAFFS_OBJECT_TYPE_SPECIAL:
338 						/* Do nothing */
339 						break;
340 					case YAFFS_OBJECT_TYPE_SYMLINK:
341 						in->variant.symlink_variant.
342 						    alias =
343 						    yaffs_clone_str(oh->alias);
344 						if (!in->variant.
345 						    symlink_variant.alias)
346 							alloc_failed = 1;
347 						break;
348 					}
349 				}
350 			}
351 		}
352 
353 		if (state == YAFFS_BLOCK_STATE_NEEDS_SCAN) {
354 			/* If we got this far while scanning,
355 			 * then the block is fully allocated. */
356 			state = YAFFS_BLOCK_STATE_FULL;
357 		}
358 
359 		if (state == YAFFS_BLOCK_STATE_ALLOCATING) {
360 			/* If the block was partially allocated then
361 			 * treat it as fully allocated. */
362 			state = YAFFS_BLOCK_STATE_FULL;
363 			dev->alloc_block = -1;
364 		}
365 
366 		bi->block_state = state;
367 
368 		/* Now let's see if it was dirty */
369 		if (bi->pages_in_use == 0 &&
370 		    !bi->has_shrink_hdr &&
371 		    bi->block_state == YAFFS_BLOCK_STATE_FULL)
372 			yaffs_block_became_dirty(dev, blk);
373 	}
374 
375 	/* Ok, we've done all the scanning.
376 	 * Fix up the hard link chains.
377 	 * We should now have scanned all the objects, now it's time to add
378 	 * these hardlinks.
379 	 */
380 
381 	yaffs_link_fixup(dev, &hard_list);
382 
383 	/*
384 	 * Fix up any shadowed objects.
385 	 * There should not be more than one of these.
386 	 */
387 	{
388 		struct yaffs_shadow_fixer *fixer;
389 		struct yaffs_obj *obj;
390 
391 		while (shadow_fixers) {
392 			fixer = shadow_fixers;
393 			shadow_fixers = fixer->next;
394 			/* Complete the rename transaction by deleting the
395 			 * shadowed object then setting the object header
396 			 to unshadowed.
397 			 */
398 			obj = yaffs_find_by_number(dev, fixer->shadowed_id);
399 			if (obj)
400 				yaffs_del_obj(obj);
401 
402 			obj = yaffs_find_by_number(dev, fixer->obj_id);
403 
404 			if (obj)
405 				yaffs_update_oh(obj, NULL, 1, 0, 0, NULL);
406 
407 			kfree(fixer);
408 		}
409 	}
410 
411 	yaffs_release_temp_buffer(dev, chunk_data);
412 
413 	if (alloc_failed)
414 		return YAFFS_FAIL;
415 
416 	yaffs_trace(YAFFS_TRACE_SCAN, "yaffs1_scan ends");
417 
418 	return YAFFS_OK;
419 }
420