Whamcloud - gitweb
Land b1_4_smallfix onto b1_4 (20050210_1537)
[fs/lustre-release.git] / lustre / llite / llite_lib.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * Lustre Light Super operations
5  *
6  *  Copyright (c) 2002, 2003 Cluster File Systems, Inc.
7  *
8  *   This file is part of Lustre, http://www.lustre.org.
9  *
10  *   Lustre is free software; you can redistribute it and/or
11  *   modify it under the terms of version 2 of the GNU General Public
12  *   License as published by the Free Software Foundation.
13  *
14  *   Lustre is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *   GNU General Public License for more details.
18  *
19  *   You should have received a copy of the GNU General Public License
20  *   along with Lustre; if not, write to the Free Software
21  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  */
23
24 #define DEBUG_SUBSYSTEM S_LLITE
25
26 #include <linux/module.h>
27 #include <linux/types.h>
28 #include <linux/random.h>
29 #include <linux/version.h>
30
31 #include <linux/lustre_lite.h>
32 #include <linux/lustre_ha.h>
33 #include <linux/lustre_dlm.h>
34 #include <linux/lprocfs_status.h>
35 #include "llite_internal.h"
36
37 kmem_cache_t *ll_file_data_slab;
38
39 LIST_HEAD(ll_super_blocks);
40 spinlock_t ll_sb_lock = SPIN_LOCK_UNLOCKED;
41
42 extern struct address_space_operations ll_aops;
43 extern struct address_space_operations ll_dir_aops;
44
45 #ifndef log2
46 #define log2(n) ffz(~(n))
47 #endif
48
49 struct ll_sb_info *lustre_init_sbi(struct super_block *sb)
50 {
51         struct ll_sb_info *sbi = NULL;
52         class_uuid_t uuid;
53         ENTRY;
54
55         OBD_ALLOC(sbi, sizeof(*sbi));
56         if (!sbi)
57                 RETURN(NULL);
58
59         spin_lock_init(&sbi->ll_lock);
60         INIT_LIST_HEAD(&sbi->ll_pglist);
61         sbi->ll_pglist_gen = 0;
62         if (num_physpages >> (20 - PAGE_SHIFT) < 512)
63                 sbi->ll_async_page_max = num_physpages / 2;
64         else
65                 sbi->ll_async_page_max = (num_physpages / 4) * 3;
66         sbi->ll_ra_info.ra_max_pages = min(num_physpages / 8,
67                                            SBI_DEFAULT_READAHEAD_MAX);
68
69         INIT_LIST_HEAD(&sbi->ll_conn_chain);
70         INIT_HLIST_HEAD(&sbi->ll_orphan_dentry_list);
71         ll_s2sbi_nocast(sb) = sbi;
72
73         generate_random_uuid(uuid);
74         class_uuid_unparse(uuid, &sbi->ll_sb_uuid);
75
76         spin_lock(&ll_sb_lock);
77         list_add_tail(&sbi->ll_list, &ll_super_blocks);
78         spin_unlock(&ll_sb_lock);
79         RETURN(sbi);
80 }
81
82 void lustre_free_sbi(struct super_block *sb)
83 {
84         struct ll_sb_info *sbi = ll_s2sbi(sb);
85         ENTRY;
86
87         if (sbi != NULL) {
88                 spin_lock(&ll_sb_lock);
89                 list_del(&sbi->ll_list);
90                 spin_unlock(&ll_sb_lock);
91                 OBD_FREE(sbi, sizeof(*sbi));
92         }
93         ll_s2sbi_nocast(sb) = NULL;
94         EXIT;
95 }
96
97 int lustre_common_fill_super(struct super_block *sb, char *mdc, char *osc)
98 {
99         struct inode *root = 0;
100         struct ll_sb_info *sbi = ll_s2sbi(sb);
101         struct obd_device *obd;
102         struct ll_fid rootfid;
103         struct obd_statfs osfs;
104         struct ptlrpc_request *request = NULL;
105         struct lustre_handle osc_conn = {0, };
106         struct lustre_handle mdc_conn = {0, };
107         struct lustre_md md;
108         kdev_t devno;
109         int err;
110
111         obd = class_name2obd(mdc);
112         if (!obd) {
113                 CERROR("MDC %s: not setup or attached\n", mdc);
114                 RETURN(-EINVAL);
115         }
116
117         if (proc_lustre_fs_root) {
118                 err = lprocfs_register_mountpoint(proc_lustre_fs_root, sb,
119                                                   osc, mdc);
120                 if (err < 0)
121                         CERROR("could not register mount in /proc/lustre");
122         }
123
124         mdc_init_ea_size(obd, osc);
125
126         err = obd_connect(&mdc_conn, obd, &sbi->ll_sb_uuid);
127         if (err == -EBUSY) {
128                 CERROR("An MDS (mdc %s) is performing recovery, of which this"
129                        " client is not a part.  Please wait for recovery to "
130                        "complete, abort, or time out.\n", mdc);
131                 GOTO(out, err);
132         } else if (err) {
133                 CERROR("cannot connect to %s: rc = %d\n", mdc, err);
134                 GOTO(out, err);
135         }
136         sbi->ll_mdc_exp = class_conn2export(&mdc_conn);
137
138         err = obd_statfs(obd, &osfs, jiffies - HZ);
139         if (err)
140                 GOTO(out_mdc, err);
141
142         LASSERT(osfs.os_bsize);
143         sb->s_blocksize = osfs.os_bsize;
144         sb->s_blocksize_bits = log2(osfs.os_bsize);
145         sb->s_magic = LL_SUPER_MAGIC;
146         sb->s_maxbytes = PAGE_CACHE_MAXBYTES;
147         sbi->ll_namelen = osfs.os_namelen;
148
149         devno = get_uuid2int(sbi2mdc(sbi)->cl_import->imp_target_uuid.uuid,
150                              strlen(sbi2mdc(sbi)->cl_import->imp_target_uuid.uuid));
151         /* s_dev is also used in lt_compare() to compare two fs */
152         sb->s_dev = devno;
153
154         obd = class_name2obd(osc);
155         if (!obd) {
156                 CERROR("OSC %s: not setup or attached\n", osc);
157                 GOTO(out_mdc, err);
158         }
159
160         err = obd_connect(&osc_conn, obd, &sbi->ll_sb_uuid);
161         if (err == -EBUSY) {
162                 CERROR("An OST (osc %s) is performing recovery, of which this"
163                        " client is not a part.  Please wait for recovery to "
164                        "complete, abort, or time out.\n", osc);
165                 GOTO(out, err);
166         } else if (err) {
167                 CERROR("cannot connect to %s: rc = %d\n", osc, err);
168                 GOTO(out_mdc, err);
169         }
170         sbi->ll_osc_exp = class_conn2export(&osc_conn);
171
172         if (!ll_async_page_slab) {
173                 ll_async_page_slab_size =
174                         size_round(sizeof(struct ll_async_page)) +
175                         obd_prep_async_page(sbi->ll_osc_exp, NULL, NULL, NULL,
176                                             0, NULL, NULL, NULL);
177                 ll_async_page_slab = kmem_cache_create("ll_async_page",
178                                                        ll_async_page_slab_size,
179                                                        0, 0, NULL, NULL);
180                 if (!ll_async_page_slab)
181                         GOTO(out_osc, -ENOMEM);
182         }
183
184         err = mdc_getstatus(sbi->ll_mdc_exp, &rootfid);
185         if (err) {
186                 CERROR("cannot mds_connect: rc = %d\n", err);
187                 GOTO(out_osc, err);
188         }
189         CDEBUG(D_SUPER, "rootfid "LPU64"\n", rootfid.id);
190         sbi->ll_rootino = rootfid.id;
191
192         sb->s_op = &lustre_super_operations;
193
194         /* make root inode
195          * XXX: move this to after cbd setup? */
196         err = mdc_getattr(sbi->ll_mdc_exp, &rootfid,
197                           OBD_MD_FLNOTOBD|OBD_MD_FLBLOCKS, 0, &request);
198         if (err) {
199                 CERROR("mdc_getattr failed for root: rc = %d\n", err);
200                 GOTO(out_osc, err);
201         }
202
203         err = mdc_req2lustre_md(request, 0, sbi->ll_osc_exp, &md);
204         if (err) {
205                 CERROR("failed to understand root inode md: rc = %d\n",err);
206                 ptlrpc_req_finished (request);
207                 GOTO(out_osc, err);
208         }
209
210         LASSERT(sbi->ll_rootino != 0);
211         root = ll_iget(sb, sbi->ll_rootino, &md);
212
213         ptlrpc_req_finished(request);
214
215         if (root == NULL || is_bad_inode(root)) {
216                 /* XXX might need iput() for bad inode */
217                 CERROR("lustre_lite: bad iget4 for root\n");
218                 GOTO(out_root, err = -EBADF);
219         }
220
221         err = ll_close_thread_start(&sbi->ll_lcq);
222         if (err) {
223                 CERROR("cannot start close thread: rc %d\n", err);
224                 GOTO(out_root, err);
225         }
226
227         /* making vm readahead 0 for 2.4.x. In the case of 2.6.x,
228            backing dev info assigned to inode mapping is used for
229            determining maximal readahead. */
230 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,6,0)) && \
231     !defined(KERNEL_HAS_AS_MAX_READAHEAD)
232         /* bug 2805 - set VM readahead to zero */
233         vm_max_readahead = vm_min_readahead = 0;
234 #endif
235
236         sb->s_root = d_alloc_root(root);
237         RETURN(err);
238
239 out_root:
240         if (root)
241                 iput(root);
242 out_osc:
243         obd_disconnect(sbi->ll_osc_exp, 0);
244 out_mdc:
245         obd_disconnect(sbi->ll_mdc_exp, 0);
246 out:
247         lprocfs_unregister_mountpoint(sbi);
248         RETURN(err);
249 }
250
251 void lustre_dump_inode(struct inode *inode)
252 {
253         struct list_head *tmp;
254         int dentry_count = 0;
255         BDEVNAME_DECLARE_STORAGE(buf);
256
257         LASSERT(inode != NULL);
258
259         list_for_each(tmp, &inode->i_dentry)
260                 dentry_count++;
261
262         CERROR("inode %p dump: dev=%s:%lu, mode=%o, count=%u, %d dentries\n",
263                inode, ll_bdevname(inode->i_sb, buf), inode->i_ino,
264                inode->i_mode, atomic_read(&inode->i_count), dentry_count);
265 }
266
267 void lustre_dump_dentry(struct dentry *dentry, int recur)
268 {
269         struct list_head *tmp;
270         int subdirs = 0;
271
272         LASSERT(dentry != NULL);
273
274         list_for_each(tmp, &dentry->d_subdirs)
275                 subdirs++;
276
277         CERROR("dentry %p dump: name=%.*s parent=%.*s (%p), inode=%p, count=%u,"
278                " flags=0x%x, vfs_flags=0x%lx, fsdata=%p, %d subdirs\n", dentry,
279                dentry->d_name.len, dentry->d_name.name,
280                dentry->d_parent->d_name.len, dentry->d_parent->d_name.name,
281                dentry->d_parent, dentry->d_inode, atomic_read(&dentry->d_count),
282                dentry->d_flags, dentry->d_vfs_flags, dentry->d_fsdata, subdirs);
283         if (dentry->d_inode != NULL)
284                 lustre_dump_inode(dentry->d_inode);
285
286         if (recur == 0)
287                 return;
288
289         list_for_each(tmp, &dentry->d_subdirs) {
290                 struct dentry *d = list_entry(tmp, struct dentry, d_child);
291                 lustre_dump_dentry(d, recur - 1);
292         }
293 }
294
295 void lustre_common_put_super(struct super_block *sb)
296 {
297         struct ll_sb_info *sbi = ll_s2sbi(sb);
298         struct hlist_node *tmp, *next;
299         ENTRY;
300
301         ll_close_thread_shutdown(sbi->ll_lcq);
302
303         list_del(&sbi->ll_conn_chain);
304         obd_disconnect(sbi->ll_osc_exp, 0);
305
306         lprocfs_unregister_mountpoint(sbi);
307         if (sbi->ll_proc_root) {
308                 lprocfs_remove(sbi->ll_proc_root);
309                 sbi->ll_proc_root = NULL;
310         }
311
312         obd_disconnect(sbi->ll_mdc_exp, 0);
313
314         // We do this to get rid of orphaned dentries. That is not really trw.
315         hlist_for_each_safe(tmp, next, &sbi->ll_orphan_dentry_list) {
316                 struct dentry *dentry = hlist_entry(tmp, struct dentry, d_hash);
317                 CWARN("found orphan dentry %.*s (%p->%p) at unmount, dumping "
318                       "before and after shrink_dcache_parent\n",
319                       dentry->d_name.len, dentry->d_name.name, dentry, next);
320                 lustre_dump_dentry(dentry, 1);
321                 shrink_dcache_parent(dentry);
322                 lustre_dump_dentry(dentry, 1);
323         }
324         EXIT;
325 }
326
327
328 char *ll_read_opt(const char *opt, char *data)
329 {
330         char *value;
331         char *retval;
332         ENTRY;
333
334         CDEBUG(D_SUPER, "option: %s, data %s\n", opt, data);
335         if (strncmp(opt, data, strlen(opt)))
336                 RETURN(NULL);
337         if ((value = strchr(data, '=')) == NULL)
338                 RETURN(NULL);
339
340         value++;
341         OBD_ALLOC(retval, strlen(value) + 1);
342         if (!retval) {
343                 CERROR("out of memory!\n");
344                 RETURN(NULL);
345         }
346
347         memcpy(retval, value, strlen(value)+1);
348         CDEBUG(D_SUPER, "Assigned option: %s, value %s\n", opt, retval);
349         RETURN(retval);
350 }
351
352 int ll_set_opt(const char *opt, char *data, int fl)
353 {
354         ENTRY;
355
356         CDEBUG(D_SUPER, "option: %s, data %s\n", opt, data);
357         if (strncmp(opt, data, strlen(opt)))
358                 RETURN(0);
359         else
360                 RETURN(fl);
361 }
362
363 void ll_options(char *options, char **ost, char **mdc, int *flags)
364 {
365         char *this_char;
366 #if (LINUX_VERSION_CODE >= KERNEL_VERSION(2,5,0))
367         char *opt_ptr = options;
368 #endif
369         ENTRY;
370
371         if (!options) {
372                 EXIT;
373                 return;
374         }
375
376 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
377         for (this_char = strtok (options, ",");
378              this_char != NULL;
379              this_char = strtok (NULL, ",")) {
380 #else
381         while ((this_char = strsep (&opt_ptr, ",")) != NULL) {
382 #endif
383                 CDEBUG(D_SUPER, "this_char %s\n", this_char);
384                 if (!*ost && (*ost = ll_read_opt("osc", this_char)))
385                         continue;
386                 if (!*mdc && (*mdc = ll_read_opt("mdc", this_char)))
387                         continue;
388                 if (!(*flags & LL_SBI_NOLCK) &&
389                     ((*flags) = (*flags) |
390                                 ll_set_opt("nolock", this_char,
391                                            LL_SBI_NOLCK)))
392                         continue;
393         }
394         EXIT;
395 }
396
397 void ll_lli_init(struct ll_inode_info *lli)
398 {
399         sema_init(&lli->lli_open_sem, 1);
400         lli->lli_flags = 0;
401         lli->lli_maxbytes = PAGE_CACHE_MAXBYTES;
402         spin_lock_init(&lli->lli_lock);
403         INIT_LIST_HEAD(&lli->lli_pending_write_llaps);
404         lli->lli_inode_magic = LLI_INODE_MAGIC;
405 }
406
407 int ll_fill_super(struct super_block *sb, void *data, int silent)
408 {
409         struct ll_sb_info *sbi;
410         char *osc = NULL;
411         char *mdc = NULL;
412         int err;
413         ENTRY;
414
415         CDEBUG(D_VFSTRACE, "VFS Op: sb %p\n", sb);
416
417         sbi = lustre_init_sbi(sb);
418         if (!sbi)
419                 RETURN(-ENOMEM);
420
421         ll_options(data, &osc, &mdc, &sbi->ll_flags);
422
423         if (!osc) {
424                 CERROR("no osc\n");
425                 GOTO(out, err = -EINVAL);
426         }
427
428         if (!mdc) {
429                 CERROR("no mdc\n");
430                 GOTO(out, err = -EINVAL);
431         }
432
433         err = lustre_common_fill_super(sb, mdc, osc);
434 out:
435         if (err)
436                 lustre_free_sbi(sb);
437
438         if (mdc)
439                 OBD_FREE(mdc, strlen(mdc) + 1);
440         if (osc)
441                 OBD_FREE(osc, strlen(osc) + 1);
442
443         RETURN(err);
444 } /* ll_read_super */
445
446 int lustre_process_log(struct lustre_mount_data *lmd, char * profile,
447                        struct config_llog_instance *cfg, int allow_recov)
448 {
449         struct lustre_cfg lcfg;
450         struct portals_cfg pcfg;
451         char * peer = "MDS_PEER_UUID";
452         struct obd_device *obd;
453         struct lustre_handle mdc_conn = {0, };
454         struct obd_export *exp;
455         char * name = "mdc_dev";
456         class_uuid_t uuid;
457         struct obd_uuid mdc_uuid;
458         struct llog_ctxt *ctxt;
459         int rc = 0;
460         int err;
461         ENTRY;
462
463         if (lmd_bad_magic(lmd))
464                 RETURN(-EINVAL);
465
466         generate_random_uuid(uuid);
467         class_uuid_unparse(uuid, &mdc_uuid);
468
469         if (lmd->lmd_local_nid) {
470                 PCFG_INIT(pcfg, NAL_CMD_REGISTER_MYNID);
471                 pcfg.pcfg_nal = lmd->lmd_nal;
472                 pcfg.pcfg_nid = lmd->lmd_local_nid;
473                 err = libcfs_nal_cmd(&pcfg);
474                 if (err <0)
475                         GOTO(out, err);
476         }
477
478         if (lmd->lmd_nal == SOCKNAL ||
479             lmd->lmd_nal == OPENIBNAL ||
480             lmd->lmd_nal == IIBNAL) {
481                 PCFG_INIT(pcfg, NAL_CMD_ADD_PEER);
482                 pcfg.pcfg_nal     = lmd->lmd_nal;
483                 pcfg.pcfg_nid     = lmd->lmd_server_nid;
484                 pcfg.pcfg_id      = lmd->lmd_server_ipaddr;
485                 pcfg.pcfg_misc    = lmd->lmd_port;
486                 err = libcfs_nal_cmd(&pcfg);
487                 if (err <0)
488                         GOTO(out, err);
489         }
490
491         LCFG_INIT(lcfg, LCFG_ADD_UUID, name);
492         lcfg.lcfg_nid = lmd->lmd_server_nid;
493         lcfg.lcfg_inllen1 = strlen(peer) + 1;
494         lcfg.lcfg_inlbuf1 = peer;
495         lcfg.lcfg_nal = lmd->lmd_nal;
496         err = class_process_config(&lcfg);
497         if (err < 0)
498                 GOTO(out_del_conn, err);
499
500         LCFG_INIT(lcfg, LCFG_ATTACH, name);
501         lcfg.lcfg_inlbuf1 = "mdc";
502         lcfg.lcfg_inllen1 = strlen(lcfg.lcfg_inlbuf1) + 1;
503         lcfg.lcfg_inlbuf2 = mdc_uuid.uuid;
504         lcfg.lcfg_inllen2 = strlen(lcfg.lcfg_inlbuf2) + 1;
505         err = class_process_config(&lcfg);
506         if (err < 0)
507                 GOTO(out_del_uuid, err);
508
509         LCFG_INIT(lcfg, LCFG_SETUP, name);
510         lcfg.lcfg_inlbuf1 = lmd->lmd_mds;
511         lcfg.lcfg_inllen1 = strlen(lcfg.lcfg_inlbuf1) + 1;
512         lcfg.lcfg_inlbuf2 = peer;
513         lcfg.lcfg_inllen2 = strlen(lcfg.lcfg_inlbuf2) + 1;
514         err = class_process_config(&lcfg);
515         if (err < 0)
516                 GOTO(out_detach, err);
517
518         obd = class_name2obd(name);
519         if (obd == NULL)
520                 GOTO(out_cleanup, err = -EINVAL);
521
522         /* Disable initial recovery on this import */
523         err = obd_set_info(obd->obd_self_export,
524                            strlen("initial_recov"), "initial_recov",
525                            sizeof(allow_recov), &allow_recov);
526         if (err)
527                 GOTO(out_cleanup, err);
528
529         err = obd_connect(&mdc_conn, obd, &mdc_uuid);
530         if (err) {
531                 CERROR("cannot connect to %s: rc = %d\n", lmd->lmd_mds, err);
532                 GOTO(out_cleanup, err);
533         }
534
535         exp = class_conn2export(&mdc_conn);
536
537         ctxt = llog_get_context(exp->exp_obd, LLOG_CONFIG_REPL_CTXT);
538 #if 1
539         rc = class_config_parse_llog(ctxt, profile, cfg);
540 #else
541         /*
542          * For debugging, it's useful to just dump the log
543          */
544         rc = class_config_dump_llog(ctxt, profile, cfg);
545 #endif
546         if (rc) {
547                 CERROR("class_config_parse_llog failed: rc = %d\n", rc);
548         }
549
550         err = obd_disconnect(exp, 0);
551
552 out_cleanup:
553         LCFG_INIT(lcfg, LCFG_CLEANUP, name);
554         err = class_process_config(&lcfg);
555         if (err < 0)
556                 GOTO(out, err);
557
558 out_detach:
559         LCFG_INIT(lcfg, LCFG_DETACH, name);
560         err = class_process_config(&lcfg);
561         if (err < 0)
562                 GOTO(out, err);
563
564 out_del_uuid:
565         LCFG_INIT(lcfg, LCFG_DEL_UUID, name);
566         lcfg.lcfg_inllen1 = strlen(peer) + 1;
567         lcfg.lcfg_inlbuf1 = peer;
568         err = class_process_config(&lcfg);
569
570 out_del_conn:
571         if (lmd->lmd_nal == SOCKNAL ||
572             lmd->lmd_nal == OPENIBNAL ||
573             lmd->lmd_nal == IIBNAL) {
574                 PCFG_INIT(pcfg, NAL_CMD_DEL_PEER);
575                 pcfg.pcfg_nal     = lmd->lmd_nal;
576                 pcfg.pcfg_nid     = lmd->lmd_server_nid;
577                 pcfg.pcfg_flags   = 1;          /* single_share */
578                 err = libcfs_nal_cmd(&pcfg);
579                 if (err <0)
580                         GOTO(out, err);
581         }
582 out:
583         if (rc == 0)
584                 rc = err;
585
586         RETURN(rc);
587 }
588
589 static void lustre_manual_cleanup(struct ll_sb_info *sbi)
590 {
591         struct lustre_cfg lcfg;
592         struct obd_device *obd;
593         int next = 0;
594
595         while ((obd = class_devices_in_group(&sbi->ll_sb_uuid, &next)) != NULL)
596         {
597                 int err;
598
599                 LCFG_INIT(lcfg, LCFG_CLEANUP, obd->obd_name);
600                 err = class_process_config(&lcfg);
601                 if (err) {
602                         CERROR("cleanup failed: %s\n", obd->obd_name);
603                         //continue;
604                 }
605
606                 LCFG_INIT(lcfg, LCFG_DETACH, obd->obd_name);
607                 err = class_process_config(&lcfg);
608                 if (err) {
609                         CERROR("detach failed: %s\n", obd->obd_name);
610                         //continue;
611                 }
612         }
613
614         if (sbi->ll_lmd != NULL)
615                 class_del_profile(sbi->ll_lmd->lmd_profile);
616 }
617
618 int lustre_fill_super(struct super_block *sb, void *data, int silent)
619 {
620         struct lustre_mount_data * lmd = data;
621         struct ll_sb_info *sbi;
622         char *osc = NULL;
623         char *mdc = NULL;
624         int err;
625         ENTRY;
626
627         CDEBUG(D_VFSTRACE, "VFS Op: sb %p\n", sb);
628         if (lmd_bad_magic(lmd))
629                 RETURN(-EINVAL);
630
631         sbi = lustre_init_sbi(sb);
632         if (!sbi)
633                 RETURN(-ENOMEM);
634
635         if (lmd->lmd_profile) {
636                 struct lustre_profile *lprof;
637                 struct config_llog_instance cfg;
638                 int len;
639
640                 if (lmd->lmd_mds[0] == '\0') {
641                         CERROR("no mds name\n");
642                         GOTO(out_free, err = -EINVAL);
643                 }
644
645                 OBD_ALLOC(sbi->ll_lmd, sizeof(*sbi->ll_lmd));
646                 if (sbi->ll_lmd == NULL)
647                         GOTO(out_free, err = -ENOMEM);
648                 memcpy(sbi->ll_lmd, lmd, sizeof(*lmd));
649
650                 /* generate a string unique to this super, let's try
651                  the address of the super itself.*/
652                 len = (sizeof(sb) * 2) + 1;
653                 OBD_ALLOC(sbi->ll_instance, len);
654                 if (sbi->ll_instance == NULL)
655                         GOTO(out_free, err = -ENOMEM);
656                 sprintf(sbi->ll_instance, "%p", sb);
657
658                 cfg.cfg_instance = sbi->ll_instance;
659                 cfg.cfg_uuid = sbi->ll_sb_uuid;
660                 cfg.cfg_local_nid = lmd->lmd_local_nid;
661                 err = lustre_process_log(lmd, lmd->lmd_profile, &cfg, 0);
662                 if (err < 0) {
663                         CERROR("Unable to process log: %s\n", lmd->lmd_profile);
664
665                         GOTO(out_free, err);
666                 }
667
668                 lprof = class_get_profile(lmd->lmd_profile);
669                 if (lprof == NULL) {
670                         CERROR("No profile found: %s\n", lmd->lmd_profile);
671                         GOTO(out_free, err = -EINVAL);
672                 }
673                 if (osc)
674                         OBD_FREE(osc, strlen(osc) + 1);
675                 OBD_ALLOC(osc, strlen(lprof->lp_osc) +
676                           strlen(sbi->ll_instance) + 2);
677                 sprintf(osc, "%s-%s", lprof->lp_osc, sbi->ll_instance);
678
679                 if (mdc)
680                         OBD_FREE(mdc, strlen(mdc) + 1);
681                 OBD_ALLOC(mdc, strlen(lprof->lp_mdc) +
682                           strlen(sbi->ll_instance) + 2);
683                 sprintf(mdc, "%s-%s", lprof->lp_mdc, sbi->ll_instance);
684         }
685
686         if (!osc) {
687                 CERROR("no osc\n");
688                 GOTO(out_free, err = -EINVAL);
689         }
690
691         if (!mdc) {
692                 CERROR("no mdc\n");
693                 GOTO(out_free, err = -EINVAL);
694         }
695
696         err = lustre_common_fill_super(sb, mdc, osc);
697
698         if (err)
699                 GOTO(out_free, err);
700
701 out_dev:
702         if (mdc)
703                 OBD_FREE(mdc, strlen(mdc) + 1);
704         if (osc)
705                 OBD_FREE(osc, strlen(osc) + 1);
706
707         RETURN(err);
708
709 out_free:
710         if (sbi->ll_lmd) {
711                 int len = strlen(sbi->ll_lmd->lmd_profile) + sizeof("-clean")+1;
712                 int err;
713
714                 if (sbi->ll_instance != NULL) {
715                         char * cln_prof;
716                         struct config_llog_instance cfg;
717
718                         cfg.cfg_instance = sbi->ll_instance;
719                         cfg.cfg_uuid = sbi->ll_sb_uuid;
720
721                         OBD_ALLOC(cln_prof, len);
722                         sprintf(cln_prof, "%s-clean", sbi->ll_lmd->lmd_profile);
723
724                         err = lustre_process_log(sbi->ll_lmd, cln_prof, &cfg,
725                                                  0);
726                         if (err < 0) {
727                                 CERROR("Unable to process log: %s\n", cln_prof);
728                                 lustre_manual_cleanup(sbi);
729                         }
730                         OBD_FREE(cln_prof, len);
731                         OBD_FREE(sbi->ll_instance, strlen(sbi->ll_instance)+ 1);
732                 }
733                 OBD_FREE(sbi->ll_lmd, sizeof(*sbi->ll_lmd));
734         }
735         lustre_free_sbi(sb);
736
737         goto out_dev;
738 } /* lustre_fill_super */
739
740 void lustre_put_super(struct super_block *sb)
741 {
742         struct obd_device *obd;
743         struct ll_sb_info *sbi = ll_s2sbi(sb);
744         int force_umount = 0;
745         ENTRY;
746
747         CDEBUG(D_VFSTRACE, "VFS Op: sb %p\n", sb);
748         obd = class_exp2obd(sbi->ll_mdc_exp);
749         if (obd)
750                 force_umount = obd->obd_no_recov;
751         obd = NULL;
752
753         lustre_common_put_super(sb);
754
755         if (sbi->ll_lmd != NULL) {
756                 char * cln_prof;
757                 int len = strlen(sbi->ll_lmd->lmd_profile) + sizeof("-clean")+1;
758                 int err;
759                 struct config_llog_instance cfg;
760
761                 if (force_umount) {
762                         CERROR("force umount, doing manual cleanup\n");
763                         lustre_manual_cleanup(sbi);
764                         GOTO(free_lmd, 0);
765                 }
766
767                 cfg.cfg_instance = sbi->ll_instance;
768                 cfg.cfg_uuid = sbi->ll_sb_uuid;
769
770                 OBD_ALLOC(cln_prof, len);
771                 sprintf(cln_prof, "%s-clean", sbi->ll_lmd->lmd_profile);
772
773                 err = lustre_process_log(sbi->ll_lmd, cln_prof, &cfg, 0);
774                 if (err < 0) {
775                         CERROR("Unable to process log: %s, doing manual cleanup"
776                                "\n", cln_prof);
777                         lustre_manual_cleanup(sbi);
778                 }
779
780                 OBD_FREE(cln_prof, len);
781         free_lmd:
782                 OBD_FREE(sbi->ll_lmd, sizeof(*sbi->ll_lmd));
783                 OBD_FREE(sbi->ll_instance, strlen(sbi->ll_instance) + 1);
784         }
785
786         lustre_free_sbi(sb);
787
788         EXIT;
789 } /* lustre_put_super */
790
791 #ifdef HAVE_REGISTER_CACHE
792 #include <linux/cache_def.h>
793 #ifdef HAVE_CACHE_RETURN_INT
794 static int
795 #else
796 static void
797 #endif
798 ll_shrink_cache(int priority, unsigned int gfp_mask)
799 {
800         struct ll_sb_info *sbi;
801         int count = 0;
802
803         list_for_each_entry(sbi, &ll_super_blocks, ll_list)
804                 count += llap_shrink_cache(sbi, priority);
805
806 #ifdef HAVE_CACHE_RETURN_INT
807         return count;
808 #endif
809 }
810
811 struct cache_definition ll_cache_definition = {
812         .name = "llap_cache",
813         .shrink = ll_shrink_cache
814 };
815 #endif /* HAVE_REGISTER_CACHE */
816
817 struct inode *ll_inode_from_lock(struct ldlm_lock *lock)
818 {
819         struct inode *inode = NULL;
820         l_lock(&lock->l_resource->lr_namespace->ns_lock);
821         if (lock->l_ast_data) {
822                 struct ll_inode_info *lli = ll_i2info(lock->l_ast_data);
823                 if (lli->lli_inode_magic == LLI_INODE_MAGIC) {
824                         inode = igrab(lock->l_ast_data);
825                 } else {
826                         inode = lock->l_ast_data;
827                         __LDLM_DEBUG(inode->i_state & I_FREEING ?
828                                      D_INFO : D_WARNING, lock,
829                                      "l_ast_data %p is bogus: magic %08x",
830                                      lock->l_ast_data, lli->lli_inode_magic);
831                         inode = NULL;
832                 }
833         }
834         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
835         return inode;
836 }
837
838 static int null_if_equal(struct ldlm_lock *lock, void *data)
839 {
840         if (data == lock->l_ast_data) {
841                 lock->l_ast_data = NULL;
842
843                 if (lock->l_req_mode != lock->l_granted_mode)
844                         LDLM_ERROR(lock,"clearing inode with ungranted lock");
845         }
846
847         return LDLM_ITER_CONTINUE;
848 }
849
850 void ll_clear_inode(struct inode *inode)
851 {
852         struct ll_fid fid;
853         struct ll_inode_info *lli = ll_i2info(inode);
854         struct ll_sb_info *sbi = ll_i2sbi(inode);
855         ENTRY;
856
857         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n", inode->i_ino,
858                inode->i_generation, inode);
859
860         ll_inode2fid(&fid, inode);
861         clear_bit(LLI_F_HAVE_MDS_SIZE_LOCK, &(ll_i2info(inode)->lli_flags));
862         mdc_change_cbdata(sbi->ll_mdc_exp, &fid, null_if_equal, inode);
863
864         if (lli->lli_smd)
865                 obd_change_cbdata(sbi->ll_osc_exp, lli->lli_smd,
866                                   null_if_equal, inode);
867
868         if (lli->lli_smd) {
869                 obd_free_memmd(sbi->ll_osc_exp, &lli->lli_smd);
870                 lli->lli_smd = NULL;
871         }
872
873         if (lli->lli_symlink_name) {
874                 OBD_FREE(lli->lli_symlink_name,
875                          strlen(lli->lli_symlink_name) + 1);
876                 lli->lli_symlink_name = NULL;
877         }
878         lli->lli_inode_magic = LLI_INODE_DEAD;
879
880         EXIT;
881 }
882
883 /* If this inode has objects allocated to it (lsm != NULL), then the OST
884  * object(s) determine the file size and mtime.  Otherwise, the MDS will
885  * keep these values until such a time that objects are allocated for it.
886  * We do the MDS operations first, as it is checking permissions for us.
887  * We don't to the MDS RPC if there is nothing that we want to store there,
888  * otherwise there is no harm in updating mtime/atime on the MDS if we are
889  * going to do an RPC anyways.
890  *
891  * If we are doing a truncate, we will send the mtime and ctime updates
892  * to the OST with the punch RPC, otherwise we do an explicit setattr RPC.
893  * I don't believe it is possible to get e.g. ATTR_MTIME_SET and ATTR_SIZE
894  * at the same time.
895  */
896 int ll_setattr_raw(struct inode *inode, struct iattr *attr)
897 {
898         struct lov_stripe_md *lsm = ll_i2info(inode)->lli_smd;
899         struct ll_sb_info *sbi = ll_i2sbi(inode);
900         struct ptlrpc_request *request = NULL;
901         struct mdc_op_data op_data;
902         int ia_valid = attr->ia_valid;
903         int rc = 0;
904         ENTRY;
905
906         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu\n", inode->i_ino);
907         lprocfs_counter_incr(ll_i2sbi(inode)->ll_stats, LPROC_LL_SETATTR);
908
909         if (ia_valid & ATTR_SIZE) {
910                 if (attr->ia_size > ll_file_maxbytes(inode)) {
911                         CDEBUG(D_INODE, "file too large %llu > "LPU64"\n",
912                                attr->ia_size, ll_file_maxbytes(inode));
913                         RETURN(-EFBIG);
914                 }
915
916                 attr->ia_valid |= ATTR_MTIME | ATTR_CTIME;
917         }
918
919         /* POSIX: check before ATTR_*TIME_SET set (from inode_change_ok) */
920         if (ia_valid & (ATTR_MTIME_SET | ATTR_ATIME_SET)) {
921                 if (current->fsuid != inode->i_uid && !capable(CAP_FOWNER))
922                         RETURN(-EPERM);
923         }
924
925         /* We mark all of the fields "set" so MDS/OST does not re-set them */
926         if (attr->ia_valid & ATTR_CTIME) {
927                 attr->ia_ctime = CURRENT_TIME;
928                 attr->ia_valid |= ATTR_CTIME_SET;
929         }
930         if (!(ia_valid & ATTR_ATIME_SET) && (attr->ia_valid & ATTR_ATIME)) {
931                 attr->ia_atime = CURRENT_TIME;
932                 attr->ia_valid |= ATTR_ATIME_SET;
933         }
934         if (!(ia_valid & ATTR_MTIME_SET) && (attr->ia_valid & ATTR_MTIME)) {
935                 attr->ia_mtime = CURRENT_TIME;
936                 attr->ia_valid |= ATTR_MTIME_SET;
937         }
938
939         if (attr->ia_valid & (ATTR_MTIME | ATTR_CTIME))
940                 CDEBUG(D_INODE, "setting mtime %lu, ctime %lu, now = %lu\n",
941                        LTIME_S(attr->ia_mtime), LTIME_S(attr->ia_ctime),
942                        CURRENT_SECONDS);
943         if (lsm)
944                 attr->ia_valid &= ~ATTR_SIZE;
945
946         /* If only OST attributes being set on objects, don't do MDS RPC.
947          * In that case, we need to check permissions and update the local
948          * inode ourselves so we can call obdo_from_inode() always. */
949         if (ia_valid & (lsm ? ~(ATTR_SIZE | ATTR_FROM_OPEN | ATTR_RAW) : ~0)) {
950                 struct lustre_md md;
951                 ll_prepare_mdc_op_data(&op_data, inode, NULL, NULL, 0, 0);
952
953                 rc = mdc_setattr(sbi->ll_mdc_exp, &op_data,
954                                  attr, NULL, 0, NULL, 0, &request);
955
956                 if (rc) {
957                         ptlrpc_req_finished(request);
958                         if (rc != -EPERM && rc != -EACCES)
959                                 CERROR("mdc_setattr fails: rc = %d\n", rc);
960                         RETURN(rc);
961                 }
962
963                 rc = mdc_req2lustre_md(request, 0, sbi->ll_osc_exp, &md);
964                 if (rc) {
965                         ptlrpc_req_finished(request);
966                         RETURN(rc);
967                 }
968
969                 /* Won't invoke vmtruncate as we already cleared ATTR_SIZE,
970                  * but needed to set timestamps backwards on utime. */
971                 inode_setattr(inode, attr);
972                 ll_update_inode(inode, md.body, md.lsm);
973                 ptlrpc_req_finished(request);
974
975                 if (!lsm || !S_ISREG(inode->i_mode)) {
976                         CDEBUG(D_INODE, "no lsm: not setting attrs on OST\n");
977                         RETURN(0);
978                 }
979         } else {
980                 /* The OST doesn't check permissions, but the alternative is
981                  * a gratuitous RPC to the MDS.  We already rely on the client
982                  * to do read/write/truncate permission checks, so is mtime OK?
983                  */
984                 if (ia_valid & (ATTR_MTIME | ATTR_ATIME)) {
985                         /* from sys_utime() */
986                         if (!(ia_valid & (ATTR_MTIME_SET | ATTR_ATIME_SET))) {
987                                 if (current->fsuid != inode->i_uid &&
988                                     (rc=ll_permission(inode,MAY_WRITE,NULL))!=0)
989                                         RETURN(rc);
990                         } else {
991                                 /* from inode_change_ok() */
992                                 if (current->fsuid != inode->i_uid &&
993                                     !capable(CAP_FOWNER))
994                                         RETURN(-EPERM);
995                         }
996                 }
997
998                 /* Won't invoke vmtruncate, as we already cleared ATTR_SIZE */
999                 inode_setattr(inode, attr);
1000         }
1001
1002         /* We really need to get our PW lock before we change inode->i_size.
1003          * If we don't we can race with other i_size updaters on our node, like
1004          * ll_file_read.  We can also race with i_size propogation to other
1005          * nodes through dirtying and writeback of final cached pages.  This
1006          * last one is especially bad for racing o_append users on other
1007          * nodes. */
1008         if (ia_valid & ATTR_SIZE) {
1009                 ldlm_policy_data_t policy = { .l_extent = {attr->ia_size,
1010                                                            OBD_OBJECT_EOF } };
1011                 struct lustre_handle lockh = { 0 };
1012                 int err, ast_flags = 0;
1013                 /* XXX when we fix the AST intents to pass the discard-range
1014                  * XXX extent, make ast_flags always LDLM_AST_DISCARD_DATA
1015                  * XXX here. */
1016                 if (attr->ia_size == 0)
1017                         ast_flags = LDLM_AST_DISCARD_DATA;
1018
1019                 /* bug 1639: avoid write/truncate i_sem/DLM deadlock */
1020                 LASSERT(atomic_read(&inode->i_sem.count) <= 0);
1021                 up(&inode->i_sem);
1022                 UP_WRITE_I_ALLOC_SEM(inode);
1023                 rc = ll_extent_lock(NULL, inode, lsm, LCK_PW, &policy, &lockh,
1024                                     ast_flags);
1025 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
1026                 DOWN_WRITE_I_ALLOC_SEM(inode);
1027                 down(&inode->i_sem);
1028 #else
1029                 down(&inode->i_sem);
1030                 DOWN_WRITE_I_ALLOC_SEM(inode);
1031 #endif
1032                 if (rc != 0)
1033                         RETURN(rc);
1034
1035                 rc = vmtruncate(inode, attr->ia_size);
1036
1037                 /* We need to drop the semaphore here, because this unlock may
1038                  * result in a cancellation, which will need the i_sem */
1039                 up(&inode->i_sem);
1040                 UP_WRITE_I_ALLOC_SEM(inode);
1041                 /* unlock now as we don't mind others file lockers racing with
1042                  * the mds updates below? */
1043                 err = ll_extent_unlock(NULL, inode, lsm, LCK_PW, &lockh);
1044 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
1045                 DOWN_WRITE_I_ALLOC_SEM(inode);
1046                 down(&inode->i_sem);
1047 #else
1048                 down(&inode->i_sem);
1049                 DOWN_WRITE_I_ALLOC_SEM(inode);
1050 #endif
1051                 if (err) {
1052                         CERROR("ll_extent_unlock failed: %d\n", err);
1053                         if (!rc)
1054                                 rc = err;
1055                 }
1056         } else if (ia_valid & (ATTR_MTIME | ATTR_MTIME_SET)) {
1057                 struct obdo oa;
1058
1059                 CDEBUG(D_INODE, "set mtime on OST inode %lu to %lu\n",
1060                        inode->i_ino, LTIME_S(attr->ia_mtime));
1061                 oa.o_id = lsm->lsm_object_id;
1062                 oa.o_valid = OBD_MD_FLID;
1063                 obdo_from_inode(&oa, inode, OBD_MD_FLTYPE | OBD_MD_FLATIME |
1064                                             OBD_MD_FLMTIME | OBD_MD_FLCTIME);
1065                 rc = obd_setattr(sbi->ll_osc_exp, &oa, lsm, NULL);
1066                 if (rc)
1067                         CERROR("obd_setattr fails: rc=%d\n", rc);
1068         }
1069         RETURN(rc);
1070 }
1071
1072 int ll_setattr(struct dentry *de, struct iattr *attr)
1073 {
1074         LBUG(); /* code is unused, but leave this in case of VFS changes */
1075         RETURN(-ENOSYS);
1076 }
1077
1078 int ll_statfs_internal(struct super_block *sb, struct obd_statfs *osfs,
1079                        unsigned long max_age)
1080 {
1081         struct ll_sb_info *sbi = ll_s2sbi(sb);
1082         struct obd_statfs obd_osfs;
1083         int rc;
1084         ENTRY;
1085
1086         rc = obd_statfs(class_exp2obd(sbi->ll_mdc_exp), osfs, max_age);
1087         if (rc) {
1088                 CERROR("mdc_statfs fails: rc = %d\n", rc);
1089                 RETURN(rc);
1090         }
1091
1092         osfs->os_type = sb->s_magic;
1093
1094         CDEBUG(D_SUPER, "MDC blocks "LPU64"/"LPU64" objects "LPU64"/"LPU64"\n",
1095                osfs->os_bavail, osfs->os_blocks, osfs->os_ffree,osfs->os_files);
1096
1097         rc = obd_statfs(class_exp2obd(sbi->ll_osc_exp), &obd_osfs, max_age);
1098         if (rc) {
1099                 CERROR("obd_statfs fails: rc = %d\n", rc);
1100                 RETURN(rc);
1101         }
1102
1103         CDEBUG(D_SUPER, "OSC blocks "LPU64"/"LPU64" objects "LPU64"/"LPU64"\n",
1104                obd_osfs.os_bavail, obd_osfs.os_blocks, obd_osfs.os_ffree,
1105                obd_osfs.os_files);
1106
1107         osfs->os_blocks = obd_osfs.os_blocks;
1108         osfs->os_bfree = obd_osfs.os_bfree;
1109         osfs->os_bavail = obd_osfs.os_bavail;
1110
1111         /* If we don't have as many objects free on the OST as inodes
1112          * on the MDS, we reduce the total number of inodes to
1113          * compensate, so that the "inodes in use" number is correct.
1114          */
1115         if (obd_osfs.os_ffree < osfs->os_ffree) {
1116                 osfs->os_files = (osfs->os_files - osfs->os_ffree) +
1117                         obd_osfs.os_ffree;
1118                 osfs->os_ffree = obd_osfs.os_ffree;
1119         }
1120
1121         RETURN(rc);
1122 }
1123
1124 int ll_statfs(struct super_block *sb, struct kstatfs *sfs)
1125 {
1126         struct obd_statfs osfs;
1127         int rc;
1128
1129         CDEBUG(D_VFSTRACE, "VFS Op:\n");
1130         lprocfs_counter_incr(ll_s2sbi(sb)->ll_stats, LPROC_LL_STAFS);
1131
1132         /* For now we will always get up-to-date statfs values, but in the
1133          * future we may allow some amount of caching on the client (e.g.
1134          * from QOS or lprocfs updates). */
1135         rc = ll_statfs_internal(sb, &osfs, jiffies - 1);
1136         if (rc)
1137                 return rc;
1138
1139         statfs_unpack(sfs, &osfs);
1140
1141         if (sizeof(sfs->f_blocks) == 4) {
1142                 while (osfs.os_blocks > ~0UL) {
1143                         sfs->f_bsize <<= 1;
1144
1145                         osfs.os_blocks >>= 1;
1146                         osfs.os_bfree >>= 1;
1147                         osfs.os_bavail >>= 1;
1148                 }
1149         }
1150
1151         sfs->f_blocks = osfs.os_blocks;
1152         sfs->f_bfree = osfs.os_bfree;
1153         sfs->f_bavail = osfs.os_bavail;
1154
1155         return 0;
1156 }
1157
1158 void ll_update_inode(struct inode *inode, struct mds_body *body,
1159                      struct lov_stripe_md *lsm)
1160 {
1161         struct ll_inode_info *lli = ll_i2info(inode);
1162
1163         LASSERT ((lsm != NULL) == ((body->valid & OBD_MD_FLEASIZE) != 0));
1164         if (lsm != NULL) {
1165                 if (lli->lli_smd == NULL) {
1166                         lli->lli_smd = lsm;
1167                         lli->lli_maxbytes = lsm->lsm_maxbytes;
1168                         if (lli->lli_maxbytes > PAGE_CACHE_MAXBYTES)
1169                                 lli->lli_maxbytes = PAGE_CACHE_MAXBYTES;
1170                 } else {
1171                         if (memcmp(lli->lli_smd, lsm, sizeof(*lsm))) {
1172                                 CERROR("lsm mismatch for inode %ld\n",
1173                                        inode->i_ino);
1174                                 CERROR("lli_smd:\n");
1175                                 dump_lsm(D_ERROR, lli->lli_smd);
1176                                 CERROR("lsm:\n");
1177                                 dump_lsm(D_ERROR, lsm);
1178                                 LBUG();
1179                         }
1180                 }
1181                 /* bug 2844 - limit i_blksize for broken user-space apps */
1182                 LASSERTF(lsm->lsm_xfersize != 0, "%lu\n", lsm->lsm_xfersize);
1183                 inode->i_blksize = min(lsm->lsm_xfersize, LL_MAX_BLKSIZE);
1184                 if (lli->lli_smd != lsm)
1185                         obd_free_memmd(ll_i2obdexp(inode), &lsm);
1186         }
1187
1188         if (body->valid & OBD_MD_FLID)
1189                 inode->i_ino = body->ino;
1190         if (body->valid & OBD_MD_FLATIME)
1191                 LTIME_S(inode->i_atime) = body->atime;
1192         if (body->valid & OBD_MD_FLMTIME &&
1193             body->mtime > LTIME_S(inode->i_mtime)) {
1194                 CDEBUG(D_INODE, "setting ino %lu mtime from %lu to %u\n",
1195                        inode->i_ino, LTIME_S(inode->i_mtime), body->mtime);
1196                 LTIME_S(inode->i_mtime) = body->mtime;
1197         }
1198         if (body->valid & OBD_MD_FLCTIME &&
1199             body->ctime > LTIME_S(inode->i_ctime))
1200                 LTIME_S(inode->i_ctime) = body->ctime;
1201         if (body->valid & OBD_MD_FLMODE)
1202                 inode->i_mode = (inode->i_mode & S_IFMT)|(body->mode & ~S_IFMT);
1203         if (body->valid & OBD_MD_FLTYPE)
1204                 inode->i_mode = (inode->i_mode & ~S_IFMT)|(body->mode & S_IFMT);
1205         if (body->valid & OBD_MD_FLUID)
1206                 inode->i_uid = body->uid;
1207         if (body->valid & OBD_MD_FLGID)
1208                 inode->i_gid = body->gid;
1209         if (body->valid & OBD_MD_FLFLAGS)
1210                 inode->i_flags = body->flags;
1211         if (body->valid & OBD_MD_FLNLINK)
1212                 inode->i_nlink = body->nlink;
1213         if (body->valid & OBD_MD_FLGENER)
1214                 inode->i_generation = body->generation;
1215         if (body->valid & OBD_MD_FLRDEV)
1216 #if (LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0))
1217                 inode->i_rdev = body->rdev;
1218 #else
1219                 inode->i_rdev = old_decode_dev(body->rdev);
1220 #endif
1221         if (body->valid & OBD_MD_FLSIZE)
1222                 inode->i_size = body->size;
1223         if (body->valid & OBD_MD_FLBLOCKS)
1224                 inode->i_blocks = body->blocks;
1225
1226         if (body->valid & OBD_MD_FLSIZE)
1227                 set_bit(LLI_F_HAVE_MDS_SIZE_LOCK, &lli->lli_flags);
1228 }
1229
1230 #if (LINUX_VERSION_CODE >= KERNEL_VERSION(2,5,0))
1231 static struct backing_dev_info ll_backing_dev_info = {
1232         .ra_pages       = 0,    /* No readahead */
1233         .memory_backed  = 0,    /* Does contribute to dirty memory */
1234 };
1235 #endif
1236
1237 void ll_read_inode2(struct inode *inode, void *opaque)
1238 {
1239         struct lustre_md *md = opaque;
1240         struct ll_inode_info *lli = ll_i2info(inode);
1241         ENTRY;
1242
1243         CDEBUG(D_VFSTRACE, "VFS Op:inode=%lu/%u(%p)\n", inode->i_ino,
1244                inode->i_generation, inode);
1245
1246         ll_lli_init(lli);
1247
1248         LASSERT(!lli->lli_smd);
1249
1250         /* Core attributes from the MDS first.  This is a new inode, and
1251          * the VFS doesn't zero times in the core inode so we have to do
1252          * it ourselves.  They will be overwritten by either MDS or OST
1253          * attributes - we just need to make sure they aren't newer. */
1254         LTIME_S(inode->i_mtime) = 0;
1255         LTIME_S(inode->i_atime) = 0;
1256         LTIME_S(inode->i_ctime) = 0;
1257         inode->i_rdev = 0;
1258         ll_update_inode(inode, md->body, md->lsm);
1259
1260         /* OIDEBUG(inode); */
1261
1262         if (S_ISREG(inode->i_mode)) {
1263                 inode->i_op = &ll_file_inode_operations;
1264                 inode->i_fop = &ll_file_operations;
1265                 inode->i_mapping->a_ops = &ll_aops;
1266                 EXIT;
1267         } else if (S_ISDIR(inode->i_mode)) {
1268                 inode->i_op = &ll_dir_inode_operations;
1269                 inode->i_fop = &ll_dir_operations;
1270                 inode->i_mapping->a_ops = &ll_dir_aops;
1271                 EXIT;
1272         } else if (S_ISLNK(inode->i_mode)) {
1273                 inode->i_op = &ll_fast_symlink_inode_operations;
1274                 EXIT;
1275         } else {
1276                 inode->i_op = &ll_special_inode_operations;
1277
1278 #if (LINUX_VERSION_CODE > KERNEL_VERSION(2,5,0))
1279                 init_special_inode(inode, inode->i_mode,
1280                                    kdev_t_to_nr(inode->i_rdev));
1281
1282                 /* initializing backing dev info. */
1283                 inode->i_mapping->backing_dev_info = &ll_backing_dev_info;
1284 #else
1285                 init_special_inode(inode, inode->i_mode, inode->i_rdev);
1286 #endif
1287                 lli->ll_save_ifop = inode->i_fop;
1288
1289                 if (S_ISCHR(inode->i_mode))
1290                         inode->i_fop = &ll_special_chr_inode_fops;
1291                 else if (S_ISBLK(inode->i_mode))
1292                         inode->i_fop = &ll_special_blk_inode_fops;
1293                 else if (S_ISFIFO(inode->i_mode))
1294                         inode->i_fop = &ll_special_fifo_inode_fops;
1295                 else if (S_ISSOCK(inode->i_mode))
1296                         inode->i_fop = &ll_special_sock_inode_fops;
1297                 EXIT;
1298         }
1299 }
1300
1301 int ll_iocontrol(struct inode *inode, struct file *file,
1302                  unsigned int cmd, unsigned long arg)
1303 {
1304         struct ll_sb_info *sbi = ll_i2sbi(inode);
1305         struct ptlrpc_request *req = NULL;
1306         int rc, flags = 0;
1307         ENTRY;
1308
1309         switch(cmd) {
1310         case EXT3_IOC_GETFLAGS: {
1311                 struct ll_fid fid;
1312                 unsigned long valid = OBD_MD_FLFLAGS;
1313                 struct mds_body *body;
1314
1315                 ll_inode2fid(&fid, inode);
1316                 rc = mdc_getattr(sbi->ll_mdc_exp, &fid, valid, 0, &req);
1317                 if (rc) {
1318                         CERROR("failure %d inode %lu\n", rc, inode->i_ino);
1319                         RETURN(-abs(rc));
1320                 }
1321
1322                 body = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*body));
1323
1324                 if (body->flags & S_APPEND)
1325                         flags |= EXT3_APPEND_FL;
1326                 if (body->flags & S_IMMUTABLE)
1327                         flags |= EXT3_IMMUTABLE_FL;
1328                 if (body->flags & S_NOATIME)
1329                         flags |= EXT3_NOATIME_FL;
1330
1331                 ptlrpc_req_finished (req);
1332
1333                 RETURN(put_user(flags, (int *)arg));
1334         }
1335         case EXT3_IOC_SETFLAGS: {
1336                 struct mdc_op_data op_data;
1337                 struct iattr attr;
1338                 struct obdo *oa;
1339                 struct lov_stripe_md *lsm = ll_i2info(inode)->lli_smd;
1340
1341                 if (get_user(flags, (int *)arg))
1342                         RETURN(-EFAULT);
1343
1344                 oa = obdo_alloc();
1345                 if (!oa)
1346                         RETURN(-ENOMEM);
1347
1348                 ll_prepare_mdc_op_data(&op_data, inode, NULL, NULL, 0, 0);
1349
1350                 memset(&attr, 0x0, sizeof(attr));
1351                 attr.ia_attr_flags = flags;
1352                 attr.ia_valid |= ATTR_ATTR_FLAG;
1353
1354                 rc = mdc_setattr(sbi->ll_mdc_exp, &op_data,
1355                                  &attr, NULL, 0, NULL, 0, &req);
1356                 if (rc) {
1357                         ptlrpc_req_finished(req);
1358                         if (rc != -EPERM && rc != -EACCES)
1359                                 CERROR("mdc_setattr fails: rc = %d\n", rc);
1360                         obdo_free(oa);
1361                         RETURN(rc);
1362                 }
1363                 ptlrpc_req_finished(req);
1364
1365                 oa->o_id = lsm->lsm_object_id;
1366                 oa->o_flags = flags;
1367                 oa->o_valid = OBD_MD_FLID | OBD_MD_FLFLAGS;
1368
1369                 rc = obd_setattr(sbi->ll_osc_exp, oa, lsm, NULL);
1370                 obdo_free(oa);
1371                 if (rc) {
1372                         if (rc != -EPERM && rc != -EACCES)
1373                                 CERROR("mdc_setattr fails: rc = %d\n", rc);
1374                         RETURN(rc);
1375                 }
1376
1377                 if (flags & EXT3_APPEND_FL)
1378                         inode->i_flags |= S_APPEND;
1379                 else
1380                         inode->i_flags &= ~S_APPEND;
1381                 if (flags & EXT3_IMMUTABLE_FL)
1382                         inode->i_flags |= S_IMMUTABLE;
1383                 else
1384                         inode->i_flags &= ~S_IMMUTABLE;
1385                 if (flags & EXT3_NOATIME_FL)
1386                         inode->i_flags |= S_NOATIME;
1387                 else
1388                         inode->i_flags &= ~S_NOATIME;
1389
1390                 RETURN(0);
1391         }
1392         default:
1393                 RETURN(-ENOSYS);
1394         }
1395
1396         RETURN(0);
1397 }
1398
1399 void ll_umount_begin(struct super_block *sb)
1400 {
1401         struct ll_sb_info *sbi = ll_s2sbi(sb);
1402         struct obd_device *obd;
1403         struct obd_ioctl_data ioc_data = { 0 };
1404         ENTRY;
1405         CDEBUG(D_VFSTRACE, "VFS Op:\n");
1406
1407         obd = class_exp2obd(sbi->ll_mdc_exp);
1408         if (obd == NULL) {
1409                 CERROR("Invalid MDC connection handle "LPX64"\n",
1410                        sbi->ll_mdc_exp->exp_handle.h_cookie);
1411                 EXIT;
1412                 return;
1413         }
1414         obd->obd_no_recov = 1;
1415         obd_iocontrol(IOC_OSC_SET_ACTIVE, sbi->ll_mdc_exp, sizeof ioc_data,
1416                       &ioc_data, NULL);
1417
1418         obd = class_exp2obd(sbi->ll_osc_exp);
1419         if (obd == NULL) {
1420                 CERROR("Invalid LOV connection handle "LPX64"\n",
1421                        sbi->ll_osc_exp->exp_handle.h_cookie);
1422                 EXIT;
1423                 return;
1424         }
1425
1426         obd->obd_no_recov = 1;
1427         obd_iocontrol(IOC_OSC_SET_ACTIVE, sbi->ll_osc_exp, sizeof ioc_data,
1428                       &ioc_data, NULL);
1429
1430         /* Really, we'd like to wait until there are no requests outstanding,
1431          * and then continue.  For now, we just invalidate the requests,
1432          * schedule, and hope.
1433          */
1434         schedule();
1435
1436         EXIT;
1437 }
1438
1439 int ll_prep_inode(struct obd_export *exp, struct inode **inode,
1440                   struct ptlrpc_request *req, int offset,struct super_block *sb)
1441 {
1442         struct lustre_md md;
1443         int rc = 0;
1444
1445         rc = mdc_req2lustre_md(req, offset, exp, &md);
1446         if (rc)
1447                 RETURN(rc);
1448
1449         if (*inode) {
1450                 ll_update_inode(*inode, md.body, md.lsm);
1451         } else {
1452                 LASSERT(sb);
1453                 *inode = ll_iget(sb, md.body->ino, &md);
1454                 if (*inode == NULL || is_bad_inode(*inode)) {
1455                         /* free the lsm if we allocated one above */
1456                         if (md.lsm != NULL)
1457                                 obd_free_memmd(exp, &md.lsm);
1458                         rc = -ENOMEM;
1459                         CERROR("new_inode -fatal: rc %d\n", rc);
1460                 }
1461         }
1462
1463         RETURN(rc);
1464 }
1465
1466 char *llap_origins[] = {
1467         [LLAP_ORIGIN_UNKNOWN] = "--",
1468         [LLAP_ORIGIN_READPAGE] = "rp",
1469         [LLAP_ORIGIN_READAHEAD] = "ra",
1470         [LLAP_ORIGIN_COMMIT_WRITE] = "cw",
1471         [LLAP_ORIGIN_WRITEPAGE] = "wp",
1472 };
1473
1474 struct ll_async_page *llite_pglist_next_llap(struct ll_sb_info *sbi,
1475                                              struct list_head *list)
1476 {
1477         struct ll_async_page *llap;
1478         struct list_head *pos;
1479
1480         list_for_each(pos, list) {
1481                 if (pos == &sbi->ll_pglist)
1482                         return NULL;
1483                 llap = list_entry(pos, struct ll_async_page, llap_pglist_item);
1484                 if (llap->llap_page == NULL)
1485                         continue;
1486                 return llap;
1487         }
1488         LBUG();
1489         return NULL;
1490 }
1491