libafs: Implement unixuser RW locks
[openafs.git] / src / afs / LINUX24 / osi_proc.c
1 /*
2  * Copyright 2000, International Business Machines Corporation and others.
3  * All Rights Reserved.
4  * 
5  * This software has been released under the terms of the IBM Public
6  * License.  For details, see the LICENSE file in the top-level source
7  * directory or online at http://www.openafs.org/dl/license10.html
8  */
9
10 /*
11  * Linux module support routines.
12  *
13  */
14 #include <afsconfig.h>
15 #include "afs/param.h"
16
17
18 #include <linux/module.h> /* early to avoid printf->printk mapping */
19 #ifdef HAVE_LINUX_SEQ_FILE_H
20 #include <linux/seq_file.h>
21 #endif
22 #include "afs/sysincludes.h"
23 #include "afsincludes.h"
24 #include "afs/nfsclient.h"
25 #include "h/unistd.h"           /* For syscall numbers. */
26 #include "h/mm.h"
27
28 #ifdef AFS_AMD64_LINUX20_ENV
29 #include <asm/ia32_unistd.h>
30 #endif
31
32 #include <linux/proc_fs.h>
33 #include <linux/slab.h>
34 #include <linux/init.h>
35 #include <linux/sched.h>
36 #include <linux/kernel.h>
37
38 struct proc_dir_entry *openafs_procfs;
39
40 #ifdef HAVE_LINUX_SEQ_FILE_H
41 static void *c_start(struct seq_file *m, loff_t *pos)
42 {
43         struct afs_q *cq, *tq;
44         loff_t n = 0;
45
46         AFS_GLOCK();
47         ObtainReadLock(&afs_xcell);
48         for (cq = CellLRU.next; cq != &CellLRU; cq = tq) {
49                 tq = QNext(cq);
50
51                 if (n++ == *pos)
52                         break;
53         }
54         if (cq == &CellLRU)
55                 cq = NULL;
56
57         AFS_GUNLOCK();
58         return cq;
59 }
60
61 static void *c_next(struct seq_file *m, void *p, loff_t *pos)
62 {
63         struct afs_q *cq = p, *tq;
64
65         AFS_GLOCK();
66         (*pos)++;
67         tq = QNext(cq);
68
69         if (tq == &CellLRU)
70                 return NULL;
71
72         AFS_GUNLOCK();
73         return tq;
74 }
75
76 static void c_stop(struct seq_file *m, void *p)
77 {
78         AFS_GLOCK();
79         ReleaseReadLock(&afs_xcell);
80         AFS_GUNLOCK();
81 }
82
83 static int c_show(struct seq_file *m, void *p)
84 {
85         struct afs_q *cq = p;
86         struct cell *tc = QTOC(cq);
87         int j;
88
89         seq_printf(m, ">%s #(%d/%d)\n", tc->cellName,
90                    tc->cellNum, tc->cellIndex);
91
92         for (j = 0; j < AFS_MAXCELLHOSTS; j++) {
93                 afs_uint32 addr;
94
95                 if (!tc->cellHosts[j]) break;
96
97                 addr = tc->cellHosts[j]->addr->sa_ip;
98                 seq_printf(m, "%u.%u.%u.%u #%u.%u.%u.%u\n",
99                            NIPQUAD(addr), NIPQUAD(addr));
100         }
101
102         return 0;
103 }
104
105 static struct seq_operations afs_csdb_op = {
106         .start          = c_start,
107         .next           = c_next,
108         .stop           = c_stop,
109         .show           = c_show,
110 };
111
112 static int afs_csdb_open(struct inode *inode, struct file *file)
113 {
114         return seq_open(file, &afs_csdb_op);
115 }
116
117 static struct file_operations afs_csdb_operations = {
118         .open           = afs_csdb_open,
119         .read           = seq_read,
120         .llseek         = seq_lseek,
121         .release        = seq_release,
122 };
123
124
125 static void *uu_start(struct seq_file *m, loff_t *pos)
126 {
127     struct unixuser *tu;
128     loff_t n = 0;
129     afs_int32 i;
130
131     ObtainReadLock(&afs_xuser);
132     if (!*pos)
133         return (void *)(1);
134
135     for (i = 0; i < NUSERS; i++) {
136         for (tu = afs_users[i]; tu; tu = tu->next) {
137             if (++n == *pos)
138                 return tu;
139         }
140     }
141
142     return NULL;
143 }
144
145 static void *uu_next(struct seq_file *m, void *p, loff_t *pos)
146 {
147     struct unixuser *tu = p;
148     afs_int32 i = 0;
149
150     (*pos)++;
151     if (!p) return NULL;
152
153     if (p != (void *)1) {
154         if (tu->next) return tu->next;
155         i = UHash(tu->uid) + 1;
156     }
157
158     for (; i < NUSERS; i++)
159         if (afs_users[i]) return afs_users[i];
160     return NULL;
161 }
162
163 static void uu_stop(struct seq_file *m, void *p)
164 {
165     ReleaseReadLock(&afs_xuser);
166 }
167
168 static int uu_show(struct seq_file *m, void *p)
169 {
170     struct cell *tc = 0;
171     struct unixuser *tu = p;
172     union tokenUnion *token;
173     char *cellname;
174
175     if (p == (void *)1) {
176         seq_printf(m, "%10s %4s %-6s  %-25s %10s",
177                    "UID/PAG", "Refs", "States", "Cell", "ViceID");
178         seq_printf(m, "  %10s %10s %10s %3s",
179                    "Tok Set", "Tok Begin", "Tok Expire", "vno");
180         seq_printf(m, "  %-15s %10s %10s %s\n",
181                    "NFS Client", "UID/PAG", "Client UID", "Sysname(s)");
182
183         return 0;
184     }
185
186     tu->refCount++;
187     ReleaseReadLock(&afs_xuser);
188
189     afs_LockUser(tu, READ_LOCK, 0);
190
191     if (tu->cell == -1) {
192         cellname = "<default>";
193     } else {
194         tc = afs_GetCellStale(tu->cell, READ_LOCK);
195         if (tc) cellname = tc->cellName;
196         else cellname = "<unknown>";
197     }
198
199     seq_printf(m, "%10d %4d %04x    %-25s %10d",
200                tu->uid, tu->refCount, tu->states, cellname, tu->viceId);
201
202     if (tc) afs_PutCell(tc, READ_LOCK);
203
204     if (tu->states & UHasTokens) {
205         token = afs_FindToken(tu->tokens, RX_SECIDX_KAD);
206         seq_printf(m, "  %10d %10d %10d %3d",
207                    tu->tokenTime,
208                    (token != NULL)?token->rxkad.clearToken.BeginTimestamp:0,
209                    (token != NULL)?token->rxkad.clearToken.EndTimestamp:0,
210                    (token != NULL)?token->rxkad.clearToken.AuthHandle:0);
211     } else {
212         seq_printf(m, "  %-36s", "Tokens Not Set");
213     }
214
215     if (tu->exporter && tu->exporter->exp_type == EXP_NFS) {
216         struct nfsclientpag *np = (struct nfsclientpag *)(tu->exporter);
217         char ipaddr[16];
218         int i;
219
220         sprintf(ipaddr, "%u.%u.%u.%u", NIPQUAD(np->host));
221         seq_printf(m, "  %-15s %10d %10d", ipaddr, np->uid, np->client_uid);
222         if (np->sysnamecount) {
223             for (i = 0; i < np->sysnamecount; i++)
224                 seq_printf(m, " %s", np->sysname[i]);
225         } else { 
226             seq_printf(m, " <no sysname list>");
227         }
228
229     } else if (tu->exporter) {
230         seq_printf(m, "  Unknown exporter type %d", tu->exporter->exp_type);
231     }
232     seq_printf(m, "\n");
233
234     afs_PutUser(tu, READ_LOCK);
235     ObtainReadLock(&afs_xuser);
236
237     return 0;
238 }
239
240 static struct seq_operations afs_unixuser_seqop = {
241     .start              = uu_start,
242     .next               = uu_next,
243     .stop               = uu_stop,
244     .show               = uu_show,
245 };
246
247 static int afs_unixuser_open(struct inode *inode, struct file *file)
248 {
249     return seq_open(file, &afs_unixuser_seqop);
250 }
251
252 static struct file_operations afs_unixuser_fops = {
253     .open               = afs_unixuser_open,
254     .read               = seq_read,
255     .llseek             = seq_lseek,
256     .release    = seq_release,
257 };
258
259
260 #else /* HAVE_LINUX_SEQ_FILE_H */
261
262 static int
263 csdbproc_info(char *buffer, char **start, off_t offset, int
264 length)
265 {
266     int len = 0;
267     off_t pos = 0;
268     int cnt;
269     struct afs_q *cq, *tq;
270     struct cell *tc;
271     char tbuffer[16];
272     /* 90 - 64 cellname, 10 for 32 bit num and index, plus
273        decor */
274     char temp[91];
275     afs_uint32 addr;
276     
277     ObtainReadLock(&afs_xcell);
278
279     for (cq = CellLRU.next; cq != &CellLRU; cq = tq) {
280         tc = QTOC(cq); tq = QNext(cq);
281
282         pos += 90;
283
284         if (pos <= offset) {
285             len = 0;
286         } else {
287             sprintf(temp, ">%s #(%d/%d)\n", tc->cellName, 
288                     tc->cellNum, tc->cellIndex);
289             sprintf(buffer + len, "%-89s\n", temp);
290             len += 90;
291             if (pos >= offset+length) {
292                 ReleaseReadLock(&afs_xcell);
293                 goto done;
294             }
295         }
296
297         for (cnt = 0; cnt < AFS_MAXCELLHOSTS; cnt++) {
298             if (!tc->cellHosts[cnt]) break;
299             pos += 90;
300             if (pos <= offset) {
301                 len = 0;
302             } else {
303                 addr = ntohl(tc->cellHosts[cnt]->addr->sa_ip);
304                 sprintf(tbuffer, "%d.%d.%d.%d", 
305                         (int)((addr>>24) & 0xff),
306 (int)((addr>>16) & 0xff),
307                         (int)((addr>>8)  & 0xff), (int)( addr & 0xff));
308                 sprintf(temp, "%s #%s\n", tbuffer, tbuffer);
309                 sprintf(buffer + len, "%-89s\n", temp);
310                 len += 90;
311                 if (pos >= offset+length) {
312                     ReleaseReadLock(&afs_xcell);
313                     goto done;
314                 }
315             }
316         }
317     }
318
319     ReleaseReadLock(&afs_xcell);
320     
321 done:
322     *start = buffer + len - (pos - offset);
323     len = pos - offset;
324     if (len > length)
325         len = length;
326     return len;
327 }
328
329 #endif /* HAVE_LINUX_SEQ_FILE_H */
330
331 void
332 osi_proc_init(void)
333 {
334     struct proc_dir_entry *entry;
335 #if !defined(EXPORTED_PROC_ROOT_FS)
336     char path[64];
337 #endif
338     
339 #if defined(EXPORTED_PROC_ROOT_FS)
340     openafs_procfs = proc_mkdir(PROC_FSDIRNAME, proc_root_fs);
341 #else
342     sprintf(path, "fs/%s", PROC_FSDIRNAME);
343     openafs_procfs = proc_mkdir(path, NULL);
344 #endif
345 #ifdef HAVE_LINUX_SEQ_FILE_H
346     entry = create_proc_entry("unixusers", 0, openafs_procfs);
347     if (entry) {
348         entry->proc_fops = &afs_unixuser_fops;
349 #if defined(STRUCT_PROC_DIR_ENTRY_HAS_OWNER)
350         entry->owner = THIS_MODULE;
351 #endif
352     }
353     entry = create_proc_entry(PROC_CELLSERVDB_NAME, 0, openafs_procfs);
354     if (entry)
355         entry->proc_fops = &afs_csdb_operations;
356 #else
357     entry = create_proc_info_entry(PROC_CELLSERVDB_NAME, (S_IFREG|S_IRUGO), openafs_procfs, csdbproc_info);
358 #endif
359 #if defined(STRUCT_PROC_DIR_ENTRY_HAS_OWNER)
360     entry->owner = THIS_MODULE;
361 #endif
362 }
363
364 void
365 osi_proc_clean(void)
366 {
367 #if !defined(EXPORTED_PROC_ROOT_FS)
368     char path[64];
369 #endif
370
371     remove_proc_entry(PROC_CELLSERVDB_NAME, openafs_procfs);
372 #ifdef HAVE_LINUX_SEQ_FILE_H
373     remove_proc_entry("unixusers", openafs_procfs);
374 #endif
375 #if defined(EXPORTED_PROC_ROOT_FS)
376     remove_proc_entry(PROC_FSDIRNAME, proc_root_fs);
377 #else
378     sprintf(path, "fs/%s", PROC_FSDIRNAME);
379     remove_proc_entry(path, NULL);
380 #endif
381 }