-/* inode.c: /proc/openprom handling routines
+/* $Id: inode.c,v 1.15 2001/11/12 09:43:39 davem Exp $
+ * openpromfs.c: /proc/openprom handling routines
*
* Copyright (C) 1996-1999 Jakub Jelinek (jakub@redhat.com)
* Copyright (C) 1998 Eddie C. Dost (ecd@skynet.be)
#include <linux/openprom_fs.h>
#include <linux/init.h>
#include <linux/slab.h>
-#include <linux/seq_file.h>
+#include <linux/smp_lock.h>
#include <asm/openprom.h>
#include <asm/oplib.h>
-#include <asm/prom.h>
#include <asm/uaccess.h>
-static DEFINE_MUTEX(op_mutex);
-
-#define OPENPROM_ROOT_INO 0
-
-enum op_inode_type {
- op_inode_node,
- op_inode_prop,
-};
-
-union op_inode_data {
- struct device_node *node;
- struct property *prop;
-};
-
-struct op_inode_info {
- struct inode vfs_inode;
- enum op_inode_type type;
- union op_inode_data u;
-};
+#define ALIASES_NNODES 64
+
+typedef struct {
+ u16 parent;
+ u16 next;
+ u16 child;
+ u16 first_prop;
+ u32 node;
+} openpromfs_node;
+
+typedef struct {
+#define OPP_STRING 0x10
+#define OPP_STRINGLIST 0x20
+#define OPP_BINARY 0x40
+#define OPP_HEXSTRING 0x80
+#define OPP_DIRTY 0x01
+#define OPP_QUOTED 0x02
+#define OPP_NOTQUOTED 0x04
+#define OPP_ASCIIZ 0x08
+ u32 flag;
+ u32 alloclen;
+ u32 len;
+ char *value;
+ char name[8];
+} openprom_property;
+
+static openpromfs_node *nodes;
+static int alloced;
+static u16 last_node;
+static u16 first_prop;
+static u16 options = 0xffff;
+static u16 aliases = 0xffff;
+static int aliases_nodes;
+static char *alias_names [ALIASES_NNODES];
+
+#define OPENPROM_ROOT_INO 16
+#define OPENPROM_FIRST_INO OPENPROM_ROOT_INO
+#define NODE(ino) nodes[ino - OPENPROM_FIRST_INO]
+#define NODE2INO(node) (node + OPENPROM_FIRST_INO)
+#define NODEP2INO(no) (no + OPENPROM_FIRST_INO + last_node)
+
+static int openpromfs_create (struct inode *, struct dentry *, int, struct nameidata *);
+static int openpromfs_readdir(struct file *, void *, filldir_t);
+static struct dentry *openpromfs_lookup(struct inode *, struct dentry *dentry, struct nameidata *nd);
+static int openpromfs_unlink (struct inode *, struct dentry *dentry);
-static inline struct op_inode_info *OP_I(struct inode *inode)
+static ssize_t nodenum_read(struct file *file, char __user *buf,
+ size_t count, loff_t *ppos)
{
- return container_of(inode, struct op_inode_info, vfs_inode);
+ struct inode *inode = file->f_dentry->d_inode;
+ char buffer[10];
+
+ if (count < 0 || !inode->u.generic_ip)
+ return -EINVAL;
+ sprintf (buffer, "%8.8x\n", (u32)(long)(inode->u.generic_ip));
+ if (file->f_pos >= 9)
+ return 0;
+ if (count > 9 - file->f_pos)
+ count = 9 - file->f_pos;
+ if (copy_to_user(buf, buffer + file->f_pos, count))
+ return -EFAULT;
+ *ppos += count;
+ return count;
}
-static int is_string(unsigned char *p, int len)
+static ssize_t property_read(struct file *filp, char __user *buf,
+ size_t count, loff_t *ppos)
{
- int i;
-
- for (i = 0; i < len; i++) {
- unsigned char val = p[i];
-
- if ((i && !val) ||
- (val >= ' ' && val <= '~'))
- continue;
-
+ struct inode *inode = filp->f_dentry->d_inode;
+ int i, j, k;
+ u32 node;
+ char *p, *s;
+ u32 *q;
+ openprom_property *op;
+ char buffer[64];
+
+ if (!filp->private_data) {
+ node = nodes[(u16)((long)inode->u.generic_ip)].node;
+ i = ((u32)(long)inode->u.generic_ip) >> 16;
+ if ((u16)((long)inode->u.generic_ip) == aliases) {
+ if (i >= aliases_nodes)
+ p = NULL;
+ else
+ p = alias_names [i];
+ } else
+ for (p = prom_firstprop (node, buffer);
+ i && p && *p;
+ p = prom_nextprop (node, p, buffer), i--)
+ /* nothing */ ;
+ if (!p || !*p)
+ return -EIO;
+ i = prom_getproplen (node, p);
+ if (i < 0) {
+ if ((u16)((long)inode->u.generic_ip) == aliases)
+ i = 0;
+ else
+ return -EIO;
+ }
+ k = i;
+ if (i < 64) i = 64;
+ filp->private_data = kmalloc (sizeof (openprom_property)
+ + (j = strlen (p)) + 2 * i,
+ GFP_KERNEL);
+ if (!filp->private_data)
+ return -ENOMEM;
+ op = (openprom_property *)filp->private_data;
+ op->flag = 0;
+ op->alloclen = 2 * i;
+ strcpy (op->name, p);
+ op->value = (char *)(((unsigned long)(op->name + j + 4)) & ~3);
+ op->len = k;
+ if (k && prom_getproperty (node, p, op->value, i) < 0)
+ return -EIO;
+ op->value [k] = 0;
+ if (k) {
+ for (s = NULL, p = op->value; p < op->value + k; p++) {
+ if ((*p >= ' ' && *p <= '~') || *p == '\n') {
+ op->flag |= OPP_STRING;
+ s = p;
+ continue;
+ }
+ if (p > op->value && !*p && s == p - 1) {
+ if (p < op->value + k - 1)
+ op->flag |= OPP_STRINGLIST;
+ else
+ op->flag |= OPP_ASCIIZ;
+ continue;
+ }
+ if (k == 1 && !*p) {
+ op->flag |= (OPP_STRING|OPP_ASCIIZ);
+ break;
+ }
+ op->flag &= ~(OPP_STRING|OPP_STRINGLIST);
+ if (k & 3)
+ op->flag |= OPP_HEXSTRING;
+ else
+ op->flag |= OPP_BINARY;
+ break;
+ }
+ if (op->flag & OPP_STRINGLIST)
+ op->flag &= ~(OPP_STRING);
+ if (op->flag & OPP_ASCIIZ)
+ op->len--;
+ }
+ } else
+ op = (openprom_property *)filp->private_data;
+ if (!count || !(op->len || (op->flag & OPP_ASCIIZ)))
return 0;
+ if (*ppos >= 0xffffff || count >= 0xffffff)
+ return -EINVAL;
+ if (op->flag & OPP_STRINGLIST) {
+ for (k = 0, p = op->value; p < op->value + op->len; p++)
+ if (!*p)
+ k++;
+ i = op->len + 4 * k + 3;
+ } else if (op->flag & OPP_STRING) {
+ i = op->len + 3;
+ } else if (op->flag & OPP_BINARY) {
+ i = (op->len * 9) >> 2;
+ } else {
+ i = (op->len << 1) + 1;
}
+ k = *ppos;
+ if (k >= i) return 0;
+ if (count > i - k) count = i - k;
+ if (op->flag & OPP_STRING) {
+ if (!k) {
+ if (put_user('\'', buf))
+ return -EFAULT;
+ k++;
+ count--;
+ }
- return 1;
-}
-
-static int property_show(struct seq_file *f, void *v)
-{
- struct property *prop = f->private;
- void *pval;
- int len;
+ if (k + count >= i - 2)
+ j = i - 2 - k;
+ else
+ j = count;
+
+ if (j >= 0) {
+ if (copy_to_user(buf + k - *ppos,
+ op->value + k - 1, j))
+ return -EFAULT;
+ count -= j;
+ k += j;
+ }
- len = prop->length;
- pval = prop->value;
+ if (count) {
+ if (put_user('\'', &buf [k++ - *ppos]))
+ return -EFAULT;
+ }
+ if (count > 1) {
+ if (put_user('\n', &buf [k++ - *ppos]))
+ return -EFAULT;
+ }
+ } else if (op->flag & OPP_STRINGLIST) {
+ char *tmp;
+
+ tmp = kmalloc (i, GFP_KERNEL);
+ if (!tmp)
+ return -ENOMEM;
+
+ s = tmp;
+ *s++ = '\'';
+ for (p = op->value; p < op->value + op->len; p++) {
+ if (!*p) {
+ strcpy(s, "' + '");
+ s += 5;
+ continue;
+ }
+ *s++ = *p;
+ }
+ strcpy(s, "'\n");
+
+ if (copy_to_user(buf, tmp + k, count))
+ return -EFAULT;
+
+ kfree(tmp);
+ k += count;
+
+ } else if (op->flag & OPP_BINARY) {
+ char buffer[10];
+ u32 *first, *last;
+ int first_off, last_cnt;
+
+ first = ((u32 *)op->value) + k / 9;
+ first_off = k % 9;
+ last = ((u32 *)op->value) + (k + count - 1) / 9;
+ last_cnt = (k + count) % 9;
+ if (!last_cnt) last_cnt = 9;
+
+ if (first == last) {
+ sprintf (buffer, "%08x.", *first);
+ if (copy_to_user(buf, buffer + first_off,
+ last_cnt - first_off))
+ return -EFAULT;
+ buf += last_cnt - first_off;
+ } else {
+ for (q = first; q <= last; q++) {
+ sprintf (buffer, "%08x.", *q);
+ if (q == first) {
+ if (copy_to_user(buf, buffer + first_off,
+ 9 - first_off))
+ return -EFAULT;
+ buf += 9 - first_off;
+ } else if (q == last) {
+ if (copy_to_user(buf, buffer, last_cnt))
+ return -EFAULT;
+ buf += last_cnt;
+ } else {
+ if (copy_to_user(buf, buffer, 9))
+ return -EFAULT;
+ buf += 9;
+ }
+ }
+ }
- if (is_string(pval, len)) {
- while (len > 0) {
- int n = strlen(pval);
+ if (last == (u32 *)(op->value + op->len - 4) && last_cnt == 9) {
+ if (put_user('\n', (buf - 1)))
+ return -EFAULT;
+ }
- seq_printf(f, "%s", (char *) pval);
+ k += count;
- /* Skip over the NULL byte too. */
- pval += n + 1;
- len -= n + 1;
+ } else if (op->flag & OPP_HEXSTRING) {
+ char buffer[3];
- if (len > 0)
- seq_printf(f, " + ");
+ if ((k < i - 1) && (k & 1)) {
+ sprintf (buffer, "%02x",
+ (unsigned char) *(op->value + (k >> 1)) & 0xff);
+ if (put_user(buffer[1], &buf[k++ - *ppos]))
+ return -EFAULT;
+ count--;
}
- } else {
- if (len & 3) {
- while (len) {
- len--;
- if (len)
- seq_printf(f, "%02x.",
- *(unsigned char *) pval);
- else
- seq_printf(f, "%02x",
- *(unsigned char *) pval);
- pval++;
- }
- } else {
- while (len >= 4) {
- len -= 4;
- if (len)
- seq_printf(f, "%08x.",
- *(unsigned int *) pval);
- else
- seq_printf(f, "%08x",
- *(unsigned int *) pval);
- pval += 4;
- }
+ for (; (count > 1) && (k < i - 1); k += 2) {
+ sprintf (buffer, "%02x",
+ (unsigned char) *(op->value + (k >> 1)) & 0xff);
+ if (copy_to_user(buf + k - *ppos, buffer, 2))
+ return -EFAULT;
+ count -= 2;
}
- }
- seq_printf(f, "\n");
-
- return 0;
-}
-static void *property_start(struct seq_file *f, loff_t *pos)
-{
- if (*pos == 0)
- return pos;
- return NULL;
-}
+ if (count && (k < i - 1)) {
+ sprintf (buffer, "%02x",
+ (unsigned char) *(op->value + (k >> 1)) & 0xff);
+ if (put_user(buffer[0], &buf[k++ - *ppos]))
+ return -EFAULT;
+ count--;
+ }
-static void *property_next(struct seq_file *f, void *v, loff_t *pos)
-{
- (*pos)++;
- return NULL;
+ if (count) {
+ if (put_user('\n', &buf [k++ - *ppos]))
+ return -EFAULT;
+ }
+ }
+ count = k - *ppos;
+ *ppos = k;
+ return count;
}
-static void property_stop(struct seq_file *f, void *v)
+static ssize_t property_write(struct file *filp, const char __user *buf,
+ size_t count, loff_t *ppos)
{
- /* Nothing to do */
+ int i, j, k;
+ char *p;
+ u32 *q;
+ void *b;
+ openprom_property *op;
+
+ if (*ppos >= 0xffffff || count >= 0xffffff)
+ return -EINVAL;
+ if (!filp->private_data) {
+ i = property_read (filp, NULL, 0, NULL);
+ if (i)
+ return i;
+ }
+ k = *ppos;
+ op = (openprom_property *)filp->private_data;
+ if (!(op->flag & OPP_STRING)) {
+ u32 *first, *last;
+ int first_off, last_cnt;
+ u32 mask, mask2;
+ char tmp [9];
+ int forcelen = 0;
+
+ j = k % 9;
+ for (i = 0; i < count; i++, j++) {
+ if (j == 9) j = 0;
+ if (!j) {
+ char ctmp;
+ if (get_user(ctmp, &buf[i]))
+ return -EFAULT;
+ if (ctmp != '.') {
+ if (ctmp != '\n') {
+ if (op->flag & OPP_BINARY)
+ return -EINVAL;
+ else
+ goto write_try_string;
+ } else {
+ count = i + 1;
+ forcelen = 1;
+ break;
+ }
+ }
+ } else {
+ char ctmp;
+ if (get_user(ctmp, &buf[i]))
+ return -EFAULT;
+ if (ctmp < '0' ||
+ (ctmp > '9' && ctmp < 'A') ||
+ (ctmp > 'F' && ctmp < 'a') ||
+ ctmp > 'f') {
+ if (op->flag & OPP_BINARY)
+ return -EINVAL;
+ else
+ goto write_try_string;
+ }
+ }
+ }
+ op->flag |= OPP_BINARY;
+ tmp [8] = 0;
+ i = ((count + k + 8) / 9) << 2;
+ if (op->alloclen <= i) {
+ b = kmalloc (sizeof (openprom_property) + 2 * i,
+ GFP_KERNEL);
+ if (!b)
+ return -ENOMEM;
+ memcpy (b, filp->private_data,
+ sizeof (openprom_property)
+ + strlen (op->name) + op->alloclen);
+ memset (((char *)b) + sizeof (openprom_property)
+ + strlen (op->name) + op->alloclen,
+ 0, 2 * i - op->alloclen);
+ op = (openprom_property *)b;
+ op->alloclen = 2*i;
+ b = filp->private_data;
+ filp->private_data = (void *)op;
+ kfree (b);
+ }
+ first = ((u32 *)op->value) + (k / 9);
+ first_off = k % 9;
+ last = (u32 *)(op->value + i);
+ last_cnt = (k + count) % 9;
+ if (first + 1 == last) {
+ memset (tmp, '0', 8);
+ if (copy_from_user(tmp + first_off, buf,
+ (count + first_off > 8) ?
+ 8 - first_off : count))
+ return -EFAULT;
+ mask = 0xffffffff;
+ mask2 = 0xffffffff;
+ for (j = 0; j < first_off; j++)
+ mask >>= 1;
+ for (j = 8 - count - first_off; j > 0; j--)
+ mask2 <<= 1;
+ mask &= mask2;
+ if (mask) {
+ *first &= ~mask;
+ *first |= simple_strtoul (tmp, NULL, 16);
+ op->flag |= OPP_DIRTY;
+ }
+ } else {
+ op->flag |= OPP_DIRTY;
+ for (q = first; q < last; q++) {
+ if (q == first) {
+ if (first_off < 8) {
+ memset (tmp, '0', 8);
+ if (copy_from_user(tmp + first_off,
+ buf,
+ 8 - first_off))
+ return -EFAULT;
+ mask = 0xffffffff;
+ for (j = 0; j < first_off; j++)
+ mask >>= 1;
+ *q &= ~mask;
+ *q |= simple_strtoul (tmp,NULL,16);
+ }
+ buf += 9;
+ } else if ((q == last - 1) && last_cnt
+ && (last_cnt < 8)) {
+ memset (tmp, '0', 8);
+ if (copy_from_user(tmp, buf, last_cnt))
+ return -EFAULT;
+ mask = 0xffffffff;
+ for (j = 0; j < 8 - last_cnt; j++)
+ mask <<= 1;
+ *q &= ~mask;
+ *q |= simple_strtoul (tmp, NULL, 16);
+ buf += last_cnt;
+ } else {
+ char tchars[17]; /* XXX yuck... */
+
+ if (copy_from_user(tchars, buf, 16))
+ return -EFAULT;
+ *q = simple_strtoul (tchars, NULL, 16);
+ buf += 9;
+ }
+ }
+ }
+ if (!forcelen) {
+ if (op->len < i)
+ op->len = i;
+ } else
+ op->len = i;
+ *ppos += count;
+ }
+write_try_string:
+ if (!(op->flag & OPP_BINARY)) {
+ if (!(op->flag & (OPP_QUOTED | OPP_NOTQUOTED))) {
+ char ctmp;
+
+ /* No way, if somebody starts writing from the middle,
+ * we don't know whether he uses quotes around or not
+ */
+ if (k > 0)
+ return -EINVAL;
+ if (get_user(ctmp, buf))
+ return -EFAULT;
+ if (ctmp == '\'') {
+ op->flag |= OPP_QUOTED;
+ buf++;
+ count--;
+ (*ppos)++;
+ if (!count) {
+ op->flag |= OPP_STRING;
+ return 1;
+ }
+ } else
+ op->flag |= OPP_NOTQUOTED;
+ }
+ op->flag |= OPP_STRING;
+ if (op->alloclen <= count + *ppos) {
+ b = kmalloc (sizeof (openprom_property)
+ + 2 * (count + *ppos), GFP_KERNEL);
+ if (!b)
+ return -ENOMEM;
+ memcpy (b, filp->private_data,
+ sizeof (openprom_property)
+ + strlen (op->name) + op->alloclen);
+ memset (((char *)b) + sizeof (openprom_property)
+ + strlen (op->name) + op->alloclen,
+ 0, 2*(count - *ppos) - op->alloclen);
+ op = (openprom_property *)b;
+ op->alloclen = 2*(count + *ppos);
+ b = filp->private_data;
+ filp->private_data = (void *)op;
+ kfree (b);
+ }
+ p = op->value + *ppos - ((op->flag & OPP_QUOTED) ? 1 : 0);
+ if (copy_from_user(p, buf, count))
+ return -EFAULT;
+ op->flag |= OPP_DIRTY;
+ for (i = 0; i < count; i++, p++)
+ if (*p == '\n') {
+ *p = 0;
+ break;
+ }
+ if (i < count) {
+ op->len = p - op->value;
+ *ppos += i + 1;
+ if ((p > op->value) && (op->flag & OPP_QUOTED)
+ && (*(p - 1) == '\''))
+ op->len--;
+ } else {
+ if (p - op->value > op->len)
+ op->len = p - op->value;
+ *ppos += count;
+ }
+ }
+ return *ppos - k;
}
-static struct seq_operations property_op = {
- .start = property_start,
- .next = property_next,
- .stop = property_stop,
- .show = property_show
-};
-
-static int property_open(struct inode *inode, struct file *file)
+int property_release (struct inode *inode, struct file *filp)
{
- struct op_inode_info *oi = OP_I(inode);
- int ret;
-
- BUG_ON(oi->type != op_inode_prop);
-
- ret = seq_open(file, &property_op);
- if (!ret) {
- struct seq_file *m = file->private_data;
- m->private = oi->u.prop;
+ openprom_property *op = (openprom_property *)filp->private_data;
+ int error;
+ u32 node;
+
+ if (!op)
+ return 0;
+ lock_kernel();
+ node = nodes[(u16)((long)inode->u.generic_ip)].node;
+ if ((u16)((long)inode->u.generic_ip) == aliases) {
+ if ((op->flag & OPP_DIRTY) && (op->flag & OPP_STRING)) {
+ char *p = op->name;
+ int i = (op->value - op->name) - strlen (op->name) - 1;
+ op->value [op->len] = 0;
+ *(op->value - 1) = ' ';
+ if (i) {
+ for (p = op->value - i - 2; p >= op->name; p--)
+ p[i] = *p;
+ p = op->name + i;
+ }
+ memcpy (p - 8, "nvalias ", 8);
+ prom_feval (p - 8);
+ }
+ } else if (op->flag & OPP_DIRTY) {
+ if (op->flag & OPP_STRING) {
+ op->value [op->len] = 0;
+ error = prom_setprop (node, op->name,
+ op->value, op->len + 1);
+ if (error <= 0)
+ printk (KERN_WARNING "openpromfs: "
+ "Couldn't write property %s\n",
+ op->name);
+ } else if ((op->flag & OPP_BINARY) || !op->len) {
+ error = prom_setprop (node, op->name,
+ op->value, op->len);
+ if (error <= 0)
+ printk (KERN_WARNING "openpromfs: "
+ "Couldn't write property %s\n",
+ op->name);
+ } else {
+ printk (KERN_WARNING "openpromfs: "
+ "Unknown property type of %s\n",
+ op->name);
+ }
}
- return ret;
+ unlock_kernel();
+ kfree (filp->private_data);
+ return 0;
}
-static const struct file_operations openpromfs_prop_ops = {
- .open = property_open,
- .read = seq_read,
- .llseek = seq_lseek,
- .release = seq_release,
+static struct file_operations openpromfs_prop_ops = {
+ .read = property_read,
+ .write = property_write,
+ .release = property_release,
};
-static int openpromfs_readdir(struct file *, void *, filldir_t);
+static struct file_operations openpromfs_nodenum_ops = {
+ .read = nodenum_read,
+};
-static const struct file_operations openprom_operations = {
+static struct file_operations openprom_operations = {
.read = generic_read_dir,
.readdir = openpromfs_readdir,
};
-static struct dentry *openpromfs_lookup(struct inode *, struct dentry *, struct nameidata *);
+static struct inode_operations openprom_alias_inode_operations = {
+ .create = openpromfs_create,
+ .lookup = openpromfs_lookup,
+ .unlink = openpromfs_unlink,
+};
static struct inode_operations openprom_inode_operations = {
.lookup = openpromfs_lookup,
};
-static struct dentry *openpromfs_lookup(struct inode *dir, struct dentry *dentry, struct nameidata *nd)
+static int lookup_children(u16 n, const char * name, int len)
+{
+ int ret;
+ u16 node;
+ for (; n != 0xffff; n = nodes[n].next) {
+ node = nodes[n].child;
+ if (node != 0xffff) {
+ char buffer[128];
+ int i;
+ char *p;
+
+ while (node != 0xffff) {
+ if (prom_getname (nodes[node].node,
+ buffer, 128) >= 0) {
+ i = strlen (buffer);
+ if ((len == i)
+ && !strncmp (buffer, name, len))
+ return NODE2INO(node);
+ p = strchr (buffer, '@');
+ if (p && (len == p - buffer)
+ && !strncmp (buffer, name, len))
+ return NODE2INO(node);
+ }
+ node = nodes[node].next;
+ }
+ } else
+ continue;
+ ret = lookup_children (nodes[n].child, name, len);
+ if (ret) return ret;
+ }
+ return 0;
+}
+
+static struct dentry *openpromfs_lookup(struct inode * dir, struct dentry *dentry, struct nameidata *nd)
{
- struct op_inode_info *ent_oi, *oi = OP_I(dir);
- struct device_node *dp, *child;
- struct property *prop;
- enum op_inode_type ent_type;
- union op_inode_data ent_data;
+ int ino = 0;
+#define OPFSL_DIR 0
+#define OPFSL_PROPERTY 1
+#define OPFSL_NODENUM 2
+ int type = 0;
+ char buffer[128];
+ char *p;
const char *name;
+ u32 n;
+ u16 dirnode;
+ unsigned int len;
+ int i;
struct inode *inode;
- unsigned int ino;
- int len;
+ char buffer2[64];
- BUG_ON(oi->type != op_inode_node);
-
- dp = oi->u.node;
-
+ inode = NULL;
name = dentry->d_name.name;
len = dentry->d_name.len;
-
- mutex_lock(&op_mutex);
-
- child = dp->child;
- while (child) {
- int n = strlen(child->path_component_name);
-
- if (len == n &&
- !strncmp(child->path_component_name, name, len)) {
- ent_type = op_inode_node;
- ent_data.node = child;
- ino = child->unique_id;
- goto found;
+ lock_kernel();
+ if (name [0] == '.' && len == 5 && !strncmp (name + 1, "node", 4)) {
+ ino = NODEP2INO(NODE(dir->i_ino).first_prop);
+ type = OPFSL_NODENUM;
+ }
+ if (!ino) {
+ u16 node = NODE(dir->i_ino).child;
+ while (node != 0xffff) {
+ if (prom_getname (nodes[node].node, buffer, 128) >= 0) {
+ i = strlen (buffer);
+ if (len == i && !strncmp (buffer, name, len)) {
+ ino = NODE2INO(node);
+ type = OPFSL_DIR;
+ break;
+ }
+ p = strchr (buffer, '@');
+ if (p && (len == p - buffer)
+ && !strncmp (buffer, name, len)) {
+ ino = NODE2INO(node);
+ type = OPFSL_DIR;
+ break;
+ }
+ }
+ node = nodes[node].next;
}
- child = child->sibling;
}
-
- prop = dp->properties;
- while (prop) {
- int n = strlen(prop->name);
-
- if (len == n && !strncmp(prop->name, name, len)) {
- ent_type = op_inode_prop;
- ent_data.prop = prop;
- ino = prop->unique_id;
- goto found;
+ n = NODE(dir->i_ino).node;
+ dirnode = dir->i_ino - OPENPROM_FIRST_INO;
+ if (!ino) {
+ int j = NODEP2INO(NODE(dir->i_ino).first_prop);
+ if (dirnode != aliases) {
+ for (p = prom_firstprop (n, buffer2);
+ p && *p;
+ p = prom_nextprop (n, p, buffer2)) {
+ j++;
+ if ((len == strlen (p))
+ && !strncmp (p, name, len)) {
+ ino = j;
+ type = OPFSL_PROPERTY;
+ break;
+ }
+ }
+ } else {
+ int k;
+ for (k = 0; k < aliases_nodes; k++) {
+ j++;
+ if (alias_names [k]
+ && (len == strlen (alias_names [k]))
+ && !strncmp (alias_names [k], name, len)) {
+ ino = j;
+ type = OPFSL_PROPERTY;
+ break;
+ }
+ }
}
-
- prop = prop->next;
}
-
- mutex_unlock(&op_mutex);
- return ERR_PTR(-ENOENT);
-
-found:
- inode = iget(dir->i_sb, ino);
- mutex_unlock(&op_mutex);
+ if (!ino) {
+ ino = lookup_children (NODE(dir->i_ino).child, name, len);
+ if (ino)
+ type = OPFSL_DIR;
+ else {
+ unlock_kernel();
+ return ERR_PTR(-ENOENT);
+ }
+ }
+ inode = iget (dir->i_sb, ino);
+ unlock_kernel();
if (!inode)
return ERR_PTR(-EINVAL);
- ent_oi = OP_I(inode);
- ent_oi->type = ent_type;
- ent_oi->u = ent_data;
-
- switch (ent_type) {
- case op_inode_node:
+ switch (type) {
+ case OPFSL_DIR:
inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO;
- inode->i_op = &openprom_inode_operations;
+ if (ino == OPENPROM_FIRST_INO + aliases) {
+ inode->i_mode |= S_IWUSR;
+ inode->i_op = &openprom_alias_inode_operations;
+ } else
+ inode->i_op = &openprom_inode_operations;
inode->i_fop = &openprom_operations;
inode->i_nlink = 2;
break;
- case op_inode_prop:
- if (!strcmp(dp->name, "options") && (len == 17) &&
- !strncmp (name, "security-password", 17))
+ case OPFSL_NODENUM:
+ inode->i_mode = S_IFREG | S_IRUGO;
+ inode->i_fop = &openpromfs_nodenum_ops;
+ inode->i_nlink = 1;
+ inode->u.generic_ip = (void *)(long)(n);
+ break;
+ case OPFSL_PROPERTY:
+ if ((dirnode == options) && (len == 17)
+ && !strncmp (name, "security-password", 17))
inode->i_mode = S_IFREG | S_IRUSR | S_IWUSR;
- else
+ else {
inode->i_mode = S_IFREG | S_IRUGO;
+ if (dirnode == options || dirnode == aliases) {
+ if (len != 4 || strncmp (name, "name", 4))
+ inode->i_mode |= S_IWUSR;
+ }
+ }
inode->i_fop = &openpromfs_prop_ops;
inode->i_nlink = 1;
- inode->i_size = ent_oi->u.prop->length;
+ if (inode->i_size < 0)
+ inode->i_size = 0;
+ inode->u.generic_ip = (void *)(long)(((u16)dirnode) |
+ (((u16)(ino - NODEP2INO(NODE(dir->i_ino).first_prop) - 1)) << 16));
break;
}
static int openpromfs_readdir(struct file * filp, void * dirent, filldir_t filldir)
{
struct inode *inode = filp->f_dentry->d_inode;
- struct op_inode_info *oi = OP_I(inode);
- struct device_node *dp = oi->u.node;
- struct device_node *child;
- struct property *prop;
unsigned int ino;
- int i;
-
- mutex_lock(&op_mutex);
+ u32 n;
+ int i, j;
+ char buffer[128];
+ u16 node;
+ char *p;
+ char buffer2[64];
+
+ lock_kernel();
ino = inode->i_ino;
i = filp->f_pos;
switch (i) {
case 0:
- if (filldir(dirent, ".", 1, i, ino, DT_DIR) < 0)
- goto out;
+ if (filldir(dirent, ".", 1, i, ino, DT_DIR) < 0) goto out;
i++;
filp->f_pos++;
/* fall thru */
case 1:
- if (filldir(dirent, "..", 2, i,
- (dp->parent == NULL ?
- OPENPROM_ROOT_INO :
- dp->parent->unique_id), DT_DIR) < 0)
+ if (filldir(dirent, "..", 2, i,
+ (NODE(ino).parent == 0xffff) ?
+ OPENPROM_ROOT_INO : NODE2INO(NODE(ino).parent), DT_DIR) < 0)
goto out;
i++;
filp->f_pos++;
/* fall thru */
default:
i -= 2;
-
- /* First, the children nodes as directories. */
- child = dp->child;
- while (i && child) {
- child = child->sibling;
+ node = NODE(ino).child;
+ while (i && node != 0xffff) {
+ node = nodes[node].next;
i--;
}
- while (child) {
- if (filldir(dirent,
- child->path_component_name,
- strlen(child->path_component_name),
- filp->f_pos, child->unique_id, DT_DIR) < 0)
+ while (node != 0xffff) {
+ if (prom_getname (nodes[node].node, buffer, 128) < 0)
+ goto out;
+ if (filldir(dirent, buffer, strlen(buffer),
+ filp->f_pos, NODE2INO(node), DT_DIR) < 0)
goto out;
-
filp->f_pos++;
- child = child->sibling;
+ node = nodes[node].next;
}
-
- /* Next, the properties as files. */
- prop = dp->properties;
- while (i && prop) {
- prop = prop->next;
- i--;
- }
- while (prop) {
- if (filldir(dirent, prop->name, strlen(prop->name),
- filp->f_pos, prop->unique_id, DT_REG) < 0)
+ j = NODEP2INO(NODE(ino).first_prop);
+ if (!i) {
+ if (filldir(dirent, ".node", 5, filp->f_pos, j, DT_REG) < 0)
goto out;
-
filp->f_pos++;
- prop = prop->next;
+ } else
+ i--;
+ n = NODE(ino).node;
+ if (ino == OPENPROM_FIRST_INO + aliases) {
+ for (j++; i < aliases_nodes; i++, j++) {
+ if (alias_names [i]) {
+ if (filldir (dirent, alias_names [i],
+ strlen (alias_names [i]),
+ filp->f_pos, j, DT_REG) < 0) goto out;
+ filp->f_pos++;
+ }
+ }
+ } else {
+ for (p = prom_firstprop (n, buffer2);
+ p && *p;
+ p = prom_nextprop (n, p, buffer2)) {
+ j++;
+ if (i) i--;
+ else {
+ if (filldir(dirent, p, strlen(p),
+ filp->f_pos, j, DT_REG) < 0)
+ goto out;
+ filp->f_pos++;
+ }
+ }
}
}
out:
- mutex_unlock(&op_mutex);
+ unlock_kernel();
+ return 0;
+}
+
+static int openpromfs_create (struct inode *dir, struct dentry *dentry, int mode,
+ struct nameidata *nd)
+{
+ char *p;
+ struct inode *inode;
+
+ if (!dir)
+ return -ENOENT;
+ if (dentry->d_name.len > 256)
+ return -EINVAL;
+ p = kmalloc (dentry->d_name.len + 1, GFP_KERNEL);
+ if (!p)
+ return -ENOMEM;
+ strncpy (p, dentry->d_name.name, dentry->d_name.len);
+ p [dentry->d_name.len] = 0;
+ lock_kernel();
+ if (aliases_nodes == ALIASES_NNODES) {
+ kfree(p);
+ unlock_kernel();
+ return -EIO;
+ }
+ alias_names [aliases_nodes++] = p;
+ inode = iget (dir->i_sb,
+ NODEP2INO(NODE(dir->i_ino).first_prop) + aliases_nodes);
+ if (!inode) {
+ unlock_kernel();
+ return -EINVAL;
+ }
+ inode->i_mode = S_IFREG | S_IRUGO | S_IWUSR;
+ inode->i_fop = &openpromfs_prop_ops;
+ inode->i_nlink = 1;
+ if (inode->i_size < 0) inode->i_size = 0;
+ inode->u.generic_ip = (void *)(long)(((u16)aliases) |
+ (((u16)(aliases_nodes - 1)) << 16));
+ unlock_kernel();
+ d_instantiate(dentry, inode);
return 0;
}
-static kmem_cache_t *op_inode_cachep;
+static int openpromfs_unlink (struct inode *dir, struct dentry *dentry)
+{
+ unsigned int len;
+ char *p;
+ const char *name;
+ int i;
+
+ name = dentry->d_name.name;
+ len = dentry->d_name.len;
+ lock_kernel();
+ for (i = 0; i < aliases_nodes; i++)
+ if ((strlen (alias_names [i]) == len)
+ && !strncmp (name, alias_names[i], len)) {
+ char buffer[512];
+
+ p = alias_names [i];
+ alias_names [i] = NULL;
+ kfree (p);
+ strcpy (buffer, "nvunalias ");
+ memcpy (buffer + 10, name, len);
+ buffer [10 + len] = 0;
+ prom_feval (buffer);
+ }
+ unlock_kernel();
+ return 0;
+}
-static struct inode *openprom_alloc_inode(struct super_block *sb)
+/* {{{ init section */
+static int __init check_space (u16 n)
{
- struct op_inode_info *oi;
+ unsigned long pages;
- oi = kmem_cache_alloc(op_inode_cachep, SLAB_KERNEL);
- if (!oi)
- return NULL;
+ if ((1 << alloced) * PAGE_SIZE < (n + 2) * sizeof(openpromfs_node)) {
+ pages = __get_free_pages (GFP_KERNEL, alloced + 1);
+ if (!pages)
+ return -1;
- return &oi->vfs_inode;
+ if (nodes) {
+ memcpy ((char *)pages, (char *)nodes,
+ (1 << alloced) * PAGE_SIZE);
+ free_pages ((unsigned long)nodes, alloced);
+ }
+ alloced++;
+ nodes = (openpromfs_node *)pages;
+ }
+ return 0;
}
-static void openprom_destroy_inode(struct inode *inode)
+static u16 __init get_nodes (u16 parent, u32 node)
{
- kmem_cache_free(op_inode_cachep, OP_I(inode));
+ char *p;
+ u16 n = last_node++, i;
+ char buffer[64];
+
+ if (check_space (n) < 0)
+ return 0xffff;
+ nodes[n].parent = parent;
+ nodes[n].node = node;
+ nodes[n].next = 0xffff;
+ nodes[n].child = 0xffff;
+ nodes[n].first_prop = first_prop++;
+ if (!parent) {
+ char buffer[8];
+ int j;
+
+ if ((j = prom_getproperty (node, "name", buffer, 8)) >= 0) {
+ buffer[j] = 0;
+ if (!strcmp (buffer, "options"))
+ options = n;
+ else if (!strcmp (buffer, "aliases"))
+ aliases = n;
+ }
+ }
+ if (n != aliases)
+ for (p = prom_firstprop (node, buffer);
+ p && p != (char *)-1 && *p;
+ p = prom_nextprop (node, p, buffer))
+ first_prop++;
+ else {
+ char *q;
+ for (p = prom_firstprop (node, buffer);
+ p && p != (char *)-1 && *p;
+ p = prom_nextprop (node, p, buffer)) {
+ if (aliases_nodes == ALIASES_NNODES)
+ break;
+ for (i = 0; i < aliases_nodes; i++)
+ if (!strcmp (p, alias_names [i]))
+ break;
+ if (i < aliases_nodes)
+ continue;
+ q = kmalloc (strlen (p) + 1, GFP_KERNEL);
+ if (!q)
+ return 0xffff;
+ strcpy (q, p);
+ alias_names [aliases_nodes++] = q;
+ }
+ first_prop += ALIASES_NNODES;
+ }
+ node = prom_getchild (node);
+ if (node) {
+ parent = get_nodes (n, node);
+ if (parent == 0xffff)
+ return 0xffff;
+ nodes[n].child = parent;
+ while ((node = prom_getsibling (node)) != 0) {
+ i = get_nodes (n, node);
+ if (i == 0xffff)
+ return 0xffff;
+ nodes[parent].next = i;
+ parent = i;
+ }
+ }
+ return n;
}
static void openprom_read_inode(struct inode * inode)
}
static struct super_operations openprom_sops = {
- .alloc_inode = openprom_alloc_inode,
- .destroy_inode = openprom_destroy_inode,
.read_inode = openprom_read_inode,
.statfs = simple_statfs,
.remount_fs = openprom_remount,
static int openprom_fill_super(struct super_block *s, void *data, int silent)
{
- struct inode *root_inode;
- struct op_inode_info *oi;
+ struct inode * root_inode;
s->s_flags |= MS_NOATIME;
s->s_blocksize = 1024;
root_inode = iget(s, OPENPROM_ROOT_INO);
if (!root_inode)
goto out_no_root;
-
- oi = OP_I(root_inode);
- oi->type = op_inode_node;
- oi->u.node = of_find_node_by_path("/");
-
s->s_root = d_alloc_root(root_inode);
if (!s->s_root)
goto out_no_root;
return -ENOMEM;
}
-static int openprom_get_sb(struct file_system_type *fs_type,
- int flags, const char *dev_name, void *data, struct vfsmount *mnt)
+static struct super_block *openprom_get_sb(struct file_system_type *fs_type,
+ int flags, const char *dev_name, void *data)
{
- return get_sb_single(fs_type, flags, data, openprom_fill_super, mnt);
+ return get_sb_single(fs_type, flags, data, openprom_fill_super);
}
static struct file_system_type openprom_fs_type = {
.kill_sb = kill_anon_super,
};
-static void op_inode_init_once(void *data, kmem_cache_t * cachep, unsigned long flags)
-{
- struct op_inode_info *oi = (struct op_inode_info *) data;
-
- if ((flags & (SLAB_CTOR_VERIFY|SLAB_CTOR_CONSTRUCTOR)) ==
- SLAB_CTOR_CONSTRUCTOR)
- inode_init_once(&oi->vfs_inode);
-}
-
static int __init init_openprom_fs(void)
{
- int err;
-
- op_inode_cachep = kmem_cache_create("op_inode_cache",
- sizeof(struct op_inode_info),
- 0,
- (SLAB_RECLAIM_ACCOUNT |
- SLAB_MEM_SPREAD),
- op_inode_init_once, NULL);
- if (!op_inode_cachep)
- return -ENOMEM;
-
- err = register_filesystem(&openprom_fs_type);
- if (err)
- kmem_cache_destroy(op_inode_cachep);
-
- return err;
+ nodes = (openpromfs_node *)__get_free_pages(GFP_KERNEL, 0);
+ if (!nodes) {
+ printk (KERN_WARNING "openpromfs: can't get free page\n");
+ return -EIO;
+ }
+ if (get_nodes (0xffff, prom_root_node) == 0xffff) {
+ printk (KERN_WARNING "openpromfs: couldn't setup tree\n");
+ return -EIO;
+ }
+ nodes[last_node].first_prop = first_prop;
+ return register_filesystem(&openprom_fs_type);
}
static void __exit exit_openprom_fs(void)
{
+ int i;
unregister_filesystem(&openprom_fs_type);
- kmem_cache_destroy(op_inode_cachep);
+ free_pages ((unsigned long)nodes, alloced);
+ for (i = 0; i < aliases_nodes; i++)
+ kfree (alias_names [i]);
+ nodes = NULL;
}
module_init(init_openprom_fs)
git://git.onelab.eu / linux-2.6.git / blobdiff