blob: 865e9ddb44d406d298da48b0137a4f426f8d45dd [file] [log] [blame]
Alex Tomasc9de5602008-01-29 00:19:52 -05001/*
2 * Copyright (c) 2003-2006, Cluster File Systems, Inc, info@clusterfs.com
3 * Written by Alex Tomas <alex@clusterfs.com>
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 as
7 * published by the Free Software Foundation.
8 *
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
13 *
14 * You should have received a copy of the GNU General Public Licens
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-
17 */
18
19
20/*
21 * mballoc.c contains the multiblocks allocation routines
22 */
23
Mingming Cao8f6e39a2008-04-29 22:01:31 -040024#include "mballoc.h"
Alex Tomasc9de5602008-01-29 00:19:52 -050025/*
26 * MUSTDO:
27 * - test ext4_ext_search_left() and ext4_ext_search_right()
28 * - search for metadata in few groups
29 *
30 * TODO v4:
31 * - normalization should take into account whether file is still open
32 * - discard preallocations if no free space left (policy?)
33 * - don't normalize tails
34 * - quota
35 * - reservation for superuser
36 *
37 * TODO v3:
38 * - bitmap read-ahead (proposed by Oleg Drokin aka green)
39 * - track min/max extents in each group for better group selection
40 * - mb_mark_used() may allocate chunk right after splitting buddy
41 * - tree of groups sorted by number of free blocks
42 * - error handling
43 */
44
45/*
46 * The allocation request involve request for multiple number of blocks
47 * near to the goal(block) value specified.
48 *
49 * During initialization phase of the allocator we decide to use the group
50 * preallocation or inode preallocation depending on the size file. The
51 * size of the file could be the resulting file size we would have after
52 * allocation or the current file size which ever is larger. If the size is
53 * less that sbi->s_mb_stream_request we select the group
54 * preallocation. The default value of s_mb_stream_request is 16
55 * blocks. This can also be tuned via
56 * /proc/fs/ext4/<partition>/stream_req. The value is represented in terms
57 * of number of blocks.
58 *
59 * The main motivation for having small file use group preallocation is to
60 * ensure that we have small file closer in the disk.
61 *
62 * First stage the allocator looks at the inode prealloc list
63 * ext4_inode_info->i_prealloc_list contain list of prealloc spaces for
64 * this particular inode. The inode prealloc space is represented as:
65 *
66 * pa_lstart -> the logical start block for this prealloc space
67 * pa_pstart -> the physical start block for this prealloc space
68 * pa_len -> lenght for this prealloc space
69 * pa_free -> free space available in this prealloc space
70 *
71 * The inode preallocation space is used looking at the _logical_ start
72 * block. If only the logical file block falls within the range of prealloc
73 * space we will consume the particular prealloc space. This make sure that
74 * that the we have contiguous physical blocks representing the file blocks
75 *
76 * The important thing to be noted in case of inode prealloc space is that
77 * we don't modify the values associated to inode prealloc space except
78 * pa_free.
79 *
80 * If we are not able to find blocks in the inode prealloc space and if we
81 * have the group allocation flag set then we look at the locality group
82 * prealloc space. These are per CPU prealloc list repreasented as
83 *
84 * ext4_sb_info.s_locality_groups[smp_processor_id()]
85 *
86 * The reason for having a per cpu locality group is to reduce the contention
87 * between CPUs. It is possible to get scheduled at this point.
88 *
89 * The locality group prealloc space is used looking at whether we have
90 * enough free space (pa_free) withing the prealloc space.
91 *
92 * If we can't allocate blocks via inode prealloc or/and locality group
93 * prealloc then we look at the buddy cache. The buddy cache is represented
94 * by ext4_sb_info.s_buddy_cache (struct inode) whose file offset gets
95 * mapped to the buddy and bitmap information regarding different
96 * groups. The buddy information is attached to buddy cache inode so that
97 * we can access them through the page cache. The information regarding
98 * each group is loaded via ext4_mb_load_buddy. The information involve
99 * block bitmap and buddy information. The information are stored in the
100 * inode as:
101 *
102 * { page }
103 * [ group 0 buddy][ group 0 bitmap] [group 1][ group 1]...
104 *
105 *
106 * one block each for bitmap and buddy information. So for each group we
107 * take up 2 blocks. A page can contain blocks_per_page (PAGE_CACHE_SIZE /
108 * blocksize) blocks. So it can have information regarding groups_per_page
109 * which is blocks_per_page/2
110 *
111 * The buddy cache inode is not stored on disk. The inode is thrown
112 * away when the filesystem is unmounted.
113 *
114 * We look for count number of blocks in the buddy cache. If we were able
115 * to locate that many free blocks we return with additional information
116 * regarding rest of the contiguous physical block available
117 *
118 * Before allocating blocks via buddy cache we normalize the request
119 * blocks. This ensure we ask for more blocks that we needed. The extra
120 * blocks that we get after allocation is added to the respective prealloc
121 * list. In case of inode preallocation we follow a list of heuristics
122 * based on file size. This can be found in ext4_mb_normalize_request. If
123 * we are doing a group prealloc we try to normalize the request to
124 * sbi->s_mb_group_prealloc. Default value of s_mb_group_prealloc is set to
125 * 512 blocks. This can be tuned via
126 * /proc/fs/ext4/<partition/group_prealloc. The value is represented in
127 * terms of number of blocks. If we have mounted the file system with -O
128 * stripe=<value> option the group prealloc request is normalized to the
129 * stripe value (sbi->s_stripe)
130 *
131 * The regular allocator(using the buddy cache) support few tunables.
132 *
133 * /proc/fs/ext4/<partition>/min_to_scan
134 * /proc/fs/ext4/<partition>/max_to_scan
135 * /proc/fs/ext4/<partition>/order2_req
136 *
137 * The regular allocator use buddy scan only if the request len is power of
138 * 2 blocks and the order of allocation is >= sbi->s_mb_order2_reqs. The
139 * value of s_mb_order2_reqs can be tuned via
140 * /proc/fs/ext4/<partition>/order2_req. If the request len is equal to
141 * stripe size (sbi->s_stripe), we try to search for contigous block in
142 * stripe size. This should result in better allocation on RAID setup. If
143 * not we search in the specific group using bitmap for best extents. The
144 * tunable min_to_scan and max_to_scan controll the behaviour here.
145 * min_to_scan indicate how long the mballoc __must__ look for a best
146 * extent and max_to_scanindicate how long the mballoc __can__ look for a
147 * best extent in the found extents. Searching for the blocks starts with
148 * the group specified as the goal value in allocation context via
149 * ac_g_ex. Each group is first checked based on the criteria whether it
150 * can used for allocation. ext4_mb_good_group explains how the groups are
151 * checked.
152 *
153 * Both the prealloc space are getting populated as above. So for the first
154 * request we will hit the buddy cache which will result in this prealloc
155 * space getting filled. The prealloc space is then later used for the
156 * subsequent request.
157 */
158
159/*
160 * mballoc operates on the following data:
161 * - on-disk bitmap
162 * - in-core buddy (actually includes buddy and bitmap)
163 * - preallocation descriptors (PAs)
164 *
165 * there are two types of preallocations:
166 * - inode
167 * assiged to specific inode and can be used for this inode only.
168 * it describes part of inode's space preallocated to specific
169 * physical blocks. any block from that preallocated can be used
170 * independent. the descriptor just tracks number of blocks left
171 * unused. so, before taking some block from descriptor, one must
172 * make sure corresponded logical block isn't allocated yet. this
173 * also means that freeing any block within descriptor's range
174 * must discard all preallocated blocks.
175 * - locality group
176 * assigned to specific locality group which does not translate to
177 * permanent set of inodes: inode can join and leave group. space
178 * from this type of preallocation can be used for any inode. thus
179 * it's consumed from the beginning to the end.
180 *
181 * relation between them can be expressed as:
182 * in-core buddy = on-disk bitmap + preallocation descriptors
183 *
184 * this mean blocks mballoc considers used are:
185 * - allocated blocks (persistent)
186 * - preallocated blocks (non-persistent)
187 *
188 * consistency in mballoc world means that at any time a block is either
189 * free or used in ALL structures. notice: "any time" should not be read
190 * literally -- time is discrete and delimited by locks.
191 *
192 * to keep it simple, we don't use block numbers, instead we count number of
193 * blocks: how many blocks marked used/free in on-disk bitmap, buddy and PA.
194 *
195 * all operations can be expressed as:
196 * - init buddy: buddy = on-disk + PAs
197 * - new PA: buddy += N; PA = N
198 * - use inode PA: on-disk += N; PA -= N
199 * - discard inode PA buddy -= on-disk - PA; PA = 0
200 * - use locality group PA on-disk += N; PA -= N
201 * - discard locality group PA buddy -= PA; PA = 0
202 * note: 'buddy -= on-disk - PA' is used to show that on-disk bitmap
203 * is used in real operation because we can't know actual used
204 * bits from PA, only from on-disk bitmap
205 *
206 * if we follow this strict logic, then all operations above should be atomic.
207 * given some of them can block, we'd have to use something like semaphores
208 * killing performance on high-end SMP hardware. let's try to relax it using
209 * the following knowledge:
210 * 1) if buddy is referenced, it's already initialized
211 * 2) while block is used in buddy and the buddy is referenced,
212 * nobody can re-allocate that block
213 * 3) we work on bitmaps and '+' actually means 'set bits'. if on-disk has
214 * bit set and PA claims same block, it's OK. IOW, one can set bit in
215 * on-disk bitmap if buddy has same bit set or/and PA covers corresponded
216 * block
217 *
218 * so, now we're building a concurrency table:
219 * - init buddy vs.
220 * - new PA
221 * blocks for PA are allocated in the buddy, buddy must be referenced
222 * until PA is linked to allocation group to avoid concurrent buddy init
223 * - use inode PA
224 * we need to make sure that either on-disk bitmap or PA has uptodate data
225 * given (3) we care that PA-=N operation doesn't interfere with init
226 * - discard inode PA
227 * the simplest way would be to have buddy initialized by the discard
228 * - use locality group PA
229 * again PA-=N must be serialized with init
230 * - discard locality group PA
231 * the simplest way would be to have buddy initialized by the discard
232 * - new PA vs.
233 * - use inode PA
234 * i_data_sem serializes them
235 * - discard inode PA
236 * discard process must wait until PA isn't used by another process
237 * - use locality group PA
238 * some mutex should serialize them
239 * - discard locality group PA
240 * discard process must wait until PA isn't used by another process
241 * - use inode PA
242 * - use inode PA
243 * i_data_sem or another mutex should serializes them
244 * - discard inode PA
245 * discard process must wait until PA isn't used by another process
246 * - use locality group PA
247 * nothing wrong here -- they're different PAs covering different blocks
248 * - discard locality group PA
249 * discard process must wait until PA isn't used by another process
250 *
251 * now we're ready to make few consequences:
252 * - PA is referenced and while it is no discard is possible
253 * - PA is referenced until block isn't marked in on-disk bitmap
254 * - PA changes only after on-disk bitmap
255 * - discard must not compete with init. either init is done before
256 * any discard or they're serialized somehow
257 * - buddy init as sum of on-disk bitmap and PAs is done atomically
258 *
259 * a special case when we've used PA to emptiness. no need to modify buddy
260 * in this case, but we should care about concurrent init
261 *
262 */
263
264 /*
265 * Logic in few words:
266 *
267 * - allocation:
268 * load group
269 * find blocks
270 * mark bits in on-disk bitmap
271 * release group
272 *
273 * - use preallocation:
274 * find proper PA (per-inode or group)
275 * load group
276 * mark bits in on-disk bitmap
277 * release group
278 * release PA
279 *
280 * - free:
281 * load group
282 * mark bits in on-disk bitmap
283 * release group
284 *
285 * - discard preallocations in group:
286 * mark PAs deleted
287 * move them onto local list
288 * load on-disk bitmap
289 * load group
290 * remove PA from object (inode or locality group)
291 * mark free blocks in-core
292 *
293 * - discard inode's preallocations:
294 */
295
296/*
297 * Locking rules
298 *
299 * Locks:
300 * - bitlock on a group (group)
301 * - object (inode/locality) (object)
302 * - per-pa lock (pa)
303 *
304 * Paths:
305 * - new pa
306 * object
307 * group
308 *
309 * - find and use pa:
310 * pa
311 *
312 * - release consumed pa:
313 * pa
314 * group
315 * object
316 *
317 * - generate in-core bitmap:
318 * group
319 * pa
320 *
321 * - discard all for given object (inode, locality group):
322 * object
323 * pa
324 * group
325 *
326 * - discard all for given group:
327 * group
328 * pa
329 * group
330 * object
331 *
332 */
333
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500334static inline void *mb_correct_addr_and_bit(int *bit, void *addr)
335{
Alex Tomasc9de5602008-01-29 00:19:52 -0500336#if BITS_PER_LONG == 64
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500337 *bit += ((unsigned long) addr & 7UL) << 3;
338 addr = (void *) ((unsigned long) addr & ~7UL);
Alex Tomasc9de5602008-01-29 00:19:52 -0500339#elif BITS_PER_LONG == 32
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500340 *bit += ((unsigned long) addr & 3UL) << 3;
341 addr = (void *) ((unsigned long) addr & ~3UL);
Alex Tomasc9de5602008-01-29 00:19:52 -0500342#else
343#error "how many bits you are?!"
344#endif
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500345 return addr;
346}
Alex Tomasc9de5602008-01-29 00:19:52 -0500347
348static inline int mb_test_bit(int bit, void *addr)
349{
350 /*
351 * ext4_test_bit on architecture like powerpc
352 * needs unsigned long aligned address
353 */
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500354 addr = mb_correct_addr_and_bit(&bit, addr);
Alex Tomasc9de5602008-01-29 00:19:52 -0500355 return ext4_test_bit(bit, addr);
356}
357
358static inline void mb_set_bit(int bit, void *addr)
359{
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500360 addr = mb_correct_addr_and_bit(&bit, addr);
Alex Tomasc9de5602008-01-29 00:19:52 -0500361 ext4_set_bit(bit, addr);
362}
363
364static inline void mb_set_bit_atomic(spinlock_t *lock, int bit, void *addr)
365{
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500366 addr = mb_correct_addr_and_bit(&bit, addr);
Alex Tomasc9de5602008-01-29 00:19:52 -0500367 ext4_set_bit_atomic(lock, bit, addr);
368}
369
370static inline void mb_clear_bit(int bit, void *addr)
371{
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500372 addr = mb_correct_addr_and_bit(&bit, addr);
Alex Tomasc9de5602008-01-29 00:19:52 -0500373 ext4_clear_bit(bit, addr);
374}
375
376static inline void mb_clear_bit_atomic(spinlock_t *lock, int bit, void *addr)
377{
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500378 addr = mb_correct_addr_and_bit(&bit, addr);
Alex Tomasc9de5602008-01-29 00:19:52 -0500379 ext4_clear_bit_atomic(lock, bit, addr);
380}
381
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500382static inline int mb_find_next_zero_bit(void *addr, int max, int start)
383{
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400384 int fix = 0, ret, tmpmax;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500385 addr = mb_correct_addr_and_bit(&fix, addr);
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400386 tmpmax = max + fix;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500387 start += fix;
388
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400389 ret = ext4_find_next_zero_bit(addr, tmpmax, start) - fix;
390 if (ret > max)
391 return max;
392 return ret;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500393}
394
395static inline int mb_find_next_bit(void *addr, int max, int start)
396{
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400397 int fix = 0, ret, tmpmax;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500398 addr = mb_correct_addr_and_bit(&fix, addr);
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400399 tmpmax = max + fix;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500400 start += fix;
401
Aneesh Kumar K.Ve7dfb242008-07-11 19:27:31 -0400402 ret = ext4_find_next_bit(addr, tmpmax, start) - fix;
403 if (ret > max)
404 return max;
405 return ret;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500406}
407
Alex Tomasc9de5602008-01-29 00:19:52 -0500408static void *mb_find_buddy(struct ext4_buddy *e4b, int order, int *max)
409{
410 char *bb;
411
Alex Tomasc9de5602008-01-29 00:19:52 -0500412 BUG_ON(EXT4_MB_BITMAP(e4b) == EXT4_MB_BUDDY(e4b));
413 BUG_ON(max == NULL);
414
415 if (order > e4b->bd_blkbits + 1) {
416 *max = 0;
417 return NULL;
418 }
419
420 /* at order 0 we see each particular block */
421 *max = 1 << (e4b->bd_blkbits + 3);
422 if (order == 0)
423 return EXT4_MB_BITMAP(e4b);
424
425 bb = EXT4_MB_BUDDY(e4b) + EXT4_SB(e4b->bd_sb)->s_mb_offsets[order];
426 *max = EXT4_SB(e4b->bd_sb)->s_mb_maxs[order];
427
428 return bb;
429}
430
431#ifdef DOUBLE_CHECK
432static void mb_free_blocks_double(struct inode *inode, struct ext4_buddy *e4b,
433 int first, int count)
434{
435 int i;
436 struct super_block *sb = e4b->bd_sb;
437
438 if (unlikely(e4b->bd_info->bb_bitmap == NULL))
439 return;
440 BUG_ON(!ext4_is_group_locked(sb, e4b->bd_group));
441 for (i = 0; i < count; i++) {
442 if (!mb_test_bit(first + i, e4b->bd_info->bb_bitmap)) {
443 ext4_fsblk_t blocknr;
444 blocknr = e4b->bd_group * EXT4_BLOCKS_PER_GROUP(sb);
445 blocknr += first + i;
446 blocknr +=
447 le32_to_cpu(EXT4_SB(sb)->s_es->s_first_data_block);
448
Harvey Harrison46e665e2008-04-17 10:38:59 -0400449 ext4_error(sb, __func__, "double-free of inode"
Alex Tomasc9de5602008-01-29 00:19:52 -0500450 " %lu's block %llu(bit %u in group %lu)\n",
451 inode ? inode->i_ino : 0, blocknr,
452 first + i, e4b->bd_group);
453 }
454 mb_clear_bit(first + i, e4b->bd_info->bb_bitmap);
455 }
456}
457
458static void mb_mark_used_double(struct ext4_buddy *e4b, int first, int count)
459{
460 int i;
461
462 if (unlikely(e4b->bd_info->bb_bitmap == NULL))
463 return;
464 BUG_ON(!ext4_is_group_locked(e4b->bd_sb, e4b->bd_group));
465 for (i = 0; i < count; i++) {
466 BUG_ON(mb_test_bit(first + i, e4b->bd_info->bb_bitmap));
467 mb_set_bit(first + i, e4b->bd_info->bb_bitmap);
468 }
469}
470
471static void mb_cmp_bitmaps(struct ext4_buddy *e4b, void *bitmap)
472{
473 if (memcmp(e4b->bd_info->bb_bitmap, bitmap, e4b->bd_sb->s_blocksize)) {
474 unsigned char *b1, *b2;
475 int i;
476 b1 = (unsigned char *) e4b->bd_info->bb_bitmap;
477 b2 = (unsigned char *) bitmap;
478 for (i = 0; i < e4b->bd_sb->s_blocksize; i++) {
479 if (b1[i] != b2[i]) {
480 printk("corruption in group %lu at byte %u(%u):"
481 " %x in copy != %x on disk/prealloc\n",
482 e4b->bd_group, i, i * 8, b1[i], b2[i]);
483 BUG();
484 }
485 }
486 }
487}
488
489#else
490static inline void mb_free_blocks_double(struct inode *inode,
491 struct ext4_buddy *e4b, int first, int count)
492{
493 return;
494}
495static inline void mb_mark_used_double(struct ext4_buddy *e4b,
496 int first, int count)
497{
498 return;
499}
500static inline void mb_cmp_bitmaps(struct ext4_buddy *e4b, void *bitmap)
501{
502 return;
503}
504#endif
505
506#ifdef AGGRESSIVE_CHECK
507
508#define MB_CHECK_ASSERT(assert) \
509do { \
510 if (!(assert)) { \
511 printk(KERN_EMERG \
512 "Assertion failure in %s() at %s:%d: \"%s\"\n", \
513 function, file, line, # assert); \
514 BUG(); \
515 } \
516} while (0)
517
518static int __mb_check_buddy(struct ext4_buddy *e4b, char *file,
519 const char *function, int line)
520{
521 struct super_block *sb = e4b->bd_sb;
522 int order = e4b->bd_blkbits + 1;
523 int max;
524 int max2;
525 int i;
526 int j;
527 int k;
528 int count;
529 struct ext4_group_info *grp;
530 int fragments = 0;
531 int fstart;
532 struct list_head *cur;
533 void *buddy;
534 void *buddy2;
535
536 if (!test_opt(sb, MBALLOC))
537 return 0;
538
539 {
540 static int mb_check_counter;
541 if (mb_check_counter++ % 100 != 0)
542 return 0;
543 }
544
545 while (order > 1) {
546 buddy = mb_find_buddy(e4b, order, &max);
547 MB_CHECK_ASSERT(buddy);
548 buddy2 = mb_find_buddy(e4b, order - 1, &max2);
549 MB_CHECK_ASSERT(buddy2);
550 MB_CHECK_ASSERT(buddy != buddy2);
551 MB_CHECK_ASSERT(max * 2 == max2);
552
553 count = 0;
554 for (i = 0; i < max; i++) {
555
556 if (mb_test_bit(i, buddy)) {
557 /* only single bit in buddy2 may be 1 */
558 if (!mb_test_bit(i << 1, buddy2)) {
559 MB_CHECK_ASSERT(
560 mb_test_bit((i<<1)+1, buddy2));
561 } else if (!mb_test_bit((i << 1) + 1, buddy2)) {
562 MB_CHECK_ASSERT(
563 mb_test_bit(i << 1, buddy2));
564 }
565 continue;
566 }
567
568 /* both bits in buddy2 must be 0 */
569 MB_CHECK_ASSERT(mb_test_bit(i << 1, buddy2));
570 MB_CHECK_ASSERT(mb_test_bit((i << 1) + 1, buddy2));
571
572 for (j = 0; j < (1 << order); j++) {
573 k = (i * (1 << order)) + j;
574 MB_CHECK_ASSERT(
575 !mb_test_bit(k, EXT4_MB_BITMAP(e4b)));
576 }
577 count++;
578 }
579 MB_CHECK_ASSERT(e4b->bd_info->bb_counters[order] == count);
580 order--;
581 }
582
583 fstart = -1;
584 buddy = mb_find_buddy(e4b, 0, &max);
585 for (i = 0; i < max; i++) {
586 if (!mb_test_bit(i, buddy)) {
587 MB_CHECK_ASSERT(i >= e4b->bd_info->bb_first_free);
588 if (fstart == -1) {
589 fragments++;
590 fstart = i;
591 }
592 continue;
593 }
594 fstart = -1;
595 /* check used bits only */
596 for (j = 0; j < e4b->bd_blkbits + 1; j++) {
597 buddy2 = mb_find_buddy(e4b, j, &max2);
598 k = i >> j;
599 MB_CHECK_ASSERT(k < max2);
600 MB_CHECK_ASSERT(mb_test_bit(k, buddy2));
601 }
602 }
603 MB_CHECK_ASSERT(!EXT4_MB_GRP_NEED_INIT(e4b->bd_info));
604 MB_CHECK_ASSERT(e4b->bd_info->bb_fragments == fragments);
605
606 grp = ext4_get_group_info(sb, e4b->bd_group);
607 buddy = mb_find_buddy(e4b, 0, &max);
608 list_for_each(cur, &grp->bb_prealloc_list) {
609 ext4_group_t groupnr;
610 struct ext4_prealloc_space *pa;
Solofo Ramangalahy60bd63d2008-04-29 21:59:59 -0400611 pa = list_entry(cur, struct ext4_prealloc_space, pa_group_list);
612 ext4_get_group_no_and_offset(sb, pa->pa_pstart, &groupnr, &k);
Alex Tomasc9de5602008-01-29 00:19:52 -0500613 MB_CHECK_ASSERT(groupnr == e4b->bd_group);
Solofo Ramangalahy60bd63d2008-04-29 21:59:59 -0400614 for (i = 0; i < pa->pa_len; i++)
Alex Tomasc9de5602008-01-29 00:19:52 -0500615 MB_CHECK_ASSERT(mb_test_bit(k + i, buddy));
616 }
617 return 0;
618}
619#undef MB_CHECK_ASSERT
620#define mb_check_buddy(e4b) __mb_check_buddy(e4b, \
Harvey Harrison46e665e2008-04-17 10:38:59 -0400621 __FILE__, __func__, __LINE__)
Alex Tomasc9de5602008-01-29 00:19:52 -0500622#else
623#define mb_check_buddy(e4b)
624#endif
625
626/* FIXME!! need more doc */
627static void ext4_mb_mark_free_simple(struct super_block *sb,
628 void *buddy, unsigned first, int len,
629 struct ext4_group_info *grp)
630{
631 struct ext4_sb_info *sbi = EXT4_SB(sb);
632 unsigned short min;
633 unsigned short max;
634 unsigned short chunk;
635 unsigned short border;
636
Valerie Clementb73fce62008-02-15 13:48:51 -0500637 BUG_ON(len > EXT4_BLOCKS_PER_GROUP(sb));
Alex Tomasc9de5602008-01-29 00:19:52 -0500638
639 border = 2 << sb->s_blocksize_bits;
640
641 while (len > 0) {
642 /* find how many blocks can be covered since this position */
643 max = ffs(first | border) - 1;
644
645 /* find how many blocks of power 2 we need to mark */
646 min = fls(len) - 1;
647
648 if (max < min)
649 min = max;
650 chunk = 1 << min;
651
652 /* mark multiblock chunks only */
653 grp->bb_counters[min]++;
654 if (min > 0)
655 mb_clear_bit(first >> min,
656 buddy + sbi->s_mb_offsets[min]);
657
658 len -= chunk;
659 first += chunk;
660 }
661}
662
663static void ext4_mb_generate_buddy(struct super_block *sb,
664 void *buddy, void *bitmap, ext4_group_t group)
665{
666 struct ext4_group_info *grp = ext4_get_group_info(sb, group);
667 unsigned short max = EXT4_BLOCKS_PER_GROUP(sb);
668 unsigned short i = 0;
669 unsigned short first;
670 unsigned short len;
671 unsigned free = 0;
672 unsigned fragments = 0;
673 unsigned long long period = get_cycles();
674
675 /* initialize buddy from bitmap which is aggregation
676 * of on-disk bitmap and preallocations */
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500677 i = mb_find_next_zero_bit(bitmap, max, 0);
Alex Tomasc9de5602008-01-29 00:19:52 -0500678 grp->bb_first_free = i;
679 while (i < max) {
680 fragments++;
681 first = i;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500682 i = mb_find_next_bit(bitmap, max, i);
Alex Tomasc9de5602008-01-29 00:19:52 -0500683 len = i - first;
684 free += len;
685 if (len > 1)
686 ext4_mb_mark_free_simple(sb, buddy, first, len, grp);
687 else
688 grp->bb_counters[0]++;
689 if (i < max)
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -0500690 i = mb_find_next_zero_bit(bitmap, max, i);
Alex Tomasc9de5602008-01-29 00:19:52 -0500691 }
692 grp->bb_fragments = fragments;
693
694 if (free != grp->bb_free) {
Harvey Harrison46e665e2008-04-17 10:38:59 -0400695 ext4_error(sb, __func__,
Alex Tomasc9de5602008-01-29 00:19:52 -0500696 "EXT4-fs: group %lu: %u blocks in bitmap, %u in gd\n",
697 group, free, grp->bb_free);
Aneesh Kumar K.Ve56eb652008-02-15 13:48:21 -0500698 /*
699 * If we intent to continue, we consider group descritor
700 * corrupt and update bb_free using bitmap value
701 */
Alex Tomasc9de5602008-01-29 00:19:52 -0500702 grp->bb_free = free;
703 }
704
705 clear_bit(EXT4_GROUP_INFO_NEED_INIT_BIT, &(grp->bb_state));
706
707 period = get_cycles() - period;
708 spin_lock(&EXT4_SB(sb)->s_bal_lock);
709 EXT4_SB(sb)->s_mb_buddies_generated++;
710 EXT4_SB(sb)->s_mb_generation_time += period;
711 spin_unlock(&EXT4_SB(sb)->s_bal_lock);
712}
713
714/* The buddy information is attached the buddy cache inode
715 * for convenience. The information regarding each group
716 * is loaded via ext4_mb_load_buddy. The information involve
717 * block bitmap and buddy information. The information are
718 * stored in the inode as
719 *
720 * { page }
721 * [ group 0 buddy][ group 0 bitmap] [group 1][ group 1]...
722 *
723 *
724 * one block each for bitmap and buddy information.
725 * So for each group we take up 2 blocks. A page can
726 * contain blocks_per_page (PAGE_CACHE_SIZE / blocksize) blocks.
727 * So it can have information regarding groups_per_page which
728 * is blocks_per_page/2
729 */
730
731static int ext4_mb_init_cache(struct page *page, char *incore)
732{
733 int blocksize;
734 int blocks_per_page;
735 int groups_per_page;
736 int err = 0;
737 int i;
738 ext4_group_t first_group;
739 int first_block;
740 struct super_block *sb;
741 struct buffer_head *bhs;
742 struct buffer_head **bh;
743 struct inode *inode;
744 char *data;
745 char *bitmap;
746
747 mb_debug("init page %lu\n", page->index);
748
749 inode = page->mapping->host;
750 sb = inode->i_sb;
751 blocksize = 1 << inode->i_blkbits;
752 blocks_per_page = PAGE_CACHE_SIZE / blocksize;
753
754 groups_per_page = blocks_per_page >> 1;
755 if (groups_per_page == 0)
756 groups_per_page = 1;
757
758 /* allocate buffer_heads to read bitmaps */
759 if (groups_per_page > 1) {
760 err = -ENOMEM;
761 i = sizeof(struct buffer_head *) * groups_per_page;
762 bh = kzalloc(i, GFP_NOFS);
763 if (bh == NULL)
764 goto out;
765 } else
766 bh = &bhs;
767
768 first_group = page->index * blocks_per_page / 2;
769
770 /* read all groups the page covers into the cache */
771 for (i = 0; i < groups_per_page; i++) {
772 struct ext4_group_desc *desc;
773
774 if (first_group + i >= EXT4_SB(sb)->s_groups_count)
775 break;
776
777 err = -EIO;
778 desc = ext4_get_group_desc(sb, first_group + i, NULL);
779 if (desc == NULL)
780 goto out;
781
782 err = -ENOMEM;
783 bh[i] = sb_getblk(sb, ext4_block_bitmap(sb, desc));
784 if (bh[i] == NULL)
785 goto out;
786
787 if (bh_uptodate_or_lock(bh[i]))
788 continue;
789
Eric Sandeenb5f10ee2008-08-02 21:21:08 -0400790 spin_lock(sb_bgl_lock(EXT4_SB(sb), first_group + i));
Alex Tomasc9de5602008-01-29 00:19:52 -0500791 if (desc->bg_flags & cpu_to_le16(EXT4_BG_BLOCK_UNINIT)) {
792 ext4_init_block_bitmap(sb, bh[i],
793 first_group + i, desc);
794 set_buffer_uptodate(bh[i]);
795 unlock_buffer(bh[i]);
Eric Sandeenb5f10ee2008-08-02 21:21:08 -0400796 spin_unlock(sb_bgl_lock(EXT4_SB(sb), first_group + i));
Alex Tomasc9de5602008-01-29 00:19:52 -0500797 continue;
798 }
Eric Sandeenb5f10ee2008-08-02 21:21:08 -0400799 spin_unlock(sb_bgl_lock(EXT4_SB(sb), first_group + i));
Alex Tomasc9de5602008-01-29 00:19:52 -0500800 get_bh(bh[i]);
801 bh[i]->b_end_io = end_buffer_read_sync;
802 submit_bh(READ, bh[i]);
803 mb_debug("read bitmap for group %lu\n", first_group + i);
804 }
805
806 /* wait for I/O completion */
807 for (i = 0; i < groups_per_page && bh[i]; i++)
808 wait_on_buffer(bh[i]);
809
810 err = -EIO;
811 for (i = 0; i < groups_per_page && bh[i]; i++)
812 if (!buffer_uptodate(bh[i]))
813 goto out;
814
Mingming Cao31b481d2008-07-11 19:27:31 -0400815 err = 0;
Alex Tomasc9de5602008-01-29 00:19:52 -0500816 first_block = page->index * blocks_per_page;
817 for (i = 0; i < blocks_per_page; i++) {
818 int group;
819 struct ext4_group_info *grinfo;
820
821 group = (first_block + i) >> 1;
822 if (group >= EXT4_SB(sb)->s_groups_count)
823 break;
824
825 /*
826 * data carry information regarding this
827 * particular group in the format specified
828 * above
829 *
830 */
831 data = page_address(page) + (i * blocksize);
832 bitmap = bh[group - first_group]->b_data;
833
834 /*
835 * We place the buddy block and bitmap block
836 * close together
837 */
838 if ((first_block + i) & 1) {
839 /* this is block of buddy */
840 BUG_ON(incore == NULL);
841 mb_debug("put buddy for group %u in page %lu/%x\n",
842 group, page->index, i * blocksize);
843 memset(data, 0xff, blocksize);
844 grinfo = ext4_get_group_info(sb, group);
845 grinfo->bb_fragments = 0;
846 memset(grinfo->bb_counters, 0,
847 sizeof(unsigned short)*(sb->s_blocksize_bits+2));
848 /*
849 * incore got set to the group block bitmap below
850 */
851 ext4_mb_generate_buddy(sb, data, incore, group);
852 incore = NULL;
853 } else {
854 /* this is block of bitmap */
855 BUG_ON(incore != NULL);
856 mb_debug("put bitmap for group %u in page %lu/%x\n",
857 group, page->index, i * blocksize);
858
859 /* see comments in ext4_mb_put_pa() */
860 ext4_lock_group(sb, group);
861 memcpy(data, bitmap, blocksize);
862
863 /* mark all preallocated blks used in in-core bitmap */
864 ext4_mb_generate_from_pa(sb, data, group);
865 ext4_unlock_group(sb, group);
866
867 /* set incore so that the buddy information can be
868 * generated using this
869 */
870 incore = data;
871 }
872 }
873 SetPageUptodate(page);
874
875out:
876 if (bh) {
877 for (i = 0; i < groups_per_page && bh[i]; i++)
878 brelse(bh[i]);
879 if (bh != &bhs)
880 kfree(bh);
881 }
882 return err;
883}
884
Eric Sandeen4ddfef72008-04-29 08:11:12 -0400885static noinline_for_stack int
886ext4_mb_load_buddy(struct super_block *sb, ext4_group_t group,
887 struct ext4_buddy *e4b)
Alex Tomasc9de5602008-01-29 00:19:52 -0500888{
889 struct ext4_sb_info *sbi = EXT4_SB(sb);
890 struct inode *inode = sbi->s_buddy_cache;
891 int blocks_per_page;
892 int block;
893 int pnum;
894 int poff;
895 struct page *page;
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400896 int ret;
Alex Tomasc9de5602008-01-29 00:19:52 -0500897
898 mb_debug("load group %lu\n", group);
899
900 blocks_per_page = PAGE_CACHE_SIZE / sb->s_blocksize;
901
902 e4b->bd_blkbits = sb->s_blocksize_bits;
903 e4b->bd_info = ext4_get_group_info(sb, group);
904 e4b->bd_sb = sb;
905 e4b->bd_group = group;
906 e4b->bd_buddy_page = NULL;
907 e4b->bd_bitmap_page = NULL;
908
909 /*
910 * the buddy cache inode stores the block bitmap
911 * and buddy information in consecutive blocks.
912 * So for each group we need two blocks.
913 */
914 block = group * 2;
915 pnum = block / blocks_per_page;
916 poff = block % blocks_per_page;
917
918 /* we could use find_or_create_page(), but it locks page
919 * what we'd like to avoid in fast path ... */
920 page = find_get_page(inode->i_mapping, pnum);
921 if (page == NULL || !PageUptodate(page)) {
922 if (page)
923 page_cache_release(page);
924 page = find_or_create_page(inode->i_mapping, pnum, GFP_NOFS);
925 if (page) {
926 BUG_ON(page->mapping != inode->i_mapping);
927 if (!PageUptodate(page)) {
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400928 ret = ext4_mb_init_cache(page, NULL);
929 if (ret) {
930 unlock_page(page);
931 goto err;
932 }
Alex Tomasc9de5602008-01-29 00:19:52 -0500933 mb_cmp_bitmaps(e4b, page_address(page) +
934 (poff * sb->s_blocksize));
935 }
936 unlock_page(page);
937 }
938 }
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400939 if (page == NULL || !PageUptodate(page)) {
940 ret = -EIO;
Alex Tomasc9de5602008-01-29 00:19:52 -0500941 goto err;
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400942 }
Alex Tomasc9de5602008-01-29 00:19:52 -0500943 e4b->bd_bitmap_page = page;
944 e4b->bd_bitmap = page_address(page) + (poff * sb->s_blocksize);
945 mark_page_accessed(page);
946
947 block++;
948 pnum = block / blocks_per_page;
949 poff = block % blocks_per_page;
950
951 page = find_get_page(inode->i_mapping, pnum);
952 if (page == NULL || !PageUptodate(page)) {
953 if (page)
954 page_cache_release(page);
955 page = find_or_create_page(inode->i_mapping, pnum, GFP_NOFS);
956 if (page) {
957 BUG_ON(page->mapping != inode->i_mapping);
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400958 if (!PageUptodate(page)) {
959 ret = ext4_mb_init_cache(page, e4b->bd_bitmap);
960 if (ret) {
961 unlock_page(page);
962 goto err;
963 }
964 }
Alex Tomasc9de5602008-01-29 00:19:52 -0500965 unlock_page(page);
966 }
967 }
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400968 if (page == NULL || !PageUptodate(page)) {
969 ret = -EIO;
Alex Tomasc9de5602008-01-29 00:19:52 -0500970 goto err;
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400971 }
Alex Tomasc9de5602008-01-29 00:19:52 -0500972 e4b->bd_buddy_page = page;
973 e4b->bd_buddy = page_address(page) + (poff * sb->s_blocksize);
974 mark_page_accessed(page);
975
976 BUG_ON(e4b->bd_bitmap_page == NULL);
977 BUG_ON(e4b->bd_buddy_page == NULL);
978
979 return 0;
980
981err:
982 if (e4b->bd_bitmap_page)
983 page_cache_release(e4b->bd_bitmap_page);
984 if (e4b->bd_buddy_page)
985 page_cache_release(e4b->bd_buddy_page);
986 e4b->bd_buddy = NULL;
987 e4b->bd_bitmap = NULL;
Shen Fengfdf6c7a2008-07-11 19:27:31 -0400988 return ret;
Alex Tomasc9de5602008-01-29 00:19:52 -0500989}
990
991static void ext4_mb_release_desc(struct ext4_buddy *e4b)
992{
993 if (e4b->bd_bitmap_page)
994 page_cache_release(e4b->bd_bitmap_page);
995 if (e4b->bd_buddy_page)
996 page_cache_release(e4b->bd_buddy_page);
997}
998
999
1000static int mb_find_order_for_block(struct ext4_buddy *e4b, int block)
1001{
1002 int order = 1;
1003 void *bb;
1004
1005 BUG_ON(EXT4_MB_BITMAP(e4b) == EXT4_MB_BUDDY(e4b));
1006 BUG_ON(block >= (1 << (e4b->bd_blkbits + 3)));
1007
1008 bb = EXT4_MB_BUDDY(e4b);
1009 while (order <= e4b->bd_blkbits + 1) {
1010 block = block >> 1;
1011 if (!mb_test_bit(block, bb)) {
1012 /* this block is part of buddy of order 'order' */
1013 return order;
1014 }
1015 bb += 1 << (e4b->bd_blkbits - order);
1016 order++;
1017 }
1018 return 0;
1019}
1020
1021static void mb_clear_bits(spinlock_t *lock, void *bm, int cur, int len)
1022{
1023 __u32 *addr;
1024
1025 len = cur + len;
1026 while (cur < len) {
1027 if ((cur & 31) == 0 && (len - cur) >= 32) {
1028 /* fast path: clear whole word at once */
1029 addr = bm + (cur >> 3);
1030 *addr = 0;
1031 cur += 32;
1032 continue;
1033 }
1034 mb_clear_bit_atomic(lock, cur, bm);
1035 cur++;
1036 }
1037}
1038
1039static void mb_set_bits(spinlock_t *lock, void *bm, int cur, int len)
1040{
1041 __u32 *addr;
1042
1043 len = cur + len;
1044 while (cur < len) {
1045 if ((cur & 31) == 0 && (len - cur) >= 32) {
1046 /* fast path: set whole word at once */
1047 addr = bm + (cur >> 3);
1048 *addr = 0xffffffff;
1049 cur += 32;
1050 continue;
1051 }
1052 mb_set_bit_atomic(lock, cur, bm);
1053 cur++;
1054 }
1055}
1056
Shen Feng7e5a8cd2008-07-13 21:03:31 -04001057static void mb_free_blocks(struct inode *inode, struct ext4_buddy *e4b,
Alex Tomasc9de5602008-01-29 00:19:52 -05001058 int first, int count)
1059{
1060 int block = 0;
1061 int max = 0;
1062 int order;
1063 void *buddy;
1064 void *buddy2;
1065 struct super_block *sb = e4b->bd_sb;
1066
1067 BUG_ON(first + count > (sb->s_blocksize << 3));
1068 BUG_ON(!ext4_is_group_locked(sb, e4b->bd_group));
1069 mb_check_buddy(e4b);
1070 mb_free_blocks_double(inode, e4b, first, count);
1071
1072 e4b->bd_info->bb_free += count;
1073 if (first < e4b->bd_info->bb_first_free)
1074 e4b->bd_info->bb_first_free = first;
1075
1076 /* let's maintain fragments counter */
1077 if (first != 0)
1078 block = !mb_test_bit(first - 1, EXT4_MB_BITMAP(e4b));
1079 if (first + count < EXT4_SB(sb)->s_mb_maxs[0])
1080 max = !mb_test_bit(first + count, EXT4_MB_BITMAP(e4b));
1081 if (block && max)
1082 e4b->bd_info->bb_fragments--;
1083 else if (!block && !max)
1084 e4b->bd_info->bb_fragments++;
1085
1086 /* let's maintain buddy itself */
1087 while (count-- > 0) {
1088 block = first++;
1089 order = 0;
1090
1091 if (!mb_test_bit(block, EXT4_MB_BITMAP(e4b))) {
1092 ext4_fsblk_t blocknr;
1093 blocknr = e4b->bd_group * EXT4_BLOCKS_PER_GROUP(sb);
1094 blocknr += block;
1095 blocknr +=
1096 le32_to_cpu(EXT4_SB(sb)->s_es->s_first_data_block);
Shen Feng7e5a8cd2008-07-13 21:03:31 -04001097 ext4_unlock_group(sb, e4b->bd_group);
Harvey Harrison46e665e2008-04-17 10:38:59 -04001098 ext4_error(sb, __func__, "double-free of inode"
Alex Tomasc9de5602008-01-29 00:19:52 -05001099 " %lu's block %llu(bit %u in group %lu)\n",
1100 inode ? inode->i_ino : 0, blocknr, block,
1101 e4b->bd_group);
Shen Feng7e5a8cd2008-07-13 21:03:31 -04001102 ext4_lock_group(sb, e4b->bd_group);
Alex Tomasc9de5602008-01-29 00:19:52 -05001103 }
1104 mb_clear_bit(block, EXT4_MB_BITMAP(e4b));
1105 e4b->bd_info->bb_counters[order]++;
1106
1107 /* start of the buddy */
1108 buddy = mb_find_buddy(e4b, order, &max);
1109
1110 do {
1111 block &= ~1UL;
1112 if (mb_test_bit(block, buddy) ||
1113 mb_test_bit(block + 1, buddy))
1114 break;
1115
1116 /* both the buddies are free, try to coalesce them */
1117 buddy2 = mb_find_buddy(e4b, order + 1, &max);
1118
1119 if (!buddy2)
1120 break;
1121
1122 if (order > 0) {
1123 /* for special purposes, we don't set
1124 * free bits in bitmap */
1125 mb_set_bit(block, buddy);
1126 mb_set_bit(block + 1, buddy);
1127 }
1128 e4b->bd_info->bb_counters[order]--;
1129 e4b->bd_info->bb_counters[order]--;
1130
1131 block = block >> 1;
1132 order++;
1133 e4b->bd_info->bb_counters[order]++;
1134
1135 mb_clear_bit(block, buddy2);
1136 buddy = buddy2;
1137 } while (1);
1138 }
1139 mb_check_buddy(e4b);
Alex Tomasc9de5602008-01-29 00:19:52 -05001140}
1141
1142static int mb_find_extent(struct ext4_buddy *e4b, int order, int block,
1143 int needed, struct ext4_free_extent *ex)
1144{
1145 int next = block;
1146 int max;
1147 int ord;
1148 void *buddy;
1149
1150 BUG_ON(!ext4_is_group_locked(e4b->bd_sb, e4b->bd_group));
1151 BUG_ON(ex == NULL);
1152
1153 buddy = mb_find_buddy(e4b, order, &max);
1154 BUG_ON(buddy == NULL);
1155 BUG_ON(block >= max);
1156 if (mb_test_bit(block, buddy)) {
1157 ex->fe_len = 0;
1158 ex->fe_start = 0;
1159 ex->fe_group = 0;
1160 return 0;
1161 }
1162
1163 /* FIXME dorp order completely ? */
1164 if (likely(order == 0)) {
1165 /* find actual order */
1166 order = mb_find_order_for_block(e4b, block);
1167 block = block >> order;
1168 }
1169
1170 ex->fe_len = 1 << order;
1171 ex->fe_start = block << order;
1172 ex->fe_group = e4b->bd_group;
1173
1174 /* calc difference from given start */
1175 next = next - ex->fe_start;
1176 ex->fe_len -= next;
1177 ex->fe_start += next;
1178
1179 while (needed > ex->fe_len &&
1180 (buddy = mb_find_buddy(e4b, order, &max))) {
1181
1182 if (block + 1 >= max)
1183 break;
1184
1185 next = (block + 1) * (1 << order);
1186 if (mb_test_bit(next, EXT4_MB_BITMAP(e4b)))
1187 break;
1188
1189 ord = mb_find_order_for_block(e4b, next);
1190
1191 order = ord;
1192 block = next >> order;
1193 ex->fe_len += 1 << order;
1194 }
1195
1196 BUG_ON(ex->fe_start + ex->fe_len > (1 << (e4b->bd_blkbits + 3)));
1197 return ex->fe_len;
1198}
1199
1200static int mb_mark_used(struct ext4_buddy *e4b, struct ext4_free_extent *ex)
1201{
1202 int ord;
1203 int mlen = 0;
1204 int max = 0;
1205 int cur;
1206 int start = ex->fe_start;
1207 int len = ex->fe_len;
1208 unsigned ret = 0;
1209 int len0 = len;
1210 void *buddy;
1211
1212 BUG_ON(start + len > (e4b->bd_sb->s_blocksize << 3));
1213 BUG_ON(e4b->bd_group != ex->fe_group);
1214 BUG_ON(!ext4_is_group_locked(e4b->bd_sb, e4b->bd_group));
1215 mb_check_buddy(e4b);
1216 mb_mark_used_double(e4b, start, len);
1217
1218 e4b->bd_info->bb_free -= len;
1219 if (e4b->bd_info->bb_first_free == start)
1220 e4b->bd_info->bb_first_free += len;
1221
1222 /* let's maintain fragments counter */
1223 if (start != 0)
1224 mlen = !mb_test_bit(start - 1, EXT4_MB_BITMAP(e4b));
1225 if (start + len < EXT4_SB(e4b->bd_sb)->s_mb_maxs[0])
1226 max = !mb_test_bit(start + len, EXT4_MB_BITMAP(e4b));
1227 if (mlen && max)
1228 e4b->bd_info->bb_fragments++;
1229 else if (!mlen && !max)
1230 e4b->bd_info->bb_fragments--;
1231
1232 /* let's maintain buddy itself */
1233 while (len) {
1234 ord = mb_find_order_for_block(e4b, start);
1235
1236 if (((start >> ord) << ord) == start && len >= (1 << ord)) {
1237 /* the whole chunk may be allocated at once! */
1238 mlen = 1 << ord;
1239 buddy = mb_find_buddy(e4b, ord, &max);
1240 BUG_ON((start >> ord) >= max);
1241 mb_set_bit(start >> ord, buddy);
1242 e4b->bd_info->bb_counters[ord]--;
1243 start += mlen;
1244 len -= mlen;
1245 BUG_ON(len < 0);
1246 continue;
1247 }
1248
1249 /* store for history */
1250 if (ret == 0)
1251 ret = len | (ord << 16);
1252
1253 /* we have to split large buddy */
1254 BUG_ON(ord <= 0);
1255 buddy = mb_find_buddy(e4b, ord, &max);
1256 mb_set_bit(start >> ord, buddy);
1257 e4b->bd_info->bb_counters[ord]--;
1258
1259 ord--;
1260 cur = (start >> ord) & ~1U;
1261 buddy = mb_find_buddy(e4b, ord, &max);
1262 mb_clear_bit(cur, buddy);
1263 mb_clear_bit(cur + 1, buddy);
1264 e4b->bd_info->bb_counters[ord]++;
1265 e4b->bd_info->bb_counters[ord]++;
1266 }
1267
1268 mb_set_bits(sb_bgl_lock(EXT4_SB(e4b->bd_sb), ex->fe_group),
1269 EXT4_MB_BITMAP(e4b), ex->fe_start, len0);
1270 mb_check_buddy(e4b);
1271
1272 return ret;
1273}
1274
1275/*
1276 * Must be called under group lock!
1277 */
1278static void ext4_mb_use_best_found(struct ext4_allocation_context *ac,
1279 struct ext4_buddy *e4b)
1280{
1281 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
1282 int ret;
1283
1284 BUG_ON(ac->ac_b_ex.fe_group != e4b->bd_group);
1285 BUG_ON(ac->ac_status == AC_STATUS_FOUND);
1286
1287 ac->ac_b_ex.fe_len = min(ac->ac_b_ex.fe_len, ac->ac_g_ex.fe_len);
1288 ac->ac_b_ex.fe_logical = ac->ac_g_ex.fe_logical;
1289 ret = mb_mark_used(e4b, &ac->ac_b_ex);
1290
1291 /* preallocation can change ac_b_ex, thus we store actually
1292 * allocated blocks for history */
1293 ac->ac_f_ex = ac->ac_b_ex;
1294
1295 ac->ac_status = AC_STATUS_FOUND;
1296 ac->ac_tail = ret & 0xffff;
1297 ac->ac_buddy = ret >> 16;
1298
1299 /* XXXXXXX: SUCH A HORRIBLE **CK */
1300 /*FIXME!! Why ? */
1301 ac->ac_bitmap_page = e4b->bd_bitmap_page;
1302 get_page(ac->ac_bitmap_page);
1303 ac->ac_buddy_page = e4b->bd_buddy_page;
1304 get_page(ac->ac_buddy_page);
1305
1306 /* store last allocated for subsequent stream allocation */
1307 if ((ac->ac_flags & EXT4_MB_HINT_DATA)) {
1308 spin_lock(&sbi->s_md_lock);
1309 sbi->s_mb_last_group = ac->ac_f_ex.fe_group;
1310 sbi->s_mb_last_start = ac->ac_f_ex.fe_start;
1311 spin_unlock(&sbi->s_md_lock);
1312 }
1313}
1314
1315/*
1316 * regular allocator, for general purposes allocation
1317 */
1318
1319static void ext4_mb_check_limits(struct ext4_allocation_context *ac,
1320 struct ext4_buddy *e4b,
1321 int finish_group)
1322{
1323 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
1324 struct ext4_free_extent *bex = &ac->ac_b_ex;
1325 struct ext4_free_extent *gex = &ac->ac_g_ex;
1326 struct ext4_free_extent ex;
1327 int max;
1328
1329 /*
1330 * We don't want to scan for a whole year
1331 */
1332 if (ac->ac_found > sbi->s_mb_max_to_scan &&
1333 !(ac->ac_flags & EXT4_MB_HINT_FIRST)) {
1334 ac->ac_status = AC_STATUS_BREAK;
1335 return;
1336 }
1337
1338 /*
1339 * Haven't found good chunk so far, let's continue
1340 */
1341 if (bex->fe_len < gex->fe_len)
1342 return;
1343
1344 if ((finish_group || ac->ac_found > sbi->s_mb_min_to_scan)
1345 && bex->fe_group == e4b->bd_group) {
1346 /* recheck chunk's availability - we don't know
1347 * when it was found (within this lock-unlock
1348 * period or not) */
1349 max = mb_find_extent(e4b, 0, bex->fe_start, gex->fe_len, &ex);
1350 if (max >= gex->fe_len) {
1351 ext4_mb_use_best_found(ac, e4b);
1352 return;
1353 }
1354 }
1355}
1356
1357/*
1358 * The routine checks whether found extent is good enough. If it is,
1359 * then the extent gets marked used and flag is set to the context
1360 * to stop scanning. Otherwise, the extent is compared with the
1361 * previous found extent and if new one is better, then it's stored
1362 * in the context. Later, the best found extent will be used, if
1363 * mballoc can't find good enough extent.
1364 *
1365 * FIXME: real allocation policy is to be designed yet!
1366 */
1367static void ext4_mb_measure_extent(struct ext4_allocation_context *ac,
1368 struct ext4_free_extent *ex,
1369 struct ext4_buddy *e4b)
1370{
1371 struct ext4_free_extent *bex = &ac->ac_b_ex;
1372 struct ext4_free_extent *gex = &ac->ac_g_ex;
1373
1374 BUG_ON(ex->fe_len <= 0);
1375 BUG_ON(ex->fe_len >= EXT4_BLOCKS_PER_GROUP(ac->ac_sb));
1376 BUG_ON(ex->fe_start >= EXT4_BLOCKS_PER_GROUP(ac->ac_sb));
1377 BUG_ON(ac->ac_status != AC_STATUS_CONTINUE);
1378
1379 ac->ac_found++;
1380
1381 /*
1382 * The special case - take what you catch first
1383 */
1384 if (unlikely(ac->ac_flags & EXT4_MB_HINT_FIRST)) {
1385 *bex = *ex;
1386 ext4_mb_use_best_found(ac, e4b);
1387 return;
1388 }
1389
1390 /*
1391 * Let's check whether the chuck is good enough
1392 */
1393 if (ex->fe_len == gex->fe_len) {
1394 *bex = *ex;
1395 ext4_mb_use_best_found(ac, e4b);
1396 return;
1397 }
1398
1399 /*
1400 * If this is first found extent, just store it in the context
1401 */
1402 if (bex->fe_len == 0) {
1403 *bex = *ex;
1404 return;
1405 }
1406
1407 /*
1408 * If new found extent is better, store it in the context
1409 */
1410 if (bex->fe_len < gex->fe_len) {
1411 /* if the request isn't satisfied, any found extent
1412 * larger than previous best one is better */
1413 if (ex->fe_len > bex->fe_len)
1414 *bex = *ex;
1415 } else if (ex->fe_len > gex->fe_len) {
1416 /* if the request is satisfied, then we try to find
1417 * an extent that still satisfy the request, but is
1418 * smaller than previous one */
1419 if (ex->fe_len < bex->fe_len)
1420 *bex = *ex;
1421 }
1422
1423 ext4_mb_check_limits(ac, e4b, 0);
1424}
1425
1426static int ext4_mb_try_best_found(struct ext4_allocation_context *ac,
1427 struct ext4_buddy *e4b)
1428{
1429 struct ext4_free_extent ex = ac->ac_b_ex;
1430 ext4_group_t group = ex.fe_group;
1431 int max;
1432 int err;
1433
1434 BUG_ON(ex.fe_len <= 0);
1435 err = ext4_mb_load_buddy(ac->ac_sb, group, e4b);
1436 if (err)
1437 return err;
1438
1439 ext4_lock_group(ac->ac_sb, group);
1440 max = mb_find_extent(e4b, 0, ex.fe_start, ex.fe_len, &ex);
1441
1442 if (max > 0) {
1443 ac->ac_b_ex = ex;
1444 ext4_mb_use_best_found(ac, e4b);
1445 }
1446
1447 ext4_unlock_group(ac->ac_sb, group);
1448 ext4_mb_release_desc(e4b);
1449
1450 return 0;
1451}
1452
1453static int ext4_mb_find_by_goal(struct ext4_allocation_context *ac,
1454 struct ext4_buddy *e4b)
1455{
1456 ext4_group_t group = ac->ac_g_ex.fe_group;
1457 int max;
1458 int err;
1459 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
1460 struct ext4_super_block *es = sbi->s_es;
1461 struct ext4_free_extent ex;
1462
1463 if (!(ac->ac_flags & EXT4_MB_HINT_TRY_GOAL))
1464 return 0;
1465
1466 err = ext4_mb_load_buddy(ac->ac_sb, group, e4b);
1467 if (err)
1468 return err;
1469
1470 ext4_lock_group(ac->ac_sb, group);
1471 max = mb_find_extent(e4b, 0, ac->ac_g_ex.fe_start,
1472 ac->ac_g_ex.fe_len, &ex);
1473
1474 if (max >= ac->ac_g_ex.fe_len && ac->ac_g_ex.fe_len == sbi->s_stripe) {
1475 ext4_fsblk_t start;
1476
1477 start = (e4b->bd_group * EXT4_BLOCKS_PER_GROUP(ac->ac_sb)) +
1478 ex.fe_start + le32_to_cpu(es->s_first_data_block);
1479 /* use do_div to get remainder (would be 64-bit modulo) */
1480 if (do_div(start, sbi->s_stripe) == 0) {
1481 ac->ac_found++;
1482 ac->ac_b_ex = ex;
1483 ext4_mb_use_best_found(ac, e4b);
1484 }
1485 } else if (max >= ac->ac_g_ex.fe_len) {
1486 BUG_ON(ex.fe_len <= 0);
1487 BUG_ON(ex.fe_group != ac->ac_g_ex.fe_group);
1488 BUG_ON(ex.fe_start != ac->ac_g_ex.fe_start);
1489 ac->ac_found++;
1490 ac->ac_b_ex = ex;
1491 ext4_mb_use_best_found(ac, e4b);
1492 } else if (max > 0 && (ac->ac_flags & EXT4_MB_HINT_MERGE)) {
1493 /* Sometimes, caller may want to merge even small
1494 * number of blocks to an existing extent */
1495 BUG_ON(ex.fe_len <= 0);
1496 BUG_ON(ex.fe_group != ac->ac_g_ex.fe_group);
1497 BUG_ON(ex.fe_start != ac->ac_g_ex.fe_start);
1498 ac->ac_found++;
1499 ac->ac_b_ex = ex;
1500 ext4_mb_use_best_found(ac, e4b);
1501 }
1502 ext4_unlock_group(ac->ac_sb, group);
1503 ext4_mb_release_desc(e4b);
1504
1505 return 0;
1506}
1507
1508/*
1509 * The routine scans buddy structures (not bitmap!) from given order
1510 * to max order and tries to find big enough chunk to satisfy the req
1511 */
1512static void ext4_mb_simple_scan_group(struct ext4_allocation_context *ac,
1513 struct ext4_buddy *e4b)
1514{
1515 struct super_block *sb = ac->ac_sb;
1516 struct ext4_group_info *grp = e4b->bd_info;
1517 void *buddy;
1518 int i;
1519 int k;
1520 int max;
1521
1522 BUG_ON(ac->ac_2order <= 0);
1523 for (i = ac->ac_2order; i <= sb->s_blocksize_bits + 1; i++) {
1524 if (grp->bb_counters[i] == 0)
1525 continue;
1526
1527 buddy = mb_find_buddy(e4b, i, &max);
1528 BUG_ON(buddy == NULL);
1529
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -05001530 k = mb_find_next_zero_bit(buddy, max, 0);
Alex Tomasc9de5602008-01-29 00:19:52 -05001531 BUG_ON(k >= max);
1532
1533 ac->ac_found++;
1534
1535 ac->ac_b_ex.fe_len = 1 << i;
1536 ac->ac_b_ex.fe_start = k << i;
1537 ac->ac_b_ex.fe_group = e4b->bd_group;
1538
1539 ext4_mb_use_best_found(ac, e4b);
1540
1541 BUG_ON(ac->ac_b_ex.fe_len != ac->ac_g_ex.fe_len);
1542
1543 if (EXT4_SB(sb)->s_mb_stats)
1544 atomic_inc(&EXT4_SB(sb)->s_bal_2orders);
1545
1546 break;
1547 }
1548}
1549
1550/*
1551 * The routine scans the group and measures all found extents.
1552 * In order to optimize scanning, caller must pass number of
1553 * free blocks in the group, so the routine can know upper limit.
1554 */
1555static void ext4_mb_complex_scan_group(struct ext4_allocation_context *ac,
1556 struct ext4_buddy *e4b)
1557{
1558 struct super_block *sb = ac->ac_sb;
1559 void *bitmap = EXT4_MB_BITMAP(e4b);
1560 struct ext4_free_extent ex;
1561 int i;
1562 int free;
1563
1564 free = e4b->bd_info->bb_free;
1565 BUG_ON(free <= 0);
1566
1567 i = e4b->bd_info->bb_first_free;
1568
1569 while (free && ac->ac_status == AC_STATUS_CONTINUE) {
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -05001570 i = mb_find_next_zero_bit(bitmap,
Alex Tomasc9de5602008-01-29 00:19:52 -05001571 EXT4_BLOCKS_PER_GROUP(sb), i);
1572 if (i >= EXT4_BLOCKS_PER_GROUP(sb)) {
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001573 /*
Aneesh Kumar K.Ve56eb652008-02-15 13:48:21 -05001574 * IF we have corrupt bitmap, we won't find any
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001575 * free blocks even though group info says we
1576 * we have free blocks
1577 */
Harvey Harrison46e665e2008-04-17 10:38:59 -04001578 ext4_error(sb, __func__, "%d free blocks as per "
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001579 "group info. But bitmap says 0\n",
1580 free);
Alex Tomasc9de5602008-01-29 00:19:52 -05001581 break;
1582 }
1583
1584 mb_find_extent(e4b, 0, i, ac->ac_g_ex.fe_len, &ex);
1585 BUG_ON(ex.fe_len <= 0);
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001586 if (free < ex.fe_len) {
Harvey Harrison46e665e2008-04-17 10:38:59 -04001587 ext4_error(sb, __func__, "%d free blocks as per "
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001588 "group info. But got %d blocks\n",
1589 free, ex.fe_len);
Aneesh Kumar K.Ve56eb652008-02-15 13:48:21 -05001590 /*
1591 * The number of free blocks differs. This mostly
1592 * indicate that the bitmap is corrupt. So exit
1593 * without claiming the space.
1594 */
1595 break;
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05001596 }
Alex Tomasc9de5602008-01-29 00:19:52 -05001597
1598 ext4_mb_measure_extent(ac, &ex, e4b);
1599
1600 i += ex.fe_len;
1601 free -= ex.fe_len;
1602 }
1603
1604 ext4_mb_check_limits(ac, e4b, 1);
1605}
1606
1607/*
1608 * This is a special case for storages like raid5
1609 * we try to find stripe-aligned chunks for stripe-size requests
1610 * XXX should do so at least for multiples of stripe size as well
1611 */
1612static void ext4_mb_scan_aligned(struct ext4_allocation_context *ac,
1613 struct ext4_buddy *e4b)
1614{
1615 struct super_block *sb = ac->ac_sb;
1616 struct ext4_sb_info *sbi = EXT4_SB(sb);
1617 void *bitmap = EXT4_MB_BITMAP(e4b);
1618 struct ext4_free_extent ex;
1619 ext4_fsblk_t first_group_block;
1620 ext4_fsblk_t a;
1621 ext4_grpblk_t i;
1622 int max;
1623
1624 BUG_ON(sbi->s_stripe == 0);
1625
1626 /* find first stripe-aligned block in group */
1627 first_group_block = e4b->bd_group * EXT4_BLOCKS_PER_GROUP(sb)
1628 + le32_to_cpu(sbi->s_es->s_first_data_block);
1629 a = first_group_block + sbi->s_stripe - 1;
1630 do_div(a, sbi->s_stripe);
1631 i = (a * sbi->s_stripe) - first_group_block;
1632
1633 while (i < EXT4_BLOCKS_PER_GROUP(sb)) {
1634 if (!mb_test_bit(i, bitmap)) {
1635 max = mb_find_extent(e4b, 0, i, sbi->s_stripe, &ex);
1636 if (max >= sbi->s_stripe) {
1637 ac->ac_found++;
1638 ac->ac_b_ex = ex;
1639 ext4_mb_use_best_found(ac, e4b);
1640 break;
1641 }
1642 }
1643 i += sbi->s_stripe;
1644 }
1645}
1646
1647static int ext4_mb_good_group(struct ext4_allocation_context *ac,
1648 ext4_group_t group, int cr)
1649{
1650 unsigned free, fragments;
1651 unsigned i, bits;
1652 struct ext4_group_desc *desc;
1653 struct ext4_group_info *grp = ext4_get_group_info(ac->ac_sb, group);
1654
1655 BUG_ON(cr < 0 || cr >= 4);
1656 BUG_ON(EXT4_MB_GRP_NEED_INIT(grp));
1657
1658 free = grp->bb_free;
1659 fragments = grp->bb_fragments;
1660 if (free == 0)
1661 return 0;
1662 if (fragments == 0)
1663 return 0;
1664
1665 switch (cr) {
1666 case 0:
1667 BUG_ON(ac->ac_2order == 0);
1668 /* If this group is uninitialized, skip it initially */
1669 desc = ext4_get_group_desc(ac->ac_sb, group, NULL);
1670 if (desc->bg_flags & cpu_to_le16(EXT4_BG_BLOCK_UNINIT))
1671 return 0;
1672
1673 bits = ac->ac_sb->s_blocksize_bits + 1;
1674 for (i = ac->ac_2order; i <= bits; i++)
1675 if (grp->bb_counters[i] > 0)
1676 return 1;
1677 break;
1678 case 1:
1679 if ((free / fragments) >= ac->ac_g_ex.fe_len)
1680 return 1;
1681 break;
1682 case 2:
1683 if (free >= ac->ac_g_ex.fe_len)
1684 return 1;
1685 break;
1686 case 3:
1687 return 1;
1688 default:
1689 BUG();
1690 }
1691
1692 return 0;
1693}
1694
Eric Sandeen4ddfef72008-04-29 08:11:12 -04001695static noinline_for_stack int
1696ext4_mb_regular_allocator(struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05001697{
1698 ext4_group_t group;
1699 ext4_group_t i;
1700 int cr;
1701 int err = 0;
1702 int bsbits;
1703 struct ext4_sb_info *sbi;
1704 struct super_block *sb;
1705 struct ext4_buddy e4b;
1706 loff_t size, isize;
1707
1708 sb = ac->ac_sb;
1709 sbi = EXT4_SB(sb);
1710 BUG_ON(ac->ac_status == AC_STATUS_FOUND);
1711
1712 /* first, try the goal */
1713 err = ext4_mb_find_by_goal(ac, &e4b);
1714 if (err || ac->ac_status == AC_STATUS_FOUND)
1715 goto out;
1716
1717 if (unlikely(ac->ac_flags & EXT4_MB_HINT_GOAL_ONLY))
1718 goto out;
1719
1720 /*
1721 * ac->ac2_order is set only if the fe_len is a power of 2
1722 * if ac2_order is set we also set criteria to 0 so that we
1723 * try exact allocation using buddy.
1724 */
1725 i = fls(ac->ac_g_ex.fe_len);
1726 ac->ac_2order = 0;
1727 /*
1728 * We search using buddy data only if the order of the request
1729 * is greater than equal to the sbi_s_mb_order2_reqs
1730 * You can tune it via /proc/fs/ext4/<partition>/order2_req
1731 */
1732 if (i >= sbi->s_mb_order2_reqs) {
1733 /*
1734 * This should tell if fe_len is exactly power of 2
1735 */
1736 if ((ac->ac_g_ex.fe_len & (~(1 << (i - 1)))) == 0)
1737 ac->ac_2order = i - 1;
1738 }
1739
1740 bsbits = ac->ac_sb->s_blocksize_bits;
1741 /* if stream allocation is enabled, use global goal */
1742 size = ac->ac_o_ex.fe_logical + ac->ac_o_ex.fe_len;
1743 isize = i_size_read(ac->ac_inode) >> bsbits;
1744 if (size < isize)
1745 size = isize;
1746
1747 if (size < sbi->s_mb_stream_request &&
1748 (ac->ac_flags & EXT4_MB_HINT_DATA)) {
1749 /* TBD: may be hot point */
1750 spin_lock(&sbi->s_md_lock);
1751 ac->ac_g_ex.fe_group = sbi->s_mb_last_group;
1752 ac->ac_g_ex.fe_start = sbi->s_mb_last_start;
1753 spin_unlock(&sbi->s_md_lock);
1754 }
Alex Tomasc9de5602008-01-29 00:19:52 -05001755 /* Let's just scan groups to find more-less suitable blocks */
1756 cr = ac->ac_2order ? 0 : 1;
1757 /*
1758 * cr == 0 try to get exact allocation,
1759 * cr == 3 try to get anything
1760 */
1761repeat:
1762 for (; cr < 4 && ac->ac_status == AC_STATUS_CONTINUE; cr++) {
1763 ac->ac_criteria = cr;
Aneesh Kumar K.Ved8f9c72008-07-11 19:27:31 -04001764 /*
1765 * searching for the right group start
1766 * from the goal value specified
1767 */
1768 group = ac->ac_g_ex.fe_group;
1769
Alex Tomasc9de5602008-01-29 00:19:52 -05001770 for (i = 0; i < EXT4_SB(sb)->s_groups_count; group++, i++) {
1771 struct ext4_group_info *grp;
1772 struct ext4_group_desc *desc;
1773
1774 if (group == EXT4_SB(sb)->s_groups_count)
1775 group = 0;
1776
1777 /* quick check to skip empty groups */
1778 grp = ext4_get_group_info(ac->ac_sb, group);
1779 if (grp->bb_free == 0)
1780 continue;
1781
1782 /*
1783 * if the group is already init we check whether it is
1784 * a good group and if not we don't load the buddy
1785 */
1786 if (EXT4_MB_GRP_NEED_INIT(grp)) {
1787 /*
1788 * we need full data about the group
1789 * to make a good selection
1790 */
1791 err = ext4_mb_load_buddy(sb, group, &e4b);
1792 if (err)
1793 goto out;
1794 ext4_mb_release_desc(&e4b);
1795 }
1796
1797 /*
1798 * If the particular group doesn't satisfy our
1799 * criteria we continue with the next group
1800 */
1801 if (!ext4_mb_good_group(ac, group, cr))
1802 continue;
1803
1804 err = ext4_mb_load_buddy(sb, group, &e4b);
1805 if (err)
1806 goto out;
1807
1808 ext4_lock_group(sb, group);
1809 if (!ext4_mb_good_group(ac, group, cr)) {
1810 /* someone did allocation from this group */
1811 ext4_unlock_group(sb, group);
1812 ext4_mb_release_desc(&e4b);
1813 continue;
1814 }
1815
1816 ac->ac_groups_scanned++;
1817 desc = ext4_get_group_desc(sb, group, NULL);
1818 if (cr == 0 || (desc->bg_flags &
1819 cpu_to_le16(EXT4_BG_BLOCK_UNINIT) &&
1820 ac->ac_2order != 0))
1821 ext4_mb_simple_scan_group(ac, &e4b);
1822 else if (cr == 1 &&
1823 ac->ac_g_ex.fe_len == sbi->s_stripe)
1824 ext4_mb_scan_aligned(ac, &e4b);
1825 else
1826 ext4_mb_complex_scan_group(ac, &e4b);
1827
1828 ext4_unlock_group(sb, group);
1829 ext4_mb_release_desc(&e4b);
1830
1831 if (ac->ac_status != AC_STATUS_CONTINUE)
1832 break;
1833 }
1834 }
1835
1836 if (ac->ac_b_ex.fe_len > 0 && ac->ac_status != AC_STATUS_FOUND &&
1837 !(ac->ac_flags & EXT4_MB_HINT_FIRST)) {
1838 /*
1839 * We've been searching too long. Let's try to allocate
1840 * the best chunk we've found so far
1841 */
1842
1843 ext4_mb_try_best_found(ac, &e4b);
1844 if (ac->ac_status != AC_STATUS_FOUND) {
1845 /*
1846 * Someone more lucky has already allocated it.
1847 * The only thing we can do is just take first
1848 * found block(s)
1849 printk(KERN_DEBUG "EXT4-fs: someone won our chunk\n");
1850 */
1851 ac->ac_b_ex.fe_group = 0;
1852 ac->ac_b_ex.fe_start = 0;
1853 ac->ac_b_ex.fe_len = 0;
1854 ac->ac_status = AC_STATUS_CONTINUE;
1855 ac->ac_flags |= EXT4_MB_HINT_FIRST;
1856 cr = 3;
1857 atomic_inc(&sbi->s_mb_lost_chunks);
1858 goto repeat;
1859 }
1860 }
1861out:
1862 return err;
1863}
1864
1865#ifdef EXT4_MB_HISTORY
1866struct ext4_mb_proc_session {
1867 struct ext4_mb_history *history;
1868 struct super_block *sb;
1869 int start;
1870 int max;
1871};
1872
1873static void *ext4_mb_history_skip_empty(struct ext4_mb_proc_session *s,
1874 struct ext4_mb_history *hs,
1875 int first)
1876{
1877 if (hs == s->history + s->max)
1878 hs = s->history;
1879 if (!first && hs == s->history + s->start)
1880 return NULL;
1881 while (hs->orig.fe_len == 0) {
1882 hs++;
1883 if (hs == s->history + s->max)
1884 hs = s->history;
1885 if (hs == s->history + s->start)
1886 return NULL;
1887 }
1888 return hs;
1889}
1890
1891static void *ext4_mb_seq_history_start(struct seq_file *seq, loff_t *pos)
1892{
1893 struct ext4_mb_proc_session *s = seq->private;
1894 struct ext4_mb_history *hs;
1895 int l = *pos;
1896
1897 if (l == 0)
1898 return SEQ_START_TOKEN;
1899 hs = ext4_mb_history_skip_empty(s, s->history + s->start, 1);
1900 if (!hs)
1901 return NULL;
1902 while (--l && (hs = ext4_mb_history_skip_empty(s, ++hs, 0)) != NULL);
1903 return hs;
1904}
1905
1906static void *ext4_mb_seq_history_next(struct seq_file *seq, void *v,
1907 loff_t *pos)
1908{
1909 struct ext4_mb_proc_session *s = seq->private;
1910 struct ext4_mb_history *hs = v;
1911
1912 ++*pos;
1913 if (v == SEQ_START_TOKEN)
1914 return ext4_mb_history_skip_empty(s, s->history + s->start, 1);
1915 else
1916 return ext4_mb_history_skip_empty(s, ++hs, 0);
1917}
1918
1919static int ext4_mb_seq_history_show(struct seq_file *seq, void *v)
1920{
1921 char buf[25], buf2[25], buf3[25], *fmt;
1922 struct ext4_mb_history *hs = v;
1923
1924 if (v == SEQ_START_TOKEN) {
1925 seq_printf(seq, "%-5s %-8s %-23s %-23s %-23s %-5s "
1926 "%-5s %-2s %-5s %-5s %-5s %-6s\n",
1927 "pid", "inode", "original", "goal", "result", "found",
1928 "grps", "cr", "flags", "merge", "tail", "broken");
1929 return 0;
1930 }
1931
1932 if (hs->op == EXT4_MB_HISTORY_ALLOC) {
1933 fmt = "%-5u %-8u %-23s %-23s %-23s %-5u %-5u %-2u "
1934 "%-5u %-5s %-5u %-6u\n";
1935 sprintf(buf2, "%lu/%d/%u@%u", hs->result.fe_group,
1936 hs->result.fe_start, hs->result.fe_len,
1937 hs->result.fe_logical);
1938 sprintf(buf, "%lu/%d/%u@%u", hs->orig.fe_group,
1939 hs->orig.fe_start, hs->orig.fe_len,
1940 hs->orig.fe_logical);
1941 sprintf(buf3, "%lu/%d/%u@%u", hs->goal.fe_group,
1942 hs->goal.fe_start, hs->goal.fe_len,
1943 hs->goal.fe_logical);
1944 seq_printf(seq, fmt, hs->pid, hs->ino, buf, buf3, buf2,
1945 hs->found, hs->groups, hs->cr, hs->flags,
1946 hs->merged ? "M" : "", hs->tail,
1947 hs->buddy ? 1 << hs->buddy : 0);
1948 } else if (hs->op == EXT4_MB_HISTORY_PREALLOC) {
1949 fmt = "%-5u %-8u %-23s %-23s %-23s\n";
1950 sprintf(buf2, "%lu/%d/%u@%u", hs->result.fe_group,
1951 hs->result.fe_start, hs->result.fe_len,
1952 hs->result.fe_logical);
1953 sprintf(buf, "%lu/%d/%u@%u", hs->orig.fe_group,
1954 hs->orig.fe_start, hs->orig.fe_len,
1955 hs->orig.fe_logical);
1956 seq_printf(seq, fmt, hs->pid, hs->ino, buf, "", buf2);
1957 } else if (hs->op == EXT4_MB_HISTORY_DISCARD) {
1958 sprintf(buf2, "%lu/%d/%u", hs->result.fe_group,
1959 hs->result.fe_start, hs->result.fe_len);
1960 seq_printf(seq, "%-5u %-8u %-23s discard\n",
1961 hs->pid, hs->ino, buf2);
1962 } else if (hs->op == EXT4_MB_HISTORY_FREE) {
1963 sprintf(buf2, "%lu/%d/%u", hs->result.fe_group,
1964 hs->result.fe_start, hs->result.fe_len);
1965 seq_printf(seq, "%-5u %-8u %-23s free\n",
1966 hs->pid, hs->ino, buf2);
1967 }
1968 return 0;
1969}
1970
1971static void ext4_mb_seq_history_stop(struct seq_file *seq, void *v)
1972{
1973}
1974
1975static struct seq_operations ext4_mb_seq_history_ops = {
1976 .start = ext4_mb_seq_history_start,
1977 .next = ext4_mb_seq_history_next,
1978 .stop = ext4_mb_seq_history_stop,
1979 .show = ext4_mb_seq_history_show,
1980};
1981
1982static int ext4_mb_seq_history_open(struct inode *inode, struct file *file)
1983{
1984 struct super_block *sb = PDE(inode)->data;
1985 struct ext4_sb_info *sbi = EXT4_SB(sb);
1986 struct ext4_mb_proc_session *s;
1987 int rc;
1988 int size;
1989
Shen Feng74767c52008-07-11 19:27:31 -04001990 if (unlikely(sbi->s_mb_history == NULL))
1991 return -ENOMEM;
Alex Tomasc9de5602008-01-29 00:19:52 -05001992 s = kmalloc(sizeof(*s), GFP_KERNEL);
1993 if (s == NULL)
1994 return -ENOMEM;
1995 s->sb = sb;
1996 size = sizeof(struct ext4_mb_history) * sbi->s_mb_history_max;
1997 s->history = kmalloc(size, GFP_KERNEL);
1998 if (s->history == NULL) {
1999 kfree(s);
2000 return -ENOMEM;
2001 }
2002
2003 spin_lock(&sbi->s_mb_history_lock);
2004 memcpy(s->history, sbi->s_mb_history, size);
2005 s->max = sbi->s_mb_history_max;
2006 s->start = sbi->s_mb_history_cur % s->max;
2007 spin_unlock(&sbi->s_mb_history_lock);
2008
2009 rc = seq_open(file, &ext4_mb_seq_history_ops);
2010 if (rc == 0) {
2011 struct seq_file *m = (struct seq_file *)file->private_data;
2012 m->private = s;
2013 } else {
2014 kfree(s->history);
2015 kfree(s);
2016 }
2017 return rc;
2018
2019}
2020
2021static int ext4_mb_seq_history_release(struct inode *inode, struct file *file)
2022{
2023 struct seq_file *seq = (struct seq_file *)file->private_data;
2024 struct ext4_mb_proc_session *s = seq->private;
2025 kfree(s->history);
2026 kfree(s);
2027 return seq_release(inode, file);
2028}
2029
2030static ssize_t ext4_mb_seq_history_write(struct file *file,
2031 const char __user *buffer,
2032 size_t count, loff_t *ppos)
2033{
2034 struct seq_file *seq = (struct seq_file *)file->private_data;
2035 struct ext4_mb_proc_session *s = seq->private;
2036 struct super_block *sb = s->sb;
2037 char str[32];
2038 int value;
2039
2040 if (count >= sizeof(str)) {
2041 printk(KERN_ERR "EXT4-fs: %s string too long, max %u bytes\n",
2042 "mb_history", (int)sizeof(str));
2043 return -EOVERFLOW;
2044 }
2045
2046 if (copy_from_user(str, buffer, count))
2047 return -EFAULT;
2048
2049 value = simple_strtol(str, NULL, 0);
2050 if (value < 0)
2051 return -ERANGE;
2052 EXT4_SB(sb)->s_mb_history_filter = value;
2053
2054 return count;
2055}
2056
2057static struct file_operations ext4_mb_seq_history_fops = {
2058 .owner = THIS_MODULE,
2059 .open = ext4_mb_seq_history_open,
2060 .read = seq_read,
2061 .write = ext4_mb_seq_history_write,
2062 .llseek = seq_lseek,
2063 .release = ext4_mb_seq_history_release,
2064};
2065
2066static void *ext4_mb_seq_groups_start(struct seq_file *seq, loff_t *pos)
2067{
2068 struct super_block *sb = seq->private;
2069 struct ext4_sb_info *sbi = EXT4_SB(sb);
2070 ext4_group_t group;
2071
2072 if (*pos < 0 || *pos >= sbi->s_groups_count)
2073 return NULL;
2074
2075 group = *pos + 1;
2076 return (void *) group;
2077}
2078
2079static void *ext4_mb_seq_groups_next(struct seq_file *seq, void *v, loff_t *pos)
2080{
2081 struct super_block *sb = seq->private;
2082 struct ext4_sb_info *sbi = EXT4_SB(sb);
2083 ext4_group_t group;
2084
2085 ++*pos;
2086 if (*pos < 0 || *pos >= sbi->s_groups_count)
2087 return NULL;
2088 group = *pos + 1;
2089 return (void *) group;;
2090}
2091
2092static int ext4_mb_seq_groups_show(struct seq_file *seq, void *v)
2093{
2094 struct super_block *sb = seq->private;
2095 long group = (long) v;
2096 int i;
2097 int err;
2098 struct ext4_buddy e4b;
2099 struct sg {
2100 struct ext4_group_info info;
2101 unsigned short counters[16];
2102 } sg;
2103
2104 group--;
2105 if (group == 0)
2106 seq_printf(seq, "#%-5s: %-5s %-5s %-5s "
2107 "[ %-5s %-5s %-5s %-5s %-5s %-5s %-5s "
2108 "%-5s %-5s %-5s %-5s %-5s %-5s %-5s ]\n",
2109 "group", "free", "frags", "first",
2110 "2^0", "2^1", "2^2", "2^3", "2^4", "2^5", "2^6",
2111 "2^7", "2^8", "2^9", "2^10", "2^11", "2^12", "2^13");
2112
2113 i = (sb->s_blocksize_bits + 2) * sizeof(sg.info.bb_counters[0]) +
2114 sizeof(struct ext4_group_info);
2115 err = ext4_mb_load_buddy(sb, group, &e4b);
2116 if (err) {
2117 seq_printf(seq, "#%-5lu: I/O error\n", group);
2118 return 0;
2119 }
2120 ext4_lock_group(sb, group);
2121 memcpy(&sg, ext4_get_group_info(sb, group), i);
2122 ext4_unlock_group(sb, group);
2123 ext4_mb_release_desc(&e4b);
2124
2125 seq_printf(seq, "#%-5lu: %-5u %-5u %-5u [", group, sg.info.bb_free,
2126 sg.info.bb_fragments, sg.info.bb_first_free);
2127 for (i = 0; i <= 13; i++)
2128 seq_printf(seq, " %-5u", i <= sb->s_blocksize_bits + 1 ?
2129 sg.info.bb_counters[i] : 0);
2130 seq_printf(seq, " ]\n");
2131
2132 return 0;
2133}
2134
2135static void ext4_mb_seq_groups_stop(struct seq_file *seq, void *v)
2136{
2137}
2138
2139static struct seq_operations ext4_mb_seq_groups_ops = {
2140 .start = ext4_mb_seq_groups_start,
2141 .next = ext4_mb_seq_groups_next,
2142 .stop = ext4_mb_seq_groups_stop,
2143 .show = ext4_mb_seq_groups_show,
2144};
2145
2146static int ext4_mb_seq_groups_open(struct inode *inode, struct file *file)
2147{
2148 struct super_block *sb = PDE(inode)->data;
2149 int rc;
2150
2151 rc = seq_open(file, &ext4_mb_seq_groups_ops);
2152 if (rc == 0) {
2153 struct seq_file *m = (struct seq_file *)file->private_data;
2154 m->private = sb;
2155 }
2156 return rc;
2157
2158}
2159
2160static struct file_operations ext4_mb_seq_groups_fops = {
2161 .owner = THIS_MODULE,
2162 .open = ext4_mb_seq_groups_open,
2163 .read = seq_read,
2164 .llseek = seq_lseek,
2165 .release = seq_release,
2166};
2167
2168static void ext4_mb_history_release(struct super_block *sb)
2169{
2170 struct ext4_sb_info *sbi = EXT4_SB(sb);
2171
2172 remove_proc_entry("mb_groups", sbi->s_mb_proc);
2173 remove_proc_entry("mb_history", sbi->s_mb_proc);
2174
2175 kfree(sbi->s_mb_history);
2176}
2177
2178static void ext4_mb_history_init(struct super_block *sb)
2179{
2180 struct ext4_sb_info *sbi = EXT4_SB(sb);
2181 int i;
2182
2183 if (sbi->s_mb_proc != NULL) {
Denis V. Lunev46fe74f2008-04-29 01:02:08 -07002184 proc_create_data("mb_history", S_IRUGO, sbi->s_mb_proc,
2185 &ext4_mb_seq_history_fops, sb);
2186 proc_create_data("mb_groups", S_IRUGO, sbi->s_mb_proc,
2187 &ext4_mb_seq_groups_fops, sb);
Alex Tomasc9de5602008-01-29 00:19:52 -05002188 }
2189
2190 sbi->s_mb_history_max = 1000;
2191 sbi->s_mb_history_cur = 0;
2192 spin_lock_init(&sbi->s_mb_history_lock);
2193 i = sbi->s_mb_history_max * sizeof(struct ext4_mb_history);
Shen Feng74767c52008-07-11 19:27:31 -04002194 sbi->s_mb_history = kzalloc(i, GFP_KERNEL);
Alex Tomasc9de5602008-01-29 00:19:52 -05002195 /* if we can't allocate history, then we simple won't use it */
2196}
2197
Eric Sandeen4ddfef72008-04-29 08:11:12 -04002198static noinline_for_stack void
2199ext4_mb_store_history(struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05002200{
2201 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
2202 struct ext4_mb_history h;
2203
2204 if (unlikely(sbi->s_mb_history == NULL))
2205 return;
2206
2207 if (!(ac->ac_op & sbi->s_mb_history_filter))
2208 return;
2209
2210 h.op = ac->ac_op;
2211 h.pid = current->pid;
2212 h.ino = ac->ac_inode ? ac->ac_inode->i_ino : 0;
2213 h.orig = ac->ac_o_ex;
2214 h.result = ac->ac_b_ex;
2215 h.flags = ac->ac_flags;
2216 h.found = ac->ac_found;
2217 h.groups = ac->ac_groups_scanned;
2218 h.cr = ac->ac_criteria;
2219 h.tail = ac->ac_tail;
2220 h.buddy = ac->ac_buddy;
2221 h.merged = 0;
2222 if (ac->ac_op == EXT4_MB_HISTORY_ALLOC) {
2223 if (ac->ac_g_ex.fe_start == ac->ac_b_ex.fe_start &&
2224 ac->ac_g_ex.fe_group == ac->ac_b_ex.fe_group)
2225 h.merged = 1;
2226 h.goal = ac->ac_g_ex;
2227 h.result = ac->ac_f_ex;
2228 }
2229
2230 spin_lock(&sbi->s_mb_history_lock);
2231 memcpy(sbi->s_mb_history + sbi->s_mb_history_cur, &h, sizeof(h));
2232 if (++sbi->s_mb_history_cur >= sbi->s_mb_history_max)
2233 sbi->s_mb_history_cur = 0;
2234 spin_unlock(&sbi->s_mb_history_lock);
2235}
2236
2237#else
2238#define ext4_mb_history_release(sb)
2239#define ext4_mb_history_init(sb)
2240#endif
2241
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002242
2243/* Create and initialize ext4_group_info data for the given group. */
2244int ext4_mb_add_groupinfo(struct super_block *sb, ext4_group_t group,
2245 struct ext4_group_desc *desc)
2246{
2247 int i, len;
2248 int metalen = 0;
2249 struct ext4_sb_info *sbi = EXT4_SB(sb);
2250 struct ext4_group_info **meta_group_info;
2251
2252 /*
2253 * First check if this group is the first of a reserved block.
2254 * If it's true, we have to allocate a new table of pointers
2255 * to ext4_group_info structures
2256 */
2257 if (group % EXT4_DESC_PER_BLOCK(sb) == 0) {
2258 metalen = sizeof(*meta_group_info) <<
2259 EXT4_DESC_PER_BLOCK_BITS(sb);
2260 meta_group_info = kmalloc(metalen, GFP_KERNEL);
2261 if (meta_group_info == NULL) {
2262 printk(KERN_ERR "EXT4-fs: can't allocate mem for a "
2263 "buddy group\n");
2264 goto exit_meta_group_info;
2265 }
2266 sbi->s_group_info[group >> EXT4_DESC_PER_BLOCK_BITS(sb)] =
2267 meta_group_info;
2268 }
2269
2270 /*
2271 * calculate needed size. if change bb_counters size,
2272 * don't forget about ext4_mb_generate_buddy()
2273 */
2274 len = offsetof(typeof(**meta_group_info),
2275 bb_counters[sb->s_blocksize_bits + 2]);
2276
2277 meta_group_info =
2278 sbi->s_group_info[group >> EXT4_DESC_PER_BLOCK_BITS(sb)];
2279 i = group & (EXT4_DESC_PER_BLOCK(sb) - 1);
2280
2281 meta_group_info[i] = kzalloc(len, GFP_KERNEL);
2282 if (meta_group_info[i] == NULL) {
2283 printk(KERN_ERR "EXT4-fs: can't allocate buddy mem\n");
2284 goto exit_group_info;
2285 }
2286 set_bit(EXT4_GROUP_INFO_NEED_INIT_BIT,
2287 &(meta_group_info[i]->bb_state));
2288
2289 /*
2290 * initialize bb_free to be able to skip
2291 * empty groups without initialization
2292 */
2293 if (desc->bg_flags & cpu_to_le16(EXT4_BG_BLOCK_UNINIT)) {
2294 meta_group_info[i]->bb_free =
2295 ext4_free_blocks_after_init(sb, group, desc);
2296 } else {
2297 meta_group_info[i]->bb_free =
2298 le16_to_cpu(desc->bg_free_blocks_count);
2299 }
2300
2301 INIT_LIST_HEAD(&meta_group_info[i]->bb_prealloc_list);
2302
2303#ifdef DOUBLE_CHECK
2304 {
2305 struct buffer_head *bh;
2306 meta_group_info[i]->bb_bitmap =
2307 kmalloc(sb->s_blocksize, GFP_KERNEL);
2308 BUG_ON(meta_group_info[i]->bb_bitmap == NULL);
2309 bh = ext4_read_block_bitmap(sb, group);
2310 BUG_ON(bh == NULL);
2311 memcpy(meta_group_info[i]->bb_bitmap, bh->b_data,
2312 sb->s_blocksize);
2313 put_bh(bh);
2314 }
2315#endif
2316
2317 return 0;
2318
2319exit_group_info:
2320 /* If a meta_group_info table has been allocated, release it now */
2321 if (group % EXT4_DESC_PER_BLOCK(sb) == 0)
2322 kfree(sbi->s_group_info[group >> EXT4_DESC_PER_BLOCK_BITS(sb)]);
2323exit_meta_group_info:
2324 return -ENOMEM;
2325} /* ext4_mb_add_groupinfo */
2326
2327/*
2328 * Add a group to the existing groups.
2329 * This function is used for online resize
2330 */
2331int ext4_mb_add_more_groupinfo(struct super_block *sb, ext4_group_t group,
2332 struct ext4_group_desc *desc)
2333{
2334 struct ext4_sb_info *sbi = EXT4_SB(sb);
2335 struct inode *inode = sbi->s_buddy_cache;
2336 int blocks_per_page;
2337 int block;
2338 int pnum;
2339 struct page *page;
2340 int err;
2341
2342 /* Add group based on group descriptor*/
2343 err = ext4_mb_add_groupinfo(sb, group, desc);
2344 if (err)
2345 return err;
2346
2347 /*
2348 * Cache pages containing dynamic mb_alloc datas (buddy and bitmap
2349 * datas) are set not up to date so that they will be re-initilaized
2350 * during the next call to ext4_mb_load_buddy
2351 */
2352
2353 /* Set buddy page as not up to date */
2354 blocks_per_page = PAGE_CACHE_SIZE / sb->s_blocksize;
2355 block = group * 2;
2356 pnum = block / blocks_per_page;
2357 page = find_get_page(inode->i_mapping, pnum);
2358 if (page != NULL) {
2359 ClearPageUptodate(page);
2360 page_cache_release(page);
2361 }
2362
2363 /* Set bitmap page as not up to date */
2364 block++;
2365 pnum = block / blocks_per_page;
2366 page = find_get_page(inode->i_mapping, pnum);
2367 if (page != NULL) {
2368 ClearPageUptodate(page);
2369 page_cache_release(page);
2370 }
2371
2372 return 0;
2373}
2374
2375/*
2376 * Update an existing group.
2377 * This function is used for online resize
2378 */
2379void ext4_mb_update_group_info(struct ext4_group_info *grp, ext4_grpblk_t add)
2380{
2381 grp->bb_free += add;
2382}
2383
Alex Tomasc9de5602008-01-29 00:19:52 -05002384static int ext4_mb_init_backend(struct super_block *sb)
2385{
2386 ext4_group_t i;
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002387 int metalen;
Alex Tomasc9de5602008-01-29 00:19:52 -05002388 struct ext4_sb_info *sbi = EXT4_SB(sb);
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002389 struct ext4_super_block *es = sbi->s_es;
2390 int num_meta_group_infos;
2391 int num_meta_group_infos_max;
2392 int array_size;
Alex Tomasc9de5602008-01-29 00:19:52 -05002393 struct ext4_group_info **meta_group_info;
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002394 struct ext4_group_desc *desc;
Alex Tomasc9de5602008-01-29 00:19:52 -05002395
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002396 /* This is the number of blocks used by GDT */
2397 num_meta_group_infos = (sbi->s_groups_count + EXT4_DESC_PER_BLOCK(sb) -
2398 1) >> EXT4_DESC_PER_BLOCK_BITS(sb);
2399
2400 /*
2401 * This is the total number of blocks used by GDT including
2402 * the number of reserved blocks for GDT.
2403 * The s_group_info array is allocated with this value
2404 * to allow a clean online resize without a complex
2405 * manipulation of pointer.
2406 * The drawback is the unused memory when no resize
2407 * occurs but it's very low in terms of pages
2408 * (see comments below)
2409 * Need to handle this properly when META_BG resizing is allowed
2410 */
2411 num_meta_group_infos_max = num_meta_group_infos +
2412 le16_to_cpu(es->s_reserved_gdt_blocks);
2413
2414 /*
2415 * array_size is the size of s_group_info array. We round it
2416 * to the next power of two because this approximation is done
2417 * internally by kmalloc so we can have some more memory
2418 * for free here (e.g. may be used for META_BG resize).
2419 */
2420 array_size = 1;
2421 while (array_size < sizeof(*sbi->s_group_info) *
2422 num_meta_group_infos_max)
2423 array_size = array_size << 1;
Alex Tomasc9de5602008-01-29 00:19:52 -05002424 /* An 8TB filesystem with 64-bit pointers requires a 4096 byte
2425 * kmalloc. A 128kb malloc should suffice for a 256TB filesystem.
2426 * So a two level scheme suffices for now. */
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002427 sbi->s_group_info = kmalloc(array_size, GFP_KERNEL);
Alex Tomasc9de5602008-01-29 00:19:52 -05002428 if (sbi->s_group_info == NULL) {
2429 printk(KERN_ERR "EXT4-fs: can't allocate buddy meta group\n");
2430 return -ENOMEM;
2431 }
2432 sbi->s_buddy_cache = new_inode(sb);
2433 if (sbi->s_buddy_cache == NULL) {
2434 printk(KERN_ERR "EXT4-fs: can't get new inode\n");
2435 goto err_freesgi;
2436 }
2437 EXT4_I(sbi->s_buddy_cache)->i_disksize = 0;
2438
2439 metalen = sizeof(*meta_group_info) << EXT4_DESC_PER_BLOCK_BITS(sb);
2440 for (i = 0; i < num_meta_group_infos; i++) {
2441 if ((i + 1) == num_meta_group_infos)
2442 metalen = sizeof(*meta_group_info) *
2443 (sbi->s_groups_count -
2444 (i << EXT4_DESC_PER_BLOCK_BITS(sb)));
2445 meta_group_info = kmalloc(metalen, GFP_KERNEL);
2446 if (meta_group_info == NULL) {
2447 printk(KERN_ERR "EXT4-fs: can't allocate mem for a "
2448 "buddy group\n");
2449 goto err_freemeta;
2450 }
2451 sbi->s_group_info[i] = meta_group_info;
2452 }
2453
Alex Tomasc9de5602008-01-29 00:19:52 -05002454 for (i = 0; i < sbi->s_groups_count; i++) {
Alex Tomasc9de5602008-01-29 00:19:52 -05002455 desc = ext4_get_group_desc(sb, i, NULL);
2456 if (desc == NULL) {
2457 printk(KERN_ERR
2458 "EXT4-fs: can't read descriptor %lu\n", i);
2459 goto err_freebuddy;
2460 }
Frederic Bohe5f21b0e2008-07-11 19:27:31 -04002461 if (ext4_mb_add_groupinfo(sb, i, desc) != 0)
2462 goto err_freebuddy;
Alex Tomasc9de5602008-01-29 00:19:52 -05002463 }
2464
2465 return 0;
2466
2467err_freebuddy:
Roel Kluinf1fa3342008-04-29 22:01:15 -04002468 while (i-- > 0)
Alex Tomasc9de5602008-01-29 00:19:52 -05002469 kfree(ext4_get_group_info(sb, i));
Alex Tomasc9de5602008-01-29 00:19:52 -05002470 i = num_meta_group_infos;
2471err_freemeta:
Roel Kluinf1fa3342008-04-29 22:01:15 -04002472 while (i-- > 0)
Alex Tomasc9de5602008-01-29 00:19:52 -05002473 kfree(sbi->s_group_info[i]);
2474 iput(sbi->s_buddy_cache);
2475err_freesgi:
2476 kfree(sbi->s_group_info);
2477 return -ENOMEM;
2478}
2479
2480int ext4_mb_init(struct super_block *sb, int needs_recovery)
2481{
2482 struct ext4_sb_info *sbi = EXT4_SB(sb);
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04002483 unsigned i, j;
Alex Tomasc9de5602008-01-29 00:19:52 -05002484 unsigned offset;
2485 unsigned max;
Shen Feng74767c52008-07-11 19:27:31 -04002486 int ret;
Alex Tomasc9de5602008-01-29 00:19:52 -05002487
2488 if (!test_opt(sb, MBALLOC))
2489 return 0;
2490
2491 i = (sb->s_blocksize_bits + 2) * sizeof(unsigned short);
2492
2493 sbi->s_mb_offsets = kmalloc(i, GFP_KERNEL);
2494 if (sbi->s_mb_offsets == NULL) {
2495 clear_opt(sbi->s_mount_opt, MBALLOC);
2496 return -ENOMEM;
2497 }
2498 sbi->s_mb_maxs = kmalloc(i, GFP_KERNEL);
2499 if (sbi->s_mb_maxs == NULL) {
2500 clear_opt(sbi->s_mount_opt, MBALLOC);
2501 kfree(sbi->s_mb_maxs);
2502 return -ENOMEM;
2503 }
2504
2505 /* order 0 is regular bitmap */
2506 sbi->s_mb_maxs[0] = sb->s_blocksize << 3;
2507 sbi->s_mb_offsets[0] = 0;
2508
2509 i = 1;
2510 offset = 0;
2511 max = sb->s_blocksize << 2;
2512 do {
2513 sbi->s_mb_offsets[i] = offset;
2514 sbi->s_mb_maxs[i] = max;
2515 offset += 1 << (sb->s_blocksize_bits - i);
2516 max = max >> 1;
2517 i++;
2518 } while (i <= sb->s_blocksize_bits + 1);
2519
2520 /* init file for buddy data */
Shen Feng74767c52008-07-11 19:27:31 -04002521 ret = ext4_mb_init_backend(sb);
2522 if (ret != 0) {
Alex Tomasc9de5602008-01-29 00:19:52 -05002523 clear_opt(sbi->s_mount_opt, MBALLOC);
2524 kfree(sbi->s_mb_offsets);
2525 kfree(sbi->s_mb_maxs);
Shen Feng74767c52008-07-11 19:27:31 -04002526 return ret;
Alex Tomasc9de5602008-01-29 00:19:52 -05002527 }
2528
2529 spin_lock_init(&sbi->s_md_lock);
2530 INIT_LIST_HEAD(&sbi->s_active_transaction);
2531 INIT_LIST_HEAD(&sbi->s_closed_transaction);
2532 INIT_LIST_HEAD(&sbi->s_committed_transaction);
2533 spin_lock_init(&sbi->s_bal_lock);
2534
2535 sbi->s_mb_max_to_scan = MB_DEFAULT_MAX_TO_SCAN;
2536 sbi->s_mb_min_to_scan = MB_DEFAULT_MIN_TO_SCAN;
2537 sbi->s_mb_stats = MB_DEFAULT_STATS;
2538 sbi->s_mb_stream_request = MB_DEFAULT_STREAM_THRESHOLD;
2539 sbi->s_mb_order2_reqs = MB_DEFAULT_ORDER2_REQS;
2540 sbi->s_mb_history_filter = EXT4_MB_HISTORY_DEFAULT;
2541 sbi->s_mb_group_prealloc = MB_DEFAULT_GROUP_PREALLOC;
2542
Aneesh Kumar K.V1320cbc2008-07-23 14:09:26 -04002543 i = sizeof(struct ext4_locality_group) * nr_cpu_ids;
Alex Tomasc9de5602008-01-29 00:19:52 -05002544 sbi->s_locality_groups = kmalloc(i, GFP_KERNEL);
2545 if (sbi->s_locality_groups == NULL) {
2546 clear_opt(sbi->s_mount_opt, MBALLOC);
2547 kfree(sbi->s_mb_offsets);
2548 kfree(sbi->s_mb_maxs);
2549 return -ENOMEM;
2550 }
Aneesh Kumar K.V1320cbc2008-07-23 14:09:26 -04002551 for (i = 0; i < nr_cpu_ids; i++) {
Alex Tomasc9de5602008-01-29 00:19:52 -05002552 struct ext4_locality_group *lg;
2553 lg = &sbi->s_locality_groups[i];
2554 mutex_init(&lg->lg_mutex);
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04002555 for (j = 0; j < PREALLOC_TB_SIZE; j++)
2556 INIT_LIST_HEAD(&lg->lg_prealloc_list[j]);
Alex Tomasc9de5602008-01-29 00:19:52 -05002557 spin_lock_init(&lg->lg_prealloc_lock);
2558 }
2559
2560 ext4_mb_init_per_dev_proc(sb);
2561 ext4_mb_history_init(sb);
2562
2563 printk("EXT4-fs: mballoc enabled\n");
2564 return 0;
2565}
2566
2567/* need to called with ext4 group lock (ext4_lock_group) */
2568static void ext4_mb_cleanup_pa(struct ext4_group_info *grp)
2569{
2570 struct ext4_prealloc_space *pa;
2571 struct list_head *cur, *tmp;
2572 int count = 0;
2573
2574 list_for_each_safe(cur, tmp, &grp->bb_prealloc_list) {
2575 pa = list_entry(cur, struct ext4_prealloc_space, pa_group_list);
2576 list_del(&pa->pa_group_list);
2577 count++;
2578 kfree(pa);
2579 }
2580 if (count)
2581 mb_debug("mballoc: %u PAs left\n", count);
2582
2583}
2584
2585int ext4_mb_release(struct super_block *sb)
2586{
2587 ext4_group_t i;
2588 int num_meta_group_infos;
2589 struct ext4_group_info *grinfo;
2590 struct ext4_sb_info *sbi = EXT4_SB(sb);
2591
2592 if (!test_opt(sb, MBALLOC))
2593 return 0;
2594
2595 /* release freed, non-committed blocks */
2596 spin_lock(&sbi->s_md_lock);
2597 list_splice_init(&sbi->s_closed_transaction,
2598 &sbi->s_committed_transaction);
2599 list_splice_init(&sbi->s_active_transaction,
2600 &sbi->s_committed_transaction);
2601 spin_unlock(&sbi->s_md_lock);
2602 ext4_mb_free_committed_blocks(sb);
2603
2604 if (sbi->s_group_info) {
2605 for (i = 0; i < sbi->s_groups_count; i++) {
2606 grinfo = ext4_get_group_info(sb, i);
2607#ifdef DOUBLE_CHECK
2608 kfree(grinfo->bb_bitmap);
2609#endif
2610 ext4_lock_group(sb, i);
2611 ext4_mb_cleanup_pa(grinfo);
2612 ext4_unlock_group(sb, i);
2613 kfree(grinfo);
2614 }
2615 num_meta_group_infos = (sbi->s_groups_count +
2616 EXT4_DESC_PER_BLOCK(sb) - 1) >>
2617 EXT4_DESC_PER_BLOCK_BITS(sb);
2618 for (i = 0; i < num_meta_group_infos; i++)
2619 kfree(sbi->s_group_info[i]);
2620 kfree(sbi->s_group_info);
2621 }
2622 kfree(sbi->s_mb_offsets);
2623 kfree(sbi->s_mb_maxs);
2624 if (sbi->s_buddy_cache)
2625 iput(sbi->s_buddy_cache);
2626 if (sbi->s_mb_stats) {
2627 printk(KERN_INFO
2628 "EXT4-fs: mballoc: %u blocks %u reqs (%u success)\n",
2629 atomic_read(&sbi->s_bal_allocated),
2630 atomic_read(&sbi->s_bal_reqs),
2631 atomic_read(&sbi->s_bal_success));
2632 printk(KERN_INFO
2633 "EXT4-fs: mballoc: %u extents scanned, %u goal hits, "
2634 "%u 2^N hits, %u breaks, %u lost\n",
2635 atomic_read(&sbi->s_bal_ex_scanned),
2636 atomic_read(&sbi->s_bal_goals),
2637 atomic_read(&sbi->s_bal_2orders),
2638 atomic_read(&sbi->s_bal_breaks),
2639 atomic_read(&sbi->s_mb_lost_chunks));
2640 printk(KERN_INFO
2641 "EXT4-fs: mballoc: %lu generated and it took %Lu\n",
2642 sbi->s_mb_buddies_generated++,
2643 sbi->s_mb_generation_time);
2644 printk(KERN_INFO
2645 "EXT4-fs: mballoc: %u preallocated, %u discarded\n",
2646 atomic_read(&sbi->s_mb_preallocated),
2647 atomic_read(&sbi->s_mb_discarded));
2648 }
2649
2650 kfree(sbi->s_locality_groups);
2651
2652 ext4_mb_history_release(sb);
2653 ext4_mb_destroy_per_dev_proc(sb);
2654
2655 return 0;
2656}
2657
Eric Sandeen4ddfef72008-04-29 08:11:12 -04002658static noinline_for_stack void
2659ext4_mb_free_committed_blocks(struct super_block *sb)
Alex Tomasc9de5602008-01-29 00:19:52 -05002660{
2661 struct ext4_sb_info *sbi = EXT4_SB(sb);
2662 int err;
2663 int i;
2664 int count = 0;
2665 int count2 = 0;
2666 struct ext4_free_metadata *md;
2667 struct ext4_buddy e4b;
2668
2669 if (list_empty(&sbi->s_committed_transaction))
2670 return;
2671
2672 /* there is committed blocks to be freed yet */
2673 do {
2674 /* get next array of blocks */
2675 md = NULL;
2676 spin_lock(&sbi->s_md_lock);
2677 if (!list_empty(&sbi->s_committed_transaction)) {
2678 md = list_entry(sbi->s_committed_transaction.next,
2679 struct ext4_free_metadata, list);
2680 list_del(&md->list);
2681 }
2682 spin_unlock(&sbi->s_md_lock);
2683
2684 if (md == NULL)
2685 break;
2686
2687 mb_debug("gonna free %u blocks in group %lu (0x%p):",
2688 md->num, md->group, md);
2689
2690 err = ext4_mb_load_buddy(sb, md->group, &e4b);
2691 /* we expect to find existing buddy because it's pinned */
2692 BUG_ON(err != 0);
2693
2694 /* there are blocks to put in buddy to make them really free */
2695 count += md->num;
2696 count2++;
2697 ext4_lock_group(sb, md->group);
2698 for (i = 0; i < md->num; i++) {
2699 mb_debug(" %u", md->blocks[i]);
Shen Feng7e5a8cd2008-07-13 21:03:31 -04002700 mb_free_blocks(NULL, &e4b, md->blocks[i], 1);
Alex Tomasc9de5602008-01-29 00:19:52 -05002701 }
2702 mb_debug("\n");
2703 ext4_unlock_group(sb, md->group);
2704
2705 /* balance refcounts from ext4_mb_free_metadata() */
2706 page_cache_release(e4b.bd_buddy_page);
2707 page_cache_release(e4b.bd_bitmap_page);
2708
2709 kfree(md);
2710 ext4_mb_release_desc(&e4b);
2711
2712 } while (md);
2713
2714 mb_debug("freed %u blocks in %u structures\n", count, count2);
2715}
2716
Alex Tomasc9de5602008-01-29 00:19:52 -05002717#define EXT4_MB_STATS_NAME "stats"
2718#define EXT4_MB_MAX_TO_SCAN_NAME "max_to_scan"
2719#define EXT4_MB_MIN_TO_SCAN_NAME "min_to_scan"
2720#define EXT4_MB_ORDER2_REQ "order2_req"
2721#define EXT4_MB_STREAM_REQ "stream_req"
2722#define EXT4_MB_GROUP_PREALLOC "group_prealloc"
2723
2724
2725
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002726#define MB_PROC_FOPS(name) \
2727static int ext4_mb_##name##_proc_show(struct seq_file *m, void *v) \
Alex Tomasc9de5602008-01-29 00:19:52 -05002728{ \
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002729 struct ext4_sb_info *sbi = m->private; \
2730 \
2731 seq_printf(m, "%ld\n", sbi->s_mb_##name); \
2732 return 0; \
2733} \
2734 \
2735static int ext4_mb_##name##_proc_open(struct inode *inode, struct file *file)\
Alex Tomasc9de5602008-01-29 00:19:52 -05002736{ \
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002737 return single_open(file, ext4_mb_##name##_proc_show, PDE(inode)->data);\
2738} \
2739 \
2740static ssize_t ext4_mb_##name##_proc_write(struct file *file, \
2741 const char __user *buf, size_t cnt, loff_t *ppos) \
2742{ \
2743 struct ext4_sb_info *sbi = PDE(file->f_path.dentry->d_inode)->data;\
Alex Tomasc9de5602008-01-29 00:19:52 -05002744 char str[32]; \
2745 long value; \
2746 if (cnt >= sizeof(str)) \
2747 return -EINVAL; \
2748 if (copy_from_user(str, buf, cnt)) \
2749 return -EFAULT; \
2750 value = simple_strtol(str, NULL, 0); \
2751 if (value <= 0) \
2752 return -ERANGE; \
2753 sbi->s_mb_##name = value; \
2754 return cnt; \
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002755} \
2756 \
2757static const struct file_operations ext4_mb_##name##_proc_fops = { \
2758 .owner = THIS_MODULE, \
2759 .open = ext4_mb_##name##_proc_open, \
2760 .read = seq_read, \
2761 .llseek = seq_lseek, \
2762 .release = single_release, \
2763 .write = ext4_mb_##name##_proc_write, \
2764};
Alex Tomasc9de5602008-01-29 00:19:52 -05002765
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002766MB_PROC_FOPS(stats);
2767MB_PROC_FOPS(max_to_scan);
2768MB_PROC_FOPS(min_to_scan);
2769MB_PROC_FOPS(order2_reqs);
2770MB_PROC_FOPS(stream_request);
2771MB_PROC_FOPS(group_prealloc);
Alex Tomasc9de5602008-01-29 00:19:52 -05002772
2773#define MB_PROC_HANDLER(name, var) \
2774do { \
Alexey Dobriyan91d99822008-07-11 19:27:31 -04002775 proc = proc_create_data(name, mode, sbi->s_mb_proc, \
2776 &ext4_mb_##var##_proc_fops, sbi); \
Alex Tomasc9de5602008-01-29 00:19:52 -05002777 if (proc == NULL) { \
2778 printk(KERN_ERR "EXT4-fs: can't to create %s\n", name); \
2779 goto err_out; \
2780 } \
Alex Tomasc9de5602008-01-29 00:19:52 -05002781} while (0)
2782
2783static int ext4_mb_init_per_dev_proc(struct super_block *sb)
2784{
2785 mode_t mode = S_IFREG | S_IRUGO | S_IWUSR;
2786 struct ext4_sb_info *sbi = EXT4_SB(sb);
2787 struct proc_dir_entry *proc;
2788 char devname[64];
2789
Shen Fengcfbe7e42008-07-13 21:03:31 -04002790 if (proc_root_ext4 == NULL) {
2791 sbi->s_mb_proc = NULL;
2792 return -EINVAL;
2793 }
Jean Delvaref36f21e2008-05-12 14:02:33 -07002794 bdevname(sb->s_bdev, devname);
Alex Tomasc9de5602008-01-29 00:19:52 -05002795 sbi->s_mb_proc = proc_mkdir(devname, proc_root_ext4);
2796
2797 MB_PROC_HANDLER(EXT4_MB_STATS_NAME, stats);
2798 MB_PROC_HANDLER(EXT4_MB_MAX_TO_SCAN_NAME, max_to_scan);
2799 MB_PROC_HANDLER(EXT4_MB_MIN_TO_SCAN_NAME, min_to_scan);
2800 MB_PROC_HANDLER(EXT4_MB_ORDER2_REQ, order2_reqs);
2801 MB_PROC_HANDLER(EXT4_MB_STREAM_REQ, stream_request);
2802 MB_PROC_HANDLER(EXT4_MB_GROUP_PREALLOC, group_prealloc);
2803
2804 return 0;
2805
2806err_out:
2807 printk(KERN_ERR "EXT4-fs: Unable to create %s\n", devname);
2808 remove_proc_entry(EXT4_MB_GROUP_PREALLOC, sbi->s_mb_proc);
2809 remove_proc_entry(EXT4_MB_STREAM_REQ, sbi->s_mb_proc);
2810 remove_proc_entry(EXT4_MB_ORDER2_REQ, sbi->s_mb_proc);
2811 remove_proc_entry(EXT4_MB_MIN_TO_SCAN_NAME, sbi->s_mb_proc);
2812 remove_proc_entry(EXT4_MB_MAX_TO_SCAN_NAME, sbi->s_mb_proc);
2813 remove_proc_entry(EXT4_MB_STATS_NAME, sbi->s_mb_proc);
2814 remove_proc_entry(devname, proc_root_ext4);
2815 sbi->s_mb_proc = NULL;
2816
2817 return -ENOMEM;
2818}
2819
2820static int ext4_mb_destroy_per_dev_proc(struct super_block *sb)
2821{
2822 struct ext4_sb_info *sbi = EXT4_SB(sb);
2823 char devname[64];
2824
2825 if (sbi->s_mb_proc == NULL)
2826 return -EINVAL;
2827
Jean Delvaref36f21e2008-05-12 14:02:33 -07002828 bdevname(sb->s_bdev, devname);
Alex Tomasc9de5602008-01-29 00:19:52 -05002829 remove_proc_entry(EXT4_MB_GROUP_PREALLOC, sbi->s_mb_proc);
2830 remove_proc_entry(EXT4_MB_STREAM_REQ, sbi->s_mb_proc);
2831 remove_proc_entry(EXT4_MB_ORDER2_REQ, sbi->s_mb_proc);
2832 remove_proc_entry(EXT4_MB_MIN_TO_SCAN_NAME, sbi->s_mb_proc);
2833 remove_proc_entry(EXT4_MB_MAX_TO_SCAN_NAME, sbi->s_mb_proc);
2834 remove_proc_entry(EXT4_MB_STATS_NAME, sbi->s_mb_proc);
2835 remove_proc_entry(devname, proc_root_ext4);
2836
2837 return 0;
2838}
2839
2840int __init init_ext4_mballoc(void)
2841{
2842 ext4_pspace_cachep =
2843 kmem_cache_create("ext4_prealloc_space",
2844 sizeof(struct ext4_prealloc_space),
2845 0, SLAB_RECLAIM_ACCOUNT, NULL);
2846 if (ext4_pspace_cachep == NULL)
2847 return -ENOMEM;
2848
Eric Sandeen256bdb42008-02-10 01:13:33 -05002849 ext4_ac_cachep =
2850 kmem_cache_create("ext4_alloc_context",
2851 sizeof(struct ext4_allocation_context),
2852 0, SLAB_RECLAIM_ACCOUNT, NULL);
2853 if (ext4_ac_cachep == NULL) {
2854 kmem_cache_destroy(ext4_pspace_cachep);
2855 return -ENOMEM;
2856 }
Alex Tomasc9de5602008-01-29 00:19:52 -05002857#ifdef CONFIG_PROC_FS
Alexey Dobriyan36a5aeb2008-04-29 01:01:42 -07002858 proc_root_ext4 = proc_mkdir("fs/ext4", NULL);
Alex Tomasc9de5602008-01-29 00:19:52 -05002859 if (proc_root_ext4 == NULL)
Alexey Dobriyan36a5aeb2008-04-29 01:01:42 -07002860 printk(KERN_ERR "EXT4-fs: Unable to create fs/ext4\n");
Alex Tomasc9de5602008-01-29 00:19:52 -05002861#endif
Alex Tomasc9de5602008-01-29 00:19:52 -05002862 return 0;
2863}
2864
2865void exit_ext4_mballoc(void)
2866{
2867 /* XXX: synchronize_rcu(); */
2868 kmem_cache_destroy(ext4_pspace_cachep);
Eric Sandeen256bdb42008-02-10 01:13:33 -05002869 kmem_cache_destroy(ext4_ac_cachep);
Alex Tomasc9de5602008-01-29 00:19:52 -05002870#ifdef CONFIG_PROC_FS
Alexey Dobriyan36a5aeb2008-04-29 01:01:42 -07002871 remove_proc_entry("fs/ext4", NULL);
Alex Tomasc9de5602008-01-29 00:19:52 -05002872#endif
2873}
2874
2875
2876/*
2877 * Check quota and mark choosed space (ac->ac_b_ex) non-free in bitmaps
2878 * Returns 0 if success or error code
2879 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04002880static noinline_for_stack int
2881ext4_mb_mark_diskspace_used(struct ext4_allocation_context *ac,
Alex Tomasc9de5602008-01-29 00:19:52 -05002882 handle_t *handle)
2883{
2884 struct buffer_head *bitmap_bh = NULL;
2885 struct ext4_super_block *es;
2886 struct ext4_group_desc *gdp;
2887 struct buffer_head *gdp_bh;
2888 struct ext4_sb_info *sbi;
2889 struct super_block *sb;
2890 ext4_fsblk_t block;
Aneesh Kumar K.V519deca2008-05-15 14:43:20 -04002891 int err, len;
Alex Tomasc9de5602008-01-29 00:19:52 -05002892
2893 BUG_ON(ac->ac_status != AC_STATUS_FOUND);
2894 BUG_ON(ac->ac_b_ex.fe_len <= 0);
2895
2896 sb = ac->ac_sb;
2897 sbi = EXT4_SB(sb);
2898 es = sbi->s_es;
2899
Alex Tomasc9de5602008-01-29 00:19:52 -05002900
2901 err = -EIO;
Theodore Ts'o574ca172008-07-11 19:27:31 -04002902 bitmap_bh = ext4_read_block_bitmap(sb, ac->ac_b_ex.fe_group);
Alex Tomasc9de5602008-01-29 00:19:52 -05002903 if (!bitmap_bh)
2904 goto out_err;
2905
2906 err = ext4_journal_get_write_access(handle, bitmap_bh);
2907 if (err)
2908 goto out_err;
2909
2910 err = -EIO;
2911 gdp = ext4_get_group_desc(sb, ac->ac_b_ex.fe_group, &gdp_bh);
2912 if (!gdp)
2913 goto out_err;
2914
Aneesh Kumar K.V03cddb82008-06-05 20:59:29 -04002915 ext4_debug("using block group %lu(%d)\n", ac->ac_b_ex.fe_group,
2916 gdp->bg_free_blocks_count);
2917
Alex Tomasc9de5602008-01-29 00:19:52 -05002918 err = ext4_journal_get_write_access(handle, gdp_bh);
2919 if (err)
2920 goto out_err;
2921
2922 block = ac->ac_b_ex.fe_group * EXT4_BLOCKS_PER_GROUP(sb)
2923 + ac->ac_b_ex.fe_start
2924 + le32_to_cpu(es->s_first_data_block);
2925
Aneesh Kumar K.V519deca2008-05-15 14:43:20 -04002926 len = ac->ac_b_ex.fe_len;
2927 if (in_range(ext4_block_bitmap(sb, gdp), block, len) ||
2928 in_range(ext4_inode_bitmap(sb, gdp), block, len) ||
2929 in_range(block, ext4_inode_table(sb, gdp),
2930 EXT4_SB(sb)->s_itb_per_group) ||
2931 in_range(block + len - 1, ext4_inode_table(sb, gdp),
2932 EXT4_SB(sb)->s_itb_per_group)) {
Harvey Harrison46e665e2008-04-17 10:38:59 -04002933 ext4_error(sb, __func__,
Alex Tomasc9de5602008-01-29 00:19:52 -05002934 "Allocating block in system zone - block = %llu",
2935 block);
Aneesh Kumar K.V519deca2008-05-15 14:43:20 -04002936 /* File system mounted not to panic on error
2937 * Fix the bitmap and repeat the block allocation
2938 * We leak some of the blocks here.
2939 */
2940 mb_set_bits(sb_bgl_lock(sbi, ac->ac_b_ex.fe_group),
2941 bitmap_bh->b_data, ac->ac_b_ex.fe_start,
2942 ac->ac_b_ex.fe_len);
2943 err = ext4_journal_dirty_metadata(handle, bitmap_bh);
2944 if (!err)
2945 err = -EAGAIN;
2946 goto out_err;
Alex Tomasc9de5602008-01-29 00:19:52 -05002947 }
2948#ifdef AGGRESSIVE_CHECK
2949 {
2950 int i;
2951 for (i = 0; i < ac->ac_b_ex.fe_len; i++) {
2952 BUG_ON(mb_test_bit(ac->ac_b_ex.fe_start + i,
2953 bitmap_bh->b_data));
2954 }
2955 }
2956#endif
2957 mb_set_bits(sb_bgl_lock(sbi, ac->ac_b_ex.fe_group), bitmap_bh->b_data,
2958 ac->ac_b_ex.fe_start, ac->ac_b_ex.fe_len);
2959
2960 spin_lock(sb_bgl_lock(sbi, ac->ac_b_ex.fe_group));
2961 if (gdp->bg_flags & cpu_to_le16(EXT4_BG_BLOCK_UNINIT)) {
2962 gdp->bg_flags &= cpu_to_le16(~EXT4_BG_BLOCK_UNINIT);
2963 gdp->bg_free_blocks_count =
2964 cpu_to_le16(ext4_free_blocks_after_init(sb,
2965 ac->ac_b_ex.fe_group,
2966 gdp));
2967 }
Marcin Slusarze8546d02008-04-17 10:38:59 -04002968 le16_add_cpu(&gdp->bg_free_blocks_count, -ac->ac_b_ex.fe_len);
Alex Tomasc9de5602008-01-29 00:19:52 -05002969 gdp->bg_checksum = ext4_group_desc_csum(sbi, ac->ac_b_ex.fe_group, gdp);
2970 spin_unlock(sb_bgl_lock(sbi, ac->ac_b_ex.fe_group));
Mingming Caod2a17632008-07-14 17:52:37 -04002971
2972 /*
2973 * free blocks account has already be reduced/reserved
2974 * at write_begin() time for delayed allocation
2975 * do not double accounting
2976 */
2977 if (!(ac->ac_flags & EXT4_MB_DELALLOC_RESERVED))
2978 percpu_counter_sub(&sbi->s_freeblocks_counter,
2979 ac->ac_b_ex.fe_len);
Alex Tomasc9de5602008-01-29 00:19:52 -05002980
Jose R. Santos772cb7c2008-07-11 19:27:31 -04002981 if (sbi->s_log_groups_per_flex) {
2982 ext4_group_t flex_group = ext4_flex_group(sbi,
2983 ac->ac_b_ex.fe_group);
2984 spin_lock(sb_bgl_lock(sbi, flex_group));
2985 sbi->s_flex_groups[flex_group].free_blocks -= ac->ac_b_ex.fe_len;
2986 spin_unlock(sb_bgl_lock(sbi, flex_group));
2987 }
2988
Alex Tomasc9de5602008-01-29 00:19:52 -05002989 err = ext4_journal_dirty_metadata(handle, bitmap_bh);
2990 if (err)
2991 goto out_err;
2992 err = ext4_journal_dirty_metadata(handle, gdp_bh);
2993
2994out_err:
2995 sb->s_dirt = 1;
Aneesh Kumar K.V42a10ad2008-02-10 01:07:28 -05002996 brelse(bitmap_bh);
Alex Tomasc9de5602008-01-29 00:19:52 -05002997 return err;
2998}
2999
3000/*
3001 * here we normalize request for locality group
3002 * Group request are normalized to s_strip size if we set the same via mount
3003 * option. If not we set it to s_mb_group_prealloc which can be configured via
3004 * /proc/fs/ext4/<partition>/group_prealloc
3005 *
3006 * XXX: should we try to preallocate more than the group has now?
3007 */
3008static void ext4_mb_normalize_group_request(struct ext4_allocation_context *ac)
3009{
3010 struct super_block *sb = ac->ac_sb;
3011 struct ext4_locality_group *lg = ac->ac_lg;
3012
3013 BUG_ON(lg == NULL);
3014 if (EXT4_SB(sb)->s_stripe)
3015 ac->ac_g_ex.fe_len = EXT4_SB(sb)->s_stripe;
3016 else
3017 ac->ac_g_ex.fe_len = EXT4_SB(sb)->s_mb_group_prealloc;
Solofo Ramangalahy60bd63d2008-04-29 21:59:59 -04003018 mb_debug("#%u: goal %u blocks for locality group\n",
Alex Tomasc9de5602008-01-29 00:19:52 -05003019 current->pid, ac->ac_g_ex.fe_len);
3020}
3021
3022/*
3023 * Normalization means making request better in terms of
3024 * size and alignment
3025 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003026static noinline_for_stack void
3027ext4_mb_normalize_request(struct ext4_allocation_context *ac,
Alex Tomasc9de5602008-01-29 00:19:52 -05003028 struct ext4_allocation_request *ar)
3029{
3030 int bsbits, max;
3031 ext4_lblk_t end;
Alex Tomasc9de5602008-01-29 00:19:52 -05003032 loff_t size, orig_size, start_off;
3033 ext4_lblk_t start, orig_start;
3034 struct ext4_inode_info *ei = EXT4_I(ac->ac_inode);
Aneesh Kumar K.V9a0762c2008-04-17 10:38:59 -04003035 struct ext4_prealloc_space *pa;
Alex Tomasc9de5602008-01-29 00:19:52 -05003036
3037 /* do normalize only data requests, metadata requests
3038 do not need preallocation */
3039 if (!(ac->ac_flags & EXT4_MB_HINT_DATA))
3040 return;
3041
3042 /* sometime caller may want exact blocks */
3043 if (unlikely(ac->ac_flags & EXT4_MB_HINT_GOAL_ONLY))
3044 return;
3045
3046 /* caller may indicate that preallocation isn't
3047 * required (it's a tail, for example) */
3048 if (ac->ac_flags & EXT4_MB_HINT_NOPREALLOC)
3049 return;
3050
3051 if (ac->ac_flags & EXT4_MB_HINT_GROUP_ALLOC) {
3052 ext4_mb_normalize_group_request(ac);
3053 return ;
3054 }
3055
3056 bsbits = ac->ac_sb->s_blocksize_bits;
3057
3058 /* first, let's learn actual file size
3059 * given current request is allocated */
3060 size = ac->ac_o_ex.fe_logical + ac->ac_o_ex.fe_len;
3061 size = size << bsbits;
3062 if (size < i_size_read(ac->ac_inode))
3063 size = i_size_read(ac->ac_inode);
3064
Valerie Clement19304792008-05-13 19:31:14 -04003065 /* max size of free chunks */
3066 max = 2 << bsbits;
Alex Tomasc9de5602008-01-29 00:19:52 -05003067
Valerie Clement19304792008-05-13 19:31:14 -04003068#define NRL_CHECK_SIZE(req, size, max, chunk_size) \
3069 (req <= (size) || max <= (chunk_size))
Alex Tomasc9de5602008-01-29 00:19:52 -05003070
3071 /* first, try to predict filesize */
3072 /* XXX: should this table be tunable? */
3073 start_off = 0;
3074 if (size <= 16 * 1024) {
3075 size = 16 * 1024;
3076 } else if (size <= 32 * 1024) {
3077 size = 32 * 1024;
3078 } else if (size <= 64 * 1024) {
3079 size = 64 * 1024;
3080 } else if (size <= 128 * 1024) {
3081 size = 128 * 1024;
3082 } else if (size <= 256 * 1024) {
3083 size = 256 * 1024;
3084 } else if (size <= 512 * 1024) {
3085 size = 512 * 1024;
3086 } else if (size <= 1024 * 1024) {
3087 size = 1024 * 1024;
Valerie Clement19304792008-05-13 19:31:14 -04003088 } else if (NRL_CHECK_SIZE(size, 4 * 1024 * 1024, max, 2 * 1024)) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003089 start_off = ((loff_t)ac->ac_o_ex.fe_logical >>
Valerie Clement19304792008-05-13 19:31:14 -04003090 (21 - bsbits)) << 21;
3091 size = 2 * 1024 * 1024;
3092 } else if (NRL_CHECK_SIZE(size, 8 * 1024 * 1024, max, 4 * 1024)) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003093 start_off = ((loff_t)ac->ac_o_ex.fe_logical >>
3094 (22 - bsbits)) << 22;
3095 size = 4 * 1024 * 1024;
3096 } else if (NRL_CHECK_SIZE(ac->ac_o_ex.fe_len,
Valerie Clement19304792008-05-13 19:31:14 -04003097 (8<<20)>>bsbits, max, 8 * 1024)) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003098 start_off = ((loff_t)ac->ac_o_ex.fe_logical >>
3099 (23 - bsbits)) << 23;
3100 size = 8 * 1024 * 1024;
3101 } else {
3102 start_off = (loff_t)ac->ac_o_ex.fe_logical << bsbits;
3103 size = ac->ac_o_ex.fe_len << bsbits;
3104 }
3105 orig_size = size = size >> bsbits;
3106 orig_start = start = start_off >> bsbits;
3107
3108 /* don't cover already allocated blocks in selected range */
3109 if (ar->pleft && start <= ar->lleft) {
3110 size -= ar->lleft + 1 - start;
3111 start = ar->lleft + 1;
3112 }
3113 if (ar->pright && start + size - 1 >= ar->lright)
3114 size -= start + size - ar->lright;
3115
3116 end = start + size;
3117
3118 /* check we don't cross already preallocated blocks */
3119 rcu_read_lock();
Aneesh Kumar K.V9a0762c2008-04-17 10:38:59 -04003120 list_for_each_entry_rcu(pa, &ei->i_prealloc_list, pa_inode_list) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003121 unsigned long pa_end;
3122
Alex Tomasc9de5602008-01-29 00:19:52 -05003123 if (pa->pa_deleted)
3124 continue;
3125 spin_lock(&pa->pa_lock);
3126 if (pa->pa_deleted) {
3127 spin_unlock(&pa->pa_lock);
3128 continue;
3129 }
3130
3131 pa_end = pa->pa_lstart + pa->pa_len;
3132
3133 /* PA must not overlap original request */
3134 BUG_ON(!(ac->ac_o_ex.fe_logical >= pa_end ||
3135 ac->ac_o_ex.fe_logical < pa->pa_lstart));
3136
3137 /* skip PA normalized request doesn't overlap with */
3138 if (pa->pa_lstart >= end) {
3139 spin_unlock(&pa->pa_lock);
3140 continue;
3141 }
3142 if (pa_end <= start) {
3143 spin_unlock(&pa->pa_lock);
3144 continue;
3145 }
3146 BUG_ON(pa->pa_lstart <= start && pa_end >= end);
3147
3148 if (pa_end <= ac->ac_o_ex.fe_logical) {
3149 BUG_ON(pa_end < start);
3150 start = pa_end;
3151 }
3152
3153 if (pa->pa_lstart > ac->ac_o_ex.fe_logical) {
3154 BUG_ON(pa->pa_lstart > end);
3155 end = pa->pa_lstart;
3156 }
3157 spin_unlock(&pa->pa_lock);
3158 }
3159 rcu_read_unlock();
3160 size = end - start;
3161
3162 /* XXX: extra loop to check we really don't overlap preallocations */
3163 rcu_read_lock();
Aneesh Kumar K.V9a0762c2008-04-17 10:38:59 -04003164 list_for_each_entry_rcu(pa, &ei->i_prealloc_list, pa_inode_list) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003165 unsigned long pa_end;
Alex Tomasc9de5602008-01-29 00:19:52 -05003166 spin_lock(&pa->pa_lock);
3167 if (pa->pa_deleted == 0) {
3168 pa_end = pa->pa_lstart + pa->pa_len;
3169 BUG_ON(!(start >= pa_end || end <= pa->pa_lstart));
3170 }
3171 spin_unlock(&pa->pa_lock);
3172 }
3173 rcu_read_unlock();
3174
3175 if (start + size <= ac->ac_o_ex.fe_logical &&
3176 start > ac->ac_o_ex.fe_logical) {
3177 printk(KERN_ERR "start %lu, size %lu, fe_logical %lu\n",
3178 (unsigned long) start, (unsigned long) size,
3179 (unsigned long) ac->ac_o_ex.fe_logical);
3180 }
3181 BUG_ON(start + size <= ac->ac_o_ex.fe_logical &&
3182 start > ac->ac_o_ex.fe_logical);
3183 BUG_ON(size <= 0 || size >= EXT4_BLOCKS_PER_GROUP(ac->ac_sb));
3184
3185 /* now prepare goal request */
3186
3187 /* XXX: is it better to align blocks WRT to logical
3188 * placement or satisfy big request as is */
3189 ac->ac_g_ex.fe_logical = start;
3190 ac->ac_g_ex.fe_len = size;
3191
3192 /* define goal start in order to merge */
3193 if (ar->pright && (ar->lright == (start + size))) {
3194 /* merge to the right */
3195 ext4_get_group_no_and_offset(ac->ac_sb, ar->pright - size,
3196 &ac->ac_f_ex.fe_group,
3197 &ac->ac_f_ex.fe_start);
3198 ac->ac_flags |= EXT4_MB_HINT_TRY_GOAL;
3199 }
3200 if (ar->pleft && (ar->lleft + 1 == start)) {
3201 /* merge to the left */
3202 ext4_get_group_no_and_offset(ac->ac_sb, ar->pleft + 1,
3203 &ac->ac_f_ex.fe_group,
3204 &ac->ac_f_ex.fe_start);
3205 ac->ac_flags |= EXT4_MB_HINT_TRY_GOAL;
3206 }
3207
3208 mb_debug("goal: %u(was %u) blocks at %u\n", (unsigned) size,
3209 (unsigned) orig_size, (unsigned) start);
3210}
3211
3212static void ext4_mb_collect_stats(struct ext4_allocation_context *ac)
3213{
3214 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
3215
3216 if (sbi->s_mb_stats && ac->ac_g_ex.fe_len > 1) {
3217 atomic_inc(&sbi->s_bal_reqs);
3218 atomic_add(ac->ac_b_ex.fe_len, &sbi->s_bal_allocated);
3219 if (ac->ac_o_ex.fe_len >= ac->ac_g_ex.fe_len)
3220 atomic_inc(&sbi->s_bal_success);
3221 atomic_add(ac->ac_found, &sbi->s_bal_ex_scanned);
3222 if (ac->ac_g_ex.fe_start == ac->ac_b_ex.fe_start &&
3223 ac->ac_g_ex.fe_group == ac->ac_b_ex.fe_group)
3224 atomic_inc(&sbi->s_bal_goals);
3225 if (ac->ac_found > sbi->s_mb_max_to_scan)
3226 atomic_inc(&sbi->s_bal_breaks);
3227 }
3228
3229 ext4_mb_store_history(ac);
3230}
3231
3232/*
3233 * use blocks preallocated to inode
3234 */
3235static void ext4_mb_use_inode_pa(struct ext4_allocation_context *ac,
3236 struct ext4_prealloc_space *pa)
3237{
3238 ext4_fsblk_t start;
3239 ext4_fsblk_t end;
3240 int len;
3241
3242 /* found preallocated blocks, use them */
3243 start = pa->pa_pstart + (ac->ac_o_ex.fe_logical - pa->pa_lstart);
3244 end = min(pa->pa_pstart + pa->pa_len, start + ac->ac_o_ex.fe_len);
3245 len = end - start;
3246 ext4_get_group_no_and_offset(ac->ac_sb, start, &ac->ac_b_ex.fe_group,
3247 &ac->ac_b_ex.fe_start);
3248 ac->ac_b_ex.fe_len = len;
3249 ac->ac_status = AC_STATUS_FOUND;
3250 ac->ac_pa = pa;
3251
3252 BUG_ON(start < pa->pa_pstart);
3253 BUG_ON(start + len > pa->pa_pstart + pa->pa_len);
3254 BUG_ON(pa->pa_free < len);
3255 pa->pa_free -= len;
3256
Solofo Ramangalahy60bd63d2008-04-29 21:59:59 -04003257 mb_debug("use %llu/%u from inode pa %p\n", start, len, pa);
Alex Tomasc9de5602008-01-29 00:19:52 -05003258}
3259
3260/*
3261 * use blocks preallocated to locality group
3262 */
3263static void ext4_mb_use_group_pa(struct ext4_allocation_context *ac,
3264 struct ext4_prealloc_space *pa)
3265{
Aneesh Kumar K.V03cddb82008-06-05 20:59:29 -04003266 unsigned int len = ac->ac_o_ex.fe_len;
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003267
Alex Tomasc9de5602008-01-29 00:19:52 -05003268 ext4_get_group_no_and_offset(ac->ac_sb, pa->pa_pstart,
3269 &ac->ac_b_ex.fe_group,
3270 &ac->ac_b_ex.fe_start);
3271 ac->ac_b_ex.fe_len = len;
3272 ac->ac_status = AC_STATUS_FOUND;
3273 ac->ac_pa = pa;
3274
3275 /* we don't correct pa_pstart or pa_plen here to avoid
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05003276 * possible race when the group is being loaded concurrently
Alex Tomasc9de5602008-01-29 00:19:52 -05003277 * instead we correct pa later, after blocks are marked
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05003278 * in on-disk bitmap -- see ext4_mb_release_context()
3279 * Other CPUs are prevented from allocating from this pa by lg_mutex
Alex Tomasc9de5602008-01-29 00:19:52 -05003280 */
3281 mb_debug("use %u/%u from group pa %p\n", pa->pa_lstart-len, len, pa);
3282}
3283
3284/*
3285 * search goal blocks in preallocated space
3286 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003287static noinline_for_stack int
3288ext4_mb_use_preallocated(struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05003289{
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003290 int order, i;
Alex Tomasc9de5602008-01-29 00:19:52 -05003291 struct ext4_inode_info *ei = EXT4_I(ac->ac_inode);
3292 struct ext4_locality_group *lg;
3293 struct ext4_prealloc_space *pa;
Alex Tomasc9de5602008-01-29 00:19:52 -05003294
3295 /* only data can be preallocated */
3296 if (!(ac->ac_flags & EXT4_MB_HINT_DATA))
3297 return 0;
3298
3299 /* first, try per-file preallocation */
3300 rcu_read_lock();
Aneesh Kumar K.V9a0762c2008-04-17 10:38:59 -04003301 list_for_each_entry_rcu(pa, &ei->i_prealloc_list, pa_inode_list) {
Alex Tomasc9de5602008-01-29 00:19:52 -05003302
3303 /* all fields in this condition don't change,
3304 * so we can skip locking for them */
3305 if (ac->ac_o_ex.fe_logical < pa->pa_lstart ||
3306 ac->ac_o_ex.fe_logical >= pa->pa_lstart + pa->pa_len)
3307 continue;
3308
3309 /* found preallocated blocks, use them */
3310 spin_lock(&pa->pa_lock);
3311 if (pa->pa_deleted == 0 && pa->pa_free) {
3312 atomic_inc(&pa->pa_count);
3313 ext4_mb_use_inode_pa(ac, pa);
3314 spin_unlock(&pa->pa_lock);
3315 ac->ac_criteria = 10;
3316 rcu_read_unlock();
3317 return 1;
3318 }
3319 spin_unlock(&pa->pa_lock);
3320 }
3321 rcu_read_unlock();
3322
3323 /* can we use group allocation? */
3324 if (!(ac->ac_flags & EXT4_MB_HINT_GROUP_ALLOC))
3325 return 0;
3326
3327 /* inode may have no locality group for some reason */
3328 lg = ac->ac_lg;
3329 if (lg == NULL)
3330 return 0;
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003331 order = fls(ac->ac_o_ex.fe_len) - 1;
3332 if (order > PREALLOC_TB_SIZE - 1)
3333 /* The max size of hash table is PREALLOC_TB_SIZE */
3334 order = PREALLOC_TB_SIZE - 1;
Alex Tomasc9de5602008-01-29 00:19:52 -05003335
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003336 for (i = order; i < PREALLOC_TB_SIZE; i++) {
3337 rcu_read_lock();
3338 list_for_each_entry_rcu(pa, &lg->lg_prealloc_list[i],
3339 pa_inode_list) {
3340 spin_lock(&pa->pa_lock);
3341 if (pa->pa_deleted == 0 &&
3342 pa->pa_free >= ac->ac_o_ex.fe_len) {
3343 atomic_inc(&pa->pa_count);
3344 ext4_mb_use_group_pa(ac, pa);
3345 spin_unlock(&pa->pa_lock);
3346 ac->ac_criteria = 20;
3347 rcu_read_unlock();
3348 return 1;
3349 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003350 spin_unlock(&pa->pa_lock);
Alex Tomasc9de5602008-01-29 00:19:52 -05003351 }
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003352 rcu_read_unlock();
Alex Tomasc9de5602008-01-29 00:19:52 -05003353 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003354 return 0;
3355}
3356
3357/*
3358 * the function goes through all preallocation in this group and marks them
3359 * used in in-core bitmap. buddy must be generated from this bitmap
3360 * Need to be called with ext4 group lock (ext4_lock_group)
3361 */
3362static void ext4_mb_generate_from_pa(struct super_block *sb, void *bitmap,
3363 ext4_group_t group)
3364{
3365 struct ext4_group_info *grp = ext4_get_group_info(sb, group);
3366 struct ext4_prealloc_space *pa;
3367 struct list_head *cur;
3368 ext4_group_t groupnr;
3369 ext4_grpblk_t start;
3370 int preallocated = 0;
3371 int count = 0;
3372 int len;
3373
3374 /* all form of preallocation discards first load group,
3375 * so the only competing code is preallocation use.
3376 * we don't need any locking here
3377 * notice we do NOT ignore preallocations with pa_deleted
3378 * otherwise we could leave used blocks available for
3379 * allocation in buddy when concurrent ext4_mb_put_pa()
3380 * is dropping preallocation
3381 */
3382 list_for_each(cur, &grp->bb_prealloc_list) {
3383 pa = list_entry(cur, struct ext4_prealloc_space, pa_group_list);
3384 spin_lock(&pa->pa_lock);
3385 ext4_get_group_no_and_offset(sb, pa->pa_pstart,
3386 &groupnr, &start);
3387 len = pa->pa_len;
3388 spin_unlock(&pa->pa_lock);
3389 if (unlikely(len == 0))
3390 continue;
3391 BUG_ON(groupnr != group);
3392 mb_set_bits(sb_bgl_lock(EXT4_SB(sb), group),
3393 bitmap, start, len);
3394 preallocated += len;
3395 count++;
3396 }
3397 mb_debug("prellocated %u for group %lu\n", preallocated, group);
3398}
3399
3400static void ext4_mb_pa_callback(struct rcu_head *head)
3401{
3402 struct ext4_prealloc_space *pa;
3403 pa = container_of(head, struct ext4_prealloc_space, u.pa_rcu);
3404 kmem_cache_free(ext4_pspace_cachep, pa);
3405}
3406
3407/*
3408 * drops a reference to preallocated space descriptor
3409 * if this was the last reference and the space is consumed
3410 */
3411static void ext4_mb_put_pa(struct ext4_allocation_context *ac,
3412 struct super_block *sb, struct ext4_prealloc_space *pa)
3413{
3414 unsigned long grp;
3415
3416 if (!atomic_dec_and_test(&pa->pa_count) || pa->pa_free != 0)
3417 return;
3418
3419 /* in this short window concurrent discard can set pa_deleted */
3420 spin_lock(&pa->pa_lock);
3421 if (pa->pa_deleted == 1) {
3422 spin_unlock(&pa->pa_lock);
3423 return;
3424 }
3425
3426 pa->pa_deleted = 1;
3427 spin_unlock(&pa->pa_lock);
3428
3429 /* -1 is to protect from crossing allocation group */
3430 ext4_get_group_no_and_offset(sb, pa->pa_pstart - 1, &grp, NULL);
3431
3432 /*
3433 * possible race:
3434 *
3435 * P1 (buddy init) P2 (regular allocation)
3436 * find block B in PA
3437 * copy on-disk bitmap to buddy
3438 * mark B in on-disk bitmap
3439 * drop PA from group
3440 * mark all PAs in buddy
3441 *
3442 * thus, P1 initializes buddy with B available. to prevent this
3443 * we make "copy" and "mark all PAs" atomic and serialize "drop PA"
3444 * against that pair
3445 */
3446 ext4_lock_group(sb, grp);
3447 list_del(&pa->pa_group_list);
3448 ext4_unlock_group(sb, grp);
3449
3450 spin_lock(pa->pa_obj_lock);
3451 list_del_rcu(&pa->pa_inode_list);
3452 spin_unlock(pa->pa_obj_lock);
3453
3454 call_rcu(&(pa)->u.pa_rcu, ext4_mb_pa_callback);
3455}
3456
3457/*
3458 * creates new preallocated space for given inode
3459 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003460static noinline_for_stack int
3461ext4_mb_new_inode_pa(struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05003462{
3463 struct super_block *sb = ac->ac_sb;
3464 struct ext4_prealloc_space *pa;
3465 struct ext4_group_info *grp;
3466 struct ext4_inode_info *ei;
3467
3468 /* preallocate only when found space is larger then requested */
3469 BUG_ON(ac->ac_o_ex.fe_len >= ac->ac_b_ex.fe_len);
3470 BUG_ON(ac->ac_status != AC_STATUS_FOUND);
3471 BUG_ON(!S_ISREG(ac->ac_inode->i_mode));
3472
3473 pa = kmem_cache_alloc(ext4_pspace_cachep, GFP_NOFS);
3474 if (pa == NULL)
3475 return -ENOMEM;
3476
3477 if (ac->ac_b_ex.fe_len < ac->ac_g_ex.fe_len) {
3478 int winl;
3479 int wins;
3480 int win;
3481 int offs;
3482
3483 /* we can't allocate as much as normalizer wants.
3484 * so, found space must get proper lstart
3485 * to cover original request */
3486 BUG_ON(ac->ac_g_ex.fe_logical > ac->ac_o_ex.fe_logical);
3487 BUG_ON(ac->ac_g_ex.fe_len < ac->ac_o_ex.fe_len);
3488
3489 /* we're limited by original request in that
3490 * logical block must be covered any way
3491 * winl is window we can move our chunk within */
3492 winl = ac->ac_o_ex.fe_logical - ac->ac_g_ex.fe_logical;
3493
3494 /* also, we should cover whole original request */
3495 wins = ac->ac_b_ex.fe_len - ac->ac_o_ex.fe_len;
3496
3497 /* the smallest one defines real window */
3498 win = min(winl, wins);
3499
3500 offs = ac->ac_o_ex.fe_logical % ac->ac_b_ex.fe_len;
3501 if (offs && offs < win)
3502 win = offs;
3503
3504 ac->ac_b_ex.fe_logical = ac->ac_o_ex.fe_logical - win;
3505 BUG_ON(ac->ac_o_ex.fe_logical < ac->ac_b_ex.fe_logical);
3506 BUG_ON(ac->ac_o_ex.fe_len > ac->ac_b_ex.fe_len);
3507 }
3508
3509 /* preallocation can change ac_b_ex, thus we store actually
3510 * allocated blocks for history */
3511 ac->ac_f_ex = ac->ac_b_ex;
3512
3513 pa->pa_lstart = ac->ac_b_ex.fe_logical;
3514 pa->pa_pstart = ext4_grp_offs_to_block(sb, &ac->ac_b_ex);
3515 pa->pa_len = ac->ac_b_ex.fe_len;
3516 pa->pa_free = pa->pa_len;
3517 atomic_set(&pa->pa_count, 1);
3518 spin_lock_init(&pa->pa_lock);
3519 pa->pa_deleted = 0;
3520 pa->pa_linear = 0;
3521
3522 mb_debug("new inode pa %p: %llu/%u for %u\n", pa,
3523 pa->pa_pstart, pa->pa_len, pa->pa_lstart);
3524
3525 ext4_mb_use_inode_pa(ac, pa);
3526 atomic_add(pa->pa_free, &EXT4_SB(sb)->s_mb_preallocated);
3527
3528 ei = EXT4_I(ac->ac_inode);
3529 grp = ext4_get_group_info(sb, ac->ac_b_ex.fe_group);
3530
3531 pa->pa_obj_lock = &ei->i_prealloc_lock;
3532 pa->pa_inode = ac->ac_inode;
3533
3534 ext4_lock_group(sb, ac->ac_b_ex.fe_group);
3535 list_add(&pa->pa_group_list, &grp->bb_prealloc_list);
3536 ext4_unlock_group(sb, ac->ac_b_ex.fe_group);
3537
3538 spin_lock(pa->pa_obj_lock);
3539 list_add_rcu(&pa->pa_inode_list, &ei->i_prealloc_list);
3540 spin_unlock(pa->pa_obj_lock);
3541
3542 return 0;
3543}
3544
3545/*
3546 * creates new preallocated space for locality group inodes belongs to
3547 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003548static noinline_for_stack int
3549ext4_mb_new_group_pa(struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05003550{
3551 struct super_block *sb = ac->ac_sb;
3552 struct ext4_locality_group *lg;
3553 struct ext4_prealloc_space *pa;
3554 struct ext4_group_info *grp;
3555
3556 /* preallocate only when found space is larger then requested */
3557 BUG_ON(ac->ac_o_ex.fe_len >= ac->ac_b_ex.fe_len);
3558 BUG_ON(ac->ac_status != AC_STATUS_FOUND);
3559 BUG_ON(!S_ISREG(ac->ac_inode->i_mode));
3560
3561 BUG_ON(ext4_pspace_cachep == NULL);
3562 pa = kmem_cache_alloc(ext4_pspace_cachep, GFP_NOFS);
3563 if (pa == NULL)
3564 return -ENOMEM;
3565
3566 /* preallocation can change ac_b_ex, thus we store actually
3567 * allocated blocks for history */
3568 ac->ac_f_ex = ac->ac_b_ex;
3569
3570 pa->pa_pstart = ext4_grp_offs_to_block(sb, &ac->ac_b_ex);
3571 pa->pa_lstart = pa->pa_pstart;
3572 pa->pa_len = ac->ac_b_ex.fe_len;
3573 pa->pa_free = pa->pa_len;
3574 atomic_set(&pa->pa_count, 1);
3575 spin_lock_init(&pa->pa_lock);
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003576 INIT_LIST_HEAD(&pa->pa_inode_list);
Alex Tomasc9de5602008-01-29 00:19:52 -05003577 pa->pa_deleted = 0;
3578 pa->pa_linear = 1;
3579
3580 mb_debug("new group pa %p: %llu/%u for %u\n", pa,
3581 pa->pa_pstart, pa->pa_len, pa->pa_lstart);
3582
3583 ext4_mb_use_group_pa(ac, pa);
3584 atomic_add(pa->pa_free, &EXT4_SB(sb)->s_mb_preallocated);
3585
3586 grp = ext4_get_group_info(sb, ac->ac_b_ex.fe_group);
3587 lg = ac->ac_lg;
3588 BUG_ON(lg == NULL);
3589
3590 pa->pa_obj_lock = &lg->lg_prealloc_lock;
3591 pa->pa_inode = NULL;
3592
3593 ext4_lock_group(sb, ac->ac_b_ex.fe_group);
3594 list_add(&pa->pa_group_list, &grp->bb_prealloc_list);
3595 ext4_unlock_group(sb, ac->ac_b_ex.fe_group);
3596
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04003597 /*
3598 * We will later add the new pa to the right bucket
3599 * after updating the pa_free in ext4_mb_release_context
3600 */
Alex Tomasc9de5602008-01-29 00:19:52 -05003601 return 0;
3602}
3603
3604static int ext4_mb_new_preallocation(struct ext4_allocation_context *ac)
3605{
3606 int err;
3607
3608 if (ac->ac_flags & EXT4_MB_HINT_GROUP_ALLOC)
3609 err = ext4_mb_new_group_pa(ac);
3610 else
3611 err = ext4_mb_new_inode_pa(ac);
3612 return err;
3613}
3614
3615/*
3616 * finds all unused blocks in on-disk bitmap, frees them in
3617 * in-core bitmap and buddy.
3618 * @pa must be unlinked from inode and group lists, so that
3619 * nobody else can find/use it.
3620 * the caller MUST hold group/inode locks.
3621 * TODO: optimize the case when there are no in-core structures yet
3622 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003623static noinline_for_stack int
3624ext4_mb_release_inode_pa(struct ext4_buddy *e4b, struct buffer_head *bitmap_bh,
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003625 struct ext4_prealloc_space *pa,
3626 struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05003627{
Alex Tomasc9de5602008-01-29 00:19:52 -05003628 struct super_block *sb = e4b->bd_sb;
3629 struct ext4_sb_info *sbi = EXT4_SB(sb);
3630 unsigned long end;
3631 unsigned long next;
3632 ext4_group_t group;
3633 ext4_grpblk_t bit;
3634 sector_t start;
3635 int err = 0;
3636 int free = 0;
3637
3638 BUG_ON(pa->pa_deleted == 0);
3639 ext4_get_group_no_and_offset(sb, pa->pa_pstart, &group, &bit);
3640 BUG_ON(group != e4b->bd_group && pa->pa_len != 0);
3641 end = bit + pa->pa_len;
3642
Eric Sandeen256bdb42008-02-10 01:13:33 -05003643 if (ac) {
3644 ac->ac_sb = sb;
3645 ac->ac_inode = pa->pa_inode;
3646 ac->ac_op = EXT4_MB_HISTORY_DISCARD;
3647 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003648
3649 while (bit < end) {
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -05003650 bit = mb_find_next_zero_bit(bitmap_bh->b_data, end, bit);
Alex Tomasc9de5602008-01-29 00:19:52 -05003651 if (bit >= end)
3652 break;
Aneesh Kumar K.Vffad0a42008-02-23 01:38:34 -05003653 next = mb_find_next_bit(bitmap_bh->b_data, end, bit);
Alex Tomasc9de5602008-01-29 00:19:52 -05003654 start = group * EXT4_BLOCKS_PER_GROUP(sb) + bit +
3655 le32_to_cpu(sbi->s_es->s_first_data_block);
3656 mb_debug(" free preallocated %u/%u in group %u\n",
3657 (unsigned) start, (unsigned) next - bit,
3658 (unsigned) group);
3659 free += next - bit;
3660
Eric Sandeen256bdb42008-02-10 01:13:33 -05003661 if (ac) {
3662 ac->ac_b_ex.fe_group = group;
3663 ac->ac_b_ex.fe_start = bit;
3664 ac->ac_b_ex.fe_len = next - bit;
3665 ac->ac_b_ex.fe_logical = 0;
3666 ext4_mb_store_history(ac);
3667 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003668
3669 mb_free_blocks(pa->pa_inode, e4b, bit, next - bit);
3670 bit = next + 1;
3671 }
3672 if (free != pa->pa_free) {
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05003673 printk(KERN_CRIT "pa %p: logic %lu, phys. %lu, len %lu\n",
Alex Tomasc9de5602008-01-29 00:19:52 -05003674 pa, (unsigned long) pa->pa_lstart,
3675 (unsigned long) pa->pa_pstart,
3676 (unsigned long) pa->pa_len);
Harvey Harrison46e665e2008-04-17 10:38:59 -04003677 ext4_error(sb, __func__, "free %u, pa_free %u\n",
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05003678 free, pa->pa_free);
Aneesh Kumar K.Ve56eb652008-02-15 13:48:21 -05003679 /*
3680 * pa is already deleted so we use the value obtained
3681 * from the bitmap and continue.
3682 */
Alex Tomasc9de5602008-01-29 00:19:52 -05003683 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003684 atomic_add(free, &sbi->s_mb_discarded);
3685
3686 return err;
3687}
3688
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003689static noinline_for_stack int
3690ext4_mb_release_group_pa(struct ext4_buddy *e4b,
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003691 struct ext4_prealloc_space *pa,
3692 struct ext4_allocation_context *ac)
Alex Tomasc9de5602008-01-29 00:19:52 -05003693{
Alex Tomasc9de5602008-01-29 00:19:52 -05003694 struct super_block *sb = e4b->bd_sb;
3695 ext4_group_t group;
3696 ext4_grpblk_t bit;
3697
Eric Sandeen256bdb42008-02-10 01:13:33 -05003698 if (ac)
3699 ac->ac_op = EXT4_MB_HISTORY_DISCARD;
Alex Tomasc9de5602008-01-29 00:19:52 -05003700
3701 BUG_ON(pa->pa_deleted == 0);
3702 ext4_get_group_no_and_offset(sb, pa->pa_pstart, &group, &bit);
3703 BUG_ON(group != e4b->bd_group && pa->pa_len != 0);
3704 mb_free_blocks(pa->pa_inode, e4b, bit, pa->pa_len);
3705 atomic_add(pa->pa_len, &EXT4_SB(sb)->s_mb_discarded);
3706
Eric Sandeen256bdb42008-02-10 01:13:33 -05003707 if (ac) {
3708 ac->ac_sb = sb;
3709 ac->ac_inode = NULL;
3710 ac->ac_b_ex.fe_group = group;
3711 ac->ac_b_ex.fe_start = bit;
3712 ac->ac_b_ex.fe_len = pa->pa_len;
3713 ac->ac_b_ex.fe_logical = 0;
3714 ext4_mb_store_history(ac);
Eric Sandeen256bdb42008-02-10 01:13:33 -05003715 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003716
3717 return 0;
3718}
3719
3720/*
3721 * releases all preallocations in given group
3722 *
3723 * first, we need to decide discard policy:
3724 * - when do we discard
3725 * 1) ENOSPC
3726 * - how many do we discard
3727 * 1) how many requested
3728 */
Eric Sandeen4ddfef72008-04-29 08:11:12 -04003729static noinline_for_stack int
3730ext4_mb_discard_group_preallocations(struct super_block *sb,
Alex Tomasc9de5602008-01-29 00:19:52 -05003731 ext4_group_t group, int needed)
3732{
3733 struct ext4_group_info *grp = ext4_get_group_info(sb, group);
3734 struct buffer_head *bitmap_bh = NULL;
3735 struct ext4_prealloc_space *pa, *tmp;
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003736 struct ext4_allocation_context *ac;
Alex Tomasc9de5602008-01-29 00:19:52 -05003737 struct list_head list;
3738 struct ext4_buddy e4b;
3739 int err;
3740 int busy = 0;
3741 int free = 0;
3742
3743 mb_debug("discard preallocation for group %lu\n", group);
3744
3745 if (list_empty(&grp->bb_prealloc_list))
3746 return 0;
3747
Theodore Ts'o574ca172008-07-11 19:27:31 -04003748 bitmap_bh = ext4_read_block_bitmap(sb, group);
Alex Tomasc9de5602008-01-29 00:19:52 -05003749 if (bitmap_bh == NULL) {
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04003750 ext4_error(sb, __func__, "Error in reading block "
3751 "bitmap for %lu\n", group);
3752 return 0;
Alex Tomasc9de5602008-01-29 00:19:52 -05003753 }
3754
3755 err = ext4_mb_load_buddy(sb, group, &e4b);
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04003756 if (err) {
3757 ext4_error(sb, __func__, "Error in loading buddy "
3758 "information for %lu\n", group);
3759 put_bh(bitmap_bh);
3760 return 0;
3761 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003762
3763 if (needed == 0)
3764 needed = EXT4_BLOCKS_PER_GROUP(sb) + 1;
3765
Alex Tomasc9de5602008-01-29 00:19:52 -05003766 INIT_LIST_HEAD(&list);
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003767 ac = kmem_cache_alloc(ext4_ac_cachep, GFP_NOFS);
Alex Tomasc9de5602008-01-29 00:19:52 -05003768repeat:
3769 ext4_lock_group(sb, group);
3770 list_for_each_entry_safe(pa, tmp,
3771 &grp->bb_prealloc_list, pa_group_list) {
3772 spin_lock(&pa->pa_lock);
3773 if (atomic_read(&pa->pa_count)) {
3774 spin_unlock(&pa->pa_lock);
3775 busy = 1;
3776 continue;
3777 }
3778 if (pa->pa_deleted) {
3779 spin_unlock(&pa->pa_lock);
3780 continue;
3781 }
3782
3783 /* seems this one can be freed ... */
3784 pa->pa_deleted = 1;
3785
3786 /* we can trust pa_free ... */
3787 free += pa->pa_free;
3788
3789 spin_unlock(&pa->pa_lock);
3790
3791 list_del(&pa->pa_group_list);
3792 list_add(&pa->u.pa_tmp_list, &list);
3793 }
3794
3795 /* if we still need more blocks and some PAs were used, try again */
3796 if (free < needed && busy) {
3797 busy = 0;
3798 ext4_unlock_group(sb, group);
3799 /*
3800 * Yield the CPU here so that we don't get soft lockup
3801 * in non preempt case.
3802 */
3803 yield();
3804 goto repeat;
3805 }
3806
3807 /* found anything to free? */
3808 if (list_empty(&list)) {
3809 BUG_ON(free != 0);
3810 goto out;
3811 }
3812
3813 /* now free all selected PAs */
3814 list_for_each_entry_safe(pa, tmp, &list, u.pa_tmp_list) {
3815
3816 /* remove from object (inode or locality group) */
3817 spin_lock(pa->pa_obj_lock);
3818 list_del_rcu(&pa->pa_inode_list);
3819 spin_unlock(pa->pa_obj_lock);
3820
3821 if (pa->pa_linear)
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003822 ext4_mb_release_group_pa(&e4b, pa, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05003823 else
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003824 ext4_mb_release_inode_pa(&e4b, bitmap_bh, pa, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05003825
3826 list_del(&pa->u.pa_tmp_list);
3827 call_rcu(&(pa)->u.pa_rcu, ext4_mb_pa_callback);
3828 }
3829
3830out:
3831 ext4_unlock_group(sb, group);
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003832 if (ac)
3833 kmem_cache_free(ext4_ac_cachep, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05003834 ext4_mb_release_desc(&e4b);
3835 put_bh(bitmap_bh);
3836 return free;
3837}
3838
3839/*
3840 * releases all non-used preallocated blocks for given inode
3841 *
3842 * It's important to discard preallocations under i_data_sem
3843 * We don't want another block to be served from the prealloc
3844 * space when we are discarding the inode prealloc space.
3845 *
3846 * FIXME!! Make sure it is valid at all the call sites
3847 */
3848void ext4_mb_discard_inode_preallocations(struct inode *inode)
3849{
3850 struct ext4_inode_info *ei = EXT4_I(inode);
3851 struct super_block *sb = inode->i_sb;
3852 struct buffer_head *bitmap_bh = NULL;
3853 struct ext4_prealloc_space *pa, *tmp;
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003854 struct ext4_allocation_context *ac;
Alex Tomasc9de5602008-01-29 00:19:52 -05003855 ext4_group_t group = 0;
3856 struct list_head list;
3857 struct ext4_buddy e4b;
3858 int err;
3859
3860 if (!test_opt(sb, MBALLOC) || !S_ISREG(inode->i_mode)) {
3861 /*BUG_ON(!list_empty(&ei->i_prealloc_list));*/
3862 return;
3863 }
3864
3865 mb_debug("discard preallocation for inode %lu\n", inode->i_ino);
3866
3867 INIT_LIST_HEAD(&list);
3868
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003869 ac = kmem_cache_alloc(ext4_ac_cachep, GFP_NOFS);
Alex Tomasc9de5602008-01-29 00:19:52 -05003870repeat:
3871 /* first, collect all pa's in the inode */
3872 spin_lock(&ei->i_prealloc_lock);
3873 while (!list_empty(&ei->i_prealloc_list)) {
3874 pa = list_entry(ei->i_prealloc_list.next,
3875 struct ext4_prealloc_space, pa_inode_list);
3876 BUG_ON(pa->pa_obj_lock != &ei->i_prealloc_lock);
3877 spin_lock(&pa->pa_lock);
3878 if (atomic_read(&pa->pa_count)) {
3879 /* this shouldn't happen often - nobody should
3880 * use preallocation while we're discarding it */
3881 spin_unlock(&pa->pa_lock);
3882 spin_unlock(&ei->i_prealloc_lock);
3883 printk(KERN_ERR "uh-oh! used pa while discarding\n");
3884 WARN_ON(1);
3885 schedule_timeout_uninterruptible(HZ);
3886 goto repeat;
3887
3888 }
3889 if (pa->pa_deleted == 0) {
3890 pa->pa_deleted = 1;
3891 spin_unlock(&pa->pa_lock);
3892 list_del_rcu(&pa->pa_inode_list);
3893 list_add(&pa->u.pa_tmp_list, &list);
3894 continue;
3895 }
3896
3897 /* someone is deleting pa right now */
3898 spin_unlock(&pa->pa_lock);
3899 spin_unlock(&ei->i_prealloc_lock);
3900
3901 /* we have to wait here because pa_deleted
3902 * doesn't mean pa is already unlinked from
3903 * the list. as we might be called from
3904 * ->clear_inode() the inode will get freed
3905 * and concurrent thread which is unlinking
3906 * pa from inode's list may access already
3907 * freed memory, bad-bad-bad */
3908
3909 /* XXX: if this happens too often, we can
3910 * add a flag to force wait only in case
3911 * of ->clear_inode(), but not in case of
3912 * regular truncate */
3913 schedule_timeout_uninterruptible(HZ);
3914 goto repeat;
3915 }
3916 spin_unlock(&ei->i_prealloc_lock);
3917
3918 list_for_each_entry_safe(pa, tmp, &list, u.pa_tmp_list) {
3919 BUG_ON(pa->pa_linear != 0);
3920 ext4_get_group_no_and_offset(sb, pa->pa_pstart, &group, NULL);
3921
3922 err = ext4_mb_load_buddy(sb, group, &e4b);
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04003923 if (err) {
3924 ext4_error(sb, __func__, "Error in loading buddy "
3925 "information for %lu\n", group);
3926 continue;
3927 }
Alex Tomasc9de5602008-01-29 00:19:52 -05003928
Theodore Ts'o574ca172008-07-11 19:27:31 -04003929 bitmap_bh = ext4_read_block_bitmap(sb, group);
Alex Tomasc9de5602008-01-29 00:19:52 -05003930 if (bitmap_bh == NULL) {
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04003931 ext4_error(sb, __func__, "Error in reading block "
3932 "bitmap for %lu\n", group);
Alex Tomasc9de5602008-01-29 00:19:52 -05003933 ext4_mb_release_desc(&e4b);
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04003934 continue;
Alex Tomasc9de5602008-01-29 00:19:52 -05003935 }
3936
3937 ext4_lock_group(sb, group);
3938 list_del(&pa->pa_group_list);
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003939 ext4_mb_release_inode_pa(&e4b, bitmap_bh, pa, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05003940 ext4_unlock_group(sb, group);
3941
3942 ext4_mb_release_desc(&e4b);
3943 put_bh(bitmap_bh);
3944
3945 list_del(&pa->u.pa_tmp_list);
3946 call_rcu(&(pa)->u.pa_rcu, ext4_mb_pa_callback);
3947 }
Aneesh Kumar K.Vc83617d2008-04-29 22:00:47 -04003948 if (ac)
3949 kmem_cache_free(ext4_ac_cachep, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05003950}
3951
3952/*
3953 * finds all preallocated spaces and return blocks being freed to them
3954 * if preallocated space becomes full (no block is used from the space)
3955 * then the function frees space in buddy
3956 * XXX: at the moment, truncate (which is the only way to free blocks)
3957 * discards all preallocations
3958 */
3959static void ext4_mb_return_to_preallocation(struct inode *inode,
3960 struct ext4_buddy *e4b,
3961 sector_t block, int count)
3962{
3963 BUG_ON(!list_empty(&EXT4_I(inode)->i_prealloc_list));
3964}
3965#ifdef MB_DEBUG
3966static void ext4_mb_show_ac(struct ext4_allocation_context *ac)
3967{
3968 struct super_block *sb = ac->ac_sb;
3969 ext4_group_t i;
3970
3971 printk(KERN_ERR "EXT4-fs: Can't allocate:"
3972 " Allocation context details:\n");
3973 printk(KERN_ERR "EXT4-fs: status %d flags %d\n",
3974 ac->ac_status, ac->ac_flags);
3975 printk(KERN_ERR "EXT4-fs: orig %lu/%lu/%lu@%lu, goal %lu/%lu/%lu@%lu, "
3976 "best %lu/%lu/%lu@%lu cr %d\n",
3977 (unsigned long)ac->ac_o_ex.fe_group,
3978 (unsigned long)ac->ac_o_ex.fe_start,
3979 (unsigned long)ac->ac_o_ex.fe_len,
3980 (unsigned long)ac->ac_o_ex.fe_logical,
3981 (unsigned long)ac->ac_g_ex.fe_group,
3982 (unsigned long)ac->ac_g_ex.fe_start,
3983 (unsigned long)ac->ac_g_ex.fe_len,
3984 (unsigned long)ac->ac_g_ex.fe_logical,
3985 (unsigned long)ac->ac_b_ex.fe_group,
3986 (unsigned long)ac->ac_b_ex.fe_start,
3987 (unsigned long)ac->ac_b_ex.fe_len,
3988 (unsigned long)ac->ac_b_ex.fe_logical,
3989 (int)ac->ac_criteria);
3990 printk(KERN_ERR "EXT4-fs: %lu scanned, %d found\n", ac->ac_ex_scanned,
3991 ac->ac_found);
3992 printk(KERN_ERR "EXT4-fs: groups: \n");
3993 for (i = 0; i < EXT4_SB(sb)->s_groups_count; i++) {
3994 struct ext4_group_info *grp = ext4_get_group_info(sb, i);
3995 struct ext4_prealloc_space *pa;
3996 ext4_grpblk_t start;
3997 struct list_head *cur;
3998 ext4_lock_group(sb, i);
3999 list_for_each(cur, &grp->bb_prealloc_list) {
4000 pa = list_entry(cur, struct ext4_prealloc_space,
4001 pa_group_list);
4002 spin_lock(&pa->pa_lock);
4003 ext4_get_group_no_and_offset(sb, pa->pa_pstart,
4004 NULL, &start);
4005 spin_unlock(&pa->pa_lock);
4006 printk(KERN_ERR "PA:%lu:%d:%u \n", i,
4007 start, pa->pa_len);
4008 }
Solofo Ramangalahy60bd63d2008-04-29 21:59:59 -04004009 ext4_unlock_group(sb, i);
Alex Tomasc9de5602008-01-29 00:19:52 -05004010
4011 if (grp->bb_free == 0)
4012 continue;
4013 printk(KERN_ERR "%lu: %d/%d \n",
4014 i, grp->bb_free, grp->bb_fragments);
4015 }
4016 printk(KERN_ERR "\n");
4017}
4018#else
4019static inline void ext4_mb_show_ac(struct ext4_allocation_context *ac)
4020{
4021 return;
4022}
4023#endif
4024
4025/*
4026 * We use locality group preallocation for small size file. The size of the
4027 * file is determined by the current size or the resulting size after
4028 * allocation which ever is larger
4029 *
4030 * One can tune this size via /proc/fs/ext4/<partition>/stream_req
4031 */
4032static void ext4_mb_group_or_file(struct ext4_allocation_context *ac)
4033{
4034 struct ext4_sb_info *sbi = EXT4_SB(ac->ac_sb);
4035 int bsbits = ac->ac_sb->s_blocksize_bits;
4036 loff_t size, isize;
4037
4038 if (!(ac->ac_flags & EXT4_MB_HINT_DATA))
4039 return;
4040
4041 size = ac->ac_o_ex.fe_logical + ac->ac_o_ex.fe_len;
4042 isize = i_size_read(ac->ac_inode) >> bsbits;
4043 size = max(size, isize);
4044
4045 /* don't use group allocation for large files */
4046 if (size >= sbi->s_mb_stream_request)
4047 return;
4048
4049 if (unlikely(ac->ac_flags & EXT4_MB_HINT_GOAL_ONLY))
4050 return;
4051
4052 BUG_ON(ac->ac_lg != NULL);
4053 /*
4054 * locality group prealloc space are per cpu. The reason for having
4055 * per cpu locality group is to reduce the contention between block
4056 * request from multiple CPUs.
4057 */
4058 ac->ac_lg = &sbi->s_locality_groups[get_cpu()];
4059 put_cpu();
4060
4061 /* we're going to use group allocation */
4062 ac->ac_flags |= EXT4_MB_HINT_GROUP_ALLOC;
4063
4064 /* serialize all allocations in the group */
4065 mutex_lock(&ac->ac_lg->lg_mutex);
4066}
4067
Eric Sandeen4ddfef72008-04-29 08:11:12 -04004068static noinline_for_stack int
4069ext4_mb_initialize_context(struct ext4_allocation_context *ac,
Alex Tomasc9de5602008-01-29 00:19:52 -05004070 struct ext4_allocation_request *ar)
4071{
4072 struct super_block *sb = ar->inode->i_sb;
4073 struct ext4_sb_info *sbi = EXT4_SB(sb);
4074 struct ext4_super_block *es = sbi->s_es;
4075 ext4_group_t group;
4076 unsigned long len;
4077 unsigned long goal;
4078 ext4_grpblk_t block;
4079
4080 /* we can't allocate > group size */
4081 len = ar->len;
4082
4083 /* just a dirty hack to filter too big requests */
4084 if (len >= EXT4_BLOCKS_PER_GROUP(sb) - 10)
4085 len = EXT4_BLOCKS_PER_GROUP(sb) - 10;
4086
4087 /* start searching from the goal */
4088 goal = ar->goal;
4089 if (goal < le32_to_cpu(es->s_first_data_block) ||
4090 goal >= ext4_blocks_count(es))
4091 goal = le32_to_cpu(es->s_first_data_block);
4092 ext4_get_group_no_and_offset(sb, goal, &group, &block);
4093
4094 /* set up allocation goals */
4095 ac->ac_b_ex.fe_logical = ar->logical;
4096 ac->ac_b_ex.fe_group = 0;
4097 ac->ac_b_ex.fe_start = 0;
4098 ac->ac_b_ex.fe_len = 0;
4099 ac->ac_status = AC_STATUS_CONTINUE;
4100 ac->ac_groups_scanned = 0;
4101 ac->ac_ex_scanned = 0;
4102 ac->ac_found = 0;
4103 ac->ac_sb = sb;
4104 ac->ac_inode = ar->inode;
4105 ac->ac_o_ex.fe_logical = ar->logical;
4106 ac->ac_o_ex.fe_group = group;
4107 ac->ac_o_ex.fe_start = block;
4108 ac->ac_o_ex.fe_len = len;
4109 ac->ac_g_ex.fe_logical = ar->logical;
4110 ac->ac_g_ex.fe_group = group;
4111 ac->ac_g_ex.fe_start = block;
4112 ac->ac_g_ex.fe_len = len;
4113 ac->ac_f_ex.fe_len = 0;
4114 ac->ac_flags = ar->flags;
4115 ac->ac_2order = 0;
4116 ac->ac_criteria = 0;
4117 ac->ac_pa = NULL;
4118 ac->ac_bitmap_page = NULL;
4119 ac->ac_buddy_page = NULL;
4120 ac->ac_lg = NULL;
4121
4122 /* we have to define context: we'll we work with a file or
4123 * locality group. this is a policy, actually */
4124 ext4_mb_group_or_file(ac);
4125
4126 mb_debug("init ac: %u blocks @ %u, goal %u, flags %x, 2^%d, "
4127 "left: %u/%u, right %u/%u to %swritable\n",
4128 (unsigned) ar->len, (unsigned) ar->logical,
4129 (unsigned) ar->goal, ac->ac_flags, ac->ac_2order,
4130 (unsigned) ar->lleft, (unsigned) ar->pleft,
4131 (unsigned) ar->lright, (unsigned) ar->pright,
4132 atomic_read(&ar->inode->i_writecount) ? "" : "non-");
4133 return 0;
4134
4135}
4136
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04004137static noinline_for_stack void
4138ext4_mb_discard_lg_preallocations(struct super_block *sb,
4139 struct ext4_locality_group *lg,
4140 int order, int total_entries)
4141{
4142 ext4_group_t group = 0;
4143 struct ext4_buddy e4b;
4144 struct list_head discard_list;
4145 struct ext4_prealloc_space *pa, *tmp;
4146 struct ext4_allocation_context *ac;
4147
4148 mb_debug("discard locality group preallocation\n");
4149
4150 INIT_LIST_HEAD(&discard_list);
4151 ac = kmem_cache_alloc(ext4_ac_cachep, GFP_NOFS);
4152
4153 spin_lock(&lg->lg_prealloc_lock);
4154 list_for_each_entry_rcu(pa, &lg->lg_prealloc_list[order],
4155 pa_inode_list) {
4156 spin_lock(&pa->pa_lock);
4157 if (atomic_read(&pa->pa_count)) {
4158 /*
4159 * This is the pa that we just used
4160 * for block allocation. So don't
4161 * free that
4162 */
4163 spin_unlock(&pa->pa_lock);
4164 continue;
4165 }
4166 if (pa->pa_deleted) {
4167 spin_unlock(&pa->pa_lock);
4168 continue;
4169 }
4170 /* only lg prealloc space */
4171 BUG_ON(!pa->pa_linear);
4172
4173 /* seems this one can be freed ... */
4174 pa->pa_deleted = 1;
4175 spin_unlock(&pa->pa_lock);
4176
4177 list_del_rcu(&pa->pa_inode_list);
4178 list_add(&pa->u.pa_tmp_list, &discard_list);
4179
4180 total_entries--;
4181 if (total_entries <= 5) {
4182 /*
4183 * we want to keep only 5 entries
4184 * allowing it to grow to 8. This
4185 * mak sure we don't call discard
4186 * soon for this list.
4187 */
4188 break;
4189 }
4190 }
4191 spin_unlock(&lg->lg_prealloc_lock);
4192
4193 list_for_each_entry_safe(pa, tmp, &discard_list, u.pa_tmp_list) {
4194
4195 ext4_get_group_no_and_offset(sb, pa->pa_pstart, &group, NULL);
4196 if (ext4_mb_load_buddy(sb, group, &e4b)) {
4197 ext4_error(sb, __func__, "Error in loading buddy "
4198 "information for %lu\n", group);
4199 continue;
4200 }
4201 ext4_lock_group(sb, group);
4202 list_del(&pa->pa_group_list);
4203 ext4_mb_release_group_pa(&e4b, pa, ac);
4204 ext4_unlock_group(sb, group);
4205
4206 ext4_mb_release_desc(&e4b);
4207 list_del(&pa->u.pa_tmp_list);
4208 call_rcu(&(pa)->u.pa_rcu, ext4_mb_pa_callback);
4209 }
4210 if (ac)
4211 kmem_cache_free(ext4_ac_cachep, ac);
4212}
4213
4214/*
4215 * We have incremented pa_count. So it cannot be freed at this
4216 * point. Also we hold lg_mutex. So no parallel allocation is
4217 * possible from this lg. That means pa_free cannot be updated.
4218 *
4219 * A parallel ext4_mb_discard_group_preallocations is possible.
4220 * which can cause the lg_prealloc_list to be updated.
4221 */
4222
4223static void ext4_mb_add_n_trim(struct ext4_allocation_context *ac)
4224{
4225 int order, added = 0, lg_prealloc_count = 1;
4226 struct super_block *sb = ac->ac_sb;
4227 struct ext4_locality_group *lg = ac->ac_lg;
4228 struct ext4_prealloc_space *tmp_pa, *pa = ac->ac_pa;
4229
4230 order = fls(pa->pa_free) - 1;
4231 if (order > PREALLOC_TB_SIZE - 1)
4232 /* The max size of hash table is PREALLOC_TB_SIZE */
4233 order = PREALLOC_TB_SIZE - 1;
4234 /* Add the prealloc space to lg */
4235 rcu_read_lock();
4236 list_for_each_entry_rcu(tmp_pa, &lg->lg_prealloc_list[order],
4237 pa_inode_list) {
4238 spin_lock(&tmp_pa->pa_lock);
4239 if (tmp_pa->pa_deleted) {
4240 spin_unlock(&pa->pa_lock);
4241 continue;
4242 }
4243 if (!added && pa->pa_free < tmp_pa->pa_free) {
4244 /* Add to the tail of the previous entry */
4245 list_add_tail_rcu(&pa->pa_inode_list,
4246 &tmp_pa->pa_inode_list);
4247 added = 1;
4248 /*
4249 * we want to count the total
4250 * number of entries in the list
4251 */
4252 }
4253 spin_unlock(&tmp_pa->pa_lock);
4254 lg_prealloc_count++;
4255 }
4256 if (!added)
4257 list_add_tail_rcu(&pa->pa_inode_list,
4258 &lg->lg_prealloc_list[order]);
4259 rcu_read_unlock();
4260
4261 /* Now trim the list to be not more than 8 elements */
4262 if (lg_prealloc_count > 8) {
4263 ext4_mb_discard_lg_preallocations(sb, lg,
4264 order, lg_prealloc_count);
4265 return;
4266 }
4267 return ;
4268}
4269
Alex Tomasc9de5602008-01-29 00:19:52 -05004270/*
4271 * release all resource we used in allocation
4272 */
4273static int ext4_mb_release_context(struct ext4_allocation_context *ac)
4274{
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04004275 struct ext4_prealloc_space *pa = ac->ac_pa;
4276 if (pa) {
4277 if (pa->pa_linear) {
Alex Tomasc9de5602008-01-29 00:19:52 -05004278 /* see comment in ext4_mb_use_group_pa() */
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04004279 spin_lock(&pa->pa_lock);
4280 pa->pa_pstart += ac->ac_b_ex.fe_len;
4281 pa->pa_lstart += ac->ac_b_ex.fe_len;
4282 pa->pa_free -= ac->ac_b_ex.fe_len;
4283 pa->pa_len -= ac->ac_b_ex.fe_len;
4284 spin_unlock(&pa->pa_lock);
4285 /*
4286 * We want to add the pa to the right bucket.
4287 * Remove it from the list and while adding
4288 * make sure the list to which we are adding
4289 * doesn't grow big.
4290 */
4291 if (likely(pa->pa_free)) {
4292 spin_lock(pa->pa_obj_lock);
4293 list_del_rcu(&pa->pa_inode_list);
4294 spin_unlock(pa->pa_obj_lock);
4295 ext4_mb_add_n_trim(ac);
4296 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004297 }
Aneesh Kumar K.V6be2ded2008-07-23 14:14:05 -04004298 ext4_mb_put_pa(ac, ac->ac_sb, pa);
Alex Tomasc9de5602008-01-29 00:19:52 -05004299 }
4300 if (ac->ac_bitmap_page)
4301 page_cache_release(ac->ac_bitmap_page);
4302 if (ac->ac_buddy_page)
4303 page_cache_release(ac->ac_buddy_page);
4304 if (ac->ac_flags & EXT4_MB_HINT_GROUP_ALLOC)
4305 mutex_unlock(&ac->ac_lg->lg_mutex);
4306 ext4_mb_collect_stats(ac);
4307 return 0;
4308}
4309
4310static int ext4_mb_discard_preallocations(struct super_block *sb, int needed)
4311{
4312 ext4_group_t i;
4313 int ret;
4314 int freed = 0;
4315
4316 for (i = 0; i < EXT4_SB(sb)->s_groups_count && needed > 0; i++) {
4317 ret = ext4_mb_discard_group_preallocations(sb, i, needed);
4318 freed += ret;
4319 needed -= ret;
4320 }
4321
4322 return freed;
4323}
4324
4325/*
4326 * Main entry point into mballoc to allocate blocks
4327 * it tries to use preallocation first, then falls back
4328 * to usual allocation
4329 */
4330ext4_fsblk_t ext4_mb_new_blocks(handle_t *handle,
4331 struct ext4_allocation_request *ar, int *errp)
4332{
Eric Sandeen256bdb42008-02-10 01:13:33 -05004333 struct ext4_allocation_context *ac = NULL;
Alex Tomasc9de5602008-01-29 00:19:52 -05004334 struct ext4_sb_info *sbi;
4335 struct super_block *sb;
4336 ext4_fsblk_t block = 0;
4337 int freed;
4338 int inquota;
4339
4340 sb = ar->inode->i_sb;
4341 sbi = EXT4_SB(sb);
4342
4343 if (!test_opt(sb, MBALLOC)) {
Aneesh Kumar K.V654b4902008-07-11 19:27:31 -04004344 block = ext4_old_new_blocks(handle, ar->inode, ar->goal,
Alex Tomasc9de5602008-01-29 00:19:52 -05004345 &(ar->len), errp);
4346 return block;
4347 }
Mingming Caod2a17632008-07-14 17:52:37 -04004348 if (!EXT4_I(ar->inode)->i_delalloc_reserved_flag) {
4349 /*
4350 * With delalloc we already reserved the blocks
4351 */
4352 ar->len = ext4_has_free_blocks(sbi, ar->len);
4353 }
Mingming Cao07031432008-07-11 19:27:31 -04004354
4355 if (ar->len == 0) {
4356 *errp = -ENOSPC;
4357 return 0;
4358 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004359
4360 while (ar->len && DQUOT_ALLOC_BLOCK(ar->inode, ar->len)) {
4361 ar->flags |= EXT4_MB_HINT_NOPREALLOC;
4362 ar->len--;
4363 }
4364 if (ar->len == 0) {
4365 *errp = -EDQUOT;
4366 return 0;
4367 }
4368 inquota = ar->len;
4369
Mingming Caod2a17632008-07-14 17:52:37 -04004370 if (EXT4_I(ar->inode)->i_delalloc_reserved_flag)
4371 ar->flags |= EXT4_MB_DELALLOC_RESERVED;
4372
Eric Sandeen256bdb42008-02-10 01:13:33 -05004373 ac = kmem_cache_alloc(ext4_ac_cachep, GFP_NOFS);
4374 if (!ac) {
Shen Feng363d4252008-07-11 19:27:31 -04004375 ar->len = 0;
Eric Sandeen256bdb42008-02-10 01:13:33 -05004376 *errp = -ENOMEM;
Shen Feng363d4252008-07-11 19:27:31 -04004377 goto out1;
Eric Sandeen256bdb42008-02-10 01:13:33 -05004378 }
4379
Alex Tomasc9de5602008-01-29 00:19:52 -05004380 ext4_mb_poll_new_transaction(sb, handle);
4381
Eric Sandeen256bdb42008-02-10 01:13:33 -05004382 *errp = ext4_mb_initialize_context(ac, ar);
Alex Tomasc9de5602008-01-29 00:19:52 -05004383 if (*errp) {
4384 ar->len = 0;
Shen Feng363d4252008-07-11 19:27:31 -04004385 goto out2;
Alex Tomasc9de5602008-01-29 00:19:52 -05004386 }
4387
Eric Sandeen256bdb42008-02-10 01:13:33 -05004388 ac->ac_op = EXT4_MB_HISTORY_PREALLOC;
4389 if (!ext4_mb_use_preallocated(ac)) {
Eric Sandeen256bdb42008-02-10 01:13:33 -05004390 ac->ac_op = EXT4_MB_HISTORY_ALLOC;
4391 ext4_mb_normalize_request(ac, ar);
Alex Tomasc9de5602008-01-29 00:19:52 -05004392repeat:
4393 /* allocate space in core */
Eric Sandeen256bdb42008-02-10 01:13:33 -05004394 ext4_mb_regular_allocator(ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05004395
4396 /* as we've just preallocated more space than
4397 * user requested orinally, we store allocated
4398 * space in a special descriptor */
Eric Sandeen256bdb42008-02-10 01:13:33 -05004399 if (ac->ac_status == AC_STATUS_FOUND &&
4400 ac->ac_o_ex.fe_len < ac->ac_b_ex.fe_len)
4401 ext4_mb_new_preallocation(ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05004402 }
4403
Eric Sandeen256bdb42008-02-10 01:13:33 -05004404 if (likely(ac->ac_status == AC_STATUS_FOUND)) {
Aneesh Kumar K.V519deca2008-05-15 14:43:20 -04004405 *errp = ext4_mb_mark_diskspace_used(ac, handle);
4406 if (*errp == -EAGAIN) {
4407 ac->ac_b_ex.fe_group = 0;
4408 ac->ac_b_ex.fe_start = 0;
4409 ac->ac_b_ex.fe_len = 0;
4410 ac->ac_status = AC_STATUS_CONTINUE;
4411 goto repeat;
4412 } else if (*errp) {
4413 ac->ac_b_ex.fe_len = 0;
4414 ar->len = 0;
4415 ext4_mb_show_ac(ac);
4416 } else {
4417 block = ext4_grp_offs_to_block(sb, &ac->ac_b_ex);
4418 ar->len = ac->ac_b_ex.fe_len;
4419 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004420 } else {
Eric Sandeen256bdb42008-02-10 01:13:33 -05004421 freed = ext4_mb_discard_preallocations(sb, ac->ac_o_ex.fe_len);
Alex Tomasc9de5602008-01-29 00:19:52 -05004422 if (freed)
4423 goto repeat;
4424 *errp = -ENOSPC;
Eric Sandeen256bdb42008-02-10 01:13:33 -05004425 ac->ac_b_ex.fe_len = 0;
Alex Tomasc9de5602008-01-29 00:19:52 -05004426 ar->len = 0;
Eric Sandeen256bdb42008-02-10 01:13:33 -05004427 ext4_mb_show_ac(ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05004428 }
4429
Eric Sandeen256bdb42008-02-10 01:13:33 -05004430 ext4_mb_release_context(ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05004431
Shen Feng363d4252008-07-11 19:27:31 -04004432out2:
4433 kmem_cache_free(ext4_ac_cachep, ac);
4434out1:
Alex Tomasc9de5602008-01-29 00:19:52 -05004435 if (ar->len < inquota)
4436 DQUOT_FREE_BLOCK(ar->inode, inquota - ar->len);
4437
4438 return block;
4439}
4440static void ext4_mb_poll_new_transaction(struct super_block *sb,
4441 handle_t *handle)
4442{
4443 struct ext4_sb_info *sbi = EXT4_SB(sb);
4444
4445 if (sbi->s_last_transaction == handle->h_transaction->t_tid)
4446 return;
4447
4448 /* new transaction! time to close last one and free blocks for
4449 * committed transaction. we know that only transaction can be
4450 * active, so previos transaction can be being logged and we
4451 * know that transaction before previous is known to be already
4452 * logged. this means that now we may free blocks freed in all
4453 * transactions before previous one. hope I'm clear enough ... */
4454
4455 spin_lock(&sbi->s_md_lock);
4456 if (sbi->s_last_transaction != handle->h_transaction->t_tid) {
4457 mb_debug("new transaction %lu, old %lu\n",
4458 (unsigned long) handle->h_transaction->t_tid,
4459 (unsigned long) sbi->s_last_transaction);
4460 list_splice_init(&sbi->s_closed_transaction,
4461 &sbi->s_committed_transaction);
4462 list_splice_init(&sbi->s_active_transaction,
4463 &sbi->s_closed_transaction);
4464 sbi->s_last_transaction = handle->h_transaction->t_tid;
4465 }
4466 spin_unlock(&sbi->s_md_lock);
4467
4468 ext4_mb_free_committed_blocks(sb);
4469}
4470
Eric Sandeen4ddfef72008-04-29 08:11:12 -04004471static noinline_for_stack int
4472ext4_mb_free_metadata(handle_t *handle, struct ext4_buddy *e4b,
Alex Tomasc9de5602008-01-29 00:19:52 -05004473 ext4_group_t group, ext4_grpblk_t block, int count)
4474{
4475 struct ext4_group_info *db = e4b->bd_info;
4476 struct super_block *sb = e4b->bd_sb;
4477 struct ext4_sb_info *sbi = EXT4_SB(sb);
4478 struct ext4_free_metadata *md;
4479 int i;
4480
4481 BUG_ON(e4b->bd_bitmap_page == NULL);
4482 BUG_ON(e4b->bd_buddy_page == NULL);
4483
4484 ext4_lock_group(sb, group);
4485 for (i = 0; i < count; i++) {
4486 md = db->bb_md_cur;
4487 if (md && db->bb_tid != handle->h_transaction->t_tid) {
4488 db->bb_md_cur = NULL;
4489 md = NULL;
4490 }
4491
4492 if (md == NULL) {
4493 ext4_unlock_group(sb, group);
4494 md = kmalloc(sizeof(*md), GFP_NOFS);
4495 if (md == NULL)
4496 return -ENOMEM;
4497 md->num = 0;
4498 md->group = group;
4499
4500 ext4_lock_group(sb, group);
4501 if (db->bb_md_cur == NULL) {
4502 spin_lock(&sbi->s_md_lock);
4503 list_add(&md->list, &sbi->s_active_transaction);
4504 spin_unlock(&sbi->s_md_lock);
4505 /* protect buddy cache from being freed,
4506 * otherwise we'll refresh it from
4507 * on-disk bitmap and lose not-yet-available
4508 * blocks */
4509 page_cache_get(e4b->bd_buddy_page);
4510 page_cache_get(e4b->bd_bitmap_page);
4511 db->bb_md_cur = md;
4512 db->bb_tid = handle->h_transaction->t_tid;
4513 mb_debug("new md 0x%p for group %lu\n",
4514 md, md->group);
4515 } else {
4516 kfree(md);
4517 md = db->bb_md_cur;
4518 }
4519 }
4520
4521 BUG_ON(md->num >= EXT4_BB_MAX_BLOCKS);
4522 md->blocks[md->num] = block + i;
4523 md->num++;
4524 if (md->num == EXT4_BB_MAX_BLOCKS) {
4525 /* no more space, put full container on a sb's list */
4526 db->bb_md_cur = NULL;
4527 }
4528 }
4529 ext4_unlock_group(sb, group);
4530 return 0;
4531}
4532
4533/*
4534 * Main entry point into mballoc to free blocks
4535 */
4536void ext4_mb_free_blocks(handle_t *handle, struct inode *inode,
4537 unsigned long block, unsigned long count,
4538 int metadata, unsigned long *freed)
4539{
Aneesh Kumar K.V26346ff2008-02-10 01:10:04 -05004540 struct buffer_head *bitmap_bh = NULL;
Alex Tomasc9de5602008-01-29 00:19:52 -05004541 struct super_block *sb = inode->i_sb;
Eric Sandeen256bdb42008-02-10 01:13:33 -05004542 struct ext4_allocation_context *ac = NULL;
Alex Tomasc9de5602008-01-29 00:19:52 -05004543 struct ext4_group_desc *gdp;
4544 struct ext4_super_block *es;
4545 unsigned long overflow;
4546 ext4_grpblk_t bit;
4547 struct buffer_head *gd_bh;
4548 ext4_group_t block_group;
4549 struct ext4_sb_info *sbi;
4550 struct ext4_buddy e4b;
4551 int err = 0;
4552 int ret;
4553
4554 *freed = 0;
4555
4556 ext4_mb_poll_new_transaction(sb, handle);
4557
4558 sbi = EXT4_SB(sb);
4559 es = EXT4_SB(sb)->s_es;
4560 if (block < le32_to_cpu(es->s_first_data_block) ||
4561 block + count < block ||
4562 block + count > ext4_blocks_count(es)) {
Harvey Harrison46e665e2008-04-17 10:38:59 -04004563 ext4_error(sb, __func__,
Alex Tomasc9de5602008-01-29 00:19:52 -05004564 "Freeing blocks not in datazone - "
4565 "block = %lu, count = %lu", block, count);
4566 goto error_return;
4567 }
4568
4569 ext4_debug("freeing block %lu\n", block);
4570
Eric Sandeen256bdb42008-02-10 01:13:33 -05004571 ac = kmem_cache_alloc(ext4_ac_cachep, GFP_NOFS);
4572 if (ac) {
4573 ac->ac_op = EXT4_MB_HISTORY_FREE;
4574 ac->ac_inode = inode;
4575 ac->ac_sb = sb;
4576 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004577
4578do_more:
4579 overflow = 0;
4580 ext4_get_group_no_and_offset(sb, block, &block_group, &bit);
4581
4582 /*
4583 * Check to see if we are freeing blocks across a group
4584 * boundary.
4585 */
4586 if (bit + count > EXT4_BLOCKS_PER_GROUP(sb)) {
4587 overflow = bit + count - EXT4_BLOCKS_PER_GROUP(sb);
4588 count -= overflow;
4589 }
Theodore Ts'o574ca172008-07-11 19:27:31 -04004590 bitmap_bh = ext4_read_block_bitmap(sb, block_group);
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04004591 if (!bitmap_bh) {
4592 err = -EIO;
Alex Tomasc9de5602008-01-29 00:19:52 -05004593 goto error_return;
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04004594 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004595 gdp = ext4_get_group_desc(sb, block_group, &gd_bh);
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04004596 if (!gdp) {
4597 err = -EIO;
Alex Tomasc9de5602008-01-29 00:19:52 -05004598 goto error_return;
Aneesh Kumar K.Vce89f462008-07-23 14:09:29 -04004599 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004600
4601 if (in_range(ext4_block_bitmap(sb, gdp), block, count) ||
4602 in_range(ext4_inode_bitmap(sb, gdp), block, count) ||
4603 in_range(block, ext4_inode_table(sb, gdp),
4604 EXT4_SB(sb)->s_itb_per_group) ||
4605 in_range(block + count - 1, ext4_inode_table(sb, gdp),
4606 EXT4_SB(sb)->s_itb_per_group)) {
4607
Harvey Harrison46e665e2008-04-17 10:38:59 -04004608 ext4_error(sb, __func__,
Alex Tomasc9de5602008-01-29 00:19:52 -05004609 "Freeing blocks in system zone - "
4610 "Block = %lu, count = %lu", block, count);
Aneesh Kumar K.V519deca2008-05-15 14:43:20 -04004611 /* err = 0. ext4_std_error should be a no op */
4612 goto error_return;
Alex Tomasc9de5602008-01-29 00:19:52 -05004613 }
4614
4615 BUFFER_TRACE(bitmap_bh, "getting write access");
4616 err = ext4_journal_get_write_access(handle, bitmap_bh);
4617 if (err)
4618 goto error_return;
4619
4620 /*
4621 * We are about to modify some metadata. Call the journal APIs
4622 * to unshare ->b_data if a currently-committing transaction is
4623 * using it
4624 */
4625 BUFFER_TRACE(gd_bh, "get_write_access");
4626 err = ext4_journal_get_write_access(handle, gd_bh);
4627 if (err)
4628 goto error_return;
4629
4630 err = ext4_mb_load_buddy(sb, block_group, &e4b);
4631 if (err)
4632 goto error_return;
4633
4634#ifdef AGGRESSIVE_CHECK
4635 {
4636 int i;
4637 for (i = 0; i < count; i++)
4638 BUG_ON(!mb_test_bit(bit + i, bitmap_bh->b_data));
4639 }
4640#endif
4641 mb_clear_bits(sb_bgl_lock(sbi, block_group), bitmap_bh->b_data,
4642 bit, count);
4643
4644 /* We dirtied the bitmap block */
4645 BUFFER_TRACE(bitmap_bh, "dirtied bitmap block");
4646 err = ext4_journal_dirty_metadata(handle, bitmap_bh);
4647
Eric Sandeen256bdb42008-02-10 01:13:33 -05004648 if (ac) {
4649 ac->ac_b_ex.fe_group = block_group;
4650 ac->ac_b_ex.fe_start = bit;
4651 ac->ac_b_ex.fe_len = count;
4652 ext4_mb_store_history(ac);
4653 }
Alex Tomasc9de5602008-01-29 00:19:52 -05004654
4655 if (metadata) {
4656 /* blocks being freed are metadata. these blocks shouldn't
4657 * be used until this transaction is committed */
4658 ext4_mb_free_metadata(handle, &e4b, block_group, bit, count);
4659 } else {
4660 ext4_lock_group(sb, block_group);
Shen Feng7e5a8cd2008-07-13 21:03:31 -04004661 mb_free_blocks(inode, &e4b, bit, count);
Alex Tomasc9de5602008-01-29 00:19:52 -05004662 ext4_mb_return_to_preallocation(inode, &e4b, block, count);
4663 ext4_unlock_group(sb, block_group);
Alex Tomasc9de5602008-01-29 00:19:52 -05004664 }
4665
4666 spin_lock(sb_bgl_lock(sbi, block_group));
Marcin Slusarze8546d02008-04-17 10:38:59 -04004667 le16_add_cpu(&gdp->bg_free_blocks_count, count);
Alex Tomasc9de5602008-01-29 00:19:52 -05004668 gdp->bg_checksum = ext4_group_desc_csum(sbi, block_group, gdp);
4669 spin_unlock(sb_bgl_lock(sbi, block_group));
4670 percpu_counter_add(&sbi->s_freeblocks_counter, count);
4671
Jose R. Santos772cb7c2008-07-11 19:27:31 -04004672 if (sbi->s_log_groups_per_flex) {
4673 ext4_group_t flex_group = ext4_flex_group(sbi, block_group);
4674 spin_lock(sb_bgl_lock(sbi, flex_group));
4675 sbi->s_flex_groups[flex_group].free_blocks += count;
4676 spin_unlock(sb_bgl_lock(sbi, flex_group));
4677 }
4678
Alex Tomasc9de5602008-01-29 00:19:52 -05004679 ext4_mb_release_desc(&e4b);
4680
4681 *freed += count;
4682
4683 /* And the group descriptor block */
4684 BUFFER_TRACE(gd_bh, "dirtied group descriptor block");
4685 ret = ext4_journal_dirty_metadata(handle, gd_bh);
4686 if (!err)
4687 err = ret;
4688
4689 if (overflow && !err) {
4690 block += count;
4691 count = overflow;
4692 put_bh(bitmap_bh);
4693 goto do_more;
4694 }
4695 sb->s_dirt = 1;
4696error_return:
4697 brelse(bitmap_bh);
4698 ext4_std_error(sb, err);
Eric Sandeen256bdb42008-02-10 01:13:33 -05004699 if (ac)
4700 kmem_cache_free(ext4_ac_cachep, ac);
Alex Tomasc9de5602008-01-29 00:19:52 -05004701 return;
4702}