/* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
* vim:expandtab:shiftwidth=8:tabstop=8:
*
- * lustre/lib/lvfs_linux.c
- * Lustre filesystem abstraction routines
+ * GPL HEADER START
*
- * Copyright (C) 2002, 2003 Cluster File Systems, Inc.
- * Author: Andreas Dilger <adilger@clusterfs.com>
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
*
- * This file is part of Lustre, http://www.lustre.org.
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License version 2 only,
+ * as published by the Free Software Foundation.
*
- * Lustre is free software; you can redistribute it and/or
- * modify it under the terms of version 2 of the GNU General Public
- * License as published by the Free Software Foundation.
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License version 2 for more details (a copy is included
+ * in the LICENSE file that accompanied this code).
*
- * Lustre is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
+ * You should have received a copy of the GNU General Public License
+ * version 2 along with this program; If not, see
+ * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
*
- * You should have received a copy of the GNU General Public License
- * along with Lustre; if not, write to the Free Software
- * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
+ * CA 95054 USA or visit www.sun.com if you need additional information or
+ * have any questions.
+ *
+ * GPL HEADER END
+ */
+/*
+ * Copyright 2008 Sun Microsystems, Inc. All rights reserved
+ * Use is subject to license terms.
+ */
+/*
+ * This file is part of Lustre, http://www.lustre.org/
+ * Lustre is a trademark of Sun Microsystems, Inc.
+ *
+ * lustre/lvfs/lvfs_linux.c
+ *
+ * Author: Andreas Dilger <adilger@clusterfs.com>
*/
#ifndef EXPORT_SYMTAB
#include <linux/pagemap.h>
#include <linux/quotaops.h>
#include <linux/version.h>
-#include <libcfs/kp30.h>
+#include <libcfs/libcfs.h>
#include <lustre_fsfilt.h>
#include <obd.h>
-#include <obd_class.h>
#include <linux/module.h>
#include <linux/init.h>
#include <linux/lustre_compat25.h>
#include <lustre_lib.h>
#include <lustre_quota.h>
-atomic_t obd_memory;
-int obd_memmax;
+__u64 obd_max_pages = 0;
+__u64 obd_max_alloc = 0;
+struct lprocfs_stats *obd_memory = NULL;
+spinlock_t obd_updatemax_lock = SPIN_LOCK_UNLOCKED;
+/* refine later and change to seqlock or simlar from libcfs */
/* Debugging check only needed during development */
#ifdef OBD_CTXT_DEBUG
save->ngroups = current_ngroups;
current_ngroups = 0;
} else {
-#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,4)
task_lock(current);
save->group_info = current->group_info;
current->group_info = ginfo;
task_unlock(current);
-#else
- LASSERT(ginfo->ngroups <= NGROUPS);
- LASSERT(current->ngroups <= NGROUPS_SMALL);
- /* save old */
- save->group_info.ngroups = current->ngroups;
- if (current->ngroups)
- memcpy(save->group_info.small_block, current->groups,
- current->ngroups * sizeof(gid_t));
- /* push new */
- current->ngroups = ginfo->ngroups;
- if (ginfo->ngroups)
- memcpy(current->groups, ginfo->small_block,
- current->ngroups * sizeof(gid_t));
-#endif
}
}
if (!ginfo) {
current_ngroups = save->ngroups;
} else {
-#if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,4)
task_lock(current);
current->group_info = save->group_info;
task_unlock(current);
-#else
- current->ngroups = save->group_info.ngroups;
- if (current->ngroups)
- memcpy(current->groups, save->group_info.small_block,
- current->ngroups * sizeof(gid_t));
-#endif
}
}
EXPORT_SYMBOL(simple_mknod);
/* utility to make a directory */
-struct dentry *simple_mkdir(struct dentry *dir, char *name, int mode, int fix)
+struct dentry *simple_mkdir(struct dentry *dir, struct vfsmount *mnt,
+ char *name, int mode, int fix)
{
struct dentry *dchild;
int err = 0;
GOTO(out_up, dchild);
}
- err = vfs_mkdir(dir->d_inode, dchild, mode);
+ err = ll_vfs_mkdir(dir->d_inode, dchild, mnt, mode);
if (err)
GOTO(out_err, err);
EXPORT_SYMBOL(simple_mkdir);
/* utility to rename a file */
-int lustre_rename(struct dentry *dir, char *oldname, char *newname)
+int lustre_rename(struct dentry *dir, struct vfsmount *mnt,
+ char *oldname, char *newname)
{
struct dentry *dchild_old, *dchild_new;
int err = 0;
if (IS_ERR(dchild_new))
GOTO(put_old, err = PTR_ERR(dchild_new));
- err = vfs_rename(dir->d_inode, dchild_old, dir->d_inode, dchild_new);
+ err = ll_vfs_rename(dir->d_inode, dchild_old, mnt,
+ dir->d_inode, dchild_new, mnt);
dput(dchild_new);
put_old:
return 0;
}
EXPORT_SYMBOL(l_readdir);
-EXPORT_SYMBOL(obd_memory);
-EXPORT_SYMBOL(obd_memmax);
-
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
-static spinlock_t obd_memlist_lock = SPIN_LOCK_UNLOCKED;
-static struct hlist_head *obd_memtable = NULL;
-static unsigned long obd_memtable_size = 0;
-
-static int lvfs_memdbg_init(int size)
-{
- struct hlist_head *head;
- int i;
-
- LASSERT(size > sizeof(sizeof(struct hlist_head)));
- obd_memtable_size = size / sizeof(struct hlist_head);
-
- CWARN("Allocating %lu memdbg entries.\n",
- (unsigned long)obd_memtable_size);
-
- LASSERT(obd_memtable == NULL);
- obd_memtable = kmalloc(size, GFP_KERNEL);
- if (!obd_memtable)
- return -ENOMEM;
-
- i = obd_memtable_size;
- head = obd_memtable;
- do {
- INIT_HLIST_HEAD(head);
- head++;
- i--;
- } while(i);
-
- return 0;
-}
-
-static int lvfs_memdbg_cleanup(void)
-{
- struct hlist_node *node = NULL, *tmp = NULL;
- struct hlist_head *head;
- struct obd_mem_track *mt;
- int i;
-
- spin_lock(&obd_memlist_lock);
- for (i = 0, head = obd_memtable; i < obd_memtable_size; i++, head++) {
- hlist_for_each_safe(node, tmp, head) {
- mt = hlist_entry(node, struct obd_mem_track, mt_hash);
- hlist_del_init(&mt->mt_hash);
- kfree(mt);
- }
- }
- spin_unlock(&obd_memlist_lock);
- kfree(obd_memtable);
- return 0;
-}
-
-static inline unsigned long const hashfn(void *ptr)
-{
- return (unsigned long)ptr &
- (obd_memtable_size - 1);
-}
-
-static void __lvfs_memdbg_insert(struct obd_mem_track *mt)
-{
- struct hlist_head *head = obd_memtable +
- hashfn(mt->mt_ptr);
- hlist_add_head(&mt->mt_hash, head);
-}
-
-void lvfs_memdbg_insert(struct obd_mem_track *mt)
-{
- spin_lock(&obd_memlist_lock);
- __lvfs_memdbg_insert(mt);
- spin_unlock(&obd_memlist_lock);
-}
-EXPORT_SYMBOL(lvfs_memdbg_insert);
-
-static void __lvfs_memdbg_remove(struct obd_mem_track *mt)
-{
- hlist_del_init(&mt->mt_hash);
-}
-
-void lvfs_memdbg_remove(struct obd_mem_track *mt)
-{
- spin_lock(&obd_memlist_lock);
- __lvfs_memdbg_remove(mt);
- spin_unlock(&obd_memlist_lock);
-}
-EXPORT_SYMBOL(lvfs_memdbg_remove);
-
-static struct obd_mem_track *__lvfs_memdbg_find(void *ptr)
-{
- struct hlist_node *node = NULL;
- struct obd_mem_track *mt = NULL;
- struct hlist_head *head;
-
- head = obd_memtable + hashfn(ptr);
-
- hlist_for_each(node, head) {
- mt = hlist_entry(node, struct obd_mem_track, mt_hash);
- if ((unsigned long)mt->mt_ptr == (unsigned long)ptr)
- break;
- mt = NULL;
- }
- return mt;
-}
-
-struct obd_mem_track *lvfs_memdbg_find(void *ptr)
-{
- struct obd_mem_track *mt;
-
- spin_lock(&obd_memlist_lock);
- mt = __lvfs_memdbg_find(ptr);
- spin_unlock(&obd_memlist_lock);
-
- return mt;
-}
-EXPORT_SYMBOL(lvfs_memdbg_find);
-
-int lvfs_memdbg_check_insert(struct obd_mem_track *mt)
-{
- struct obd_mem_track *tmp;
-
- spin_lock(&obd_memlist_lock);
- tmp = __lvfs_memdbg_find(mt->mt_ptr);
- if (tmp == NULL) {
- __lvfs_memdbg_insert(mt);
- spin_unlock(&obd_memlist_lock);
- return 1;
- }
- spin_unlock(&obd_memlist_lock);
- return 0;
-}
-EXPORT_SYMBOL(lvfs_memdbg_check_insert);
-
-struct obd_mem_track *
-lvfs_memdbg_check_remove(void *ptr)
-{
- struct obd_mem_track *mt;
-
- spin_lock(&obd_memlist_lock);
- mt = __lvfs_memdbg_find(ptr);
- if (mt) {
- __lvfs_memdbg_remove(mt);
- spin_unlock(&obd_memlist_lock);
- return mt;
- }
- spin_unlock(&obd_memlist_lock);
- return NULL;
-}
-EXPORT_SYMBOL(lvfs_memdbg_check_remove);
-#endif
-
-void lvfs_memdbg_show(void)
-{
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
- struct hlist_node *node = NULL;
- struct hlist_head *head;
- struct obd_mem_track *mt;
- int header = 0;
-#endif
- int leaked;
-
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
- int i;
-#endif
-
- leaked = atomic_read(&obd_memory);
-
- if (leaked > 0) {
- CWARN("Memory leaks detected (max %d, leaked %d)\n",
- obd_memmax, leaked);
- }
-
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
- spin_lock(&obd_memlist_lock);
- for (i = 0, head = obd_memtable; i < obd_memtable_size; i++, head++) {
- hlist_for_each(node, head) {
- if (header == 0) {
- CWARN("Abnormal memory activities:\n");
- header = 1;
- }
- mt = hlist_entry(node, struct obd_mem_track, mt_hash);
- CWARN(" [%s] ptr: 0x%p, size: %d, src at %s\n",
- ((mt->mt_flags & OBD_MT_WRONG_SIZE) ?
- "wrong size" : "leaked memory"),
- mt->mt_ptr, mt->mt_size, mt->mt_loc);
- }
- }
- spin_unlock(&obd_memlist_lock);
-#endif
-}
-EXPORT_SYMBOL(lvfs_memdbg_show);
#ifdef LUSTRE_KERNEL_VERSION
#ifndef HAVE_CLEAR_RDONLY_ON_PUT
EXPORT_SYMBOL(lvfs_check_io_health);
#endif /* LUSTRE_KERNEL_VERSION */
-static int __init lvfs_linux_init(void)
+void obd_update_maxusage()
{
- ENTRY;
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
- lvfs_memdbg_init(PAGE_SIZE);
-#endif
- RETURN(0);
+ __u64 max1, max2;
+
+ max1 = obd_pages_sum();
+ max2 = obd_memory_sum();
+
+ spin_lock(&obd_updatemax_lock);
+ if (max1 > obd_max_pages)
+ obd_max_pages = max1;
+ if (max2 > obd_max_alloc)
+ obd_max_alloc = max2;
+ spin_unlock(&obd_updatemax_lock);
+
}
-static void __exit lvfs_linux_exit(void)
+__u64 obd_memory_max(void)
{
- ENTRY;
+ __u64 ret;
- lvfs_memdbg_show();
-
-#if defined (CONFIG_DEBUG_MEMORY) && defined(__KERNEL__)
- lvfs_memdbg_cleanup();
-#endif
- EXIT;
+ spin_lock(&obd_updatemax_lock);
+ ret = obd_max_alloc;
+ spin_unlock(&obd_updatemax_lock);
+
+ return ret;
}
-MODULE_AUTHOR("Cluster File Systems, Inc. <info@clusterfs.com>");
+__u64 obd_pages_max(void)
+{
+ __u64 ret;
+
+ spin_lock(&obd_updatemax_lock);
+ ret = obd_max_pages;
+ spin_unlock(&obd_updatemax_lock);
+
+ return ret;
+}
+
+EXPORT_SYMBOL(obd_update_maxusage);
+EXPORT_SYMBOL(obd_pages_max);
+EXPORT_SYMBOL(obd_memory_max);
+EXPORT_SYMBOL(obd_memory);
+
+#ifdef LPROCFS
+__s64 lprocfs_read_helper(struct lprocfs_counter *lc,
+ enum lprocfs_fields_flags field)
+{
+ __s64 ret = 0;
+ int centry;
+
+ if (!lc)
+ RETURN(0);
+ do {
+ centry = atomic_read(&lc->lc_cntl.la_entry);
+
+ switch (field) {
+ case LPROCFS_FIELDS_FLAGS_CONFIG:
+ ret = lc->lc_config;
+ break;
+ case LPROCFS_FIELDS_FLAGS_SUM:
+ ret = lc->lc_sum;
+ break;
+ case LPROCFS_FIELDS_FLAGS_MIN:
+ ret = lc->lc_min;
+ break;
+ case LPROCFS_FIELDS_FLAGS_MAX:
+ ret = lc->lc_max;
+ break;
+ case LPROCFS_FIELDS_FLAGS_AVG:
+ ret = (lc->lc_max - lc->lc_min)/2;
+ break;
+ case LPROCFS_FIELDS_FLAGS_SUMSQUARE:
+ ret = lc->lc_sumsquare;
+ break;
+ case LPROCFS_FIELDS_FLAGS_COUNT:
+ ret = lc->lc_count;
+ break;
+ default:
+ break;
+ };
+ } while (centry != atomic_read(&lc->lc_cntl.la_entry) &&
+ centry != atomic_read(&lc->lc_cntl.la_exit));
+
+ RETURN(ret);
+}
+EXPORT_SYMBOL(lprocfs_read_helper);
+#endif /* LPROCFS */
+
+MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
MODULE_DESCRIPTION("Lustre VFS Filesystem Helper v0.1");
MODULE_LICENSE("GPL");
-
-module_init(lvfs_linux_init);
-module_exit(lvfs_linux_exit);