Merge tag 'for-linville-20130318' of git://github.com/kvalo/ath6kl
[platform/adaptation/renesas_rcar/renesas_kernel.git] / fs / ubifs / tnc_commit.c
1 /*
2  * This file is part of UBIFS.
3  *
4  * Copyright (C) 2006-2008 Nokia Corporation.
5  *
6  * This program is free software; you can redistribute it and/or modify it
7  * under the terms of the GNU General Public License version 2 as published by
8  * the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but WITHOUT
11  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
13  * more details.
14  *
15  * You should have received a copy of the GNU General Public License along with
16  * this program; if not, write to the Free Software Foundation, Inc., 51
17  * Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
18  *
19  * Authors: Adrian Hunter
20  *          Artem Bityutskiy (Битюцкий Артём)
21  */
22
23 /* This file implements TNC functions for committing */
24
25 #include <linux/random.h>
26 #include "ubifs.h"
27
28 /**
29  * make_idx_node - make an index node for fill-the-gaps method of TNC commit.
30  * @c: UBIFS file-system description object
31  * @idx: buffer in which to place new index node
32  * @znode: znode from which to make new index node
33  * @lnum: LEB number where new index node will be written
34  * @offs: offset where new index node will be written
35  * @len: length of new index node
36  */
37 static int make_idx_node(struct ubifs_info *c, struct ubifs_idx_node *idx,
38                          struct ubifs_znode *znode, int lnum, int offs, int len)
39 {
40         struct ubifs_znode *zp;
41         int i, err;
42
43         /* Make index node */
44         idx->ch.node_type = UBIFS_IDX_NODE;
45         idx->child_cnt = cpu_to_le16(znode->child_cnt);
46         idx->level = cpu_to_le16(znode->level);
47         for (i = 0; i < znode->child_cnt; i++) {
48                 struct ubifs_branch *br = ubifs_idx_branch(c, idx, i);
49                 struct ubifs_zbranch *zbr = &znode->zbranch[i];
50
51                 key_write_idx(c, &zbr->key, &br->key);
52                 br->lnum = cpu_to_le32(zbr->lnum);
53                 br->offs = cpu_to_le32(zbr->offs);
54                 br->len = cpu_to_le32(zbr->len);
55                 if (!zbr->lnum || !zbr->len) {
56                         ubifs_err("bad ref in znode");
57                         ubifs_dump_znode(c, znode);
58                         if (zbr->znode)
59                                 ubifs_dump_znode(c, zbr->znode);
60                 }
61         }
62         ubifs_prepare_node(c, idx, len, 0);
63
64         znode->lnum = lnum;
65         znode->offs = offs;
66         znode->len = len;
67
68         err = insert_old_idx_znode(c, znode);
69
70         /* Update the parent */
71         zp = znode->parent;
72         if (zp) {
73                 struct ubifs_zbranch *zbr;
74
75                 zbr = &zp->zbranch[znode->iip];
76                 zbr->lnum = lnum;
77                 zbr->offs = offs;
78                 zbr->len = len;
79         } else {
80                 c->zroot.lnum = lnum;
81                 c->zroot.offs = offs;
82                 c->zroot.len = len;
83         }
84         c->calc_idx_sz += ALIGN(len, 8);
85
86         atomic_long_dec(&c->dirty_zn_cnt);
87
88         ubifs_assert(ubifs_zn_dirty(znode));
89         ubifs_assert(ubifs_zn_cow(znode));
90
91         /*
92          * Note, unlike 'write_index()' we do not add memory barriers here
93          * because this function is called with @c->tnc_mutex locked.
94          */
95         __clear_bit(DIRTY_ZNODE, &znode->flags);
96         __clear_bit(COW_ZNODE, &znode->flags);
97
98         return err;
99 }
100
101 /**
102  * fill_gap - make index nodes in gaps in dirty index LEBs.
103  * @c: UBIFS file-system description object
104  * @lnum: LEB number that gap appears in
105  * @gap_start: offset of start of gap
106  * @gap_end: offset of end of gap
107  * @dirt: adds dirty space to this
108  *
109  * This function returns the number of index nodes written into the gap.
110  */
111 static int fill_gap(struct ubifs_info *c, int lnum, int gap_start, int gap_end,
112                     int *dirt)
113 {
114         int len, gap_remains, gap_pos, written, pad_len;
115
116         ubifs_assert((gap_start & 7) == 0);
117         ubifs_assert((gap_end & 7) == 0);
118         ubifs_assert(gap_end >= gap_start);
119
120         gap_remains = gap_end - gap_start;
121         if (!gap_remains)
122                 return 0;
123         gap_pos = gap_start;
124         written = 0;
125         while (c->enext) {
126                 len = ubifs_idx_node_sz(c, c->enext->child_cnt);
127                 if (len < gap_remains) {
128                         struct ubifs_znode *znode = c->enext;
129                         const int alen = ALIGN(len, 8);
130                         int err;
131
132                         ubifs_assert(alen <= gap_remains);
133                         err = make_idx_node(c, c->ileb_buf + gap_pos, znode,
134                                             lnum, gap_pos, len);
135                         if (err)
136                                 return err;
137                         gap_remains -= alen;
138                         gap_pos += alen;
139                         c->enext = znode->cnext;
140                         if (c->enext == c->cnext)
141                                 c->enext = NULL;
142                         written += 1;
143                 } else
144                         break;
145         }
146         if (gap_end == c->leb_size) {
147                 c->ileb_len = ALIGN(gap_pos, c->min_io_size);
148                 /* Pad to end of min_io_size */
149                 pad_len = c->ileb_len - gap_pos;
150         } else
151                 /* Pad to end of gap */
152                 pad_len = gap_remains;
153         dbg_gc("LEB %d:%d to %d len %d nodes written %d wasted bytes %d",
154                lnum, gap_start, gap_end, gap_end - gap_start, written, pad_len);
155         ubifs_pad(c, c->ileb_buf + gap_pos, pad_len);
156         *dirt += pad_len;
157         return written;
158 }
159
160 /**
161  * find_old_idx - find an index node obsoleted since the last commit start.
162  * @c: UBIFS file-system description object
163  * @lnum: LEB number of obsoleted index node
164  * @offs: offset of obsoleted index node
165  *
166  * Returns %1 if found and %0 otherwise.
167  */
168 static int find_old_idx(struct ubifs_info *c, int lnum, int offs)
169 {
170         struct ubifs_old_idx *o;
171         struct rb_node *p;
172
173         p = c->old_idx.rb_node;
174         while (p) {
175                 o = rb_entry(p, struct ubifs_old_idx, rb);
176                 if (lnum < o->lnum)
177                         p = p->rb_left;
178                 else if (lnum > o->lnum)
179                         p = p->rb_right;
180                 else if (offs < o->offs)
181                         p = p->rb_left;
182                 else if (offs > o->offs)
183                         p = p->rb_right;
184                 else
185                         return 1;
186         }
187         return 0;
188 }
189
190 /**
191  * is_idx_node_in_use - determine if an index node can be overwritten.
192  * @c: UBIFS file-system description object
193  * @key: key of index node
194  * @level: index node level
195  * @lnum: LEB number of index node
196  * @offs: offset of index node
197  *
198  * If @key / @lnum / @offs identify an index node that was not part of the old
199  * index, then this function returns %0 (obsolete).  Else if the index node was
200  * part of the old index but is now dirty %1 is returned, else if it is clean %2
201  * is returned. A negative error code is returned on failure.
202  */
203 static int is_idx_node_in_use(struct ubifs_info *c, union ubifs_key *key,
204                               int level, int lnum, int offs)
205 {
206         int ret;
207
208         ret = is_idx_node_in_tnc(c, key, level, lnum, offs);
209         if (ret < 0)
210                 return ret; /* Error code */
211         if (ret == 0)
212                 if (find_old_idx(c, lnum, offs))
213                         return 1;
214         return ret;
215 }
216
217 /**
218  * layout_leb_in_gaps - layout index nodes using in-the-gaps method.
219  * @c: UBIFS file-system description object
220  * @p: return LEB number here
221  *
222  * This function lays out new index nodes for dirty znodes using in-the-gaps
223  * method of TNC commit.
224  * This function merely puts the next znode into the next gap, making no attempt
225  * to try to maximise the number of znodes that fit.
226  * This function returns the number of index nodes written into the gaps, or a
227  * negative error code on failure.
228  */
229 static int layout_leb_in_gaps(struct ubifs_info *c, int *p)
230 {
231         struct ubifs_scan_leb *sleb;
232         struct ubifs_scan_node *snod;
233         int lnum, dirt = 0, gap_start, gap_end, err, written, tot_written;
234
235         tot_written = 0;
236         /* Get an index LEB with lots of obsolete index nodes */
237         lnum = ubifs_find_dirty_idx_leb(c);
238         if (lnum < 0)
239                 /*
240                  * There also may be dirt in the index head that could be
241                  * filled, however we do not check there at present.
242                  */
243                 return lnum; /* Error code */
244         *p = lnum;
245         dbg_gc("LEB %d", lnum);
246         /*
247          * Scan the index LEB.  We use the generic scan for this even though
248          * it is more comprehensive and less efficient than is needed for this
249          * purpose.
250          */
251         sleb = ubifs_scan(c, lnum, 0, c->ileb_buf, 0);
252         c->ileb_len = 0;
253         if (IS_ERR(sleb))
254                 return PTR_ERR(sleb);
255         gap_start = 0;
256         list_for_each_entry(snod, &sleb->nodes, list) {
257                 struct ubifs_idx_node *idx;
258                 int in_use, level;
259
260                 ubifs_assert(snod->type == UBIFS_IDX_NODE);
261                 idx = snod->node;
262                 key_read(c, ubifs_idx_key(c, idx), &snod->key);
263                 level = le16_to_cpu(idx->level);
264                 /* Determine if the index node is in use (not obsolete) */
265                 in_use = is_idx_node_in_use(c, &snod->key, level, lnum,
266                                             snod->offs);
267                 if (in_use < 0) {
268                         ubifs_scan_destroy(sleb);
269                         return in_use; /* Error code */
270                 }
271                 if (in_use) {
272                         if (in_use == 1)
273                                 dirt += ALIGN(snod->len, 8);
274                         /*
275                          * The obsolete index nodes form gaps that can be
276                          * overwritten.  This gap has ended because we have
277                          * found an index node that is still in use
278                          * i.e. not obsolete
279                          */
280                         gap_end = snod->offs;
281                         /* Try to fill gap */
282                         written = fill_gap(c, lnum, gap_start, gap_end, &dirt);
283                         if (written < 0) {
284                                 ubifs_scan_destroy(sleb);
285                                 return written; /* Error code */
286                         }
287                         tot_written += written;
288                         gap_start = ALIGN(snod->offs + snod->len, 8);
289                 }
290         }
291         ubifs_scan_destroy(sleb);
292         c->ileb_len = c->leb_size;
293         gap_end = c->leb_size;
294         /* Try to fill gap */
295         written = fill_gap(c, lnum, gap_start, gap_end, &dirt);
296         if (written < 0)
297                 return written; /* Error code */
298         tot_written += written;
299         if (tot_written == 0) {
300                 struct ubifs_lprops lp;
301
302                 dbg_gc("LEB %d wrote %d index nodes", lnum, tot_written);
303                 err = ubifs_read_one_lp(c, lnum, &lp);
304                 if (err)
305                         return err;
306                 if (lp.free == c->leb_size) {
307                         /*
308                          * We must have snatched this LEB from the idx_gc list
309                          * so we need to correct the free and dirty space.
310                          */
311                         err = ubifs_change_one_lp(c, lnum,
312                                                   c->leb_size - c->ileb_len,
313                                                   dirt, 0, 0, 0);
314                         if (err)
315                                 return err;
316                 }
317                 return 0;
318         }
319         err = ubifs_change_one_lp(c, lnum, c->leb_size - c->ileb_len, dirt,
320                                   0, 0, 0);
321         if (err)
322                 return err;
323         err = ubifs_leb_change(c, lnum, c->ileb_buf, c->ileb_len);
324         if (err)
325                 return err;
326         dbg_gc("LEB %d wrote %d index nodes", lnum, tot_written);
327         return tot_written;
328 }
329
330 /**
331  * get_leb_cnt - calculate the number of empty LEBs needed to commit.
332  * @c: UBIFS file-system description object
333  * @cnt: number of znodes to commit
334  *
335  * This function returns the number of empty LEBs needed to commit @cnt znodes
336  * to the current index head.  The number is not exact and may be more than
337  * needed.
338  */
339 static int get_leb_cnt(struct ubifs_info *c, int cnt)
340 {
341         int d;
342
343         /* Assume maximum index node size (i.e. overestimate space needed) */
344         cnt -= (c->leb_size - c->ihead_offs) / c->max_idx_node_sz;
345         if (cnt < 0)
346                 cnt = 0;
347         d = c->leb_size / c->max_idx_node_sz;
348         return DIV_ROUND_UP(cnt, d);
349 }
350
351 /**
352  * layout_in_gaps - in-the-gaps method of committing TNC.
353  * @c: UBIFS file-system description object
354  * @cnt: number of dirty znodes to commit.
355  *
356  * This function lays out new index nodes for dirty znodes using in-the-gaps
357  * method of TNC commit.
358  *
359  * This function returns %0 on success and a negative error code on failure.
360  */
361 static int layout_in_gaps(struct ubifs_info *c, int cnt)
362 {
363         int err, leb_needed_cnt, written, *p;
364
365         dbg_gc("%d znodes to write", cnt);
366
367         c->gap_lebs = kmalloc(sizeof(int) * (c->lst.idx_lebs + 1), GFP_NOFS);
368         if (!c->gap_lebs)
369                 return -ENOMEM;
370
371         p = c->gap_lebs;
372         do {
373                 ubifs_assert(p < c->gap_lebs + sizeof(int) * c->lst.idx_lebs);
374                 written = layout_leb_in_gaps(c, p);
375                 if (written < 0) {
376                         err = written;
377                         if (err != -ENOSPC) {
378                                 kfree(c->gap_lebs);
379                                 c->gap_lebs = NULL;
380                                 return err;
381                         }
382                         if (!dbg_is_chk_index(c)) {
383                                 /*
384                                  * Do not print scary warnings if the debugging
385                                  * option which forces in-the-gaps is enabled.
386                                  */
387                                 ubifs_warn("out of space");
388                                 ubifs_dump_budg(c, &c->bi);
389                                 ubifs_dump_lprops(c);
390                         }
391                         /* Try to commit anyway */
392                         err = 0;
393                         break;
394                 }
395                 p++;
396                 cnt -= written;
397                 leb_needed_cnt = get_leb_cnt(c, cnt);
398                 dbg_gc("%d znodes remaining, need %d LEBs, have %d", cnt,
399                        leb_needed_cnt, c->ileb_cnt);
400         } while (leb_needed_cnt > c->ileb_cnt);
401
402         *p = -1;
403         return 0;
404 }
405
406 /**
407  * layout_in_empty_space - layout index nodes in empty space.
408  * @c: UBIFS file-system description object
409  *
410  * This function lays out new index nodes for dirty znodes using empty LEBs.
411  *
412  * This function returns %0 on success and a negative error code on failure.
413  */
414 static int layout_in_empty_space(struct ubifs_info *c)
415 {
416         struct ubifs_znode *znode, *cnext, *zp;
417         int lnum, offs, len, next_len, buf_len, buf_offs, used, avail;
418         int wlen, blen, err;
419
420         cnext = c->enext;
421         if (!cnext)
422                 return 0;
423
424         lnum = c->ihead_lnum;
425         buf_offs = c->ihead_offs;
426
427         buf_len = ubifs_idx_node_sz(c, c->fanout);
428         buf_len = ALIGN(buf_len, c->min_io_size);
429         used = 0;
430         avail = buf_len;
431
432         /* Ensure there is enough room for first write */
433         next_len = ubifs_idx_node_sz(c, cnext->child_cnt);
434         if (buf_offs + next_len > c->leb_size)
435                 lnum = -1;
436
437         while (1) {
438                 znode = cnext;
439
440                 len = ubifs_idx_node_sz(c, znode->child_cnt);
441
442                 /* Determine the index node position */
443                 if (lnum == -1) {
444                         if (c->ileb_nxt >= c->ileb_cnt) {
445                                 ubifs_err("out of space");
446                                 return -ENOSPC;
447                         }
448                         lnum = c->ilebs[c->ileb_nxt++];
449                         buf_offs = 0;
450                         used = 0;
451                         avail = buf_len;
452                 }
453
454                 offs = buf_offs + used;
455
456                 znode->lnum = lnum;
457                 znode->offs = offs;
458                 znode->len = len;
459
460                 /* Update the parent */
461                 zp = znode->parent;
462                 if (zp) {
463                         struct ubifs_zbranch *zbr;
464                         int i;
465
466                         i = znode->iip;
467                         zbr = &zp->zbranch[i];
468                         zbr->lnum = lnum;
469                         zbr->offs = offs;
470                         zbr->len = len;
471                 } else {
472                         c->zroot.lnum = lnum;
473                         c->zroot.offs = offs;
474                         c->zroot.len = len;
475                 }
476                 c->calc_idx_sz += ALIGN(len, 8);
477
478                 /*
479                  * Once lprops is updated, we can decrease the dirty znode count
480                  * but it is easier to just do it here.
481                  */
482                 atomic_long_dec(&c->dirty_zn_cnt);
483
484                 /*
485                  * Calculate the next index node length to see if there is
486                  * enough room for it
487                  */
488                 cnext = znode->cnext;
489                 if (cnext == c->cnext)
490                         next_len = 0;
491                 else
492                         next_len = ubifs_idx_node_sz(c, cnext->child_cnt);
493
494                 /* Update buffer positions */
495                 wlen = used + len;
496                 used += ALIGN(len, 8);
497                 avail -= ALIGN(len, 8);
498
499                 if (next_len != 0 &&
500                     buf_offs + used + next_len <= c->leb_size &&
501                     avail > 0)
502                         continue;
503
504                 if (avail <= 0 && next_len &&
505                     buf_offs + used + next_len <= c->leb_size)
506                         blen = buf_len;
507                 else
508                         blen = ALIGN(wlen, c->min_io_size);
509
510                 /* The buffer is full or there are no more znodes to do */
511                 buf_offs += blen;
512                 if (next_len) {
513                         if (buf_offs + next_len > c->leb_size) {
514                                 err = ubifs_update_one_lp(c, lnum,
515                                         c->leb_size - buf_offs, blen - used,
516                                         0, 0);
517                                 if (err)
518                                         return err;
519                                 lnum = -1;
520                         }
521                         used -= blen;
522                         if (used < 0)
523                                 used = 0;
524                         avail = buf_len - used;
525                         continue;
526                 }
527                 err = ubifs_update_one_lp(c, lnum, c->leb_size - buf_offs,
528                                           blen - used, 0, 0);
529                 if (err)
530                         return err;
531                 break;
532         }
533
534         c->dbg->new_ihead_lnum = lnum;
535         c->dbg->new_ihead_offs = buf_offs;
536
537         return 0;
538 }
539
540 /**
541  * layout_commit - determine positions of index nodes to commit.
542  * @c: UBIFS file-system description object
543  * @no_space: indicates that insufficient empty LEBs were allocated
544  * @cnt: number of znodes to commit
545  *
546  * Calculate and update the positions of index nodes to commit.  If there were
547  * an insufficient number of empty LEBs allocated, then index nodes are placed
548  * into the gaps created by obsolete index nodes in non-empty index LEBs.  For
549  * this purpose, an obsolete index node is one that was not in the index as at
550  * the end of the last commit.  To write "in-the-gaps" requires that those index
551  * LEBs are updated atomically in-place.
552  */
553 static int layout_commit(struct ubifs_info *c, int no_space, int cnt)
554 {
555         int err;
556
557         if (no_space) {
558                 err = layout_in_gaps(c, cnt);
559                 if (err)
560                         return err;
561         }
562         err = layout_in_empty_space(c);
563         return err;
564 }
565
566 /**
567  * find_first_dirty - find first dirty znode.
568  * @znode: znode to begin searching from
569  */
570 static struct ubifs_znode *find_first_dirty(struct ubifs_znode *znode)
571 {
572         int i, cont;
573
574         if (!znode)
575                 return NULL;
576
577         while (1) {
578                 if (znode->level == 0) {
579                         if (ubifs_zn_dirty(znode))
580                                 return znode;
581                         return NULL;
582                 }
583                 cont = 0;
584                 for (i = 0; i < znode->child_cnt; i++) {
585                         struct ubifs_zbranch *zbr = &znode->zbranch[i];
586
587                         if (zbr->znode && ubifs_zn_dirty(zbr->znode)) {
588                                 znode = zbr->znode;
589                                 cont = 1;
590                                 break;
591                         }
592                 }
593                 if (!cont) {
594                         if (ubifs_zn_dirty(znode))
595                                 return znode;
596                         return NULL;
597                 }
598         }
599 }
600
601 /**
602  * find_next_dirty - find next dirty znode.
603  * @znode: znode to begin searching from
604  */
605 static struct ubifs_znode *find_next_dirty(struct ubifs_znode *znode)
606 {
607         int n = znode->iip + 1;
608
609         znode = znode->parent;
610         if (!znode)
611                 return NULL;
612         for (; n < znode->child_cnt; n++) {
613                 struct ubifs_zbranch *zbr = &znode->zbranch[n];
614
615                 if (zbr->znode && ubifs_zn_dirty(zbr->znode))
616                         return find_first_dirty(zbr->znode);
617         }
618         return znode;
619 }
620
621 /**
622  * get_znodes_to_commit - create list of dirty znodes to commit.
623  * @c: UBIFS file-system description object
624  *
625  * This function returns the number of znodes to commit.
626  */
627 static int get_znodes_to_commit(struct ubifs_info *c)
628 {
629         struct ubifs_znode *znode, *cnext;
630         int cnt = 0;
631
632         c->cnext = find_first_dirty(c->zroot.znode);
633         znode = c->enext = c->cnext;
634         if (!znode) {
635                 dbg_cmt("no znodes to commit");
636                 return 0;
637         }
638         cnt += 1;
639         while (1) {
640                 ubifs_assert(!ubifs_zn_cow(znode));
641                 __set_bit(COW_ZNODE, &znode->flags);
642                 znode->alt = 0;
643                 cnext = find_next_dirty(znode);
644                 if (!cnext) {
645                         znode->cnext = c->cnext;
646                         break;
647                 }
648                 znode->cnext = cnext;
649                 znode = cnext;
650                 cnt += 1;
651         }
652         dbg_cmt("committing %d znodes", cnt);
653         ubifs_assert(cnt == atomic_long_read(&c->dirty_zn_cnt));
654         return cnt;
655 }
656
657 /**
658  * alloc_idx_lebs - allocate empty LEBs to be used to commit.
659  * @c: UBIFS file-system description object
660  * @cnt: number of znodes to commit
661  *
662  * This function returns %-ENOSPC if it cannot allocate a sufficient number of
663  * empty LEBs.  %0 is returned on success, otherwise a negative error code
664  * is returned.
665  */
666 static int alloc_idx_lebs(struct ubifs_info *c, int cnt)
667 {
668         int i, leb_cnt, lnum;
669
670         c->ileb_cnt = 0;
671         c->ileb_nxt = 0;
672         leb_cnt = get_leb_cnt(c, cnt);
673         dbg_cmt("need about %d empty LEBS for TNC commit", leb_cnt);
674         if (!leb_cnt)
675                 return 0;
676         c->ilebs = kmalloc(leb_cnt * sizeof(int), GFP_NOFS);
677         if (!c->ilebs)
678                 return -ENOMEM;
679         for (i = 0; i < leb_cnt; i++) {
680                 lnum = ubifs_find_free_leb_for_idx(c);
681                 if (lnum < 0)
682                         return lnum;
683                 c->ilebs[c->ileb_cnt++] = lnum;
684                 dbg_cmt("LEB %d", lnum);
685         }
686         if (dbg_is_chk_index(c) && !(prandom_u32() & 7))
687                 return -ENOSPC;
688         return 0;
689 }
690
691 /**
692  * free_unused_idx_lebs - free unused LEBs that were allocated for the commit.
693  * @c: UBIFS file-system description object
694  *
695  * It is possible that we allocate more empty LEBs for the commit than we need.
696  * This functions frees the surplus.
697  *
698  * This function returns %0 on success and a negative error code on failure.
699  */
700 static int free_unused_idx_lebs(struct ubifs_info *c)
701 {
702         int i, err = 0, lnum, er;
703
704         for (i = c->ileb_nxt; i < c->ileb_cnt; i++) {
705                 lnum = c->ilebs[i];
706                 dbg_cmt("LEB %d", lnum);
707                 er = ubifs_change_one_lp(c, lnum, LPROPS_NC, LPROPS_NC, 0,
708                                          LPROPS_INDEX | LPROPS_TAKEN, 0);
709                 if (!err)
710                         err = er;
711         }
712         return err;
713 }
714
715 /**
716  * free_idx_lebs - free unused LEBs after commit end.
717  * @c: UBIFS file-system description object
718  *
719  * This function returns %0 on success and a negative error code on failure.
720  */
721 static int free_idx_lebs(struct ubifs_info *c)
722 {
723         int err;
724
725         err = free_unused_idx_lebs(c);
726         kfree(c->ilebs);
727         c->ilebs = NULL;
728         return err;
729 }
730
731 /**
732  * ubifs_tnc_start_commit - start TNC commit.
733  * @c: UBIFS file-system description object
734  * @zroot: new index root position is returned here
735  *
736  * This function prepares the list of indexing nodes to commit and lays out
737  * their positions on flash. If there is not enough free space it uses the
738  * in-gap commit method. Returns zero in case of success and a negative error
739  * code in case of failure.
740  */
741 int ubifs_tnc_start_commit(struct ubifs_info *c, struct ubifs_zbranch *zroot)
742 {
743         int err = 0, cnt;
744
745         mutex_lock(&c->tnc_mutex);
746         err = dbg_check_tnc(c, 1);
747         if (err)
748                 goto out;
749         cnt = get_znodes_to_commit(c);
750         if (cnt != 0) {
751                 int no_space = 0;
752
753                 err = alloc_idx_lebs(c, cnt);
754                 if (err == -ENOSPC)
755                         no_space = 1;
756                 else if (err)
757                         goto out_free;
758                 err = layout_commit(c, no_space, cnt);
759                 if (err)
760                         goto out_free;
761                 ubifs_assert(atomic_long_read(&c->dirty_zn_cnt) == 0);
762                 err = free_unused_idx_lebs(c);
763                 if (err)
764                         goto out;
765         }
766         destroy_old_idx(c);
767         memcpy(zroot, &c->zroot, sizeof(struct ubifs_zbranch));
768
769         err = ubifs_save_dirty_idx_lnums(c);
770         if (err)
771                 goto out;
772
773         spin_lock(&c->space_lock);
774         /*
775          * Although we have not finished committing yet, update size of the
776          * committed index ('c->bi.old_idx_sz') and zero out the index growth
777          * budget. It is OK to do this now, because we've reserved all the
778          * space which is needed to commit the index, and it is save for the
779          * budgeting subsystem to assume the index is already committed,
780          * even though it is not.
781          */
782         ubifs_assert(c->bi.min_idx_lebs == ubifs_calc_min_idx_lebs(c));
783         c->bi.old_idx_sz = c->calc_idx_sz;
784         c->bi.uncommitted_idx = 0;
785         c->bi.min_idx_lebs = ubifs_calc_min_idx_lebs(c);
786         spin_unlock(&c->space_lock);
787         mutex_unlock(&c->tnc_mutex);
788
789         dbg_cmt("number of index LEBs %d", c->lst.idx_lebs);
790         dbg_cmt("size of index %llu", c->calc_idx_sz);
791         return err;
792
793 out_free:
794         free_idx_lebs(c);
795 out:
796         mutex_unlock(&c->tnc_mutex);
797         return err;
798 }
799
800 /**
801  * write_index - write index nodes.
802  * @c: UBIFS file-system description object
803  *
804  * This function writes the index nodes whose positions were laid out in the
805  * layout_in_empty_space function.
806  */
807 static int write_index(struct ubifs_info *c)
808 {
809         struct ubifs_idx_node *idx;
810         struct ubifs_znode *znode, *cnext;
811         int i, lnum, offs, len, next_len, buf_len, buf_offs, used;
812         int avail, wlen, err, lnum_pos = 0, blen, nxt_offs;
813
814         cnext = c->enext;
815         if (!cnext)
816                 return 0;
817
818         /*
819          * Always write index nodes to the index head so that index nodes and
820          * other types of nodes are never mixed in the same erase block.
821          */
822         lnum = c->ihead_lnum;
823         buf_offs = c->ihead_offs;
824
825         /* Allocate commit buffer */
826         buf_len = ALIGN(c->max_idx_node_sz, c->min_io_size);
827         used = 0;
828         avail = buf_len;
829
830         /* Ensure there is enough room for first write */
831         next_len = ubifs_idx_node_sz(c, cnext->child_cnt);
832         if (buf_offs + next_len > c->leb_size) {
833                 err = ubifs_update_one_lp(c, lnum, LPROPS_NC, 0, 0,
834                                           LPROPS_TAKEN);
835                 if (err)
836                         return err;
837                 lnum = -1;
838         }
839
840         while (1) {
841                 cond_resched();
842
843                 znode = cnext;
844                 idx = c->cbuf + used;
845
846                 /* Make index node */
847                 idx->ch.node_type = UBIFS_IDX_NODE;
848                 idx->child_cnt = cpu_to_le16(znode->child_cnt);
849                 idx->level = cpu_to_le16(znode->level);
850                 for (i = 0; i < znode->child_cnt; i++) {
851                         struct ubifs_branch *br = ubifs_idx_branch(c, idx, i);
852                         struct ubifs_zbranch *zbr = &znode->zbranch[i];
853
854                         key_write_idx(c, &zbr->key, &br->key);
855                         br->lnum = cpu_to_le32(zbr->lnum);
856                         br->offs = cpu_to_le32(zbr->offs);
857                         br->len = cpu_to_le32(zbr->len);
858                         if (!zbr->lnum || !zbr->len) {
859                                 ubifs_err("bad ref in znode");
860                                 ubifs_dump_znode(c, znode);
861                                 if (zbr->znode)
862                                         ubifs_dump_znode(c, zbr->znode);
863                         }
864                 }
865                 len = ubifs_idx_node_sz(c, znode->child_cnt);
866                 ubifs_prepare_node(c, idx, len, 0);
867
868                 /* Determine the index node position */
869                 if (lnum == -1) {
870                         lnum = c->ilebs[lnum_pos++];
871                         buf_offs = 0;
872                         used = 0;
873                         avail = buf_len;
874                 }
875                 offs = buf_offs + used;
876
877                 if (lnum != znode->lnum || offs != znode->offs ||
878                     len != znode->len) {
879                         ubifs_err("inconsistent znode posn");
880                         return -EINVAL;
881                 }
882
883                 /* Grab some stuff from znode while we still can */
884                 cnext = znode->cnext;
885
886                 ubifs_assert(ubifs_zn_dirty(znode));
887                 ubifs_assert(ubifs_zn_cow(znode));
888
889                 /*
890                  * It is important that other threads should see %DIRTY_ZNODE
891                  * flag cleared before %COW_ZNODE. Specifically, it matters in
892                  * the 'dirty_cow_znode()' function. This is the reason for the
893                  * first barrier. Also, we want the bit changes to be seen to
894                  * other threads ASAP, to avoid unnecesarry copying, which is
895                  * the reason for the second barrier.
896                  */
897                 clear_bit(DIRTY_ZNODE, &znode->flags);
898                 smp_mb__before_clear_bit();
899                 clear_bit(COW_ZNODE, &znode->flags);
900                 smp_mb__after_clear_bit();
901
902                 /*
903                  * We have marked the znode as clean but have not updated the
904                  * @c->clean_zn_cnt counter. If this znode becomes dirty again
905                  * before 'free_obsolete_znodes()' is called, then
906                  * @c->clean_zn_cnt will be decremented before it gets
907                  * incremented (resulting in 2 decrements for the same znode).
908                  * This means that @c->clean_zn_cnt may become negative for a
909                  * while.
910                  *
911                  * Q: why we cannot increment @c->clean_zn_cnt?
912                  * A: because we do not have the @c->tnc_mutex locked, and the
913                  *    following code would be racy and buggy:
914                  *
915                  *    if (!ubifs_zn_obsolete(znode)) {
916                  *            atomic_long_inc(&c->clean_zn_cnt);
917                  *            atomic_long_inc(&ubifs_clean_zn_cnt);
918                  *    }
919                  *
920                  *    Thus, we just delay the @c->clean_zn_cnt update until we
921                  *    have the mutex locked.
922                  */
923
924                 /* Do not access znode from this point on */
925
926                 /* Update buffer positions */
927                 wlen = used + len;
928                 used += ALIGN(len, 8);
929                 avail -= ALIGN(len, 8);
930
931                 /*
932                  * Calculate the next index node length to see if there is
933                  * enough room for it
934                  */
935                 if (cnext == c->cnext)
936                         next_len = 0;
937                 else
938                         next_len = ubifs_idx_node_sz(c, cnext->child_cnt);
939
940                 nxt_offs = buf_offs + used + next_len;
941                 if (next_len && nxt_offs <= c->leb_size) {
942                         if (avail > 0)
943                                 continue;
944                         else
945                                 blen = buf_len;
946                 } else {
947                         wlen = ALIGN(wlen, 8);
948                         blen = ALIGN(wlen, c->min_io_size);
949                         ubifs_pad(c, c->cbuf + wlen, blen - wlen);
950                 }
951
952                 /* The buffer is full or there are no more znodes to do */
953                 err = ubifs_leb_write(c, lnum, c->cbuf, buf_offs, blen);
954                 if (err)
955                         return err;
956                 buf_offs += blen;
957                 if (next_len) {
958                         if (nxt_offs > c->leb_size) {
959                                 err = ubifs_update_one_lp(c, lnum, LPROPS_NC, 0,
960                                                           0, LPROPS_TAKEN);
961                                 if (err)
962                                         return err;
963                                 lnum = -1;
964                         }
965                         used -= blen;
966                         if (used < 0)
967                                 used = 0;
968                         avail = buf_len - used;
969                         memmove(c->cbuf, c->cbuf + blen, used);
970                         continue;
971                 }
972                 break;
973         }
974
975         if (lnum != c->dbg->new_ihead_lnum ||
976             buf_offs != c->dbg->new_ihead_offs) {
977                 ubifs_err("inconsistent ihead");
978                 return -EINVAL;
979         }
980
981         c->ihead_lnum = lnum;
982         c->ihead_offs = buf_offs;
983
984         return 0;
985 }
986
987 /**
988  * free_obsolete_znodes - free obsolete znodes.
989  * @c: UBIFS file-system description object
990  *
991  * At the end of commit end, obsolete znodes are freed.
992  */
993 static void free_obsolete_znodes(struct ubifs_info *c)
994 {
995         struct ubifs_znode *znode, *cnext;
996
997         cnext = c->cnext;
998         do {
999                 znode = cnext;
1000                 cnext = znode->cnext;
1001                 if (ubifs_zn_obsolete(znode))
1002                         kfree(znode);
1003                 else {
1004                         znode->cnext = NULL;
1005                         atomic_long_inc(&c->clean_zn_cnt);
1006                         atomic_long_inc(&ubifs_clean_zn_cnt);
1007                 }
1008         } while (cnext != c->cnext);
1009 }
1010
1011 /**
1012  * return_gap_lebs - return LEBs used by the in-gap commit method.
1013  * @c: UBIFS file-system description object
1014  *
1015  * This function clears the "taken" flag for the LEBs which were used by the
1016  * "commit in-the-gaps" method.
1017  */
1018 static int return_gap_lebs(struct ubifs_info *c)
1019 {
1020         int *p, err;
1021
1022         if (!c->gap_lebs)
1023                 return 0;
1024
1025         dbg_cmt("");
1026         for (p = c->gap_lebs; *p != -1; p++) {
1027                 err = ubifs_change_one_lp(c, *p, LPROPS_NC, LPROPS_NC, 0,
1028                                           LPROPS_TAKEN, 0);
1029                 if (err)
1030                         return err;
1031         }
1032
1033         kfree(c->gap_lebs);
1034         c->gap_lebs = NULL;
1035         return 0;
1036 }
1037
1038 /**
1039  * ubifs_tnc_end_commit - update the TNC for commit end.
1040  * @c: UBIFS file-system description object
1041  *
1042  * Write the dirty znodes.
1043  */
1044 int ubifs_tnc_end_commit(struct ubifs_info *c)
1045 {
1046         int err;
1047
1048         if (!c->cnext)
1049                 return 0;
1050
1051         err = return_gap_lebs(c);
1052         if (err)
1053                 return err;
1054
1055         err = write_index(c);
1056         if (err)
1057                 return err;
1058
1059         mutex_lock(&c->tnc_mutex);
1060
1061         dbg_cmt("TNC height is %d", c->zroot.znode->level + 1);
1062
1063         free_obsolete_znodes(c);
1064
1065         c->cnext = NULL;
1066         kfree(c->ilebs);
1067         c->ilebs = NULL;
1068
1069         mutex_unlock(&c->tnc_mutex);
1070
1071         return 0;
1072 }