1 /*
2  * Copyright (c) 2012 Intel Corporation. All rights reserved.
3  * Copyright (c) 2006 - 2012 QLogic Corporation. All rights reserved.
4  * Copyright (c) 2006 PathScale, Inc. All rights reserved.
5  *
6  * This software is available to you under a choice of one of two
7  * licenses.  You may choose to be licensed under the terms of the GNU
8  * General Public License (GPL) Version 2, available from the file
9  * COPYING in the main directory of this source tree, or the
10  * OpenIB.org BSD license below:
11  *
12  *     Redistribution and use in source and binary forms, with or
13  *     without modification, are permitted provided that the following
14  *     conditions are met:
15  *
16  *      - Redistributions of source code must retain the above
17  *        copyright notice, this list of conditions and the following
18  *        disclaimer.
19  *
20  *      - Redistributions in binary form must reproduce the above
21  *        copyright notice, this list of conditions and the following
22  *        disclaimer in the documentation and/or other materials
23  *        provided with the distribution.
24  *
25  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
26  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
27  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
28  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
29  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
30  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
31  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
32  * SOFTWARE.
33  */
34 
35 #include <linux/fs.h>
36 #include <linux/fs_context.h>
37 #include <linux/mount.h>
38 #include <linux/pagemap.h>
39 #include <linux/init.h>
40 #include <linux/namei.h>
41 
42 #include "qib.h"
43 
44 #define QIBFS_MAGIC 0x726a77
45 
46 static struct super_block *qib_super;
47 
48 #define private2dd(file) (file_inode(file)->i_private)
49 
qibfs_mknod(struct inode * dir,struct dentry * dentry,umode_t mode,const struct file_operations * fops,void * data)50 static int qibfs_mknod(struct inode *dir, struct dentry *dentry,
51 		       umode_t mode, const struct file_operations *fops,
52 		       void *data)
53 {
54 	int error;
55 	struct inode *inode = new_inode(dir->i_sb);
56 
57 	if (!inode) {
58 		error = -EPERM;
59 		goto bail;
60 	}
61 
62 	inode->i_ino = get_next_ino();
63 	inode->i_mode = mode;
64 	inode->i_uid = GLOBAL_ROOT_UID;
65 	inode->i_gid = GLOBAL_ROOT_GID;
66 	inode->i_blocks = 0;
67 	inode->i_atime = current_time(inode);
68 	inode->i_mtime = inode->i_atime;
69 	inode->i_ctime = inode->i_atime;
70 	inode->i_private = data;
71 	if (S_ISDIR(mode)) {
72 		inode->i_op = &simple_dir_inode_operations;
73 		inc_nlink(inode);
74 		inc_nlink(dir);
75 	}
76 
77 	inode->i_fop = fops;
78 
79 	d_instantiate(dentry, inode);
80 	error = 0;
81 
82 bail:
83 	return error;
84 }
85 
create_file(const char * name,umode_t mode,struct dentry * parent,struct dentry ** dentry,const struct file_operations * fops,void * data)86 static int create_file(const char *name, umode_t mode,
87 		       struct dentry *parent, struct dentry **dentry,
88 		       const struct file_operations *fops, void *data)
89 {
90 	int error;
91 
92 	inode_lock(d_inode(parent));
93 	*dentry = lookup_one_len(name, parent, strlen(name));
94 	if (!IS_ERR(*dentry))
95 		error = qibfs_mknod(d_inode(parent), *dentry,
96 				    mode, fops, data);
97 	else
98 		error = PTR_ERR(*dentry);
99 	inode_unlock(d_inode(parent));
100 
101 	return error;
102 }
103 
driver_stats_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)104 static ssize_t driver_stats_read(struct file *file, char __user *buf,
105 				 size_t count, loff_t *ppos)
106 {
107 	qib_stats.sps_ints = qib_sps_ints();
108 	return simple_read_from_buffer(buf, count, ppos, &qib_stats,
109 				       sizeof(qib_stats));
110 }
111 
112 /*
113  * driver stats field names, one line per stat, single string.  Used by
114  * programs like ipathstats to print the stats in a way which works for
115  * different versions of drivers, without changing program source.
116  * if qlogic_ib_stats changes, this needs to change.  Names need to be
117  * 12 chars or less (w/o newline), for proper display by ipathstats utility.
118  */
119 static const char qib_statnames[] =
120 	"KernIntr\n"
121 	"ErrorIntr\n"
122 	"Tx_Errs\n"
123 	"Rcv_Errs\n"
124 	"H/W_Errs\n"
125 	"NoPIOBufs\n"
126 	"CtxtsOpen\n"
127 	"RcvLen_Errs\n"
128 	"EgrBufFull\n"
129 	"EgrHdrFull\n"
130 	;
131 
driver_names_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)132 static ssize_t driver_names_read(struct file *file, char __user *buf,
133 				 size_t count, loff_t *ppos)
134 {
135 	return simple_read_from_buffer(buf, count, ppos, qib_statnames,
136 		sizeof(qib_statnames) - 1); /* no null */
137 }
138 
139 static const struct file_operations driver_ops[] = {
140 	{ .read = driver_stats_read, .llseek = generic_file_llseek, },
141 	{ .read = driver_names_read, .llseek = generic_file_llseek, },
142 };
143 
144 /* read the per-device counters */
dev_counters_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)145 static ssize_t dev_counters_read(struct file *file, char __user *buf,
146 				 size_t count, loff_t *ppos)
147 {
148 	u64 *counters;
149 	size_t avail;
150 	struct qib_devdata *dd = private2dd(file);
151 
152 	avail = dd->f_read_cntrs(dd, *ppos, NULL, &counters);
153 	return simple_read_from_buffer(buf, count, ppos, counters, avail);
154 }
155 
156 /* read the per-device counters */
dev_names_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)157 static ssize_t dev_names_read(struct file *file, char __user *buf,
158 			      size_t count, loff_t *ppos)
159 {
160 	char *names;
161 	size_t avail;
162 	struct qib_devdata *dd = private2dd(file);
163 
164 	avail = dd->f_read_cntrs(dd, *ppos, &names, NULL);
165 	return simple_read_from_buffer(buf, count, ppos, names, avail);
166 }
167 
168 static const struct file_operations cntr_ops[] = {
169 	{ .read = dev_counters_read, .llseek = generic_file_llseek, },
170 	{ .read = dev_names_read, .llseek = generic_file_llseek, },
171 };
172 
173 /*
174  * Could use file_inode(file)->i_ino to figure out which file,
175  * instead of separate routine for each, but for now, this works...
176  */
177 
178 /* read the per-port names (same for each port) */
portnames_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)179 static ssize_t portnames_read(struct file *file, char __user *buf,
180 			      size_t count, loff_t *ppos)
181 {
182 	char *names;
183 	size_t avail;
184 	struct qib_devdata *dd = private2dd(file);
185 
186 	avail = dd->f_read_portcntrs(dd, *ppos, 0, &names, NULL);
187 	return simple_read_from_buffer(buf, count, ppos, names, avail);
188 }
189 
190 /* read the per-port counters for port 1 (pidx 0) */
portcntrs_1_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)191 static ssize_t portcntrs_1_read(struct file *file, char __user *buf,
192 				size_t count, loff_t *ppos)
193 {
194 	u64 *counters;
195 	size_t avail;
196 	struct qib_devdata *dd = private2dd(file);
197 
198 	avail = dd->f_read_portcntrs(dd, *ppos, 0, NULL, &counters);
199 	return simple_read_from_buffer(buf, count, ppos, counters, avail);
200 }
201 
202 /* read the per-port counters for port 2 (pidx 1) */
portcntrs_2_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)203 static ssize_t portcntrs_2_read(struct file *file, char __user *buf,
204 				size_t count, loff_t *ppos)
205 {
206 	u64 *counters;
207 	size_t avail;
208 	struct qib_devdata *dd = private2dd(file);
209 
210 	avail = dd->f_read_portcntrs(dd, *ppos, 1, NULL, &counters);
211 	return simple_read_from_buffer(buf, count, ppos, counters, avail);
212 }
213 
214 static const struct file_operations portcntr_ops[] = {
215 	{ .read = portnames_read, .llseek = generic_file_llseek, },
216 	{ .read = portcntrs_1_read, .llseek = generic_file_llseek, },
217 	{ .read = portcntrs_2_read, .llseek = generic_file_llseek, },
218 };
219 
220 /*
221  * read the per-port QSFP data for port 1 (pidx 0)
222  */
qsfp_1_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)223 static ssize_t qsfp_1_read(struct file *file, char __user *buf,
224 			   size_t count, loff_t *ppos)
225 {
226 	struct qib_devdata *dd = private2dd(file);
227 	char *tmp;
228 	int ret;
229 
230 	tmp = kmalloc(PAGE_SIZE, GFP_KERNEL);
231 	if (!tmp)
232 		return -ENOMEM;
233 
234 	ret = qib_qsfp_dump(dd->pport, tmp, PAGE_SIZE);
235 	if (ret > 0)
236 		ret = simple_read_from_buffer(buf, count, ppos, tmp, ret);
237 	kfree(tmp);
238 	return ret;
239 }
240 
241 /*
242  * read the per-port QSFP data for port 2 (pidx 1)
243  */
qsfp_2_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)244 static ssize_t qsfp_2_read(struct file *file, char __user *buf,
245 			   size_t count, loff_t *ppos)
246 {
247 	struct qib_devdata *dd = private2dd(file);
248 	char *tmp;
249 	int ret;
250 
251 	if (dd->num_pports < 2)
252 		return -ENODEV;
253 
254 	tmp = kmalloc(PAGE_SIZE, GFP_KERNEL);
255 	if (!tmp)
256 		return -ENOMEM;
257 
258 	ret = qib_qsfp_dump(dd->pport + 1, tmp, PAGE_SIZE);
259 	if (ret > 0)
260 		ret = simple_read_from_buffer(buf, count, ppos, tmp, ret);
261 	kfree(tmp);
262 	return ret;
263 }
264 
265 static const struct file_operations qsfp_ops[] = {
266 	{ .read = qsfp_1_read, .llseek = generic_file_llseek, },
267 	{ .read = qsfp_2_read, .llseek = generic_file_llseek, },
268 };
269 
flash_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)270 static ssize_t flash_read(struct file *file, char __user *buf,
271 			  size_t count, loff_t *ppos)
272 {
273 	struct qib_devdata *dd;
274 	ssize_t ret;
275 	loff_t pos;
276 	char *tmp;
277 
278 	pos = *ppos;
279 
280 	if (pos < 0) {
281 		ret = -EINVAL;
282 		goto bail;
283 	}
284 
285 	if (pos >= sizeof(struct qib_flash)) {
286 		ret = 0;
287 		goto bail;
288 	}
289 
290 	if (count > sizeof(struct qib_flash) - pos)
291 		count = sizeof(struct qib_flash) - pos;
292 
293 	tmp = kmalloc(count, GFP_KERNEL);
294 	if (!tmp) {
295 		ret = -ENOMEM;
296 		goto bail;
297 	}
298 
299 	dd = private2dd(file);
300 	if (qib_eeprom_read(dd, pos, tmp, count)) {
301 		qib_dev_err(dd, "failed to read from flash\n");
302 		ret = -ENXIO;
303 		goto bail_tmp;
304 	}
305 
306 	if (copy_to_user(buf, tmp, count)) {
307 		ret = -EFAULT;
308 		goto bail_tmp;
309 	}
310 
311 	*ppos = pos + count;
312 	ret = count;
313 
314 bail_tmp:
315 	kfree(tmp);
316 
317 bail:
318 	return ret;
319 }
320 
flash_write(struct file * file,const char __user * buf,size_t count,loff_t * ppos)321 static ssize_t flash_write(struct file *file, const char __user *buf,
322 			   size_t count, loff_t *ppos)
323 {
324 	struct qib_devdata *dd;
325 	ssize_t ret;
326 	loff_t pos;
327 	char *tmp;
328 
329 	pos = *ppos;
330 
331 	if (pos != 0 || count != sizeof(struct qib_flash))
332 		return -EINVAL;
333 
334 	tmp = memdup_user(buf, count);
335 	if (IS_ERR(tmp))
336 		return PTR_ERR(tmp);
337 
338 	dd = private2dd(file);
339 	if (qib_eeprom_write(dd, pos, tmp, count)) {
340 		ret = -ENXIO;
341 		qib_dev_err(dd, "failed to write to flash\n");
342 		goto bail_tmp;
343 	}
344 
345 	*ppos = pos + count;
346 	ret = count;
347 
348 bail_tmp:
349 	kfree(tmp);
350 	return ret;
351 }
352 
353 static const struct file_operations flash_ops = {
354 	.read = flash_read,
355 	.write = flash_write,
356 	.llseek = default_llseek,
357 };
358 
add_cntr_files(struct super_block * sb,struct qib_devdata * dd)359 static int add_cntr_files(struct super_block *sb, struct qib_devdata *dd)
360 {
361 	struct dentry *dir, *tmp;
362 	char unit[10];
363 	int ret, i;
364 
365 	/* create the per-unit directory */
366 	snprintf(unit, sizeof(unit), "%u", dd->unit);
367 	ret = create_file(unit, S_IFDIR|S_IRUGO|S_IXUGO, sb->s_root, &dir,
368 			  &simple_dir_operations, dd);
369 	if (ret) {
370 		pr_err("create_file(%s) failed: %d\n", unit, ret);
371 		goto bail;
372 	}
373 
374 	/* create the files in the new directory */
375 	ret = create_file("counters", S_IFREG|S_IRUGO, dir, &tmp,
376 			  &cntr_ops[0], dd);
377 	if (ret) {
378 		pr_err("create_file(%s/counters) failed: %d\n",
379 		       unit, ret);
380 		goto bail;
381 	}
382 	ret = create_file("counter_names", S_IFREG|S_IRUGO, dir, &tmp,
383 			  &cntr_ops[1], dd);
384 	if (ret) {
385 		pr_err("create_file(%s/counter_names) failed: %d\n",
386 		       unit, ret);
387 		goto bail;
388 	}
389 	ret = create_file("portcounter_names", S_IFREG|S_IRUGO, dir, &tmp,
390 			  &portcntr_ops[0], dd);
391 	if (ret) {
392 		pr_err("create_file(%s/%s) failed: %d\n",
393 		       unit, "portcounter_names", ret);
394 		goto bail;
395 	}
396 	for (i = 1; i <= dd->num_pports; i++) {
397 		char fname[24];
398 
399 		sprintf(fname, "port%dcounters", i);
400 		/* create the files in the new directory */
401 		ret = create_file(fname, S_IFREG|S_IRUGO, dir, &tmp,
402 				  &portcntr_ops[i], dd);
403 		if (ret) {
404 			pr_err("create_file(%s/%s) failed: %d\n",
405 				unit, fname, ret);
406 			goto bail;
407 		}
408 		if (!(dd->flags & QIB_HAS_QSFP))
409 			continue;
410 		sprintf(fname, "qsfp%d", i);
411 		ret = create_file(fname, S_IFREG|S_IRUGO, dir, &tmp,
412 				  &qsfp_ops[i - 1], dd);
413 		if (ret) {
414 			pr_err("create_file(%s/%s) failed: %d\n",
415 				unit, fname, ret);
416 			goto bail;
417 		}
418 	}
419 
420 	ret = create_file("flash", S_IFREG|S_IWUSR|S_IRUGO, dir, &tmp,
421 			  &flash_ops, dd);
422 	if (ret)
423 		pr_err("create_file(%s/flash) failed: %d\n",
424 			unit, ret);
425 bail:
426 	return ret;
427 }
428 
remove_device_files(struct super_block * sb,struct qib_devdata * dd)429 static int remove_device_files(struct super_block *sb,
430 			       struct qib_devdata *dd)
431 {
432 	struct dentry *dir;
433 	char unit[10];
434 
435 	snprintf(unit, sizeof(unit), "%u", dd->unit);
436 	dir = lookup_one_len_unlocked(unit, sb->s_root, strlen(unit));
437 
438 	if (IS_ERR(dir)) {
439 		pr_err("Lookup of %s failed\n", unit);
440 		return PTR_ERR(dir);
441 	}
442 	simple_recursive_removal(dir, NULL);
443 	return 0;
444 }
445 
446 /*
447  * This fills everything in when the fs is mounted, to handle umount/mount
448  * after device init.  The direct add_cntr_files() call handles adding
449  * them from the init code, when the fs is already mounted.
450  */
qibfs_fill_super(struct super_block * sb,struct fs_context * fc)451 static int qibfs_fill_super(struct super_block *sb, struct fs_context *fc)
452 {
453 	struct qib_devdata *dd;
454 	unsigned long index;
455 	int ret;
456 
457 	static const struct tree_descr files[] = {
458 		[2] = {"driver_stats", &driver_ops[0], S_IRUGO},
459 		[3] = {"driver_stats_names", &driver_ops[1], S_IRUGO},
460 		{""},
461 	};
462 
463 	ret = simple_fill_super(sb, QIBFS_MAGIC, files);
464 	if (ret) {
465 		pr_err("simple_fill_super failed: %d\n", ret);
466 		goto bail;
467 	}
468 
469 	xa_for_each(&qib_dev_table, index, dd) {
470 		ret = add_cntr_files(sb, dd);
471 		if (ret)
472 			goto bail;
473 	}
474 
475 bail:
476 	return ret;
477 }
478 
qibfs_get_tree(struct fs_context * fc)479 static int qibfs_get_tree(struct fs_context *fc)
480 {
481 	int ret = get_tree_single(fc, qibfs_fill_super);
482 	if (ret == 0)
483 		qib_super = fc->root->d_sb;
484 	return ret;
485 }
486 
487 static const struct fs_context_operations qibfs_context_ops = {
488 	.get_tree	= qibfs_get_tree,
489 };
490 
qibfs_init_fs_context(struct fs_context * fc)491 static int qibfs_init_fs_context(struct fs_context *fc)
492 {
493 	fc->ops = &qibfs_context_ops;
494 	return 0;
495 }
496 
qibfs_kill_super(struct super_block * s)497 static void qibfs_kill_super(struct super_block *s)
498 {
499 	kill_litter_super(s);
500 	qib_super = NULL;
501 }
502 
qibfs_add(struct qib_devdata * dd)503 int qibfs_add(struct qib_devdata *dd)
504 {
505 	int ret;
506 
507 	/*
508 	 * On first unit initialized, qib_super will not yet exist
509 	 * because nobody has yet tried to mount the filesystem, so
510 	 * we can't consider that to be an error; if an error occurs
511 	 * during the mount, that will get a complaint, so this is OK.
512 	 * add_cntr_files() for all units is done at mount from
513 	 * qibfs_fill_super(), so one way or another, everything works.
514 	 */
515 	if (qib_super == NULL)
516 		ret = 0;
517 	else
518 		ret = add_cntr_files(qib_super, dd);
519 	return ret;
520 }
521 
qibfs_remove(struct qib_devdata * dd)522 int qibfs_remove(struct qib_devdata *dd)
523 {
524 	int ret = 0;
525 
526 	if (qib_super)
527 		ret = remove_device_files(qib_super, dd);
528 
529 	return ret;
530 }
531 
532 static struct file_system_type qibfs_fs_type = {
533 	.owner =        THIS_MODULE,
534 	.name =         "ipathfs",
535 	.init_fs_context = qibfs_init_fs_context,
536 	.kill_sb =      qibfs_kill_super,
537 };
538 MODULE_ALIAS_FS("ipathfs");
539 
qib_init_qibfs(void)540 int __init qib_init_qibfs(void)
541 {
542 	return register_filesystem(&qibfs_fs_type);
543 }
544 
qib_exit_qibfs(void)545 int __exit qib_exit_qibfs(void)
546 {
547 	return unregister_filesystem(&qibfs_fs_type);
548 }
549