/* $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 #include #include #include #include #include #include #include #include #include #include #include #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 = NULL; static int alloced = 0; static u16 last_node = 0; static u16 first_prop = 0; static u16 options = 0xffff; static u16 aliases = 0xffff; static int aliases_nodes = 0; 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); static int openpromfs_readdir(struct file *, void *, filldir_t); static struct dentry *openpromfs_lookup(struct inode *, struct dentry *dentry); static int openpromfs_unlink (struct inode *, struct dentry *dentry); static ssize_t nodenum_read(struct file *file, char *buf, size_t count, loff_t *ppos) { struct inode *inode = file->f_dentry->d_inode; loff_t pos = *ppos; char buffer[10]; if (count < 0 || !inode->u.generic_ip) return -EINVAL; sprintf (buffer, "%8.8x\n", (u32)(long)(inode->u.generic_ip)); if (pos != (unsigned)pos || pos >= 9) return 0; if (count > 9 - pos) count = 9 - pos; if (copy_to_user(buf, buffer + pos, count)) return -EFAULT; *ppos = pos + count; return count; } static ssize_t property_read(struct file *filp, char *buf, size_t count, loff_t *ppos) { struct inode *inode = filp->f_dentry->d_inode; loff_t pos = *ppos; int i, j, k; u32 node; char *p, *s; u32 *q; openprom_property *op; char buffer[64]; if (pos < 0 || pos >= 0xffffff || count >= 0xffffff) return -EINVAL; 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 = 0; 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 = 0, 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 (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 = pos; 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--; } if (k + count >= i - 2) j = i - 2 - k; else j = count; if (j >= 0) { if (copy_to_user(buf + k - pos, op->value + k - 1, j)) return -EFAULT; count -= j; k += j; } if (count) { if (put_user('\'', &buf [k++ - pos])) return -EFAULT; } if (count > 1) { if (put_user('\n', &buf [k++ - pos])) 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 (last == (u32 *)(op->value + op->len - 4) && last_cnt == 9) { if (put_user('\n', (buf - 1))) return -EFAULT; } k += count; } else if (op->flag & OPP_HEXSTRING) { char buffer[3]; if ((k < i - 1) && (k & 1)) { sprintf (buffer, "%02x", (unsigned char) *(op->value + (k >> 1)) & 0xff); if (put_user(buffer[1], &buf[k++ - pos])) return -EFAULT; count--; } for (; (count > 1) && (k < i - 1); k += 2) { sprintf (buffer, "%02x", (unsigned char) *(op->value + (k >> 1)) & 0xff); if (copy_to_user (buf + k - pos, buffer, 2)) return -EFAULT; count -= 2; } if (count && (k < i - 1)) { sprintf (buffer, "%02x", (unsigned char) *(op->value + (k >> 1)) & 0xff); if (put_user(buffer[0], &buf[k++ - pos])) return -EFAULT; count--; } if (count) { if (put_user('\n', &buf [k++ - pos])) return -EFAULT; } } count = k - pos; *ppos = k; return count; } static ssize_t property_write(struct file *filp, const char *buf, size_t count, loff_t *ppos) { loff_t pos = *ppos; int i, j, k; char *p; u32 *q; void *b; openprom_property *op; if (pos < 0 || pos >= 0xffffff || count >= 0xffffff) return -EINVAL; if (!filp->private_data) { i = property_read (filp, NULL, 0, 0); if (i) return i; } k = pos; 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, 0, 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,0,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, 0, 16); buf += last_cnt; } else { char tchars[17]; /* XXX yuck... */ if (copy_from_user(tchars, buf, 16)) return -EFAULT; *q = simple_strtoul (tchars, 0, 16); buf += 9; } } } if (!forcelen) { if (op->len < i) op->len = i; } else op->len = i; pos += count; *ppos = pos; } 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--; pos++; *ppos = pos; if (!count) { op->flag |= OPP_STRING; return 1; } } else op->flag |= OPP_NOTQUOTED; } op->flag |= OPP_STRING; if (op->alloclen <= count + pos) { b = kmalloc (sizeof (openprom_property) + 2 * (count + pos), 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 - pos) - op->alloclen); op = (openprom_property *)b; op->alloclen = 2*(count + pos); b = filp->private_data; filp->private_data = (void *)op; kfree (b); } p = op->value + pos - ((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; pos += i + 1; *ppos = pos; if ((p > op->value) && (op->flag & OPP_QUOTED) && (*(p - 1) == '\'')) op->len--; } else { if (p - op->value > op->len) op->len = p - op->value; pos += count; *ppos = pos; } } return pos - k; } int property_release (struct inode *inode, struct file *filp) { openprom_property *op = (openprom_property *)filp->private_data; unsigned long flags; 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; save_and_cli (flags); error = prom_setprop (node, op->name, op->value, op->len + 1); restore_flags (flags); if (error <= 0) printk (KERN_WARNING "openpromfs: " "Couldn't write property %s\n", op->name); } else if ((op->flag & OPP_BINARY) || !op->len) { save_and_cli (flags); error = prom_setprop (node, op->name, op->value, op->len); restore_flags (flags); 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); } } unlock_kernel(); kfree (filp->private_data); return 0; } static struct file_operations openpromfs_prop_ops = { read: property_read, write: property_write, release: property_release, }; static struct file_operations openpromfs_nodenum_ops = { read: nodenum_read, }; static struct file_operations openprom_operations = { read: generic_read_dir, readdir: openpromfs_readdir, }; 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 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) { 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; char buffer2[64]; inode = NULL; name = dentry->d_name.name; len = dentry->d_name.len; 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; } } 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; } } } } if (!ino) { ino = lookup_children (NODE(dir->i_ino).child, name, len); if (ino) type = OPFSL_DIR; else return ERR_PTR(-ENOENT); } inode = iget (dir->i_sb, ino); if (!inode) return ERR_PTR(-EINVAL); switch (type) { case OPFSL_DIR: inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO; 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 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 { 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; 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; } inode->i_gid = 0; inode->i_uid = 0; d_add(dentry, inode); return NULL; } static int openpromfs_readdir(struct file * filp, void * dirent, filldir_t filldir) { struct inode *inode = filp->f_dentry->d_inode; unsigned int ino; u32 n; int i, j; char buffer[128]; u16 node; char *p; char buffer2[64]; ino = inode->i_ino; i = filp->f_pos; switch (i) { case 0: if (filldir(dirent, ".", 1, i, ino, DT_DIR) < 0) return 0; i++; filp->f_pos++; /* fall thru */ case 1: if (filldir(dirent, "..", 2, i, (NODE(ino).parent == 0xffff) ? OPENPROM_ROOT_INO : NODE2INO(NODE(ino).parent), DT_DIR) < 0) return 0; i++; filp->f_pos++; /* fall thru */ default: i -= 2; node = NODE(ino).child; while (i && node != 0xffff) { node = nodes[node].next; i--; } while (node != 0xffff) { if (prom_getname (nodes[node].node, buffer, 128) < 0) return 0; if (filldir(dirent, buffer, strlen(buffer), filp->f_pos, NODE2INO(node), DT_DIR) < 0) return 0; filp->f_pos++; node = nodes[node].next; } j = NODEP2INO(NODE(ino).first_prop); if (!i) { if (filldir(dirent, ".node", 5, filp->f_pos, j, DT_REG) < 0) return 0; filp->f_pos++; } 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) return 0; 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) return 0; filp->f_pos++; } } } } return 0; } static int openpromfs_create (struct inode *dir, struct dentry *dentry, int mode) { char *p; struct inode *inode; if (!dir) return -ENOENT; if (dentry->d_name.len > 256) return -EINVAL; if (aliases_nodes == ALIASES_NNODES) return -EIO; 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; alias_names [aliases_nodes++] = p; inode = iget (dir->i_sb, NODEP2INO(NODE(dir->i_ino).first_prop) + aliases_nodes); if (!inode) 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)); d_instantiate(dentry, inode); return 0; } 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; 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); } return 0; } /* {{{ init section */ #ifndef MODULE static int __init check_space (u16 n) #else static int check_space (u16 n) #endif { unsigned long pages; if ((1 << alloced) * PAGE_SIZE < (n + 2) * sizeof(openpromfs_node)) { pages = __get_free_pages (GFP_KERNEL, alloced + 1); if (!pages) return -1; if (nodes) { memcpy ((char *)pages, (char *)nodes, (1 << alloced) * PAGE_SIZE); free_pages ((unsigned long)nodes, alloced); } alloced++; nodes = (openpromfs_node *)pages; } return 0; } #ifndef MODULE static u16 __init get_nodes (u16 parent, u32 node) #else static u16 get_nodes (u16 parent, u32 node) #endif { 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) { inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME; if (inode->i_ino == OPENPROM_ROOT_INO) { inode->i_op = &openprom_inode_operations; inode->i_fop = &openprom_operations; inode->i_mode = S_IFDIR | S_IRUGO | S_IXUGO; } } static int openprom_statfs(struct super_block *sb, struct statfs *buf) { buf->f_type = OPENPROM_SUPER_MAGIC; buf->f_bsize = PAGE_SIZE/sizeof(long); /* ??? */ buf->f_bfree = 0; buf->f_bavail = 0; buf->f_ffree = 0; buf->f_namelen = NAME_MAX; return 0; } static struct super_operations openprom_sops = { read_inode: openprom_read_inode, statfs: openprom_statfs, }; struct super_block *openprom_read_super(struct super_block *s,void *data, int silent) { struct inode * root_inode; s->s_blocksize = 1024; s->s_blocksize_bits = 10; s->s_magic = OPENPROM_SUPER_MAGIC; s->s_op = &openprom_sops; root_inode = iget(s, OPENPROM_ROOT_INO); if (!root_inode) goto out_no_root; s->s_root = d_alloc_root(root_inode); if (!s->s_root) goto out_no_root; return s; out_no_root: printk("openprom_read_super: get root inode failed\n"); iput(root_inode); return NULL; } static DECLARE_FSTYPE(openprom_fs_type, "openpromfs", openprom_read_super, 0); static int __init init_openprom_fs(void) { 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); free_pages ((unsigned long)nodes, alloced); for (i = 0; i < aliases_nodes; i++) if (alias_names [i]) kfree (alias_names [i]); nodes = NULL; } EXPORT_NO_SYMBOLS; module_init(init_openprom_fs) module_exit(exit_openprom_fs) MODULE_LICENSE("GPL");