patch-2_6_7-vs1_9_1_12
[linux-2.6.git] / fs / jfs / jfs_metapage.c
1 /*
2  *   Copyright (C) International Business Machines Corp., 2000-2003
3  *   Portions Copyright (C) Christoph Hellwig, 2001-2002
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 as published by
7  *   the Free Software Foundation; either version 2 of the License, or 
8  *   (at your option) any later version.
9  * 
10  *   This program is distributed in the hope that it will be useful,
11  *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
12  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
13  *   the GNU General Public License for more details.
14  *
15  *   You should have received a copy of the GNU General Public License
16  *   along with this program;  if not, write to the Free Software 
17  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18  */
19
20 #include <linux/fs.h>
21 #include <linux/init.h>
22 #include <linux/buffer_head.h>
23 #include <linux/mempool.h>
24 #include "jfs_incore.h"
25 #include "jfs_superblock.h"
26 #include "jfs_filsys.h"
27 #include "jfs_metapage.h"
28 #include "jfs_txnmgr.h"
29 #include "jfs_debug.h"
30
31 static spinlock_t meta_lock = SPIN_LOCK_UNLOCKED;
32
33 #ifdef CONFIG_JFS_STATISTICS
34 struct {
35         uint    pagealloc;      /* # of page allocations */
36         uint    pagefree;       /* # of page frees */
37         uint    lockwait;       /* # of sleeping lock_metapage() calls */
38 } mpStat;
39 #endif
40
41
42 #define HASH_BITS 10            /* This makes hash_table 1 4K page */
43 #define HASH_SIZE (1 << HASH_BITS)
44 static struct metapage **hash_table = NULL;
45 static unsigned long hash_order;
46
47
48 static inline int metapage_locked(struct metapage *mp)
49 {
50         return test_bit(META_locked, &mp->flag);
51 }
52
53 static inline int trylock_metapage(struct metapage *mp)
54 {
55         return test_and_set_bit(META_locked, &mp->flag);
56 }
57
58 static inline void unlock_metapage(struct metapage *mp)
59 {
60         clear_bit(META_locked, &mp->flag);
61         wake_up(&mp->wait);
62 }
63
64 static void __lock_metapage(struct metapage *mp)
65 {
66         DECLARE_WAITQUEUE(wait, current);
67
68         INCREMENT(mpStat.lockwait);
69
70         add_wait_queue_exclusive(&mp->wait, &wait);
71         do {
72                 set_current_state(TASK_UNINTERRUPTIBLE);
73                 if (metapage_locked(mp)) {
74                         spin_unlock(&meta_lock);
75                         schedule();
76                         spin_lock(&meta_lock);
77                 }
78         } while (trylock_metapage(mp));
79         __set_current_state(TASK_RUNNING);
80         remove_wait_queue(&mp->wait, &wait);
81 }
82
83 /* needs meta_lock */
84 static inline void lock_metapage(struct metapage *mp)
85 {
86         if (trylock_metapage(mp))
87                 __lock_metapage(mp);
88 }
89
90 #define METAPOOL_MIN_PAGES 32
91 static kmem_cache_t *metapage_cache;
92 static mempool_t *metapage_mempool;
93
94 static void init_once(void *foo, kmem_cache_t *cachep, unsigned long flags)
95 {
96         struct metapage *mp = (struct metapage *)foo;
97
98         if ((flags & (SLAB_CTOR_VERIFY|SLAB_CTOR_CONSTRUCTOR)) ==
99             SLAB_CTOR_CONSTRUCTOR) {
100                 mp->lid = 0;
101                 mp->lsn = 0;
102                 mp->flag = 0;
103                 mp->data = NULL;
104                 mp->clsn = 0;
105                 mp->log = NULL;
106                 set_bit(META_free, &mp->flag);
107                 init_waitqueue_head(&mp->wait);
108         }
109 }
110
111 static inline struct metapage *alloc_metapage(int no_wait)
112 {
113         return mempool_alloc(metapage_mempool, no_wait ? GFP_ATOMIC : GFP_NOFS);
114 }
115
116 static inline void free_metapage(struct metapage *mp)
117 {
118         mp->flag = 0;
119         set_bit(META_free, &mp->flag);
120
121         mempool_free(mp, metapage_mempool);
122 }
123
124 int __init metapage_init(void)
125 {
126         /*
127          * Allocate the metapage structures
128          */
129         metapage_cache = kmem_cache_create("jfs_mp", sizeof(struct metapage),
130                                            0, 0, init_once, NULL);
131         if (metapage_cache == NULL)
132                 return -ENOMEM;
133
134         metapage_mempool = mempool_create(METAPOOL_MIN_PAGES, mempool_alloc_slab,
135                                           mempool_free_slab, metapage_cache);
136
137         if (metapage_mempool == NULL) {
138                 kmem_cache_destroy(metapage_cache);
139                 return -ENOMEM;
140         }
141         /*
142          * Now the hash list
143          */
144         for (hash_order = 0;
145              ((PAGE_SIZE << hash_order) / sizeof(void *)) < HASH_SIZE;
146              hash_order++);
147         hash_table =
148             (struct metapage **) __get_free_pages(GFP_KERNEL, hash_order);
149         assert(hash_table);
150         memset(hash_table, 0, PAGE_SIZE << hash_order);
151
152         return 0;
153 }
154
155 void metapage_exit(void)
156 {
157         mempool_destroy(metapage_mempool);
158         kmem_cache_destroy(metapage_cache);
159 }
160
161 /*
162  * Basically same hash as in pagemap.h, but using our hash table
163  */
164 static struct metapage **meta_hash(struct address_space *mapping,
165                                    unsigned long index)
166 {
167 #define i (((unsigned long)mapping)/ \
168            (sizeof(struct inode) & ~(sizeof(struct inode) -1 )))
169 #define s(x) ((x) + ((x) >> HASH_BITS))
170         return hash_table + (s(i + index) & (HASH_SIZE - 1));
171 #undef i
172 #undef s
173 }
174
175 static struct metapage *search_hash(struct metapage ** hash_ptr,
176                                     struct address_space *mapping,
177                                unsigned long index)
178 {
179         struct metapage *ptr;
180
181         for (ptr = *hash_ptr; ptr; ptr = ptr->hash_next) {
182                 if ((ptr->mapping == mapping) && (ptr->index == index))
183                         return ptr;
184         }
185
186         return NULL;
187 }
188
189 static void add_to_hash(struct metapage * mp, struct metapage ** hash_ptr)
190 {
191         if (*hash_ptr)
192                 (*hash_ptr)->hash_prev = mp;
193
194         mp->hash_prev = NULL;
195         mp->hash_next = *hash_ptr;
196         *hash_ptr = mp;
197 }
198
199 static void remove_from_hash(struct metapage * mp, struct metapage ** hash_ptr)
200 {
201         if (mp->hash_prev)
202                 mp->hash_prev->hash_next = mp->hash_next;
203         else {
204                 assert(*hash_ptr == mp);
205                 *hash_ptr = mp->hash_next;
206         }
207
208         if (mp->hash_next)
209                 mp->hash_next->hash_prev = mp->hash_prev;
210 }
211
212 struct metapage *__get_metapage(struct inode *inode, unsigned long lblock,
213                                 unsigned int size, int absolute,
214                                 unsigned long new)
215 {
216         struct metapage **hash_ptr;
217         int l2BlocksPerPage;
218         int l2bsize;
219         struct address_space *mapping;
220         struct metapage *mp;
221         unsigned long page_index;
222         unsigned long page_offset;
223
224         jfs_info("__get_metapage: inode = 0x%p, lblock = 0x%lx", inode, lblock);
225
226         if (absolute)
227                 mapping = inode->i_sb->s_bdev->bd_inode->i_mapping;
228         else
229                 mapping = inode->i_mapping;
230
231         hash_ptr = meta_hash(mapping, lblock);
232 again:
233         spin_lock(&meta_lock);
234         mp = search_hash(hash_ptr, mapping, lblock);
235         if (mp) {
236               page_found:
237                 mp->count++;
238                 lock_metapage(mp);
239                 spin_unlock(&meta_lock);
240                 if (test_bit(META_stale, &mp->flag)) {
241                         release_metapage(mp);
242                         yield();        /* Let other waiters release it, too */
243                         goto again;
244                 }
245                 if (test_bit(META_discard, &mp->flag)) {
246                         if (!new) {
247                                 jfs_error(inode->i_sb,
248                                           "__get_metapage: using a "
249                                           "discarded metapage");
250                                 release_metapage(mp);
251                                 return NULL;
252                         }
253                         clear_bit(META_discard, &mp->flag);
254                 }
255                 jfs_info("__get_metapage: found 0x%p, in hash", mp);
256                 if (mp->logical_size != size) {
257                         jfs_error(inode->i_sb,
258                                   "__get_metapage: mp->logical_size != size");
259                         release_metapage(mp);
260                         return NULL;
261                 }
262         } else {
263                 l2bsize = inode->i_blkbits;
264                 l2BlocksPerPage = PAGE_CACHE_SHIFT - l2bsize;
265                 page_index = lblock >> l2BlocksPerPage;
266                 page_offset = (lblock - (page_index << l2BlocksPerPage)) <<
267                     l2bsize;
268                 if ((page_offset + size) > PAGE_CACHE_SIZE) {
269                         spin_unlock(&meta_lock);
270                         jfs_err("MetaData crosses page boundary!!");
271                         return NULL;
272                 }
273                 
274                 /*
275                  * Locks held on aggregate inode pages are usually
276                  * not held long, and they are taken in critical code
277                  * paths (committing dirty inodes, txCommit thread) 
278                  * 
279                  * Attempt to get metapage without blocking, tapping into
280                  * reserves if necessary.
281                  */
282                 mp = NULL;
283                 if (JFS_IP(inode)->fileset == AGGREGATE_I) {
284                         mp =  mempool_alloc(metapage_mempool, GFP_ATOMIC);
285                         if (!mp) {
286                                 /*
287                                  * mempool is supposed to protect us from
288                                  * failing here.  We will try a blocking
289                                  * call, but a deadlock is possible here
290                                  */
291                                 printk(KERN_WARNING
292                                        "__get_metapage: atomic call to mempool_alloc failed.\n");
293                                 printk(KERN_WARNING
294                                        "Will attempt blocking call\n");
295                         }
296                 }
297                 if (!mp) {
298                         struct metapage *mp2;
299
300                         spin_unlock(&meta_lock);
301                         mp =  mempool_alloc(metapage_mempool, GFP_NOFS);
302                         spin_lock(&meta_lock);
303
304                         /* we dropped the meta_lock, we need to search the
305                          * hash again.
306                          */
307                         mp2 = search_hash(hash_ptr, mapping, lblock);
308                         if (mp2) {
309                                 free_metapage(mp);
310                                 mp = mp2;
311                                 goto page_found;
312                         }
313                 }
314                 mp->flag = 0;
315                 lock_metapage(mp);
316                 if (absolute)
317                         set_bit(META_absolute, &mp->flag);
318                 mp->xflag = COMMIT_PAGE;
319                 mp->count = 1;
320                 atomic_set(&mp->nohomeok,0);
321                 mp->mapping = mapping;
322                 mp->index = lblock;
323                 mp->page = 0;
324                 mp->logical_size = size;
325                 add_to_hash(mp, hash_ptr);
326                 spin_unlock(&meta_lock);
327
328                 if (new) {
329                         jfs_info("__get_metapage: Calling grab_cache_page");
330                         mp->page = grab_cache_page(mapping, page_index);
331                         if (!mp->page) {
332                                 jfs_err("grab_cache_page failed!");
333                                 goto freeit;
334                         } else {
335                                 INCREMENT(mpStat.pagealloc);
336                                 unlock_page(mp->page);
337                         }
338                 } else {
339                         jfs_info("__get_metapage: Calling read_cache_page");
340                         mp->page = read_cache_page(mapping, lblock,
341                                     (filler_t *)mapping->a_ops->readpage, NULL);
342                         if (IS_ERR(mp->page)) {
343                                 jfs_err("read_cache_page failed!");
344                                 goto freeit;
345                         } else
346                                 INCREMENT(mpStat.pagealloc);
347                 }
348                 mp->data = kmap(mp->page) + page_offset;
349         }
350
351         if (new)
352                 memset(mp->data, 0, PSIZE);
353
354         jfs_info("__get_metapage: returning = 0x%p", mp);
355         return mp;
356
357 freeit:
358         spin_lock(&meta_lock);
359         remove_from_hash(mp, hash_ptr);
360         free_metapage(mp);
361         spin_unlock(&meta_lock);
362         return NULL;
363 }
364
365 void hold_metapage(struct metapage * mp, int force)
366 {
367         spin_lock(&meta_lock);
368
369         mp->count++;
370
371         if (force) {
372                 ASSERT (!(test_bit(META_forced, &mp->flag)));
373                 if (trylock_metapage(mp))
374                         set_bit(META_forced, &mp->flag);
375         } else
376                 lock_metapage(mp);
377
378         spin_unlock(&meta_lock);
379 }
380
381 static void __write_metapage(struct metapage * mp)
382 {
383         int l2bsize = mp->mapping->host->i_blkbits;
384         int l2BlocksPerPage = PAGE_CACHE_SHIFT - l2bsize;
385         unsigned long page_index;
386         unsigned long page_offset;
387         int rc;
388
389         jfs_info("__write_metapage: mp = 0x%p", mp);
390
391         if (test_bit(META_discard, &mp->flag)) {
392                 /*
393                  * This metadata is no longer valid
394                  */
395                 clear_bit(META_dirty, &mp->flag);
396                 return;
397         }
398
399         page_index = mp->page->index;
400         page_offset =
401             (mp->index - (page_index << l2BlocksPerPage)) << l2bsize;
402
403         lock_page(mp->page);
404         rc = mp->mapping->a_ops->prepare_write(NULL, mp->page, page_offset,
405                                                page_offset +
406                                                mp->logical_size);
407         if (rc) {
408                 jfs_err("prepare_write return %d!", rc);
409                 ClearPageUptodate(mp->page);
410                 unlock_page(mp->page);
411                 clear_bit(META_dirty, &mp->flag);
412                 return;
413         }
414         rc = mp->mapping->a_ops->commit_write(NULL, mp->page, page_offset,
415                                               page_offset +
416                                               mp->logical_size);
417         if (rc) {
418                 jfs_err("commit_write returned %d", rc);
419         }
420
421         unlock_page(mp->page);
422         clear_bit(META_dirty, &mp->flag);
423
424         jfs_info("__write_metapage done");
425 }
426
427 static inline void sync_metapage(struct metapage *mp)
428 {
429         struct page *page = mp->page;
430
431         page_cache_get(page);
432         lock_page(page);
433
434         /* we're done with this page - no need to check for errors */
435         if (page_has_buffers(page))
436                 write_one_page(page, 1);
437         else
438                 unlock_page(page);
439         page_cache_release(page);
440 }
441
442 void release_metapage(struct metapage * mp)
443 {
444         struct jfs_log *log;
445
446         jfs_info("release_metapage: mp = 0x%p, flag = 0x%lx", mp, mp->flag);
447
448         spin_lock(&meta_lock);
449         if (test_bit(META_forced, &mp->flag)) {
450                 clear_bit(META_forced, &mp->flag);
451                 mp->count--;
452                 spin_unlock(&meta_lock);
453                 return;
454         }
455
456         assert(mp->count);
457         if (--mp->count || atomic_read(&mp->nohomeok)) {
458                 unlock_metapage(mp);
459                 spin_unlock(&meta_lock);
460                 return;
461         }
462
463         if (mp->page) {
464                 /* Releasing spinlock, we have to check mp->count later */
465                 set_bit(META_stale, &mp->flag);
466                 spin_unlock(&meta_lock);
467                 kunmap(mp->page);
468                 mp->data = 0;
469                 if (test_bit(META_dirty, &mp->flag))
470                         __write_metapage(mp);
471                 if (test_bit(META_sync, &mp->flag)) {
472                         sync_metapage(mp);
473                         clear_bit(META_sync, &mp->flag);
474                 }
475
476                 if (test_bit(META_discard, &mp->flag)) {
477                         lock_page(mp->page);
478                         block_invalidatepage(mp->page, 0);
479                         unlock_page(mp->page);
480                 }
481
482                 page_cache_release(mp->page);
483                 mp->page = NULL;
484                 INCREMENT(mpStat.pagefree);
485                 spin_lock(&meta_lock);
486         }
487
488         if (mp->lsn) {
489                 /*
490                  * Remove metapage from logsynclist.
491                  */
492                 log = mp->log;
493                 LOGSYNC_LOCK(log);
494                 mp->log = 0;
495                 mp->lsn = 0;
496                 mp->clsn = 0;
497                 log->count--;
498                 list_del(&mp->synclist);
499                 LOGSYNC_UNLOCK(log);
500         }
501         if (mp->count) {
502                 /* Someone else is trying to get this metpage */
503                 unlock_metapage(mp);
504                 spin_unlock(&meta_lock);
505                 return;
506         }
507         remove_from_hash(mp, meta_hash(mp->mapping, mp->index));
508         spin_unlock(&meta_lock);
509
510         free_metapage(mp);
511 }
512
513 void __invalidate_metapages(struct inode *ip, s64 addr, int len)
514 {
515         struct metapage **hash_ptr;
516         unsigned long lblock;
517         int l2BlocksPerPage = PAGE_CACHE_SHIFT - ip->i_blkbits;
518         /* All callers are interested in block device's mapping */
519         struct address_space *mapping = ip->i_sb->s_bdev->bd_inode->i_mapping;
520         struct metapage *mp;
521         struct page *page;
522
523         /*
524          * First, mark metapages to discard.  They will eventually be
525          * released, but should not be written.
526          */
527         for (lblock = addr; lblock < addr + len;
528              lblock += 1 << l2BlocksPerPage) {
529                 hash_ptr = meta_hash(mapping, lblock);
530 again:
531                 spin_lock(&meta_lock);
532                 mp = search_hash(hash_ptr, mapping, lblock);
533                 if (mp) {
534                         if (test_bit(META_stale, &mp->flag)) {
535                                 /* Racing with release_metapage */
536                                 mp->count++;
537                                 lock_metapage(mp);
538                                 spin_unlock(&meta_lock);
539                                 /* racing release_metapage should be done now */
540                                 release_metapage(mp);
541                                 goto again;
542                         }
543
544                         set_bit(META_discard, &mp->flag);
545                         spin_unlock(&meta_lock);
546                 } else {
547                         spin_unlock(&meta_lock);
548                         page = find_lock_page(mapping, lblock>>l2BlocksPerPage);
549                         if (page) {
550                                 block_invalidatepage(page, 0);
551                                 unlock_page(page);
552                         }
553                 }
554         }
555 }
556
557 #ifdef CONFIG_JFS_STATISTICS
558 int jfs_mpstat_read(char *buffer, char **start, off_t offset, int length,
559                     int *eof, void *data)
560 {
561         int len = 0;
562         off_t begin;
563
564         len += sprintf(buffer,
565                        "JFS Metapage statistics\n"
566                        "=======================\n"
567                        "page allocations = %d\n"
568                        "page frees = %d\n"
569                        "lock waits = %d\n",
570                        mpStat.pagealloc,
571                        mpStat.pagefree,
572                        mpStat.lockwait);
573
574         begin = offset;
575         *start = buffer + begin;
576         len -= begin;
577
578         if (len > length)
579                 len = length;
580         else
581                 *eof = 1;
582
583         if (len < 0)
584                 len = 0;
585
586         return len;
587 }
588 #endif