1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * This file is part of UBIFS.
4 *
5 * Copyright (C) 2006-2008 Nokia Corporation.
6 *
7 * Authors: Adrian Hunter
8 * Artem Bityutskiy (Битюцкий Артём)
9 */
10
11 /*
12 * This file implements TNC (Tree Node Cache) which caches indexing nodes of
13 * the UBIFS B-tree.
14 *
15 * At the moment the locking rules of the TNC tree are quite simple and
16 * straightforward. We just have a mutex and lock it when we traverse the
17 * tree. If a znode is not in memory, we read it from flash while still having
18 * the mutex locked.
19 */
20
21 #include <linux/crc32.h>
22 #include <linux/slab.h>
23 #include "ubifs.h"
24
25 static int try_read_node(const struct ubifs_info *c, void *buf, int type,
26 struct ubifs_zbranch *zbr);
27 static int fallible_read_node(struct ubifs_info *c, const union ubifs_key *key,
28 struct ubifs_zbranch *zbr, void *node);
29
30 /*
31 * Returned codes of 'matches_name()' and 'fallible_matches_name()' functions.
32 * @NAME_LESS: name corresponding to the first argument is less than second
33 * @NAME_MATCHES: names match
34 * @NAME_GREATER: name corresponding to the second argument is greater than
35 * first
36 * @NOT_ON_MEDIA: node referred by zbranch does not exist on the media
37 *
38 * These constants were introduce to improve readability.
39 */
40 enum {
41 NAME_LESS = 0,
42 NAME_MATCHES = 1,
43 NAME_GREATER = 2,
44 NOT_ON_MEDIA = 3,
45 };
46
do_insert_old_idx(struct ubifs_info * c,struct ubifs_old_idx * old_idx)47 static void do_insert_old_idx(struct ubifs_info *c,
48 struct ubifs_old_idx *old_idx)
49 {
50 struct ubifs_old_idx *o;
51 struct rb_node **p, *parent = NULL;
52
53 p = &c->old_idx.rb_node;
54 while (*p) {
55 parent = *p;
56 o = rb_entry(parent, struct ubifs_old_idx, rb);
57 if (old_idx->lnum < o->lnum)
58 p = &(*p)->rb_left;
59 else if (old_idx->lnum > o->lnum)
60 p = &(*p)->rb_right;
61 else if (old_idx->offs < o->offs)
62 p = &(*p)->rb_left;
63 else if (old_idx->offs > o->offs)
64 p = &(*p)->rb_right;
65 else {
66 ubifs_err(c, "old idx added twice!");
67 kfree(old_idx);
68 return;
69 }
70 }
71 rb_link_node(&old_idx->rb, parent, p);
72 rb_insert_color(&old_idx->rb, &c->old_idx);
73 }
74
75 /**
76 * insert_old_idx - record an index node obsoleted since the last commit start.
77 * @c: UBIFS file-system description object
78 * @lnum: LEB number of obsoleted index node
79 * @offs: offset of obsoleted index node
80 *
81 * Returns %0 on success, and a negative error code on failure.
82 *
83 * For recovery, there must always be a complete intact version of the index on
84 * flash at all times. That is called the "old index". It is the index as at the
85 * time of the last successful commit. Many of the index nodes in the old index
86 * may be dirty, but they must not be erased until the next successful commit
87 * (at which point that index becomes the old index).
88 *
89 * That means that the garbage collection and the in-the-gaps method of
90 * committing must be able to determine if an index node is in the old index.
91 * Most of the old index nodes can be found by looking up the TNC using the
92 * 'lookup_znode()' function. However, some of the old index nodes may have
93 * been deleted from the current index or may have been changed so much that
94 * they cannot be easily found. In those cases, an entry is added to an RB-tree.
95 * That is what this function does. The RB-tree is ordered by LEB number and
96 * offset because they uniquely identify the old index node.
97 */
insert_old_idx(struct ubifs_info * c,int lnum,int offs)98 static int insert_old_idx(struct ubifs_info *c, int lnum, int offs)
99 {
100 struct ubifs_old_idx *old_idx;
101
102 old_idx = kmalloc_obj(struct ubifs_old_idx, GFP_NOFS);
103 if (unlikely(!old_idx))
104 return -ENOMEM;
105 old_idx->lnum = lnum;
106 old_idx->offs = offs;
107 do_insert_old_idx(c, old_idx);
108
109 return 0;
110 }
111
112 /**
113 * insert_old_idx_znode - record a znode obsoleted since last commit start.
114 * @c: UBIFS file-system description object
115 * @znode: znode of obsoleted index node
116 *
117 * Returns %0 on success, and a negative error code on failure.
118 */
insert_old_idx_znode(struct ubifs_info * c,struct ubifs_znode * znode)119 int insert_old_idx_znode(struct ubifs_info *c, struct ubifs_znode *znode)
120 {
121 if (znode->parent) {
122 struct ubifs_zbranch *zbr;
123
124 zbr = &znode->parent->zbranch[znode->iip];
125 if (zbr->len)
126 return insert_old_idx(c, zbr->lnum, zbr->offs);
127 } else
128 if (c->zroot.len)
129 return insert_old_idx(c, c->zroot.lnum,
130 c->zroot.offs);
131 return 0;
132 }
133
134 /**
135 * ins_clr_old_idx_znode - record a znode obsoleted since last commit start.
136 * @c: UBIFS file-system description object
137 * @znode: znode of obsoleted index node
138 *
139 * Returns %0 on success, and a negative error code on failure.
140 */
ins_clr_old_idx_znode(struct ubifs_info * c,struct ubifs_znode * znode)141 static int ins_clr_old_idx_znode(struct ubifs_info *c,
142 struct ubifs_znode *znode)
143 {
144 int err;
145
146 if (znode->parent) {
147 struct ubifs_zbranch *zbr;
148
149 zbr = &znode->parent->zbranch[znode->iip];
150 if (zbr->len) {
151 err = insert_old_idx(c, zbr->lnum, zbr->offs);
152 if (err)
153 return err;
154 zbr->lnum = 0;
155 zbr->offs = 0;
156 zbr->len = 0;
157 }
158 } else
159 if (c->zroot.len) {
160 err = insert_old_idx(c, c->zroot.lnum, c->zroot.offs);
161 if (err)
162 return err;
163 c->zroot.lnum = 0;
164 c->zroot.offs = 0;
165 c->zroot.len = 0;
166 }
167 return 0;
168 }
169
170 /**
171 * destroy_old_idx - destroy the old_idx RB-tree.
172 * @c: UBIFS file-system description object
173 *
174 * During start commit, the old_idx RB-tree is used to avoid overwriting index
175 * nodes that were in the index last commit but have since been deleted. This
176 * is necessary for recovery i.e. the old index must be kept intact until the
177 * new index is successfully written. The old-idx RB-tree is used for the
178 * in-the-gaps method of writing index nodes and is destroyed every commit.
179 */
destroy_old_idx(struct ubifs_info * c)180 void destroy_old_idx(struct ubifs_info *c)
181 {
182 struct ubifs_old_idx *old_idx, *n;
183
184 rbtree_postorder_for_each_entry_safe(old_idx, n, &c->old_idx, rb)
185 kfree(old_idx);
186
187 c->old_idx = RB_ROOT;
188 }
189
190 /**
191 * copy_znode - copy a dirty znode.
192 * @c: UBIFS file-system description object
193 * @znode: znode to copy
194 *
195 * A dirty znode being committed may not be changed, so it is copied.
196 */
copy_znode(struct ubifs_info * c,struct ubifs_znode * znode)197 static struct ubifs_znode *copy_znode(struct ubifs_info *c,
198 struct ubifs_znode *znode)
199 {
200 struct ubifs_znode *zn;
201
202 zn = kmemdup(znode, c->max_znode_sz, GFP_NOFS);
203 if (unlikely(!zn))
204 return ERR_PTR(-ENOMEM);
205
206 zn->cnext = NULL;
207 __set_bit(DIRTY_ZNODE, &zn->flags);
208 __clear_bit(COW_ZNODE, &zn->flags);
209
210 return zn;
211 }
212
213 /**
214 * add_idx_dirt - add dirt due to a dirty znode.
215 * @c: UBIFS file-system description object
216 * @lnum: LEB number of index node
217 * @dirt: size of index node
218 *
219 * This function updates lprops dirty space and the new size of the index.
220 */
add_idx_dirt(struct ubifs_info * c,int lnum,int dirt)221 static int add_idx_dirt(struct ubifs_info *c, int lnum, int dirt)
222 {
223 c->calc_idx_sz -= ALIGN(dirt, 8);
224 return ubifs_add_dirt(c, lnum, dirt);
225 }
226
227 /**
228 * replace_znode - replace old znode with new znode.
229 * @c: UBIFS file-system description object
230 * @new_zn: new znode
231 * @old_zn: old znode
232 * @zbr: the branch of parent znode
233 *
234 * Replace old znode with new znode in TNC.
235 */
replace_znode(struct ubifs_info * c,struct ubifs_znode * new_zn,struct ubifs_znode * old_zn,struct ubifs_zbranch * zbr)236 static void replace_znode(struct ubifs_info *c, struct ubifs_znode *new_zn,
237 struct ubifs_znode *old_zn, struct ubifs_zbranch *zbr)
238 {
239 ubifs_assert(c, !ubifs_zn_obsolete(old_zn));
240 __set_bit(OBSOLETE_ZNODE, &old_zn->flags);
241
242 if (old_zn->level != 0) {
243 int i;
244 const int n = new_zn->child_cnt;
245
246 /* The children now have new parent */
247 for (i = 0; i < n; i++) {
248 struct ubifs_zbranch *child = &new_zn->zbranch[i];
249
250 if (child->znode)
251 child->znode->parent = new_zn;
252 }
253 }
254
255 zbr->znode = new_zn;
256 zbr->lnum = 0;
257 zbr->offs = 0;
258 zbr->len = 0;
259
260 atomic_long_inc(&c->dirty_zn_cnt);
261 }
262
263 /**
264 * dirty_cow_znode - ensure a znode is not being committed.
265 * @c: UBIFS file-system description object
266 * @zbr: branch of znode to check
267 *
268 * Returns dirtied znode on success or negative error code on failure.
269 */
dirty_cow_znode(struct ubifs_info * c,struct ubifs_zbranch * zbr)270 static struct ubifs_znode *dirty_cow_znode(struct ubifs_info *c,
271 struct ubifs_zbranch *zbr)
272 {
273 struct ubifs_znode *znode = zbr->znode;
274 struct ubifs_znode *zn;
275 int err;
276
277 if (!ubifs_zn_cow(znode)) {
278 /* znode is not being committed */
279 if (!test_and_set_bit(DIRTY_ZNODE, &znode->flags)) {
280 atomic_long_inc(&c->dirty_zn_cnt);
281 atomic_long_dec(&c->clean_zn_cnt);
282 atomic_long_dec(&ubifs_clean_zn_cnt);
283 err = add_idx_dirt(c, zbr->lnum, zbr->len);
284 if (unlikely(err))
285 return ERR_PTR(err);
286 }
287 return znode;
288 }
289
290 zn = copy_znode(c, znode);
291 if (IS_ERR(zn))
292 return zn;
293
294 if (zbr->len) {
295 struct ubifs_old_idx *old_idx;
296
297 old_idx = kmalloc_obj(struct ubifs_old_idx, GFP_NOFS);
298 if (unlikely(!old_idx)) {
299 err = -ENOMEM;
300 goto out;
301 }
302 old_idx->lnum = zbr->lnum;
303 old_idx->offs = zbr->offs;
304
305 err = add_idx_dirt(c, zbr->lnum, zbr->len);
306 if (err) {
307 kfree(old_idx);
308 goto out;
309 }
310
311 do_insert_old_idx(c, old_idx);
312 }
313
314 replace_znode(c, zn, znode, zbr);
315
316 return zn;
317
318 out:
319 kfree(zn);
320 return ERR_PTR(err);
321 }
322
323 /**
324 * lnc_add - add a leaf node to the leaf node cache.
325 * @c: UBIFS file-system description object
326 * @zbr: zbranch of leaf node
327 * @node: leaf node
328 *
329 * Leaf nodes are non-index nodes directory entry nodes or data nodes. The
330 * purpose of the leaf node cache is to save re-reading the same leaf node over
331 * and over again. Most things are cached by VFS, however the file system must
332 * cache directory entries for readdir and for resolving hash collisions. The
333 * present implementation of the leaf node cache is extremely simple, and
334 * allows for error returns that are not used but that may be needed if a more
335 * complex implementation is created.
336 *
337 * Note, this function does not add the @node object to LNC directly, but
338 * allocates a copy of the object and adds the copy to LNC. The reason for this
339 * is that @node has been allocated outside of the TNC subsystem and will be
340 * used with @c->tnc_mutex unlock upon return from the TNC subsystem. But LNC
341 * may be changed at any time, e.g. freed by the shrinker.
342 */
lnc_add(struct ubifs_info * c,struct ubifs_zbranch * zbr,const void * node)343 static int lnc_add(struct ubifs_info *c, struct ubifs_zbranch *zbr,
344 const void *node)
345 {
346 int err;
347 void *lnc_node;
348 const struct ubifs_dent_node *dent = node;
349
350 ubifs_assert(c, !zbr->leaf);
351 ubifs_assert(c, zbr->len != 0);
352 ubifs_assert(c, is_hash_key(c, &zbr->key));
353
354 err = ubifs_validate_entry(c, dent);
355 if (err) {
356 dump_stack();
357 ubifs_dump_node(c, dent, zbr->len);
358 return err;
359 }
360
361 lnc_node = kmemdup(node, zbr->len, GFP_NOFS);
362 if (!lnc_node)
363 /* We don't have to have the cache, so no error */
364 return 0;
365
366 zbr->leaf = lnc_node;
367 return 0;
368 }
369
370 /**
371 * lnc_add_directly - add a leaf node to the leaf-node-cache.
372 * @c: UBIFS file-system description object
373 * @zbr: zbranch of leaf node
374 * @node: leaf node
375 *
376 * This function is similar to 'lnc_add()', but it does not create a copy of
377 * @node but inserts @node to TNC directly.
378 */
lnc_add_directly(struct ubifs_info * c,struct ubifs_zbranch * zbr,void * node)379 static int lnc_add_directly(struct ubifs_info *c, struct ubifs_zbranch *zbr,
380 void *node)
381 {
382 int err;
383
384 ubifs_assert(c, !zbr->leaf);
385 ubifs_assert(c, zbr->len != 0);
386
387 err = ubifs_validate_entry(c, node);
388 if (err) {
389 dump_stack();
390 ubifs_dump_node(c, node, zbr->len);
391 return err;
392 }
393
394 zbr->leaf = node;
395 return 0;
396 }
397
398 /**
399 * lnc_free - remove a leaf node from the leaf node cache.
400 * @zbr: zbranch of leaf node
401 */
lnc_free(struct ubifs_zbranch * zbr)402 static void lnc_free(struct ubifs_zbranch *zbr)
403 {
404 if (!zbr->leaf)
405 return;
406 kfree(zbr->leaf);
407 zbr->leaf = NULL;
408 }
409
410 /**
411 * tnc_read_hashed_node - read a "hashed" leaf node.
412 * @c: UBIFS file-system description object
413 * @zbr: key and position of the node
414 * @node: node is returned here
415 *
416 * This function reads a "hashed" node defined by @zbr from the leaf node cache
417 * (in it is there) or from the hash media, in which case the node is also
418 * added to LNC. Returns zero in case of success or a negative error
419 * code in case of failure.
420 */
tnc_read_hashed_node(struct ubifs_info * c,struct ubifs_zbranch * zbr,void * node)421 static int tnc_read_hashed_node(struct ubifs_info *c, struct ubifs_zbranch *zbr,
422 void *node)
423 {
424 int err;
425
426 ubifs_assert(c, is_hash_key(c, &zbr->key));
427
428 if (zbr->leaf) {
429 /* Read from the leaf node cache */
430 ubifs_assert(c, zbr->len != 0);
431 memcpy(node, zbr->leaf, zbr->len);
432 return 0;
433 }
434
435 if (c->replaying) {
436 err = fallible_read_node(c, &zbr->key, zbr, node);
437 /*
438 * When the node was not found, return -ENOENT, 0 otherwise.
439 * Negative return codes stay as-is.
440 */
441 if (err == 0)
442 err = -ENOENT;
443 else if (err == 1)
444 err = 0;
445 } else {
446 err = ubifs_tnc_read_node(c, zbr, node);
447 }
448 if (err)
449 return err;
450
451 /* Add the node to the leaf node cache */
452 err = lnc_add(c, zbr, node);
453 return err;
454 }
455
456 /**
457 * try_read_node - read a node if it is a node.
458 * @c: UBIFS file-system description object
459 * @buf: buffer to read to
460 * @type: node type
461 * @zbr: the zbranch describing the node to read
462 *
463 * This function tries to read a node of known type and length, checks it and
464 * stores it in @buf. This function returns %1 if a node is present and %0 if
465 * a node is not present. A negative error code is returned for I/O errors.
466 * This function performs that same function as ubifs_read_node except that
467 * it does not require that there is actually a node present and instead
468 * the return code indicates if a node was read.
469 *
470 * Note, this function does not check CRC of data nodes if @c->no_chk_data_crc
471 * is true (it is controlled by corresponding mount option). However, if
472 * @c->mounting or @c->remounting_rw is true (we are mounting or re-mounting to
473 * R/W mode), @c->no_chk_data_crc is ignored and CRC is checked. This is
474 * because during mounting or re-mounting from R/O mode to R/W mode we may read
475 * journal nodes (when replying the journal or doing the recovery) and the
476 * journal nodes may potentially be corrupted, so checking is required.
477 */
try_read_node(const struct ubifs_info * c,void * buf,int type,struct ubifs_zbranch * zbr)478 static int try_read_node(const struct ubifs_info *c, void *buf, int type,
479 struct ubifs_zbranch *zbr)
480 {
481 int len = zbr->len;
482 int lnum = zbr->lnum;
483 int offs = zbr->offs;
484 int err, node_len;
485 struct ubifs_ch *ch = buf;
486 uint32_t crc, node_crc;
487
488 dbg_io("LEB %d:%d, %s, length %d", lnum, offs, dbg_ntype(type), len);
489
490 err = ubifs_leb_read(c, lnum, buf, offs, len, 1);
491 if (err) {
492 ubifs_err(c, "cannot read node type %d from LEB %d:%d, error %d",
493 type, lnum, offs, err);
494 return err;
495 }
496
497 if (le32_to_cpu(ch->magic) != UBIFS_NODE_MAGIC)
498 return 0;
499
500 if (ch->node_type != type)
501 return 0;
502
503 node_len = le32_to_cpu(ch->len);
504 if (node_len != len)
505 return 0;
506
507 if (type != UBIFS_DATA_NODE || !c->no_chk_data_crc || c->mounting ||
508 c->remounting_rw) {
509 crc = crc32(UBIFS_CRC32_INIT, buf + 8, node_len - 8);
510 node_crc = le32_to_cpu(ch->crc);
511 if (crc != node_crc)
512 return 0;
513 }
514
515 err = ubifs_node_check_hash(c, buf, zbr->hash);
516 if (err) {
517 ubifs_bad_hash(c, buf, zbr->hash, lnum, offs);
518 return 0;
519 }
520
521 return 1;
522 }
523
524 /**
525 * fallible_read_node - try to read a leaf node.
526 * @c: UBIFS file-system description object
527 * @key: key of node to read
528 * @zbr: position of node
529 * @node: node returned
530 *
531 * This function tries to read a node and returns %1 if the node is read, %0
532 * if the node is not present, and a negative error code in the case of error.
533 */
fallible_read_node(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_zbranch * zbr,void * node)534 static int fallible_read_node(struct ubifs_info *c, const union ubifs_key *key,
535 struct ubifs_zbranch *zbr, void *node)
536 {
537 int ret;
538
539 dbg_tnck(key, "LEB %d:%d, key ", zbr->lnum, zbr->offs);
540
541 ret = try_read_node(c, node, key_type(c, key), zbr);
542 if (ret == 1) {
543 union ubifs_key node_key;
544 struct ubifs_dent_node *dent = node;
545
546 /* All nodes have key in the same place */
547 key_read(c, &dent->key, &node_key);
548 if (keys_cmp(c, key, &node_key) != 0)
549 ret = 0;
550 }
551 if (ret == 0 && c->replaying)
552 dbg_mntk(key, "dangling branch LEB %d:%d len %d, key ",
553 zbr->lnum, zbr->offs, zbr->len);
554 return ret;
555 }
556
557 /**
558 * matches_name - determine if a direntry or xattr entry matches a given name.
559 * @c: UBIFS file-system description object
560 * @zbr: zbranch of dent
561 * @nm: name to match
562 *
563 * This function checks if xentry/direntry referred by zbranch @zbr matches name
564 * @nm. Returns %NAME_MATCHES if it does, %NAME_LESS if the name referred by
565 * @zbr is less than @nm, and %NAME_GREATER if it is greater than @nm. In case
566 * of failure, a negative error code is returned.
567 */
matches_name(struct ubifs_info * c,struct ubifs_zbranch * zbr,const struct fscrypt_name * nm)568 static int matches_name(struct ubifs_info *c, struct ubifs_zbranch *zbr,
569 const struct fscrypt_name *nm)
570 {
571 struct ubifs_dent_node *dent;
572 int nlen, err;
573
574 /* If possible, match against the dent in the leaf node cache */
575 if (!zbr->leaf) {
576 dent = kmalloc(zbr->len, GFP_NOFS);
577 if (!dent)
578 return -ENOMEM;
579
580 err = ubifs_tnc_read_node(c, zbr, dent);
581 if (err)
582 goto out_free;
583
584 /* Add the node to the leaf node cache */
585 err = lnc_add_directly(c, zbr, dent);
586 if (err)
587 goto out_free;
588 } else
589 dent = zbr->leaf;
590
591 nlen = le16_to_cpu(dent->nlen);
592 err = memcmp(dent->name, fname_name(nm), min_t(int, nlen, fname_len(nm)));
593 if (err == 0) {
594 if (nlen == fname_len(nm))
595 return NAME_MATCHES;
596 else if (nlen < fname_len(nm))
597 return NAME_LESS;
598 else
599 return NAME_GREATER;
600 } else if (err < 0)
601 return NAME_LESS;
602 else
603 return NAME_GREATER;
604
605 out_free:
606 kfree(dent);
607 return err;
608 }
609
610 /**
611 * get_znode - get a TNC znode that may not be loaded yet.
612 * @c: UBIFS file-system description object
613 * @znode: parent znode
614 * @n: znode branch slot number
615 *
616 * This function returns the znode or a negative error code.
617 */
get_znode(struct ubifs_info * c,struct ubifs_znode * znode,int n)618 static struct ubifs_znode *get_znode(struct ubifs_info *c,
619 struct ubifs_znode *znode, int n)
620 {
621 struct ubifs_zbranch *zbr;
622
623 zbr = &znode->zbranch[n];
624 if (zbr->znode)
625 znode = zbr->znode;
626 else
627 znode = ubifs_load_znode(c, zbr, znode, n);
628 return znode;
629 }
630
631 /**
632 * tnc_next - find next TNC entry.
633 * @c: UBIFS file-system description object
634 * @zn: znode is passed and returned here
635 * @n: znode branch slot number is passed and returned here
636 *
637 * This function returns %0 if the next TNC entry is found, %-ENOENT if there is
638 * no next entry, or a negative error code otherwise.
639 */
tnc_next(struct ubifs_info * c,struct ubifs_znode ** zn,int * n)640 static int tnc_next(struct ubifs_info *c, struct ubifs_znode **zn, int *n)
641 {
642 struct ubifs_znode *znode = *zn;
643 int nn = *n;
644
645 nn += 1;
646 if (nn < znode->child_cnt) {
647 *n = nn;
648 return 0;
649 }
650 while (1) {
651 struct ubifs_znode *zp;
652
653 zp = znode->parent;
654 if (!zp)
655 return -ENOENT;
656 nn = znode->iip + 1;
657 znode = zp;
658 if (nn < znode->child_cnt) {
659 znode = get_znode(c, znode, nn);
660 if (IS_ERR(znode))
661 return PTR_ERR(znode);
662 while (znode->level != 0) {
663 znode = get_znode(c, znode, 0);
664 if (IS_ERR(znode))
665 return PTR_ERR(znode);
666 }
667 nn = 0;
668 break;
669 }
670 }
671 *zn = znode;
672 *n = nn;
673 return 0;
674 }
675
676 /**
677 * tnc_prev - find previous TNC entry.
678 * @c: UBIFS file-system description object
679 * @zn: znode is returned here
680 * @n: znode branch slot number is passed and returned here
681 *
682 * This function returns %0 if the previous TNC entry is found, %-ENOENT if
683 * there is no next entry, or a negative error code otherwise.
684 */
tnc_prev(struct ubifs_info * c,struct ubifs_znode ** zn,int * n)685 static int tnc_prev(struct ubifs_info *c, struct ubifs_znode **zn, int *n)
686 {
687 struct ubifs_znode *znode = *zn;
688 int nn = *n;
689
690 if (nn > 0) {
691 *n = nn - 1;
692 return 0;
693 }
694 while (1) {
695 struct ubifs_znode *zp;
696
697 zp = znode->parent;
698 if (!zp)
699 return -ENOENT;
700 nn = znode->iip - 1;
701 znode = zp;
702 if (nn >= 0) {
703 znode = get_znode(c, znode, nn);
704 if (IS_ERR(znode))
705 return PTR_ERR(znode);
706 while (znode->level != 0) {
707 nn = znode->child_cnt - 1;
708 znode = get_znode(c, znode, nn);
709 if (IS_ERR(znode))
710 return PTR_ERR(znode);
711 }
712 nn = znode->child_cnt - 1;
713 break;
714 }
715 }
716 *zn = znode;
717 *n = nn;
718 return 0;
719 }
720
721 /**
722 * resolve_collision - resolve a collision.
723 * @c: UBIFS file-system description object
724 * @key: key of a directory or extended attribute entry
725 * @zn: znode is returned here
726 * @n: zbranch number is passed and returned here
727 * @nm: name of the entry
728 *
729 * This function is called for "hashed" keys to make sure that the found key
730 * really corresponds to the looked up node (directory or extended attribute
731 * entry). It returns %1 and sets @zn and @n if the collision is resolved.
732 * %0 is returned if @nm is not found and @zn and @n are set to the previous
733 * entry, i.e. to the entry after which @nm could follow if it were in TNC.
734 * This means that @n may be set to %-1 if the leftmost key in @zn is the
735 * previous one. A negative error code is returned on failures.
736 */
resolve_collision(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_znode ** zn,int * n,const struct fscrypt_name * nm)737 static int resolve_collision(struct ubifs_info *c, const union ubifs_key *key,
738 struct ubifs_znode **zn, int *n,
739 const struct fscrypt_name *nm)
740 {
741 int err;
742
743 err = matches_name(c, &(*zn)->zbranch[*n], nm);
744 if (unlikely(err < 0))
745 return err;
746 if (err == NAME_MATCHES)
747 return 1;
748
749 if (err == NAME_GREATER) {
750 /* Look left */
751 while (1) {
752 err = tnc_prev(c, zn, n);
753 if (err == -ENOENT) {
754 ubifs_assert(c, *n == 0);
755 *n = -1;
756 return 0;
757 }
758 if (err < 0)
759 return err;
760 if (keys_cmp(c, &(*zn)->zbranch[*n].key, key)) {
761 /*
762 * We have found the branch after which we would
763 * like to insert, but inserting in this znode
764 * may still be wrong. Consider the following 3
765 * znodes, in the case where we are resolving a
766 * collision with Key2.
767 *
768 * znode zp
769 * ----------------------
770 * level 1 | Key0 | Key1 |
771 * -----------------------
772 * | |
773 * znode za | | znode zb
774 * ------------ ------------
775 * level 0 | Key0 | | Key2 |
776 * ------------ ------------
777 *
778 * The lookup finds Key2 in znode zb. Lets say
779 * there is no match and the name is greater so
780 * we look left. When we find Key0, we end up
781 * here. If we return now, we will insert into
782 * znode za at slot n = 1. But that is invalid
783 * according to the parent's keys. Key2 must
784 * be inserted into znode zb.
785 *
786 * Note, this problem is not relevant for the
787 * case when we go right, because
788 * 'tnc_insert()' would correct the parent key.
789 */
790 if (*n == (*zn)->child_cnt - 1) {
791 err = tnc_next(c, zn, n);
792 if (err) {
793 /* Should be impossible */
794 ubifs_assert(c, 0);
795 if (err == -ENOENT)
796 err = -EINVAL;
797 return err;
798 }
799 ubifs_assert(c, *n == 0);
800 *n = -1;
801 }
802 return 0;
803 }
804 err = matches_name(c, &(*zn)->zbranch[*n], nm);
805 if (err < 0)
806 return err;
807 if (err == NAME_LESS)
808 return 0;
809 if (err == NAME_MATCHES)
810 return 1;
811 ubifs_assert(c, err == NAME_GREATER);
812 }
813 } else {
814 int nn = *n;
815 struct ubifs_znode *znode = *zn;
816
817 /* Look right */
818 while (1) {
819 err = tnc_next(c, &znode, &nn);
820 if (err == -ENOENT)
821 return 0;
822 if (err < 0)
823 return err;
824 if (keys_cmp(c, &znode->zbranch[nn].key, key))
825 return 0;
826 err = matches_name(c, &znode->zbranch[nn], nm);
827 if (err < 0)
828 return err;
829 if (err == NAME_GREATER)
830 return 0;
831 *zn = znode;
832 *n = nn;
833 if (err == NAME_MATCHES)
834 return 1;
835 ubifs_assert(c, err == NAME_LESS);
836 }
837 }
838 }
839
840 /**
841 * fallible_matches_name - determine if a dent matches a given name.
842 * @c: UBIFS file-system description object
843 * @zbr: zbranch of dent
844 * @nm: name to match
845 *
846 * This is a "fallible" version of 'matches_name()' function which does not
847 * panic if the direntry/xentry referred by @zbr does not exist on the media.
848 *
849 * This function checks if xentry/direntry referred by zbranch @zbr matches name
850 * @nm. Returns %NAME_MATCHES it does, %NAME_LESS if the name referred by @zbr
851 * is less than @nm, %NAME_GREATER if it is greater than @nm, and @NOT_ON_MEDIA
852 * if xentry/direntry referred by @zbr does not exist on the media. A negative
853 * error code is returned in case of failure.
854 */
fallible_matches_name(struct ubifs_info * c,struct ubifs_zbranch * zbr,const struct fscrypt_name * nm)855 static int fallible_matches_name(struct ubifs_info *c,
856 struct ubifs_zbranch *zbr,
857 const struct fscrypt_name *nm)
858 {
859 struct ubifs_dent_node *dent;
860 int nlen, err;
861
862 /* If possible, match against the dent in the leaf node cache */
863 if (!zbr->leaf) {
864 dent = kmalloc(zbr->len, GFP_NOFS);
865 if (!dent)
866 return -ENOMEM;
867
868 err = fallible_read_node(c, &zbr->key, zbr, dent);
869 if (err < 0)
870 goto out_free;
871 if (err == 0) {
872 /* The node was not present */
873 err = NOT_ON_MEDIA;
874 goto out_free;
875 }
876 ubifs_assert(c, err == 1);
877
878 err = lnc_add_directly(c, zbr, dent);
879 if (err)
880 goto out_free;
881 } else
882 dent = zbr->leaf;
883
884 nlen = le16_to_cpu(dent->nlen);
885 err = memcmp(dent->name, fname_name(nm), min_t(int, nlen, fname_len(nm)));
886 if (err == 0) {
887 if (nlen == fname_len(nm))
888 return NAME_MATCHES;
889 else if (nlen < fname_len(nm))
890 return NAME_LESS;
891 else
892 return NAME_GREATER;
893 } else if (err < 0)
894 return NAME_LESS;
895 else
896 return NAME_GREATER;
897
898 out_free:
899 kfree(dent);
900 return err;
901 }
902
903 /**
904 * fallible_resolve_collision - resolve a collision even if nodes are missing.
905 * @c: UBIFS file-system description object
906 * @key: key
907 * @zn: znode is returned here
908 * @n: branch number is passed and returned here
909 * @nm: name of directory entry
910 * @adding: indicates caller is adding a key to the TNC
911 *
912 * This is a "fallible" version of the 'resolve_collision()' function which
913 * does not panic if one of the nodes referred to by TNC does not exist on the
914 * media. This may happen when replaying the journal if a deleted node was
915 * Garbage-collected and the commit was not done. A branch that refers to a node
916 * that is not present is called a dangling branch. The following are the return
917 * codes for this function:
918 * o if @nm was found, %1 is returned and @zn and @n are set to the found
919 * branch;
920 * o if we are @adding and @nm was not found, %0 is returned;
921 * o if we are not @adding and @nm was not found, but a dangling branch was
922 * found, then %1 is returned and @zn and @n are set to the dangling branch;
923 * o a negative error code is returned in case of failure.
924 */
fallible_resolve_collision(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_znode ** zn,int * n,const struct fscrypt_name * nm,int adding)925 static int fallible_resolve_collision(struct ubifs_info *c,
926 const union ubifs_key *key,
927 struct ubifs_znode **zn, int *n,
928 const struct fscrypt_name *nm,
929 int adding)
930 {
931 struct ubifs_znode *o_znode = NULL, *znode = *zn;
932 int o_n, err, cmp, unsure = 0, nn = *n;
933
934 cmp = fallible_matches_name(c, &znode->zbranch[nn], nm);
935 if (unlikely(cmp < 0))
936 return cmp;
937 if (cmp == NAME_MATCHES)
938 return 1;
939 if (cmp == NOT_ON_MEDIA) {
940 o_znode = znode;
941 o_n = nn;
942 /*
943 * We are unlucky and hit a dangling branch straight away.
944 * Now we do not really know where to go to find the needed
945 * branch - to the left or to the right. Well, let's try left.
946 */
947 unsure = 1;
948 } else if (!adding)
949 unsure = 1; /* Remove a dangling branch wherever it is */
950
951 if (cmp == NAME_GREATER || unsure) {
952 /* Look left */
953 while (1) {
954 err = tnc_prev(c, zn, n);
955 if (err == -ENOENT) {
956 ubifs_assert(c, *n == 0);
957 *n = -1;
958 break;
959 }
960 if (err < 0)
961 return err;
962 if (keys_cmp(c, &(*zn)->zbranch[*n].key, key)) {
963 /* See comments in 'resolve_collision()' */
964 if (*n == (*zn)->child_cnt - 1) {
965 err = tnc_next(c, zn, n);
966 if (err) {
967 /* Should be impossible */
968 ubifs_assert(c, 0);
969 if (err == -ENOENT)
970 err = -EINVAL;
971 return err;
972 }
973 ubifs_assert(c, *n == 0);
974 *n = -1;
975 }
976 break;
977 }
978 err = fallible_matches_name(c, &(*zn)->zbranch[*n], nm);
979 if (err < 0)
980 return err;
981 if (err == NAME_MATCHES)
982 return 1;
983 if (err == NOT_ON_MEDIA) {
984 o_znode = *zn;
985 o_n = *n;
986 continue;
987 }
988 if (!adding)
989 continue;
990 if (err == NAME_LESS)
991 break;
992 else
993 unsure = 0;
994 }
995 }
996
997 if (cmp == NAME_LESS || unsure) {
998 /* Look right */
999 *zn = znode;
1000 *n = nn;
1001 while (1) {
1002 err = tnc_next(c, &znode, &nn);
1003 if (err == -ENOENT)
1004 break;
1005 if (err < 0)
1006 return err;
1007 if (keys_cmp(c, &znode->zbranch[nn].key, key))
1008 break;
1009 err = fallible_matches_name(c, &znode->zbranch[nn], nm);
1010 if (err < 0)
1011 return err;
1012 if (err == NAME_GREATER)
1013 break;
1014 *zn = znode;
1015 *n = nn;
1016 if (err == NAME_MATCHES)
1017 return 1;
1018 if (err == NOT_ON_MEDIA) {
1019 o_znode = znode;
1020 o_n = nn;
1021 }
1022 }
1023 }
1024
1025 /* Never match a dangling branch when adding */
1026 if (adding || !o_znode)
1027 return 0;
1028
1029 dbg_mntk(key, "dangling match LEB %d:%d len %d key ",
1030 o_znode->zbranch[o_n].lnum, o_znode->zbranch[o_n].offs,
1031 o_znode->zbranch[o_n].len);
1032 *zn = o_znode;
1033 *n = o_n;
1034 return 1;
1035 }
1036
1037 /**
1038 * matches_position - determine if a zbranch matches a given position.
1039 * @zbr: zbranch of dent
1040 * @lnum: LEB number of dent to match
1041 * @offs: offset of dent to match
1042 *
1043 * This function returns %1 if @lnum:@offs matches, and %0 otherwise.
1044 */
matches_position(struct ubifs_zbranch * zbr,int lnum,int offs)1045 static int matches_position(struct ubifs_zbranch *zbr, int lnum, int offs)
1046 {
1047 if (zbr->lnum == lnum && zbr->offs == offs)
1048 return 1;
1049 else
1050 return 0;
1051 }
1052
1053 /**
1054 * resolve_collision_directly - resolve a collision directly.
1055 * @c: UBIFS file-system description object
1056 * @key: key of directory entry
1057 * @zn: znode is passed and returned here
1058 * @n: zbranch number is passed and returned here
1059 * @lnum: LEB number of dent node to match
1060 * @offs: offset of dent node to match
1061 *
1062 * This function is used for "hashed" keys to make sure the found directory or
1063 * extended attribute entry node is what was looked for. It is used when the
1064 * flash address of the right node is known (@lnum:@offs) which makes it much
1065 * easier to resolve collisions (no need to read entries and match full
1066 * names). This function returns %1 and sets @zn and @n if the collision is
1067 * resolved, %0 if @lnum:@offs is not found and @zn and @n are set to the
1068 * previous directory entry. Otherwise a negative error code is returned.
1069 */
resolve_collision_directly(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_znode ** zn,int * n,int lnum,int offs)1070 static int resolve_collision_directly(struct ubifs_info *c,
1071 const union ubifs_key *key,
1072 struct ubifs_znode **zn, int *n,
1073 int lnum, int offs)
1074 {
1075 struct ubifs_znode *znode;
1076 int nn, err;
1077
1078 znode = *zn;
1079 nn = *n;
1080 if (matches_position(&znode->zbranch[nn], lnum, offs))
1081 return 1;
1082
1083 /* Look left */
1084 while (1) {
1085 err = tnc_prev(c, &znode, &nn);
1086 if (err == -ENOENT)
1087 break;
1088 if (err < 0)
1089 return err;
1090 if (keys_cmp(c, &znode->zbranch[nn].key, key))
1091 break;
1092 if (matches_position(&znode->zbranch[nn], lnum, offs)) {
1093 *zn = znode;
1094 *n = nn;
1095 return 1;
1096 }
1097 }
1098
1099 /* Look right */
1100 znode = *zn;
1101 nn = *n;
1102 while (1) {
1103 err = tnc_next(c, &znode, &nn);
1104 if (err == -ENOENT)
1105 return 0;
1106 if (err < 0)
1107 return err;
1108 if (keys_cmp(c, &znode->zbranch[nn].key, key))
1109 return 0;
1110 *zn = znode;
1111 *n = nn;
1112 if (matches_position(&znode->zbranch[nn], lnum, offs))
1113 return 1;
1114 }
1115 }
1116
1117 /**
1118 * dirty_cow_bottom_up - dirty a znode and its ancestors.
1119 * @c: UBIFS file-system description object
1120 * @znode: znode to dirty
1121 *
1122 * If we do not have a unique key that resides in a znode, then we cannot
1123 * dirty that znode from the top down (i.e. by using lookup_level0_dirty)
1124 * This function records the path back to the last dirty ancestor, and then
1125 * dirties the znodes on that path.
1126 */
dirty_cow_bottom_up(struct ubifs_info * c,struct ubifs_znode * znode)1127 static struct ubifs_znode *dirty_cow_bottom_up(struct ubifs_info *c,
1128 struct ubifs_znode *znode)
1129 {
1130 struct ubifs_znode *zp;
1131 int *path = c->bottom_up_buf, p = 0;
1132
1133 ubifs_assert(c, c->zroot.znode);
1134 ubifs_assert(c, znode);
1135 if (c->zroot.znode->level > BOTTOM_UP_HEIGHT) {
1136 kfree(c->bottom_up_buf);
1137 c->bottom_up_buf = kmalloc_objs(int, c->zroot.znode->level,
1138 GFP_NOFS);
1139 if (!c->bottom_up_buf)
1140 return ERR_PTR(-ENOMEM);
1141 path = c->bottom_up_buf;
1142 }
1143 if (c->zroot.znode->level) {
1144 /* Go up until parent is dirty */
1145 while (1) {
1146 int n;
1147
1148 zp = znode->parent;
1149 if (!zp)
1150 break;
1151 n = znode->iip;
1152 ubifs_assert(c, p < c->zroot.znode->level);
1153 path[p++] = n;
1154 if (!zp->cnext && ubifs_zn_dirty(znode))
1155 break;
1156 znode = zp;
1157 }
1158 }
1159
1160 /* Come back down, dirtying as we go */
1161 while (1) {
1162 struct ubifs_zbranch *zbr;
1163
1164 zp = znode->parent;
1165 if (zp) {
1166 ubifs_assert(c, path[p - 1] >= 0);
1167 ubifs_assert(c, path[p - 1] < zp->child_cnt);
1168 zbr = &zp->zbranch[path[--p]];
1169 znode = dirty_cow_znode(c, zbr);
1170 } else {
1171 ubifs_assert(c, znode == c->zroot.znode);
1172 znode = dirty_cow_znode(c, &c->zroot);
1173 }
1174 if (IS_ERR(znode) || !p)
1175 break;
1176 ubifs_assert(c, path[p - 1] >= 0);
1177 ubifs_assert(c, path[p - 1] < znode->child_cnt);
1178 znode = znode->zbranch[path[p - 1]].znode;
1179 }
1180
1181 return znode;
1182 }
1183
1184 /**
1185 * ubifs_lookup_level0 - search for zero-level znode.
1186 * @c: UBIFS file-system description object
1187 * @key: key to lookup
1188 * @zn: znode is returned here
1189 * @n: znode branch slot number is returned here
1190 *
1191 * This function looks up the TNC tree and search for zero-level znode which
1192 * refers key @key. The found zero-level znode is returned in @zn. There are 3
1193 * cases:
1194 * o exact match, i.e. the found zero-level znode contains key @key, then %1
1195 * is returned and slot number of the matched branch is stored in @n;
1196 * o not exact match, which means that zero-level znode does not contain
1197 * @key, then %0 is returned and slot number of the closest branch or %-1
1198 * is stored in @n; In this case calling tnc_next() is mandatory.
1199 * o @key is so small that it is even less than the lowest key of the
1200 * leftmost zero-level node, then %0 is returned and %0 is stored in @n.
1201 *
1202 * Note, when the TNC tree is traversed, some znodes may be absent, then this
1203 * function reads corresponding indexing nodes and inserts them to TNC. In
1204 * case of failure, a negative error code is returned.
1205 */
ubifs_lookup_level0(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_znode ** zn,int * n)1206 int ubifs_lookup_level0(struct ubifs_info *c, const union ubifs_key *key,
1207 struct ubifs_znode **zn, int *n)
1208 {
1209 int err, exact;
1210 struct ubifs_znode *znode;
1211 time64_t time = ktime_get_seconds();
1212
1213 dbg_tnck(key, "search key ");
1214 ubifs_assert(c, key_type(c, key) < UBIFS_INVALID_KEY);
1215
1216 znode = c->zroot.znode;
1217 if (unlikely(!znode)) {
1218 znode = ubifs_load_znode(c, &c->zroot, NULL, 0);
1219 if (IS_ERR(znode))
1220 return PTR_ERR(znode);
1221 }
1222
1223 znode->time = time;
1224
1225 while (1) {
1226 struct ubifs_zbranch *zbr;
1227
1228 exact = ubifs_search_zbranch(c, znode, key, n);
1229
1230 if (znode->level == 0)
1231 break;
1232
1233 if (*n < 0)
1234 *n = 0;
1235 zbr = &znode->zbranch[*n];
1236
1237 if (zbr->znode) {
1238 znode->time = time;
1239 znode = zbr->znode;
1240 continue;
1241 }
1242
1243 /* znode is not in TNC cache, load it from the media */
1244 znode = ubifs_load_znode(c, zbr, znode, *n);
1245 if (IS_ERR(znode))
1246 return PTR_ERR(znode);
1247 }
1248
1249 *zn = znode;
1250 if (exact || !is_hash_key(c, key) || *n != -1) {
1251 dbg_tnc("found %d, lvl %d, n %d", exact, znode->level, *n);
1252 return exact;
1253 }
1254
1255 /*
1256 * Here is a tricky place. We have not found the key and this is a
1257 * "hashed" key, which may collide. The rest of the code deals with
1258 * situations like this:
1259 *
1260 * | 3 | 5 |
1261 * / \
1262 * | 3 | 5 | | 6 | 7 | (x)
1263 *
1264 * Or more a complex example:
1265 *
1266 * | 1 | 5 |
1267 * / \
1268 * | 1 | 3 | | 5 | 8 |
1269 * \ /
1270 * | 5 | 5 | | 6 | 7 | (x)
1271 *
1272 * In the examples, if we are looking for key "5", we may reach nodes
1273 * marked with "(x)". In this case what we have do is to look at the
1274 * left and see if there is "5" key there. If there is, we have to
1275 * return it.
1276 *
1277 * Note, this whole situation is possible because we allow to have
1278 * elements which are equivalent to the next key in the parent in the
1279 * children of current znode. For example, this happens if we split a
1280 * znode like this: | 3 | 5 | 5 | 6 | 7 |, which results in something
1281 * like this:
1282 * | 3 | 5 |
1283 * / \
1284 * | 3 | 5 | | 5 | 6 | 7 |
1285 * ^
1286 * And this becomes what is at the first "picture" after key "5" marked
1287 * with "^" is removed. What could be done is we could prohibit
1288 * splitting in the middle of the colliding sequence. Also, when
1289 * removing the leftmost key, we would have to correct the key of the
1290 * parent node, which would introduce additional complications. Namely,
1291 * if we changed the leftmost key of the parent znode, the garbage
1292 * collector would be unable to find it (GC is doing this when GC'ing
1293 * indexing LEBs). Although we already have an additional RB-tree where
1294 * we save such changed znodes (see 'ins_clr_old_idx_znode()') until
1295 * after the commit. But anyway, this does not look easy to implement
1296 * so we did not try this.
1297 */
1298 err = tnc_prev(c, &znode, n);
1299 if (err == -ENOENT) {
1300 dbg_tnc("found 0, lvl %d, n -1", znode->level);
1301 *n = -1;
1302 return 0;
1303 }
1304 if (unlikely(err < 0))
1305 return err;
1306 if (keys_cmp(c, key, &znode->zbranch[*n].key)) {
1307 dbg_tnc("found 0, lvl %d, n -1", znode->level);
1308 *n = -1;
1309 return 0;
1310 }
1311
1312 dbg_tnc("found 1, lvl %d, n %d", znode->level, *n);
1313 *zn = znode;
1314 return 1;
1315 }
1316
1317 /**
1318 * lookup_level0_dirty - search for zero-level znode dirtying.
1319 * @c: UBIFS file-system description object
1320 * @key: key to lookup
1321 * @zn: znode is returned here
1322 * @n: znode branch slot number is returned here
1323 *
1324 * This function looks up the TNC tree and search for zero-level znode which
1325 * refers key @key. The found zero-level znode is returned in @zn. There are 3
1326 * cases:
1327 * o exact match, i.e. the found zero-level znode contains key @key, then %1
1328 * is returned and slot number of the matched branch is stored in @n;
1329 * o not exact match, which means that zero-level znode does not contain @key
1330 * then %0 is returned and slot number of the closed branch is stored in
1331 * @n;
1332 * o @key is so small that it is even less than the lowest key of the
1333 * leftmost zero-level node, then %0 is returned and %-1 is stored in @n.
1334 *
1335 * Additionally all znodes in the path from the root to the located zero-level
1336 * znode are marked as dirty.
1337 *
1338 * Note, when the TNC tree is traversed, some znodes may be absent, then this
1339 * function reads corresponding indexing nodes and inserts them to TNC. In
1340 * case of failure, a negative error code is returned.
1341 */
lookup_level0_dirty(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_znode ** zn,int * n)1342 static int lookup_level0_dirty(struct ubifs_info *c, const union ubifs_key *key,
1343 struct ubifs_znode **zn, int *n)
1344 {
1345 int err, exact;
1346 struct ubifs_znode *znode;
1347 time64_t time = ktime_get_seconds();
1348
1349 dbg_tnck(key, "search and dirty key ");
1350
1351 znode = c->zroot.znode;
1352 if (unlikely(!znode)) {
1353 znode = ubifs_load_znode(c, &c->zroot, NULL, 0);
1354 if (IS_ERR(znode))
1355 return PTR_ERR(znode);
1356 }
1357
1358 znode = dirty_cow_znode(c, &c->zroot);
1359 if (IS_ERR(znode))
1360 return PTR_ERR(znode);
1361
1362 znode->time = time;
1363
1364 while (1) {
1365 struct ubifs_zbranch *zbr;
1366
1367 exact = ubifs_search_zbranch(c, znode, key, n);
1368
1369 if (znode->level == 0)
1370 break;
1371
1372 if (*n < 0)
1373 *n = 0;
1374 zbr = &znode->zbranch[*n];
1375
1376 if (zbr->znode) {
1377 znode->time = time;
1378 znode = dirty_cow_znode(c, zbr);
1379 if (IS_ERR(znode))
1380 return PTR_ERR(znode);
1381 continue;
1382 }
1383
1384 /* znode is not in TNC cache, load it from the media */
1385 znode = ubifs_load_znode(c, zbr, znode, *n);
1386 if (IS_ERR(znode))
1387 return PTR_ERR(znode);
1388 znode = dirty_cow_znode(c, zbr);
1389 if (IS_ERR(znode))
1390 return PTR_ERR(znode);
1391 }
1392
1393 *zn = znode;
1394 if (exact || !is_hash_key(c, key) || *n != -1) {
1395 dbg_tnc("found %d, lvl %d, n %d", exact, znode->level, *n);
1396 return exact;
1397 }
1398
1399 /*
1400 * See huge comment at 'lookup_level0_dirty()' what is the rest of the
1401 * code.
1402 */
1403 err = tnc_prev(c, &znode, n);
1404 if (err == -ENOENT) {
1405 *n = -1;
1406 dbg_tnc("found 0, lvl %d, n -1", znode->level);
1407 return 0;
1408 }
1409 if (unlikely(err < 0))
1410 return err;
1411 if (keys_cmp(c, key, &znode->zbranch[*n].key)) {
1412 *n = -1;
1413 dbg_tnc("found 0, lvl %d, n -1", znode->level);
1414 return 0;
1415 }
1416
1417 if (znode->cnext || !ubifs_zn_dirty(znode)) {
1418 znode = dirty_cow_bottom_up(c, znode);
1419 if (IS_ERR(znode))
1420 return PTR_ERR(znode);
1421 }
1422
1423 dbg_tnc("found 1, lvl %d, n %d", znode->level, *n);
1424 *zn = znode;
1425 return 1;
1426 }
1427
1428 /**
1429 * maybe_leb_gced - determine if a LEB may have been garbage collected.
1430 * @c: UBIFS file-system description object
1431 * @lnum: LEB number
1432 * @gc_seq1: garbage collection sequence number
1433 *
1434 * This function determines if @lnum may have been garbage collected since
1435 * sequence number @gc_seq1. If it may have been then %1 is returned, otherwise
1436 * %0 is returned.
1437 */
maybe_leb_gced(struct ubifs_info * c,int lnum,int gc_seq1)1438 static int maybe_leb_gced(struct ubifs_info *c, int lnum, int gc_seq1)
1439 {
1440 int gc_seq2, gced_lnum;
1441
1442 gced_lnum = c->gced_lnum;
1443 smp_rmb();
1444 gc_seq2 = c->gc_seq;
1445 /* Same seq means no GC */
1446 if (gc_seq1 == gc_seq2)
1447 return 0;
1448 /* Different by more than 1 means we don't know */
1449 if (gc_seq1 + 1 != gc_seq2)
1450 return 1;
1451 /*
1452 * We have seen the sequence number has increased by 1. Now we need to
1453 * be sure we read the right LEB number, so read it again.
1454 */
1455 smp_rmb();
1456 if (gced_lnum != c->gced_lnum)
1457 return 1;
1458 /* Finally we can check lnum */
1459 if (gced_lnum == lnum)
1460 return 1;
1461 return 0;
1462 }
1463
1464 /**
1465 * ubifs_tnc_locate - look up a file-system node and return it and its location.
1466 * @c: UBIFS file-system description object
1467 * @key: node key to lookup
1468 * @node: the node is returned here
1469 * @lnum: LEB number is returned here
1470 * @offs: offset is returned here
1471 *
1472 * This function looks up and reads node with key @key. The caller has to make
1473 * sure the @node buffer is large enough to fit the node. Returns zero in case
1474 * of success, %-ENOENT if the node was not found, and a negative error code in
1475 * case of failure. The node location can be returned in @lnum and @offs.
1476 */
ubifs_tnc_locate(struct ubifs_info * c,const union ubifs_key * key,void * node,int * lnum,int * offs)1477 int ubifs_tnc_locate(struct ubifs_info *c, const union ubifs_key *key,
1478 void *node, int *lnum, int *offs)
1479 {
1480 int found, n, err, safely = 0, gc_seq1;
1481 struct ubifs_znode *znode;
1482 struct ubifs_zbranch zbr, *zt;
1483
1484 again:
1485 mutex_lock(&c->tnc_mutex);
1486 found = ubifs_lookup_level0(c, key, &znode, &n);
1487 if (!found) {
1488 err = -ENOENT;
1489 goto out;
1490 } else if (found < 0) {
1491 err = found;
1492 goto out;
1493 }
1494 zt = &znode->zbranch[n];
1495 if (lnum) {
1496 *lnum = zt->lnum;
1497 *offs = zt->offs;
1498 }
1499 if (is_hash_key(c, key)) {
1500 /*
1501 * In this case the leaf node cache gets used, so we pass the
1502 * address of the zbranch and keep the mutex locked
1503 */
1504 err = tnc_read_hashed_node(c, zt, node);
1505 goto out;
1506 }
1507 if (safely) {
1508 err = ubifs_tnc_read_node(c, zt, node);
1509 goto out;
1510 }
1511 /* Drop the TNC mutex prematurely and race with garbage collection */
1512 zbr = znode->zbranch[n];
1513 gc_seq1 = c->gc_seq;
1514 mutex_unlock(&c->tnc_mutex);
1515
1516 if (ubifs_get_wbuf(c, zbr.lnum)) {
1517 /* We do not GC journal heads */
1518 err = ubifs_tnc_read_node(c, &zbr, node);
1519 return err;
1520 }
1521
1522 err = fallible_read_node(c, key, &zbr, node);
1523 if (err <= 0 || maybe_leb_gced(c, zbr.lnum, gc_seq1)) {
1524 /*
1525 * The node may have been GC'ed out from under us so try again
1526 * while keeping the TNC mutex locked.
1527 */
1528 safely = 1;
1529 goto again;
1530 }
1531 return 0;
1532
1533 out:
1534 mutex_unlock(&c->tnc_mutex);
1535 return err;
1536 }
1537
1538 /**
1539 * ubifs_tnc_get_bu_keys - lookup keys for bulk-read.
1540 * @c: UBIFS file-system description object
1541 * @bu: bulk-read parameters and results
1542 *
1543 * Lookup consecutive data node keys for the same inode that reside
1544 * consecutively in the same LEB. This function returns zero in case of success
1545 * and a negative error code in case of failure.
1546 *
1547 * Note, if the bulk-read buffer length (@bu->buf_len) is known, this function
1548 * makes sure bulk-read nodes fit the buffer. Otherwise, this function prepares
1549 * maximum possible amount of nodes for bulk-read.
1550 */
ubifs_tnc_get_bu_keys(struct ubifs_info * c,struct bu_info * bu)1551 int ubifs_tnc_get_bu_keys(struct ubifs_info *c, struct bu_info *bu)
1552 {
1553 int n, err = 0, lnum = -1, offs;
1554 int len;
1555 unsigned int block = key_block(c, &bu->key);
1556 struct ubifs_znode *znode;
1557
1558 bu->cnt = 0;
1559 bu->blk_cnt = 0;
1560 bu->eof = 0;
1561
1562 mutex_lock(&c->tnc_mutex);
1563 /* Find first key */
1564 err = ubifs_lookup_level0(c, &bu->key, &znode, &n);
1565 if (err < 0)
1566 goto out;
1567 if (err) {
1568 /* Key found */
1569 len = znode->zbranch[n].len;
1570 /* The buffer must be big enough for at least 1 node */
1571 if (len > bu->buf_len) {
1572 err = -EINVAL;
1573 goto out;
1574 }
1575 /* Add this key */
1576 bu->zbranch[bu->cnt++] = znode->zbranch[n];
1577 bu->blk_cnt += 1;
1578 lnum = znode->zbranch[n].lnum;
1579 offs = ALIGN(znode->zbranch[n].offs + len, 8);
1580 }
1581 while (1) {
1582 struct ubifs_zbranch *zbr;
1583 union ubifs_key *key;
1584 unsigned int next_block;
1585
1586 /* Find next key */
1587 err = tnc_next(c, &znode, &n);
1588 if (err)
1589 goto out;
1590 zbr = &znode->zbranch[n];
1591 key = &zbr->key;
1592 /* See if there is another data key for this file */
1593 if (key_inum(c, key) != key_inum(c, &bu->key) ||
1594 key_type(c, key) != UBIFS_DATA_KEY) {
1595 err = -ENOENT;
1596 goto out;
1597 }
1598 if (lnum < 0) {
1599 /* First key found */
1600 lnum = zbr->lnum;
1601 offs = ALIGN(zbr->offs + zbr->len, 8);
1602 len = zbr->len;
1603 if (len > bu->buf_len) {
1604 err = -EINVAL;
1605 goto out;
1606 }
1607 } else {
1608 /*
1609 * The data nodes must be in consecutive positions in
1610 * the same LEB.
1611 */
1612 if (zbr->lnum != lnum || zbr->offs != offs)
1613 goto out;
1614 offs += ALIGN(zbr->len, 8);
1615 len = ALIGN(len, 8) + zbr->len;
1616 /* Must not exceed buffer length */
1617 if (len > bu->buf_len)
1618 goto out;
1619 }
1620 /* Allow for holes */
1621 next_block = key_block(c, key);
1622 bu->blk_cnt += (next_block - block - 1);
1623 if (bu->blk_cnt >= UBIFS_MAX_BULK_READ)
1624 goto out;
1625 block = next_block;
1626 /* Add this key */
1627 bu->zbranch[bu->cnt++] = *zbr;
1628 bu->blk_cnt += 1;
1629 /* See if we have room for more */
1630 if (bu->cnt >= UBIFS_MAX_BULK_READ)
1631 goto out;
1632 if (bu->blk_cnt >= UBIFS_MAX_BULK_READ)
1633 goto out;
1634 }
1635 out:
1636 if (err == -ENOENT) {
1637 bu->eof = 1;
1638 err = 0;
1639 }
1640 bu->gc_seq = c->gc_seq;
1641 mutex_unlock(&c->tnc_mutex);
1642 if (err)
1643 return err;
1644 /*
1645 * An enormous hole could cause bulk-read to encompass too many
1646 * page cache pages, so limit the number here.
1647 */
1648 if (bu->blk_cnt > UBIFS_MAX_BULK_READ)
1649 bu->blk_cnt = UBIFS_MAX_BULK_READ;
1650 /*
1651 * Ensure that bulk-read covers a whole number of page cache
1652 * pages.
1653 */
1654 if (UBIFS_BLOCKS_PER_PAGE == 1 ||
1655 !(bu->blk_cnt & (UBIFS_BLOCKS_PER_PAGE - 1)))
1656 return 0;
1657 if (bu->eof) {
1658 /* At the end of file we can round up */
1659 bu->blk_cnt += UBIFS_BLOCKS_PER_PAGE - 1;
1660 return 0;
1661 }
1662 /* Exclude data nodes that do not make up a whole page cache page */
1663 block = key_block(c, &bu->key) + bu->blk_cnt;
1664 block &= ~(UBIFS_BLOCKS_PER_PAGE - 1);
1665 while (bu->cnt) {
1666 if (key_block(c, &bu->zbranch[bu->cnt - 1].key) < block)
1667 break;
1668 bu->cnt -= 1;
1669 }
1670 return 0;
1671 }
1672
1673 /**
1674 * read_wbuf - bulk-read from a LEB with a wbuf.
1675 * @wbuf: wbuf that may overlap the read
1676 * @buf: buffer into which to read
1677 * @len: read length
1678 * @lnum: LEB number from which to read
1679 * @offs: offset from which to read
1680 *
1681 * This functions returns %0 on success or a negative error code on failure.
1682 */
read_wbuf(struct ubifs_wbuf * wbuf,void * buf,int len,int lnum,int offs)1683 static int read_wbuf(struct ubifs_wbuf *wbuf, void *buf, int len, int lnum,
1684 int offs)
1685 {
1686 const struct ubifs_info *c = wbuf->c;
1687 int rlen, overlap;
1688
1689 dbg_io("LEB %d:%d, length %d", lnum, offs, len);
1690 ubifs_assert(c, wbuf && lnum >= 0 && lnum < c->leb_cnt && offs >= 0);
1691 ubifs_assert(c, !(offs & 7) && offs < c->leb_size);
1692 ubifs_assert(c, offs + len <= c->leb_size);
1693
1694 spin_lock(&wbuf->lock);
1695 overlap = (lnum == wbuf->lnum && offs + len > wbuf->offs);
1696 if (!overlap) {
1697 /* We may safely unlock the write-buffer and read the data */
1698 spin_unlock(&wbuf->lock);
1699 return ubifs_leb_read(c, lnum, buf, offs, len, 0);
1700 }
1701
1702 /* Don't read under wbuf */
1703 rlen = wbuf->offs - offs;
1704 if (rlen < 0)
1705 rlen = 0;
1706
1707 /* Copy the rest from the write-buffer */
1708 memcpy(buf + rlen, wbuf->buf + offs + rlen - wbuf->offs, len - rlen);
1709 spin_unlock(&wbuf->lock);
1710
1711 if (rlen > 0)
1712 /* Read everything that goes before write-buffer */
1713 return ubifs_leb_read(c, lnum, buf, offs, rlen, 0);
1714
1715 return 0;
1716 }
1717
1718 /**
1719 * validate_data_node - validate data nodes for bulk-read.
1720 * @c: UBIFS file-system description object
1721 * @buf: buffer containing data node to validate
1722 * @zbr: zbranch of data node to validate
1723 *
1724 * This functions returns %0 on success or a negative error code on failure.
1725 */
validate_data_node(struct ubifs_info * c,void * buf,struct ubifs_zbranch * zbr)1726 static int validate_data_node(struct ubifs_info *c, void *buf,
1727 struct ubifs_zbranch *zbr)
1728 {
1729 union ubifs_key key1;
1730 struct ubifs_ch *ch = buf;
1731 int err, len;
1732
1733 if (ch->node_type != UBIFS_DATA_NODE) {
1734 ubifs_err(c, "bad node type (%d but expected %d)",
1735 ch->node_type, UBIFS_DATA_NODE);
1736 goto out_err;
1737 }
1738
1739 err = ubifs_check_node(c, buf, zbr->len, zbr->lnum, zbr->offs, 0, 0);
1740 if (err) {
1741 ubifs_err(c, "expected node type %d", UBIFS_DATA_NODE);
1742 goto out;
1743 }
1744
1745 err = ubifs_node_check_hash(c, buf, zbr->hash);
1746 if (err) {
1747 ubifs_bad_hash(c, buf, zbr->hash, zbr->lnum, zbr->offs);
1748 return err;
1749 }
1750
1751 len = le32_to_cpu(ch->len);
1752 if (len != zbr->len) {
1753 ubifs_err(c, "bad node length %d, expected %d", len, zbr->len);
1754 goto out_err;
1755 }
1756
1757 /* Make sure the key of the read node is correct */
1758 key_read(c, buf + UBIFS_KEY_OFFSET, &key1);
1759 if (!keys_eq(c, &zbr->key, &key1)) {
1760 ubifs_err(c, "bad key in node at LEB %d:%d",
1761 zbr->lnum, zbr->offs);
1762 dbg_tnck(&zbr->key, "looked for key ");
1763 dbg_tnck(&key1, "found node's key ");
1764 goto out_err;
1765 }
1766
1767 return 0;
1768
1769 out_err:
1770 err = -EINVAL;
1771 out:
1772 ubifs_err(c, "bad node at LEB %d:%d", zbr->lnum, zbr->offs);
1773 ubifs_dump_node(c, buf, zbr->len);
1774 dump_stack();
1775 return err;
1776 }
1777
1778 /**
1779 * ubifs_tnc_bulk_read - read a number of data nodes in one go.
1780 * @c: UBIFS file-system description object
1781 * @bu: bulk-read parameters and results
1782 *
1783 * This functions reads and validates the data nodes that were identified by the
1784 * 'ubifs_tnc_get_bu_keys()' function. This functions returns %0 on success,
1785 * -EAGAIN to indicate a race with GC, or another negative error code on
1786 * failure.
1787 */
ubifs_tnc_bulk_read(struct ubifs_info * c,struct bu_info * bu)1788 int ubifs_tnc_bulk_read(struct ubifs_info *c, struct bu_info *bu)
1789 {
1790 int lnum = bu->zbranch[0].lnum, offs = bu->zbranch[0].offs, len, err, i;
1791 struct ubifs_wbuf *wbuf;
1792 void *buf;
1793
1794 len = bu->zbranch[bu->cnt - 1].offs;
1795 len += bu->zbranch[bu->cnt - 1].len - offs;
1796 if (len > bu->buf_len) {
1797 ubifs_err(c, "buffer too small %d vs %d", bu->buf_len, len);
1798 return -EINVAL;
1799 }
1800
1801 /* Do the read */
1802 wbuf = ubifs_get_wbuf(c, lnum);
1803 if (wbuf)
1804 err = read_wbuf(wbuf, bu->buf, len, lnum, offs);
1805 else
1806 err = ubifs_leb_read(c, lnum, bu->buf, offs, len, 0);
1807
1808 /* Check for a race with GC */
1809 if (maybe_leb_gced(c, lnum, bu->gc_seq))
1810 return -EAGAIN;
1811
1812 if (err && err != -EBADMSG) {
1813 ubifs_err(c, "failed to read from LEB %d:%d, error %d",
1814 lnum, offs, err);
1815 dump_stack();
1816 dbg_tnck(&bu->key, "key ");
1817 return err;
1818 }
1819
1820 /* Validate the nodes read */
1821 buf = bu->buf;
1822 for (i = 0; i < bu->cnt; i++) {
1823 err = validate_data_node(c, buf, &bu->zbranch[i]);
1824 if (err)
1825 return err;
1826 buf = buf + ALIGN(bu->zbranch[i].len, 8);
1827 }
1828
1829 return 0;
1830 }
1831
1832 /**
1833 * do_lookup_nm- look up a "hashed" node.
1834 * @c: UBIFS file-system description object
1835 * @key: node key to lookup
1836 * @node: the node is returned here
1837 * @nm: node name
1838 *
1839 * This function looks up and reads a node which contains name hash in the key.
1840 * Since the hash may have collisions, there may be many nodes with the same
1841 * key, so we have to sequentially look to all of them until the needed one is
1842 * found. This function returns zero in case of success, %-ENOENT if the node
1843 * was not found, and a negative error code in case of failure.
1844 */
do_lookup_nm(struct ubifs_info * c,const union ubifs_key * key,void * node,const struct fscrypt_name * nm)1845 static int do_lookup_nm(struct ubifs_info *c, const union ubifs_key *key,
1846 void *node, const struct fscrypt_name *nm)
1847 {
1848 int found, n, err;
1849 struct ubifs_znode *znode;
1850
1851 dbg_tnck(key, "key ");
1852 mutex_lock(&c->tnc_mutex);
1853 found = ubifs_lookup_level0(c, key, &znode, &n);
1854 if (!found) {
1855 err = -ENOENT;
1856 goto out_unlock;
1857 } else if (found < 0) {
1858 err = found;
1859 goto out_unlock;
1860 }
1861
1862 ubifs_assert(c, n >= 0);
1863
1864 err = resolve_collision(c, key, &znode, &n, nm);
1865 dbg_tnc("rc returned %d, znode %p, n %d", err, znode, n);
1866 if (unlikely(err < 0))
1867 goto out_unlock;
1868 if (err == 0) {
1869 err = -ENOENT;
1870 goto out_unlock;
1871 }
1872
1873 err = tnc_read_hashed_node(c, &znode->zbranch[n], node);
1874
1875 out_unlock:
1876 mutex_unlock(&c->tnc_mutex);
1877 return err;
1878 }
1879
1880 /**
1881 * ubifs_tnc_lookup_nm - look up a "hashed" node.
1882 * @c: UBIFS file-system description object
1883 * @key: node key to lookup
1884 * @node: the node is returned here
1885 * @nm: node name
1886 *
1887 * This function looks up and reads a node which contains name hash in the key.
1888 * Since the hash may have collisions, there may be many nodes with the same
1889 * key, so we have to sequentially look to all of them until the needed one is
1890 * found. This function returns zero in case of success, %-ENOENT if the node
1891 * was not found, and a negative error code in case of failure.
1892 */
ubifs_tnc_lookup_nm(struct ubifs_info * c,const union ubifs_key * key,void * node,const struct fscrypt_name * nm)1893 int ubifs_tnc_lookup_nm(struct ubifs_info *c, const union ubifs_key *key,
1894 void *node, const struct fscrypt_name *nm)
1895 {
1896 int err, len;
1897 const struct ubifs_dent_node *dent = node;
1898
1899 /*
1900 * We assume that in most of the cases there are no name collisions and
1901 * 'ubifs_tnc_lookup()' returns us the right direntry.
1902 */
1903 err = ubifs_tnc_lookup(c, key, node);
1904 if (err)
1905 return err;
1906
1907 len = le16_to_cpu(dent->nlen);
1908 if (fname_len(nm) == len && !memcmp(dent->name, fname_name(nm), len))
1909 return 0;
1910
1911 /*
1912 * Unluckily, there are hash collisions and we have to iterate over
1913 * them look at each direntry with colliding name hash sequentially.
1914 */
1915
1916 return do_lookup_nm(c, key, node, nm);
1917 }
1918
search_dh_cookie(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_dent_node * dent,uint32_t cookie,struct ubifs_znode ** zn,int * n,int exact)1919 static int search_dh_cookie(struct ubifs_info *c, const union ubifs_key *key,
1920 struct ubifs_dent_node *dent, uint32_t cookie,
1921 struct ubifs_znode **zn, int *n, int exact)
1922 {
1923 int err;
1924 struct ubifs_znode *znode = *zn;
1925 struct ubifs_zbranch *zbr;
1926 union ubifs_key *dkey;
1927
1928 if (!exact) {
1929 err = tnc_next(c, &znode, n);
1930 if (err)
1931 return err;
1932 }
1933
1934 for (;;) {
1935 zbr = &znode->zbranch[*n];
1936 dkey = &zbr->key;
1937
1938 if (key_inum(c, dkey) != key_inum(c, key) ||
1939 key_type(c, dkey) != key_type(c, key)) {
1940 return -ENOENT;
1941 }
1942
1943 err = tnc_read_hashed_node(c, zbr, dent);
1944 if (err)
1945 return err;
1946
1947 if (key_hash(c, key) == key_hash(c, dkey) &&
1948 le32_to_cpu(dent->cookie) == cookie) {
1949 *zn = znode;
1950 return 0;
1951 }
1952
1953 err = tnc_next(c, &znode, n);
1954 if (err)
1955 return err;
1956 }
1957 }
1958
do_lookup_dh(struct ubifs_info * c,const union ubifs_key * key,struct ubifs_dent_node * dent,uint32_t cookie)1959 static int do_lookup_dh(struct ubifs_info *c, const union ubifs_key *key,
1960 struct ubifs_dent_node *dent, uint32_t cookie)
1961 {
1962 int n, err;
1963 struct ubifs_znode *znode;
1964 union ubifs_key start_key;
1965
1966 ubifs_assert(c, is_hash_key(c, key));
1967
1968 lowest_dent_key(c, &start_key, key_inum(c, key));
1969
1970 mutex_lock(&c->tnc_mutex);
1971 err = ubifs_lookup_level0(c, &start_key, &znode, &n);
1972 if (unlikely(err < 0))
1973 goto out_unlock;
1974
1975 err = search_dh_cookie(c, key, dent, cookie, &znode, &n, err);
1976
1977 out_unlock:
1978 mutex_unlock(&c->tnc_mutex);
1979 return err;
1980 }
1981
1982 /**
1983 * ubifs_tnc_lookup_dh - look up a "double hashed" node.
1984 * @c: UBIFS file-system description object
1985 * @key: node key to lookup
1986 * @node: the node is returned here
1987 * @cookie: node cookie for collision resolution
1988 *
1989 * This function looks up and reads a node which contains name hash in the key.
1990 * Since the hash may have collisions, there may be many nodes with the same
1991 * key, so we have to sequentially look to all of them until the needed one
1992 * with the same cookie value is found.
1993 * This function returns zero in case of success, %-ENOENT if the node
1994 * was not found, and a negative error code in case of failure.
1995 */
ubifs_tnc_lookup_dh(struct ubifs_info * c,const union ubifs_key * key,void * node,uint32_t cookie)1996 int ubifs_tnc_lookup_dh(struct ubifs_info *c, const union ubifs_key *key,
1997 void *node, uint32_t cookie)
1998 {
1999 int err;
2000 const struct ubifs_dent_node *dent = node;
2001
2002 if (!c->double_hash)
2003 return -EOPNOTSUPP;
2004
2005 /*
2006 * We assume that in most of the cases there are no name collisions and
2007 * 'ubifs_tnc_lookup()' returns us the right direntry.
2008 */
2009 err = ubifs_tnc_lookup(c, key, node);
2010 if (err)
2011 return err;
2012
2013 if (le32_to_cpu(dent->cookie) == cookie)
2014 return 0;
2015
2016 /*
2017 * Unluckily, there are hash collisions and we have to iterate over
2018 * them look at each direntry with colliding name hash sequentially.
2019 */
2020 return do_lookup_dh(c, key, node, cookie);
2021 }
2022
2023 /**
2024 * correct_parent_keys - correct parent znodes' keys.
2025 * @c: UBIFS file-system description object
2026 * @znode: znode to correct parent znodes for
2027 *
2028 * This is a helper function for 'tnc_insert()'. When the key of the leftmost
2029 * zbranch changes, keys of parent znodes have to be corrected. This helper
2030 * function is called in such situations and corrects the keys if needed.
2031 */
correct_parent_keys(const struct ubifs_info * c,struct ubifs_znode * znode)2032 static void correct_parent_keys(const struct ubifs_info *c,
2033 struct ubifs_znode *znode)
2034 {
2035 union ubifs_key *key, *key1;
2036
2037 ubifs_assert(c, znode->parent);
2038 ubifs_assert(c, znode->iip == 0);
2039
2040 key = &znode->zbranch[0].key;
2041 key1 = &znode->parent->zbranch[0].key;
2042
2043 while (keys_cmp(c, key, key1) < 0) {
2044 key_copy(c, key, key1);
2045 znode = znode->parent;
2046 znode->alt = 1;
2047 if (!znode->parent || znode->iip)
2048 break;
2049 key1 = &znode->parent->zbranch[0].key;
2050 }
2051 }
2052
2053 /**
2054 * insert_zbranch - insert a zbranch into a znode.
2055 * @c: UBIFS file-system description object
2056 * @znode: znode into which to insert
2057 * @zbr: zbranch to insert
2058 * @n: slot number to insert to
2059 *
2060 * This is a helper function for 'tnc_insert()'. UBIFS does not allow "gaps" in
2061 * znode's array of zbranches and keeps zbranches consolidated, so when a new
2062 * zbranch has to be inserted to the @znode->zbranches[]' array at the @n-th
2063 * slot, zbranches starting from @n have to be moved right.
2064 */
insert_zbranch(struct ubifs_info * c,struct ubifs_znode * znode,const struct ubifs_zbranch * zbr,int n)2065 static void insert_zbranch(struct ubifs_info *c, struct ubifs_znode *znode,
2066 const struct ubifs_zbranch *zbr, int n)
2067 {
2068 int i;
2069
2070 ubifs_assert(c, ubifs_zn_dirty(znode));
2071
2072 if (znode->level) {
2073 for (i = znode->child_cnt; i > n; i--) {
2074 znode->zbranch[i] = znode->zbranch[i - 1];
2075 if (znode->zbranch[i].znode)
2076 znode->zbranch[i].znode->iip = i;
2077 }
2078 if (zbr->znode)
2079 zbr->znode->iip = n;
2080 } else
2081 for (i = znode->child_cnt; i > n; i--)
2082 znode->zbranch[i] = znode->zbranch[i - 1];
2083
2084 znode->zbranch[n] = *zbr;
2085 znode->child_cnt += 1;
2086
2087 /*
2088 * After inserting at slot zero, the lower bound of the key range of
2089 * this znode may have changed. If this znode is subsequently split
2090 * then the upper bound of the key range may change, and furthermore
2091 * it could change to be lower than the original lower bound. If that
2092 * happens, then it will no longer be possible to find this znode in the
2093 * TNC using the key from the index node on flash. That is bad because
2094 * if it is not found, we will assume it is obsolete and may overwrite
2095 * it. Then if there is an unclean unmount, we will start using the
2096 * old index which will be broken.
2097 *
2098 * So we first mark znodes that have insertions at slot zero, and then
2099 * if they are split we add their lnum/offs to the old_idx tree.
2100 */
2101 if (n == 0)
2102 znode->alt = 1;
2103 }
2104
2105 /**
2106 * tnc_insert - insert a node into TNC.
2107 * @c: UBIFS file-system description object
2108 * @znode: znode to insert into
2109 * @zbr: branch to insert
2110 * @n: slot number to insert new zbranch to
2111 *
2112 * This function inserts a new node described by @zbr into znode @znode. If
2113 * znode does not have a free slot for new zbranch, it is split. Parent znodes
2114 * are splat as well if needed. Returns zero in case of success or a negative
2115 * error code in case of failure.
2116 */
tnc_insert(struct ubifs_info * c,struct ubifs_znode * znode,struct ubifs_zbranch * zbr,int n)2117 static int tnc_insert(struct ubifs_info *c, struct ubifs_znode *znode,
2118 struct ubifs_zbranch *zbr, int n)
2119 {
2120 struct ubifs_znode *zn, *zi, *zp;
2121 int i, keep, move, appending = 0;
2122 union ubifs_key *key = &zbr->key, *key1;
2123
2124 ubifs_assert(c, n >= 0 && n <= c->fanout);
2125
2126 /* Implement naive insert for now */
2127 again:
2128 zp = znode->parent;
2129 if (znode->child_cnt < c->fanout) {
2130 ubifs_assert(c, n != c->fanout);
2131 dbg_tnck(key, "inserted at %d level %d, key ", n, znode->level);
2132
2133 insert_zbranch(c, znode, zbr, n);
2134
2135 /* Ensure parent's key is correct */
2136 if (n == 0 && zp && znode->iip == 0)
2137 correct_parent_keys(c, znode);
2138
2139 return 0;
2140 }
2141
2142 /*
2143 * Unfortunately, @znode does not have more empty slots and we have to
2144 * split it.
2145 */
2146 dbg_tnck(key, "splitting level %d, key ", znode->level);
2147
2148 if (znode->alt)
2149 /*
2150 * We can no longer be sure of finding this znode by key, so we
2151 * record it in the old_idx tree.
2152 */
2153 ins_clr_old_idx_znode(c, znode);
2154
2155 zn = kzalloc(c->max_znode_sz, GFP_NOFS);
2156 if (!zn)
2157 return -ENOMEM;
2158 zn->parent = zp;
2159 zn->level = znode->level;
2160
2161 /* Decide where to split */
2162 if (znode->level == 0 && key_type(c, key) == UBIFS_DATA_KEY) {
2163 /* Try not to split consecutive data keys */
2164 if (n == c->fanout) {
2165 key1 = &znode->zbranch[n - 1].key;
2166 if (key_inum(c, key1) == key_inum(c, key) &&
2167 key_type(c, key1) == UBIFS_DATA_KEY)
2168 appending = 1;
2169 } else
2170 goto check_split;
2171 } else if (appending && n != c->fanout) {
2172 /* Try not to split consecutive data keys */
2173 appending = 0;
2174 check_split:
2175 if (n >= (c->fanout + 1) / 2) {
2176 key1 = &znode->zbranch[0].key;
2177 if (key_inum(c, key1) == key_inum(c, key) &&
2178 key_type(c, key1) == UBIFS_DATA_KEY) {
2179 key1 = &znode->zbranch[n].key;
2180 if (key_inum(c, key1) != key_inum(c, key) ||
2181 key_type(c, key1) != UBIFS_DATA_KEY) {
2182 keep = n;
2183 move = c->fanout - keep;
2184 zi = znode;
2185 goto do_split;
2186 }
2187 }
2188 }
2189 }
2190
2191 if (appending) {
2192 keep = c->fanout;
2193 move = 0;
2194 } else {
2195 keep = (c->fanout + 1) / 2;
2196 move = c->fanout - keep;
2197 }
2198
2199 /*
2200 * Although we don't at present, we could look at the neighbors and see
2201 * if we can move some zbranches there.
2202 */
2203
2204 if (n < keep) {
2205 /* Insert into existing znode */
2206 zi = znode;
2207 move += 1;
2208 keep -= 1;
2209 } else {
2210 /* Insert into new znode */
2211 zi = zn;
2212 n -= keep;
2213 /* Re-parent */
2214 if (zn->level != 0)
2215 zbr->znode->parent = zn;
2216 }
2217
2218 do_split:
2219
2220 __set_bit(DIRTY_ZNODE, &zn->flags);
2221 atomic_long_inc(&c->dirty_zn_cnt);
2222
2223 zn->child_cnt = move;
2224 znode->child_cnt = keep;
2225
2226 dbg_tnc("moving %d, keeping %d", move, keep);
2227
2228 /* Move zbranch */
2229 for (i = 0; i < move; i++) {
2230 zn->zbranch[i] = znode->zbranch[keep + i];
2231 /* Re-parent */
2232 if (zn->level != 0)
2233 if (zn->zbranch[i].znode) {
2234 zn->zbranch[i].znode->parent = zn;
2235 zn->zbranch[i].znode->iip = i;
2236 }
2237 }
2238
2239 /* Insert new key and branch */
2240 dbg_tnck(key, "inserting at %d level %d, key ", n, zn->level);
2241
2242 insert_zbranch(c, zi, zbr, n);
2243
2244 /* Insert new znode (produced by spitting) into the parent */
2245 if (zp) {
2246 if (n == 0 && zi == znode && znode->iip == 0)
2247 correct_parent_keys(c, znode);
2248
2249 /* Locate insertion point */
2250 n = znode->iip + 1;
2251
2252 /* Tail recursion */
2253 zbr->key = zn->zbranch[0].key;
2254 zbr->znode = zn;
2255 zbr->lnum = 0;
2256 zbr->offs = 0;
2257 zbr->len = 0;
2258 znode = zp;
2259
2260 goto again;
2261 }
2262
2263 /* We have to split root znode */
2264 dbg_tnc("creating new zroot at level %d", znode->level + 1);
2265
2266 zi = kzalloc(c->max_znode_sz, GFP_NOFS);
2267 if (!zi)
2268 return -ENOMEM;
2269
2270 zi->child_cnt = 2;
2271 zi->level = znode->level + 1;
2272
2273 __set_bit(DIRTY_ZNODE, &zi->flags);
2274 atomic_long_inc(&c->dirty_zn_cnt);
2275
2276 zi->zbranch[0].key = znode->zbranch[0].key;
2277 zi->zbranch[0].znode = znode;
2278 zi->zbranch[0].lnum = c->zroot.lnum;
2279 zi->zbranch[0].offs = c->zroot.offs;
2280 zi->zbranch[0].len = c->zroot.len;
2281 zi->zbranch[1].key = zn->zbranch[0].key;
2282 zi->zbranch[1].znode = zn;
2283
2284 c->zroot.lnum = 0;
2285 c->zroot.offs = 0;
2286 c->zroot.len = 0;
2287 c->zroot.znode = zi;
2288
2289 zn->parent = zi;
2290 zn->iip = 1;
2291 znode->parent = zi;
2292 znode->iip = 0;
2293
2294 return 0;
2295 }
2296
2297 /**
2298 * ubifs_tnc_add - add a node to TNC.
2299 * @c: UBIFS file-system description object
2300 * @key: key to add
2301 * @lnum: LEB number of node
2302 * @offs: node offset
2303 * @len: node length
2304 * @hash: The hash over the node
2305 *
2306 * This function adds a node with key @key to TNC. The node may be new or it may
2307 * obsolete some existing one. Returns %0 on success or negative error code on
2308 * failure.
2309 */
ubifs_tnc_add(struct ubifs_info * c,const union ubifs_key * key,int lnum,int offs,int len,const u8 * hash)2310 int ubifs_tnc_add(struct ubifs_info *c, const union ubifs_key *key, int lnum,
2311 int offs, int len, const u8 *hash)
2312 {
2313 int found, n, err = 0;
2314 struct ubifs_znode *znode;
2315
2316 mutex_lock(&c->tnc_mutex);
2317 dbg_tnck(key, "%d:%d, len %d, key ", lnum, offs, len);
2318 found = lookup_level0_dirty(c, key, &znode, &n);
2319 if (!found) {
2320 struct ubifs_zbranch zbr;
2321
2322 zbr.znode = NULL;
2323 zbr.lnum = lnum;
2324 zbr.offs = offs;
2325 zbr.len = len;
2326 ubifs_copy_hash(c, hash, zbr.hash);
2327 key_copy(c, key, &zbr.key);
2328 err = tnc_insert(c, znode, &zbr, n + 1);
2329 } else if (found == 1) {
2330 struct ubifs_zbranch *zbr = &znode->zbranch[n];
2331
2332 lnc_free(zbr);
2333 err = ubifs_add_dirt(c, zbr->lnum, zbr->len);
2334 zbr->lnum = lnum;
2335 zbr->offs = offs;
2336 zbr->len = len;
2337 ubifs_copy_hash(c, hash, zbr->hash);
2338 } else
2339 err = found;
2340 if (!err)
2341 err = dbg_check_tnc(c, 0);
2342 mutex_unlock(&c->tnc_mutex);
2343
2344 return err;
2345 }
2346
2347 /**
2348 * ubifs_tnc_replace - replace a node in the TNC only if the old node is found.
2349 * @c: UBIFS file-system description object
2350 * @key: key to add
2351 * @old_lnum: LEB number of old node
2352 * @old_offs: old node offset
2353 * @lnum: LEB number of node
2354 * @offs: node offset
2355 * @len: node length
2356 *
2357 * This function replaces a node with key @key in the TNC only if the old node
2358 * is found. This function is called by garbage collection when node are moved.
2359 * Returns %0 on success or negative error code on failure.
2360 */
ubifs_tnc_replace(struct ubifs_info * c,const union ubifs_key * key,int old_lnum,int old_offs,int lnum,int offs,int len)2361 int ubifs_tnc_replace(struct ubifs_info *c, const union ubifs_key *key,
2362 int old_lnum, int old_offs, int lnum, int offs, int len)
2363 {
2364 int found, n, err = 0;
2365 struct ubifs_znode *znode;
2366
2367 mutex_lock(&c->tnc_mutex);
2368 dbg_tnck(key, "old LEB %d:%d, new LEB %d:%d, len %d, key ", old_lnum,
2369 old_offs, lnum, offs, len);
2370 found = lookup_level0_dirty(c, key, &znode, &n);
2371 if (found < 0) {
2372 err = found;
2373 goto out_unlock;
2374 }
2375
2376 if (found == 1) {
2377 struct ubifs_zbranch *zbr = &znode->zbranch[n];
2378
2379 found = 0;
2380 if (zbr->lnum == old_lnum && zbr->offs == old_offs) {
2381 lnc_free(zbr);
2382 err = ubifs_add_dirt(c, zbr->lnum, zbr->len);
2383 if (err)
2384 goto out_unlock;
2385 zbr->lnum = lnum;
2386 zbr->offs = offs;
2387 zbr->len = len;
2388 found = 1;
2389 } else if (is_hash_key(c, key)) {
2390 found = resolve_collision_directly(c, key, &znode, &n,
2391 old_lnum, old_offs);
2392 dbg_tnc("rc returned %d, znode %p, n %d, LEB %d:%d",
2393 found, znode, n, old_lnum, old_offs);
2394 if (found < 0) {
2395 err = found;
2396 goto out_unlock;
2397 }
2398
2399 if (found) {
2400 /* Ensure the znode is dirtied */
2401 if (znode->cnext || !ubifs_zn_dirty(znode)) {
2402 znode = dirty_cow_bottom_up(c, znode);
2403 if (IS_ERR(znode)) {
2404 err = PTR_ERR(znode);
2405 goto out_unlock;
2406 }
2407 }
2408 zbr = &znode->zbranch[n];
2409 lnc_free(zbr);
2410 err = ubifs_add_dirt(c, zbr->lnum,
2411 zbr->len);
2412 if (err)
2413 goto out_unlock;
2414 zbr->lnum = lnum;
2415 zbr->offs = offs;
2416 zbr->len = len;
2417 }
2418 }
2419 }
2420
2421 if (!found)
2422 err = ubifs_add_dirt(c, lnum, len);
2423
2424 if (!err)
2425 err = dbg_check_tnc(c, 0);
2426
2427 out_unlock:
2428 mutex_unlock(&c->tnc_mutex);
2429 return err;
2430 }
2431
2432 /**
2433 * ubifs_tnc_add_nm - add a "hashed" node to TNC.
2434 * @c: UBIFS file-system description object
2435 * @key: key to add
2436 * @lnum: LEB number of node
2437 * @offs: node offset
2438 * @len: node length
2439 * @hash: The hash over the node
2440 * @nm: node name
2441 *
2442 * This is the same as 'ubifs_tnc_add()' but it should be used with keys which
2443 * may have collisions, like directory entry keys.
2444 */
ubifs_tnc_add_nm(struct ubifs_info * c,const union ubifs_key * key,int lnum,int offs,int len,const u8 * hash,const struct fscrypt_name * nm)2445 int ubifs_tnc_add_nm(struct ubifs_info *c, const union ubifs_key *key,
2446 int lnum, int offs, int len, const u8 *hash,
2447 const struct fscrypt_name *nm)
2448 {
2449 int found, n, err = 0;
2450 struct ubifs_znode *znode;
2451
2452 mutex_lock(&c->tnc_mutex);
2453 dbg_tnck(key, "LEB %d:%d, key ", lnum, offs);
2454 found = lookup_level0_dirty(c, key, &znode, &n);
2455 if (found < 0) {
2456 err = found;
2457 goto out_unlock;
2458 }
2459
2460 if (found == 1) {
2461 if (c->replaying)
2462 found = fallible_resolve_collision(c, key, &znode, &n,
2463 nm, 1);
2464 else
2465 found = resolve_collision(c, key, &znode, &n, nm);
2466 dbg_tnc("rc returned %d, znode %p, n %d", found, znode, n);
2467 if (found < 0) {
2468 err = found;
2469 goto out_unlock;
2470 }
2471
2472 /* Ensure the znode is dirtied */
2473 if (znode->cnext || !ubifs_zn_dirty(znode)) {
2474 znode = dirty_cow_bottom_up(c, znode);
2475 if (IS_ERR(znode)) {
2476 err = PTR_ERR(znode);
2477 goto out_unlock;
2478 }
2479 }
2480
2481 if (found == 1) {
2482 struct ubifs_zbranch *zbr = &znode->zbranch[n];
2483
2484 lnc_free(zbr);
2485 err = ubifs_add_dirt(c, zbr->lnum, zbr->len);
2486 zbr->lnum = lnum;
2487 zbr->offs = offs;
2488 zbr->len = len;
2489 ubifs_copy_hash(c, hash, zbr->hash);
2490 goto out_unlock;
2491 }
2492 }
2493
2494 if (!found) {
2495 struct ubifs_zbranch zbr;
2496
2497 zbr.znode = NULL;
2498 zbr.lnum = lnum;
2499 zbr.offs = offs;
2500 zbr.len = len;
2501 ubifs_copy_hash(c, hash, zbr.hash);
2502 key_copy(c, key, &zbr.key);
2503 err = tnc_insert(c, znode, &zbr, n + 1);
2504 if (err)
2505 goto out_unlock;
2506 if (c->replaying) {
2507 /*
2508 * We did not find it in the index so there may be a
2509 * dangling branch still in the index. So we remove it
2510 * by passing 'ubifs_tnc_remove_nm()' the same key but
2511 * an unmatchable name.
2512 */
2513 struct fscrypt_name noname = { .disk_name = { .name = "", .len = 1 } };
2514
2515 err = dbg_check_tnc(c, 0);
2516 mutex_unlock(&c->tnc_mutex);
2517 if (err)
2518 return err;
2519 return ubifs_tnc_remove_nm(c, key, &noname);
2520 }
2521 }
2522
2523 out_unlock:
2524 if (!err)
2525 err = dbg_check_tnc(c, 0);
2526 mutex_unlock(&c->tnc_mutex);
2527 return err;
2528 }
2529
2530 /**
2531 * tnc_delete - delete a znode form TNC.
2532 * @c: UBIFS file-system description object
2533 * @znode: znode to delete from
2534 * @n: zbranch slot number to delete
2535 *
2536 * This function deletes a leaf node from @n-th slot of @znode. Returns zero in
2537 * case of success and a negative error code in case of failure.
2538 */
tnc_delete(struct ubifs_info * c,struct ubifs_znode * znode,int n)2539 static int tnc_delete(struct ubifs_info *c, struct ubifs_znode *znode, int n)
2540 {
2541 struct ubifs_zbranch *zbr;
2542 struct ubifs_znode *zp;
2543 int i, err;
2544
2545 /* Delete without merge for now */
2546 ubifs_assert(c, znode->level == 0);
2547 ubifs_assert(c, n >= 0 && n < c->fanout);
2548 dbg_tnck(&znode->zbranch[n].key, "deleting key ");
2549
2550 zbr = &znode->zbranch[n];
2551 lnc_free(zbr);
2552
2553 err = ubifs_add_dirt(c, zbr->lnum, zbr->len);
2554 if (err) {
2555 ubifs_dump_znode(c, znode);
2556 return err;
2557 }
2558
2559 /* We do not "gap" zbranch slots */
2560 for (i = n; i < znode->child_cnt - 1; i++)
2561 znode->zbranch[i] = znode->zbranch[i + 1];
2562 znode->child_cnt -= 1;
2563
2564 if (znode->child_cnt > 0)
2565 return 0;
2566
2567 /*
2568 * This was the last zbranch, we have to delete this znode from the
2569 * parent.
2570 */
2571
2572 do {
2573 ubifs_assert(c, !ubifs_zn_obsolete(znode));
2574 ubifs_assert(c, ubifs_zn_dirty(znode));
2575
2576 zp = znode->parent;
2577 n = znode->iip;
2578
2579 atomic_long_dec(&c->dirty_zn_cnt);
2580
2581 err = insert_old_idx_znode(c, znode);
2582 if (err)
2583 return err;
2584
2585 if (znode->cnext) {
2586 __set_bit(OBSOLETE_ZNODE, &znode->flags);
2587 atomic_long_inc(&c->clean_zn_cnt);
2588 atomic_long_inc(&ubifs_clean_zn_cnt);
2589 } else
2590 kfree(znode);
2591 znode = zp;
2592 } while (znode->child_cnt == 1); /* while removing last child */
2593
2594 /* Remove from znode, entry n - 1 */
2595 znode->child_cnt -= 1;
2596 ubifs_assert(c, znode->level != 0);
2597 for (i = n; i < znode->child_cnt; i++) {
2598 znode->zbranch[i] = znode->zbranch[i + 1];
2599 if (znode->zbranch[i].znode)
2600 znode->zbranch[i].znode->iip = i;
2601 }
2602
2603 /*
2604 * If this is the root and it has only 1 child then
2605 * collapse the tree.
2606 */
2607 if (!znode->parent) {
2608 while (znode->child_cnt == 1 && znode->level != 0) {
2609 zp = znode;
2610 zbr = &znode->zbranch[0];
2611 znode = get_znode(c, znode, 0);
2612 if (IS_ERR(znode))
2613 return PTR_ERR(znode);
2614 znode = dirty_cow_znode(c, zbr);
2615 if (IS_ERR(znode))
2616 return PTR_ERR(znode);
2617 znode->parent = NULL;
2618 znode->iip = 0;
2619 if (c->zroot.len) {
2620 err = insert_old_idx(c, c->zroot.lnum,
2621 c->zroot.offs);
2622 if (err)
2623 return err;
2624 }
2625 c->zroot.lnum = zbr->lnum;
2626 c->zroot.offs = zbr->offs;
2627 c->zroot.len = zbr->len;
2628 c->zroot.znode = znode;
2629 ubifs_assert(c, !ubifs_zn_obsolete(zp));
2630 ubifs_assert(c, ubifs_zn_dirty(zp));
2631 atomic_long_dec(&c->dirty_zn_cnt);
2632
2633 if (zp->cnext) {
2634 __set_bit(OBSOLETE_ZNODE, &zp->flags);
2635 atomic_long_inc(&c->clean_zn_cnt);
2636 atomic_long_inc(&ubifs_clean_zn_cnt);
2637 } else
2638 kfree(zp);
2639 }
2640 }
2641
2642 return 0;
2643 }
2644
2645 /**
2646 * ubifs_tnc_remove - remove an index entry of a node.
2647 * @c: UBIFS file-system description object
2648 * @key: key of node
2649 *
2650 * Returns %0 on success or negative error code on failure.
2651 */
ubifs_tnc_remove(struct ubifs_info * c,const union ubifs_key * key)2652 int ubifs_tnc_remove(struct ubifs_info *c, const union ubifs_key *key)
2653 {
2654 int found, n, err = 0;
2655 struct ubifs_znode *znode;
2656
2657 mutex_lock(&c->tnc_mutex);
2658 dbg_tnck(key, "key ");
2659 found = lookup_level0_dirty(c, key, &znode, &n);
2660 if (found < 0) {
2661 err = found;
2662 goto out_unlock;
2663 }
2664 if (found == 1)
2665 err = tnc_delete(c, znode, n);
2666 if (!err)
2667 err = dbg_check_tnc(c, 0);
2668
2669 out_unlock:
2670 mutex_unlock(&c->tnc_mutex);
2671 return err;
2672 }
2673
2674 /**
2675 * ubifs_tnc_remove_nm - remove an index entry for a "hashed" node.
2676 * @c: UBIFS file-system description object
2677 * @key: key of node
2678 * @nm: directory entry name
2679 *
2680 * Returns %0 on success or negative error code on failure.
2681 */
ubifs_tnc_remove_nm(struct ubifs_info * c,const union ubifs_key * key,const struct fscrypt_name * nm)2682 int ubifs_tnc_remove_nm(struct ubifs_info *c, const union ubifs_key *key,
2683 const struct fscrypt_name *nm)
2684 {
2685 int n, err;
2686 struct ubifs_znode *znode;
2687
2688 mutex_lock(&c->tnc_mutex);
2689 dbg_tnck(key, "key ");
2690 err = lookup_level0_dirty(c, key, &znode, &n);
2691 if (err < 0)
2692 goto out_unlock;
2693
2694 if (err) {
2695 if (c->replaying)
2696 err = fallible_resolve_collision(c, key, &znode, &n,
2697 nm, 0);
2698 else
2699 err = resolve_collision(c, key, &znode, &n, nm);
2700 dbg_tnc("rc returned %d, znode %p, n %d", err, znode, n);
2701 if (err < 0)
2702 goto out_unlock;
2703 if (err) {
2704 /* Ensure the znode is dirtied */
2705 if (znode->cnext || !ubifs_zn_dirty(znode)) {
2706 znode = dirty_cow_bottom_up(c, znode);
2707 if (IS_ERR(znode)) {
2708 err = PTR_ERR(znode);
2709 goto out_unlock;
2710 }
2711 }
2712 err = tnc_delete(c, znode, n);
2713 }
2714 }
2715
2716 out_unlock:
2717 if (!err)
2718 err = dbg_check_tnc(c, 0);
2719 mutex_unlock(&c->tnc_mutex);
2720 return err;
2721 }
2722
2723 /**
2724 * ubifs_tnc_remove_dh - remove an index entry for a "double hashed" node.
2725 * @c: UBIFS file-system description object
2726 * @key: key of node
2727 * @cookie: node cookie for collision resolution
2728 *
2729 * Returns %0 on success or negative error code on failure.
2730 */
ubifs_tnc_remove_dh(struct ubifs_info * c,const union ubifs_key * key,uint32_t cookie)2731 int ubifs_tnc_remove_dh(struct ubifs_info *c, const union ubifs_key *key,
2732 uint32_t cookie)
2733 {
2734 int n, err;
2735 struct ubifs_znode *znode;
2736 struct ubifs_dent_node *dent;
2737 struct ubifs_zbranch *zbr;
2738
2739 if (!c->double_hash)
2740 return -EOPNOTSUPP;
2741
2742 mutex_lock(&c->tnc_mutex);
2743 err = lookup_level0_dirty(c, key, &znode, &n);
2744 if (err <= 0)
2745 goto out_unlock;
2746
2747 zbr = &znode->zbranch[n];
2748 dent = kmalloc(UBIFS_MAX_DENT_NODE_SZ, GFP_NOFS);
2749 if (!dent) {
2750 err = -ENOMEM;
2751 goto out_unlock;
2752 }
2753
2754 err = tnc_read_hashed_node(c, zbr, dent);
2755 if (err)
2756 goto out_free;
2757
2758 /* If the cookie does not match, we're facing a hash collision. */
2759 if (le32_to_cpu(dent->cookie) != cookie) {
2760 union ubifs_key start_key;
2761
2762 lowest_dent_key(c, &start_key, key_inum(c, key));
2763
2764 err = ubifs_lookup_level0(c, &start_key, &znode, &n);
2765 if (unlikely(err < 0))
2766 goto out_free;
2767
2768 err = search_dh_cookie(c, key, dent, cookie, &znode, &n, err);
2769 if (err)
2770 goto out_free;
2771 }
2772
2773 if (znode->cnext || !ubifs_zn_dirty(znode)) {
2774 znode = dirty_cow_bottom_up(c, znode);
2775 if (IS_ERR(znode)) {
2776 err = PTR_ERR(znode);
2777 goto out_free;
2778 }
2779 }
2780 err = tnc_delete(c, znode, n);
2781
2782 out_free:
2783 kfree(dent);
2784 out_unlock:
2785 if (!err)
2786 err = dbg_check_tnc(c, 0);
2787 mutex_unlock(&c->tnc_mutex);
2788 return err;
2789 }
2790
2791 /**
2792 * key_in_range - determine if a key falls within a range of keys.
2793 * @c: UBIFS file-system description object
2794 * @key: key to check
2795 * @from_key: lowest key in range
2796 * @to_key: highest key in range
2797 *
2798 * This function returns %1 if the key is in range and %0 otherwise.
2799 */
key_in_range(struct ubifs_info * c,union ubifs_key * key,union ubifs_key * from_key,union ubifs_key * to_key)2800 static int key_in_range(struct ubifs_info *c, union ubifs_key *key,
2801 union ubifs_key *from_key, union ubifs_key *to_key)
2802 {
2803 if (keys_cmp(c, key, from_key) < 0)
2804 return 0;
2805 if (keys_cmp(c, key, to_key) > 0)
2806 return 0;
2807 return 1;
2808 }
2809
2810 /**
2811 * ubifs_tnc_remove_range - remove index entries in range.
2812 * @c: UBIFS file-system description object
2813 * @from_key: lowest key to remove
2814 * @to_key: highest key to remove
2815 *
2816 * This function removes index entries starting at @from_key and ending at
2817 * @to_key. This function returns zero in case of success and a negative error
2818 * code in case of failure.
2819 */
ubifs_tnc_remove_range(struct ubifs_info * c,union ubifs_key * from_key,union ubifs_key * to_key)2820 int ubifs_tnc_remove_range(struct ubifs_info *c, union ubifs_key *from_key,
2821 union ubifs_key *to_key)
2822 {
2823 int i, n, k, err = 0;
2824 struct ubifs_znode *znode;
2825 union ubifs_key *key;
2826
2827 mutex_lock(&c->tnc_mutex);
2828 while (1) {
2829 /* Find first level 0 znode that contains keys to remove */
2830 err = ubifs_lookup_level0(c, from_key, &znode, &n);
2831 if (err < 0)
2832 goto out_unlock;
2833
2834 if (err)
2835 key = from_key;
2836 else {
2837 err = tnc_next(c, &znode, &n);
2838 if (err == -ENOENT) {
2839 err = 0;
2840 goto out_unlock;
2841 }
2842 if (err < 0)
2843 goto out_unlock;
2844 key = &znode->zbranch[n].key;
2845 if (!key_in_range(c, key, from_key, to_key)) {
2846 err = 0;
2847 goto out_unlock;
2848 }
2849 }
2850
2851 /* Ensure the znode is dirtied */
2852 if (znode->cnext || !ubifs_zn_dirty(znode)) {
2853 znode = dirty_cow_bottom_up(c, znode);
2854 if (IS_ERR(znode)) {
2855 err = PTR_ERR(znode);
2856 goto out_unlock;
2857 }
2858 }
2859
2860 /* Remove all keys in range except the first */
2861 for (i = n + 1, k = 0; i < znode->child_cnt; i++, k++) {
2862 key = &znode->zbranch[i].key;
2863 if (!key_in_range(c, key, from_key, to_key))
2864 break;
2865 lnc_free(&znode->zbranch[i]);
2866 err = ubifs_add_dirt(c, znode->zbranch[i].lnum,
2867 znode->zbranch[i].len);
2868 if (err) {
2869 ubifs_dump_znode(c, znode);
2870 goto out_unlock;
2871 }
2872 dbg_tnck(key, "removing key ");
2873 }
2874 if (k) {
2875 for (i = n + 1 + k; i < znode->child_cnt; i++)
2876 znode->zbranch[i - k] = znode->zbranch[i];
2877 znode->child_cnt -= k;
2878 }
2879
2880 /* Now delete the first */
2881 err = tnc_delete(c, znode, n);
2882 if (err)
2883 goto out_unlock;
2884 }
2885
2886 out_unlock:
2887 if (!err)
2888 err = dbg_check_tnc(c, 0);
2889 mutex_unlock(&c->tnc_mutex);
2890 return err;
2891 }
2892
2893 /**
2894 * ubifs_tnc_remove_ino - remove an inode from TNC.
2895 * @c: UBIFS file-system description object
2896 * @inum: inode number to remove
2897 *
2898 * This function remove inode @inum and all the extended attributes associated
2899 * with the anode from TNC and returns zero in case of success or a negative
2900 * error code in case of failure.
2901 */
ubifs_tnc_remove_ino(struct ubifs_info * c,ino_t inum)2902 int ubifs_tnc_remove_ino(struct ubifs_info *c, ino_t inum)
2903 {
2904 union ubifs_key key1, key2;
2905 struct ubifs_dent_node *xent, *pxent = NULL;
2906 struct fscrypt_name nm = {0};
2907
2908 dbg_tnc("ino %lu", (unsigned long)inum);
2909
2910 /*
2911 * Walk all extended attribute entries and remove them together with
2912 * corresponding extended attribute inodes.
2913 */
2914 lowest_xent_key(c, &key1, inum);
2915 while (1) {
2916 ino_t xattr_inum;
2917 int err;
2918
2919 xent = ubifs_tnc_next_ent(c, &key1, &nm);
2920 if (IS_ERR(xent)) {
2921 err = PTR_ERR(xent);
2922 if (err == -ENOENT)
2923 break;
2924 kfree(pxent);
2925 return err;
2926 }
2927
2928 xattr_inum = le64_to_cpu(xent->inum);
2929 dbg_tnc("xent '%s', ino %lu", xent->name,
2930 (unsigned long)xattr_inum);
2931
2932 fname_name(&nm) = xent->name;
2933 fname_len(&nm) = le16_to_cpu(xent->nlen);
2934 err = ubifs_tnc_remove_nm(c, &key1, &nm);
2935 if (err) {
2936 kfree(pxent);
2937 kfree(xent);
2938 return err;
2939 }
2940
2941 lowest_ino_key(c, &key1, xattr_inum);
2942 highest_ino_key(c, &key2, xattr_inum);
2943 err = ubifs_tnc_remove_range(c, &key1, &key2);
2944 if (err) {
2945 kfree(pxent);
2946 kfree(xent);
2947 return err;
2948 }
2949
2950 kfree(pxent);
2951 pxent = xent;
2952 key_read(c, &xent->key, &key1);
2953 }
2954
2955 kfree(pxent);
2956 lowest_ino_key(c, &key1, inum);
2957 highest_ino_key(c, &key2, inum);
2958
2959 return ubifs_tnc_remove_range(c, &key1, &key2);
2960 }
2961
2962 /**
2963 * ubifs_tnc_next_ent - walk directory or extended attribute entries.
2964 * @c: UBIFS file-system description object
2965 * @key: key of last entry
2966 * @nm: name of last entry found or %NULL
2967 *
2968 * This function finds and reads the next directory or extended attribute entry
2969 * after the given key (@key) if there is one. @nm is used to resolve
2970 * collisions.
2971 *
2972 * If the name of the current entry is not known and only the key is known,
2973 * @nm->name has to be %NULL. In this case the semantics of this function is a
2974 * little bit different and it returns the entry corresponding to this key, not
2975 * the next one. If the key was not found, the closest "right" entry is
2976 * returned.
2977 *
2978 * If the fist entry has to be found, @key has to contain the lowest possible
2979 * key value for this inode and @name has to be %NULL.
2980 *
2981 * This function returns the found directory or extended attribute entry node
2982 * in case of success, %-ENOENT is returned if no entry was found, and a
2983 * negative error code is returned in case of failure.
2984 */
ubifs_tnc_next_ent(struct ubifs_info * c,union ubifs_key * key,const struct fscrypt_name * nm)2985 struct ubifs_dent_node *ubifs_tnc_next_ent(struct ubifs_info *c,
2986 union ubifs_key *key,
2987 const struct fscrypt_name *nm)
2988 {
2989 int n, err, type = key_type(c, key);
2990 struct ubifs_znode *znode;
2991 struct ubifs_dent_node *dent;
2992 struct ubifs_zbranch *zbr;
2993 union ubifs_key *dkey;
2994
2995 dbg_tnck(key, "key ");
2996 ubifs_assert(c, is_hash_key(c, key));
2997
2998 mutex_lock(&c->tnc_mutex);
2999 err = ubifs_lookup_level0(c, key, &znode, &n);
3000 if (unlikely(err < 0))
3001 goto out_unlock;
3002
3003 if (fname_len(nm) > 0) {
3004 if (err) {
3005 /* Handle collisions */
3006 if (c->replaying)
3007 err = fallible_resolve_collision(c, key, &znode, &n,
3008 nm, 0);
3009 else
3010 err = resolve_collision(c, key, &znode, &n, nm);
3011 dbg_tnc("rc returned %d, znode %p, n %d",
3012 err, znode, n);
3013 if (unlikely(err < 0))
3014 goto out_unlock;
3015 }
3016
3017 /* Now find next entry */
3018 err = tnc_next(c, &znode, &n);
3019 if (unlikely(err))
3020 goto out_unlock;
3021 } else {
3022 /*
3023 * The full name of the entry was not given, in which case the
3024 * behavior of this function is a little different and it
3025 * returns current entry, not the next one.
3026 */
3027 if (!err) {
3028 /*
3029 * However, the given key does not exist in the TNC
3030 * tree and @znode/@n variables contain the closest
3031 * "preceding" element. Switch to the next one.
3032 */
3033 err = tnc_next(c, &znode, &n);
3034 if (err)
3035 goto out_unlock;
3036 }
3037 }
3038
3039 zbr = &znode->zbranch[n];
3040 dent = kmalloc(zbr->len, GFP_NOFS);
3041 if (unlikely(!dent)) {
3042 err = -ENOMEM;
3043 goto out_unlock;
3044 }
3045
3046 /*
3047 * The above 'tnc_next()' call could lead us to the next inode, check
3048 * this.
3049 */
3050 dkey = &zbr->key;
3051 if (key_inum(c, dkey) != key_inum(c, key) ||
3052 key_type(c, dkey) != type) {
3053 err = -ENOENT;
3054 goto out_free;
3055 }
3056
3057 err = tnc_read_hashed_node(c, zbr, dent);
3058 if (unlikely(err))
3059 goto out_free;
3060
3061 mutex_unlock(&c->tnc_mutex);
3062 return dent;
3063
3064 out_free:
3065 kfree(dent);
3066 out_unlock:
3067 mutex_unlock(&c->tnc_mutex);
3068 return ERR_PTR(err);
3069 }
3070
3071 /**
3072 * tnc_destroy_cnext - destroy left-over obsolete znodes from a failed commit.
3073 * @c: UBIFS file-system description object
3074 *
3075 * Destroy left-over obsolete znodes from a failed commit.
3076 */
tnc_destroy_cnext(struct ubifs_info * c)3077 static void tnc_destroy_cnext(struct ubifs_info *c)
3078 {
3079 struct ubifs_znode *cnext;
3080
3081 if (!c->cnext)
3082 return;
3083 ubifs_assert(c, c->cmt_state == COMMIT_BROKEN);
3084 cnext = c->cnext;
3085 do {
3086 struct ubifs_znode *znode = cnext;
3087
3088 cnext = cnext->cnext;
3089 if (ubifs_zn_obsolete(znode))
3090 kfree(znode);
3091 else if (!ubifs_zn_cow(znode)) {
3092 /*
3093 * Don't forget to update clean znode count after
3094 * committing failed, because ubifs will check this
3095 * count while closing tnc. Non-obsolete znode could
3096 * be re-dirtied during committing process, so dirty
3097 * flag is untrustable. The flag 'COW_ZNODE' is set
3098 * for each dirty znode before committing, and it is
3099 * cleared as long as the znode become clean, so we
3100 * can statistic clean znode count according to this
3101 * flag.
3102 */
3103 atomic_long_inc(&c->clean_zn_cnt);
3104 atomic_long_inc(&ubifs_clean_zn_cnt);
3105 }
3106 } while (cnext && cnext != c->cnext);
3107 }
3108
3109 /**
3110 * ubifs_tnc_close - close TNC subsystem and free all related resources.
3111 * @c: UBIFS file-system description object
3112 */
ubifs_tnc_close(struct ubifs_info * c)3113 void ubifs_tnc_close(struct ubifs_info *c)
3114 {
3115 tnc_destroy_cnext(c);
3116 ubifs_destroy_tnc_tree(c);
3117 kfree(c->gap_lebs);
3118 kfree(c->ilebs);
3119 destroy_old_idx(c);
3120 }
3121
3122 /**
3123 * left_znode - get the znode to the left.
3124 * @c: UBIFS file-system description object
3125 * @znode: znode
3126 *
3127 * This function returns a pointer to the znode to the left of @znode or NULL if
3128 * there is not one. A negative error code is returned on failure.
3129 */
left_znode(struct ubifs_info * c,struct ubifs_znode * znode)3130 static struct ubifs_znode *left_znode(struct ubifs_info *c,
3131 struct ubifs_znode *znode)
3132 {
3133 int level = znode->level;
3134
3135 while (1) {
3136 int n = znode->iip - 1;
3137
3138 /* Go up until we can go left */
3139 znode = znode->parent;
3140 if (!znode)
3141 return NULL;
3142 if (n >= 0) {
3143 /* Now go down the rightmost branch to 'level' */
3144 znode = get_znode(c, znode, n);
3145 if (IS_ERR(znode))
3146 return znode;
3147 while (znode->level != level) {
3148 n = znode->child_cnt - 1;
3149 znode = get_znode(c, znode, n);
3150 if (IS_ERR(znode))
3151 return znode;
3152 }
3153 break;
3154 }
3155 }
3156 return znode;
3157 }
3158
3159 /**
3160 * right_znode - get the znode to the right.
3161 * @c: UBIFS file-system description object
3162 * @znode: znode
3163 *
3164 * This function returns a pointer to the znode to the right of @znode or NULL
3165 * if there is not one. A negative error code is returned on failure.
3166 */
right_znode(struct ubifs_info * c,struct ubifs_znode * znode)3167 static struct ubifs_znode *right_znode(struct ubifs_info *c,
3168 struct ubifs_znode *znode)
3169 {
3170 int level = znode->level;
3171
3172 while (1) {
3173 int n = znode->iip + 1;
3174
3175 /* Go up until we can go right */
3176 znode = znode->parent;
3177 if (!znode)
3178 return NULL;
3179 if (n < znode->child_cnt) {
3180 /* Now go down the leftmost branch to 'level' */
3181 znode = get_znode(c, znode, n);
3182 if (IS_ERR(znode))
3183 return znode;
3184 while (znode->level != level) {
3185 znode = get_znode(c, znode, 0);
3186 if (IS_ERR(znode))
3187 return znode;
3188 }
3189 break;
3190 }
3191 }
3192 return znode;
3193 }
3194
3195 /**
3196 * lookup_znode - find a particular indexing node from TNC.
3197 * @c: UBIFS file-system description object
3198 * @key: index node key to lookup
3199 * @level: index node level
3200 * @lnum: index node LEB number
3201 * @offs: index node offset
3202 *
3203 * This function searches an indexing node by its first key @key and its
3204 * address @lnum:@offs. It looks up the indexing tree by pulling all indexing
3205 * nodes it traverses to TNC. This function is called for indexing nodes which
3206 * were found on the media by scanning, for example when garbage-collecting or
3207 * when doing in-the-gaps commit. This means that the indexing node which is
3208 * looked for does not have to have exactly the same leftmost key @key, because
3209 * the leftmost key may have been changed, in which case TNC will contain a
3210 * dirty znode which still refers the same @lnum:@offs. This function is clever
3211 * enough to recognize such indexing nodes.
3212 *
3213 * Note, if a znode was deleted or changed too much, then this function will
3214 * not find it. For situations like this UBIFS has the old index RB-tree
3215 * (indexed by @lnum:@offs).
3216 *
3217 * This function returns a pointer to the znode found or %NULL if it is not
3218 * found. A negative error code is returned on failure.
3219 */
lookup_znode(struct ubifs_info * c,union ubifs_key * key,int level,int lnum,int offs)3220 static struct ubifs_znode *lookup_znode(struct ubifs_info *c,
3221 union ubifs_key *key, int level,
3222 int lnum, int offs)
3223 {
3224 struct ubifs_znode *znode, *zn;
3225 int n, nn;
3226
3227 ubifs_assert(c, key_type(c, key) < UBIFS_INVALID_KEY);
3228
3229 /*
3230 * The arguments have probably been read off flash, so don't assume
3231 * they are valid.
3232 */
3233 if (level < 0)
3234 return ERR_PTR(-EINVAL);
3235
3236 /* Get the root znode */
3237 znode = c->zroot.znode;
3238 if (!znode) {
3239 znode = ubifs_load_znode(c, &c->zroot, NULL, 0);
3240 if (IS_ERR(znode))
3241 return znode;
3242 }
3243 /* Check if it is the one we are looking for */
3244 if (c->zroot.lnum == lnum && c->zroot.offs == offs)
3245 return znode;
3246 /* Descend to the parent level i.e. (level + 1) */
3247 if (level >= znode->level)
3248 return NULL;
3249 while (1) {
3250 ubifs_search_zbranch(c, znode, key, &n);
3251 if (n < 0) {
3252 /*
3253 * We reached a znode where the leftmost key is greater
3254 * than the key we are searching for. This is the same
3255 * situation as the one described in a huge comment at
3256 * the end of the 'ubifs_lookup_level0()' function. And
3257 * for exactly the same reasons we have to try to look
3258 * left before giving up.
3259 */
3260 znode = left_znode(c, znode);
3261 if (!znode)
3262 return NULL;
3263 if (IS_ERR(znode))
3264 return znode;
3265 ubifs_search_zbranch(c, znode, key, &n);
3266 ubifs_assert(c, n >= 0);
3267 }
3268 if (znode->level == level + 1)
3269 break;
3270 znode = get_znode(c, znode, n);
3271 if (IS_ERR(znode))
3272 return znode;
3273 }
3274 /* Check if the child is the one we are looking for */
3275 if (znode->zbranch[n].lnum == lnum && znode->zbranch[n].offs == offs)
3276 return get_znode(c, znode, n);
3277 /* If the key is unique, there is nowhere else to look */
3278 if (!is_hash_key(c, key))
3279 return NULL;
3280 /*
3281 * The key is not unique and so may be also in the znodes to either
3282 * side.
3283 */
3284 zn = znode;
3285 nn = n;
3286 /* Look left */
3287 while (1) {
3288 /* Move one branch to the left */
3289 if (n)
3290 n -= 1;
3291 else {
3292 znode = left_znode(c, znode);
3293 if (!znode)
3294 break;
3295 if (IS_ERR(znode))
3296 return znode;
3297 n = znode->child_cnt - 1;
3298 }
3299 /* Check it */
3300 if (znode->zbranch[n].lnum == lnum &&
3301 znode->zbranch[n].offs == offs)
3302 return get_znode(c, znode, n);
3303 /* Stop if the key is less than the one we are looking for */
3304 if (keys_cmp(c, &znode->zbranch[n].key, key) < 0)
3305 break;
3306 }
3307 /* Back to the middle */
3308 znode = zn;
3309 n = nn;
3310 /* Look right */
3311 while (1) {
3312 /* Move one branch to the right */
3313 if (++n >= znode->child_cnt) {
3314 znode = right_znode(c, znode);
3315 if (!znode)
3316 break;
3317 if (IS_ERR(znode))
3318 return znode;
3319 n = 0;
3320 }
3321 /* Check it */
3322 if (znode->zbranch[n].lnum == lnum &&
3323 znode->zbranch[n].offs == offs)
3324 return get_znode(c, znode, n);
3325 /* Stop if the key is greater than the one we are looking for */
3326 if (keys_cmp(c, &znode->zbranch[n].key, key) > 0)
3327 break;
3328 }
3329 return NULL;
3330 }
3331
3332 /**
3333 * is_idx_node_in_tnc - determine if an index node is in the TNC.
3334 * @c: UBIFS file-system description object
3335 * @key: key of index node
3336 * @level: index node level
3337 * @lnum: LEB number of index node
3338 * @offs: offset of index node
3339 *
3340 * This function returns %0 if the index node is not referred to in the TNC, %1
3341 * if the index node is referred to in the TNC and the corresponding znode is
3342 * dirty, %2 if an index node is referred to in the TNC and the corresponding
3343 * znode is clean, and a negative error code in case of failure.
3344 *
3345 * Note, the @key argument has to be the key of the first child. Also note,
3346 * this function relies on the fact that 0:0 is never a valid LEB number and
3347 * offset for a main-area node.
3348 */
is_idx_node_in_tnc(struct ubifs_info * c,union ubifs_key * key,int level,int lnum,int offs)3349 int is_idx_node_in_tnc(struct ubifs_info *c, union ubifs_key *key, int level,
3350 int lnum, int offs)
3351 {
3352 struct ubifs_znode *znode;
3353
3354 znode = lookup_znode(c, key, level, lnum, offs);
3355 if (!znode)
3356 return 0;
3357 if (IS_ERR(znode))
3358 return PTR_ERR(znode);
3359
3360 return ubifs_zn_dirty(znode) ? 1 : 2;
3361 }
3362
3363 /**
3364 * is_leaf_node_in_tnc - determine if a non-indexing not is in the TNC.
3365 * @c: UBIFS file-system description object
3366 * @key: node key
3367 * @lnum: node LEB number
3368 * @offs: node offset
3369 *
3370 * This function returns %1 if the node is referred to in the TNC, %0 if it is
3371 * not, and a negative error code in case of failure.
3372 *
3373 * Note, this function relies on the fact that 0:0 is never a valid LEB number
3374 * and offset for a main-area node.
3375 */
is_leaf_node_in_tnc(struct ubifs_info * c,union ubifs_key * key,int lnum,int offs)3376 static int is_leaf_node_in_tnc(struct ubifs_info *c, union ubifs_key *key,
3377 int lnum, int offs)
3378 {
3379 struct ubifs_zbranch *zbr;
3380 struct ubifs_znode *znode, *zn;
3381 int n, found, err, nn;
3382 const int unique = !is_hash_key(c, key);
3383
3384 found = ubifs_lookup_level0(c, key, &znode, &n);
3385 if (found < 0)
3386 return found; /* Error code */
3387 if (!found)
3388 return 0;
3389 zbr = &znode->zbranch[n];
3390 if (lnum == zbr->lnum && offs == zbr->offs)
3391 return 1; /* Found it */
3392 if (unique)
3393 return 0;
3394 /*
3395 * Because the key is not unique, we have to look left
3396 * and right as well
3397 */
3398 zn = znode;
3399 nn = n;
3400 /* Look left */
3401 while (1) {
3402 err = tnc_prev(c, &znode, &n);
3403 if (err == -ENOENT)
3404 break;
3405 if (err)
3406 return err;
3407 if (keys_cmp(c, key, &znode->zbranch[n].key))
3408 break;
3409 zbr = &znode->zbranch[n];
3410 if (lnum == zbr->lnum && offs == zbr->offs)
3411 return 1; /* Found it */
3412 }
3413 /* Look right */
3414 znode = zn;
3415 n = nn;
3416 while (1) {
3417 err = tnc_next(c, &znode, &n);
3418 if (err) {
3419 if (err == -ENOENT)
3420 return 0;
3421 return err;
3422 }
3423 if (keys_cmp(c, key, &znode->zbranch[n].key))
3424 break;
3425 zbr = &znode->zbranch[n];
3426 if (lnum == zbr->lnum && offs == zbr->offs)
3427 return 1; /* Found it */
3428 }
3429 return 0;
3430 }
3431
3432 /**
3433 * ubifs_tnc_has_node - determine whether a node is in the TNC.
3434 * @c: UBIFS file-system description object
3435 * @key: node key
3436 * @level: index node level (if it is an index node)
3437 * @lnum: node LEB number
3438 * @offs: node offset
3439 * @is_idx: non-zero if the node is an index node
3440 *
3441 * This function returns %1 if the node is in the TNC, %0 if it is not, and a
3442 * negative error code in case of failure. For index nodes, @key has to be the
3443 * key of the first child. An index node is considered to be in the TNC only if
3444 * the corresponding znode is clean or has not been loaded.
3445 */
ubifs_tnc_has_node(struct ubifs_info * c,union ubifs_key * key,int level,int lnum,int offs,int is_idx)3446 int ubifs_tnc_has_node(struct ubifs_info *c, union ubifs_key *key, int level,
3447 int lnum, int offs, int is_idx)
3448 {
3449 int err;
3450
3451 mutex_lock(&c->tnc_mutex);
3452 if (is_idx) {
3453 err = is_idx_node_in_tnc(c, key, level, lnum, offs);
3454 if (err < 0)
3455 goto out_unlock;
3456 if (err == 1)
3457 /* The index node was found but it was dirty */
3458 err = 0;
3459 else if (err == 2)
3460 /* The index node was found and it was clean */
3461 err = 1;
3462 else
3463 BUG_ON(err != 0);
3464 } else
3465 err = is_leaf_node_in_tnc(c, key, lnum, offs);
3466
3467 out_unlock:
3468 mutex_unlock(&c->tnc_mutex);
3469 return err;
3470 }
3471
3472 /**
3473 * ubifs_dirty_idx_node - dirty an index node.
3474 * @c: UBIFS file-system description object
3475 * @key: index node key
3476 * @level: index node level
3477 * @lnum: index node LEB number
3478 * @offs: index node offset
3479 *
3480 * This function loads and dirties an index node so that it can be garbage
3481 * collected. The @key argument has to be the key of the first child. This
3482 * function relies on the fact that 0:0 is never a valid LEB number and offset
3483 * for a main-area node. Returns %0 on success and a negative error code on
3484 * failure.
3485 */
ubifs_dirty_idx_node(struct ubifs_info * c,union ubifs_key * key,int level,int lnum,int offs)3486 int ubifs_dirty_idx_node(struct ubifs_info *c, union ubifs_key *key, int level,
3487 int lnum, int offs)
3488 {
3489 struct ubifs_znode *znode;
3490 int err = 0;
3491
3492 mutex_lock(&c->tnc_mutex);
3493 znode = lookup_znode(c, key, level, lnum, offs);
3494 if (!znode)
3495 goto out_unlock;
3496 if (IS_ERR(znode)) {
3497 err = PTR_ERR(znode);
3498 goto out_unlock;
3499 }
3500 znode = dirty_cow_bottom_up(c, znode);
3501 if (IS_ERR(znode)) {
3502 err = PTR_ERR(znode);
3503 goto out_unlock;
3504 }
3505
3506 out_unlock:
3507 mutex_unlock(&c->tnc_mutex);
3508 return err;
3509 }
3510
3511 /**
3512 * dbg_check_inode_size - check if inode size is correct.
3513 * @c: UBIFS file-system description object
3514 * @inode: inode to check
3515 * @size: inode size
3516 *
3517 * This function makes sure that the inode size (@size) is correct and it does
3518 * not have any pages beyond @size. Returns zero if the inode is OK, %-EINVAL
3519 * if it has a data page beyond @size, and other negative error code in case of
3520 * other errors.
3521 */
dbg_check_inode_size(struct ubifs_info * c,const struct inode * inode,loff_t size)3522 int dbg_check_inode_size(struct ubifs_info *c, const struct inode *inode,
3523 loff_t size)
3524 {
3525 int err, n;
3526 union ubifs_key from_key, to_key, *key;
3527 struct ubifs_znode *znode;
3528 unsigned int block;
3529
3530 if (!S_ISREG(inode->i_mode))
3531 return 0;
3532 if (!dbg_is_chk_gen(c))
3533 return 0;
3534
3535 block = (size + UBIFS_BLOCK_SIZE - 1) >> UBIFS_BLOCK_SHIFT;
3536 data_key_init(c, &from_key, inode->i_ino, block);
3537 highest_data_key(c, &to_key, inode->i_ino);
3538
3539 mutex_lock(&c->tnc_mutex);
3540 err = ubifs_lookup_level0(c, &from_key, &znode, &n);
3541 if (err < 0)
3542 goto out_unlock;
3543
3544 if (err) {
3545 key = &from_key;
3546 goto out_dump;
3547 }
3548
3549 err = tnc_next(c, &znode, &n);
3550 if (err == -ENOENT) {
3551 err = 0;
3552 goto out_unlock;
3553 }
3554 if (err < 0)
3555 goto out_unlock;
3556
3557 ubifs_assert(c, err == 0);
3558 key = &znode->zbranch[n].key;
3559 if (!key_in_range(c, key, &from_key, &to_key))
3560 goto out_unlock;
3561
3562 out_dump:
3563 block = key_block(c, key);
3564 ubifs_err(c, "inode %lu has size %lld, but there are data at offset %lld",
3565 (unsigned long)inode->i_ino, size,
3566 ((loff_t)block) << UBIFS_BLOCK_SHIFT);
3567 mutex_unlock(&c->tnc_mutex);
3568 ubifs_dump_inode(c, inode);
3569 dump_stack();
3570 return -EINVAL;
3571
3572 out_unlock:
3573 mutex_unlock(&c->tnc_mutex);
3574 return err;
3575 }
3576