1/*
2 * Copyright (C) Sistina Software, Inc.  1997-2003 All rights reserved.
3 * Copyright (C) 2004-2006 Red Hat, Inc.  All rights reserved.
4 *
5 * This copyrighted material is made available to anyone wishing to use,
6 * modify, copy, or redistribute it subject to the terms and conditions
7 * of the GNU General Public License version 2.
8 */
9
10#include <linux/sched.h>
11#include <linux/spinlock.h>
12#include <linux/completion.h>
13#include <linux/buffer_head.h>
14#include <linux/module.h>
15#include <linux/kobject.h>
16#include <asm/uaccess.h>
17#include <linux/gfs2_ondisk.h>
18#include <linux/genhd.h>
19
20#include "gfs2.h"
21#include "incore.h"
22#include "sys.h"
23#include "super.h"
24#include "glock.h"
25#include "quota.h"
26#include "util.h"
27#include "glops.h"
28#include "recovery.h"
29
30struct gfs2_attr {
31	struct attribute attr;
32	ssize_t (*show)(struct gfs2_sbd *, char *);
33	ssize_t (*store)(struct gfs2_sbd *, const char *, size_t);
34};
35
36static ssize_t gfs2_attr_show(struct kobject *kobj, struct attribute *attr,
37			      char *buf)
38{
39	struct gfs2_sbd *sdp = container_of(kobj, struct gfs2_sbd, sd_kobj);
40	struct gfs2_attr *a = container_of(attr, struct gfs2_attr, attr);
41	return a->show ? a->show(sdp, buf) : 0;
42}
43
44static ssize_t gfs2_attr_store(struct kobject *kobj, struct attribute *attr,
45			       const char *buf, size_t len)
46{
47	struct gfs2_sbd *sdp = container_of(kobj, struct gfs2_sbd, sd_kobj);
48	struct gfs2_attr *a = container_of(attr, struct gfs2_attr, attr);
49	return a->store ? a->store(sdp, buf, len) : len;
50}
51
52static const struct sysfs_ops gfs2_attr_ops = {
53	.show  = gfs2_attr_show,
54	.store = gfs2_attr_store,
55};
56
57
58static struct kset *gfs2_kset;
59
60static ssize_t id_show(struct gfs2_sbd *sdp, char *buf)
61{
62	return snprintf(buf, PAGE_SIZE, "%u:%u\n",
63			MAJOR(sdp->sd_vfs->s_dev), MINOR(sdp->sd_vfs->s_dev));
64}
65
66static ssize_t fsname_show(struct gfs2_sbd *sdp, char *buf)
67{
68	return snprintf(buf, PAGE_SIZE, "%s\n", sdp->sd_fsname);
69}
70
71static int gfs2_uuid_valid(const u8 *uuid)
72{
73	int i;
74
75	for (i = 0; i < 16; i++) {
76		if (uuid[i])
77			return 1;
78	}
79	return 0;
80}
81
82static ssize_t uuid_show(struct gfs2_sbd *sdp, char *buf)
83{
84	const u8 *uuid = sdp->sd_sb.sb_uuid;
85	buf[0] = '\0';
86	if (!gfs2_uuid_valid(uuid))
87		return 0;
88	return snprintf(buf, PAGE_SIZE, "%pUB\n", uuid);
89}
90
91static ssize_t freeze_show(struct gfs2_sbd *sdp, char *buf)
92{
93	unsigned int count;
94
95	mutex_lock(&sdp->sd_freeze_lock);
96	count = sdp->sd_freeze_count;
97	mutex_unlock(&sdp->sd_freeze_lock);
98
99	return snprintf(buf, PAGE_SIZE, "%u\n", count);
100}
101
102static ssize_t freeze_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
103{
104	ssize_t ret = len;
105	int error = 0;
106	int n = simple_strtol(buf, NULL, 0);
107
108	if (!capable(CAP_SYS_ADMIN))
109		return -EACCES;
110
111	switch (n) {
112	case 0:
113		gfs2_unfreeze_fs(sdp);
114		break;
115	case 1:
116		error = gfs2_freeze_fs(sdp);
117		break;
118	default:
119		ret = -EINVAL;
120	}
121
122	if (error)
123		fs_warn(sdp, "freeze %d error %d", n, error);
124
125	return ret;
126}
127
128static ssize_t withdraw_show(struct gfs2_sbd *sdp, char *buf)
129{
130	unsigned int b = test_bit(SDF_SHUTDOWN, &sdp->sd_flags);
131	return snprintf(buf, PAGE_SIZE, "%u\n", b);
132}
133
134static ssize_t withdraw_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
135{
136	if (!capable(CAP_SYS_ADMIN))
137		return -EACCES;
138
139	if (simple_strtol(buf, NULL, 0) != 1)
140		return -EINVAL;
141
142	gfs2_lm_withdraw(sdp,
143		"GFS2: fsid=%s: withdrawing from cluster at user's request\n",
144		sdp->sd_fsname);
145	return len;
146}
147
148static ssize_t statfs_sync_store(struct gfs2_sbd *sdp, const char *buf,
149				 size_t len)
150{
151	if (!capable(CAP_SYS_ADMIN))
152		return -EACCES;
153
154	if (simple_strtol(buf, NULL, 0) != 1)
155		return -EINVAL;
156
157	gfs2_statfs_sync(sdp->sd_vfs, 0);
158	return len;
159}
160
161static ssize_t quota_sync_store(struct gfs2_sbd *sdp, const char *buf,
162				size_t len)
163{
164	if (!capable(CAP_SYS_ADMIN))
165		return -EACCES;
166
167	if (simple_strtol(buf, NULL, 0) != 1)
168		return -EINVAL;
169
170	gfs2_quota_sync(sdp->sd_vfs, 0, 1);
171	return len;
172}
173
174static ssize_t quota_refresh_user_store(struct gfs2_sbd *sdp, const char *buf,
175					size_t len)
176{
177	int error;
178	u32 id;
179
180	if (!capable(CAP_SYS_ADMIN))
181		return -EACCES;
182
183	id = simple_strtoul(buf, NULL, 0);
184
185	error = gfs2_quota_refresh(sdp, 1, id);
186	return error ? error : len;
187}
188
189static ssize_t quota_refresh_group_store(struct gfs2_sbd *sdp, const char *buf,
190					 size_t len)
191{
192	int error;
193	u32 id;
194
195	if (!capable(CAP_SYS_ADMIN))
196		return -EACCES;
197
198	id = simple_strtoul(buf, NULL, 0);
199
200	error = gfs2_quota_refresh(sdp, 0, id);
201	return error ? error : len;
202}
203
204static ssize_t demote_rq_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
205{
206	struct gfs2_glock *gl;
207	const struct gfs2_glock_operations *glops;
208	unsigned int glmode;
209	unsigned int gltype;
210	unsigned long long glnum;
211	char mode[16];
212	int rv;
213
214	if (!capable(CAP_SYS_ADMIN))
215		return -EACCES;
216
217	rv = sscanf(buf, "%u:%llu %15s", &gltype, &glnum,
218		    mode);
219	if (rv != 3)
220		return -EINVAL;
221
222	if (strcmp(mode, "EX") == 0)
223		glmode = LM_ST_UNLOCKED;
224	else if ((strcmp(mode, "CW") == 0) || (strcmp(mode, "DF") == 0))
225		glmode = LM_ST_DEFERRED;
226	else if ((strcmp(mode, "PR") == 0) || (strcmp(mode, "SH") == 0))
227		glmode = LM_ST_SHARED;
228	else
229		return -EINVAL;
230
231	if (gltype > LM_TYPE_JOURNAL)
232		return -EINVAL;
233	glops = gfs2_glops_list[gltype];
234	if (glops == NULL)
235		return -EINVAL;
236	if (!test_and_set_bit(SDF_DEMOTE, &sdp->sd_flags))
237		fs_info(sdp, "demote interface used\n");
238	rv = gfs2_glock_get(sdp, glnum, glops, 0, &gl);
239	if (rv)
240		return rv;
241	gfs2_glock_cb(gl, glmode);
242	gfs2_glock_put(gl);
243	return len;
244}
245
246
247#define GFS2_ATTR(name, mode, show, store) \
248static struct gfs2_attr gfs2_attr_##name = __ATTR(name, mode, show, store)
249
250GFS2_ATTR(id,                  0444, id_show,       NULL);
251GFS2_ATTR(fsname,              0444, fsname_show,   NULL);
252GFS2_ATTR(uuid,                0444, uuid_show,     NULL);
253GFS2_ATTR(freeze,              0644, freeze_show,   freeze_store);
254GFS2_ATTR(withdraw,            0644, withdraw_show, withdraw_store);
255GFS2_ATTR(statfs_sync,         0200, NULL,          statfs_sync_store);
256GFS2_ATTR(quota_sync,          0200, NULL,          quota_sync_store);
257GFS2_ATTR(quota_refresh_user,  0200, NULL,          quota_refresh_user_store);
258GFS2_ATTR(quota_refresh_group, 0200, NULL,          quota_refresh_group_store);
259GFS2_ATTR(demote_rq,           0200, NULL,	    demote_rq_store);
260
261static struct attribute *gfs2_attrs[] = {
262	&gfs2_attr_id.attr,
263	&gfs2_attr_fsname.attr,
264	&gfs2_attr_uuid.attr,
265	&gfs2_attr_freeze.attr,
266	&gfs2_attr_withdraw.attr,
267	&gfs2_attr_statfs_sync.attr,
268	&gfs2_attr_quota_sync.attr,
269	&gfs2_attr_quota_refresh_user.attr,
270	&gfs2_attr_quota_refresh_group.attr,
271	&gfs2_attr_demote_rq.attr,
272	NULL,
273};
274
275static struct kobj_type gfs2_ktype = {
276	.default_attrs = gfs2_attrs,
277	.sysfs_ops     = &gfs2_attr_ops,
278};
279
280
281/*
282 * lock_module. Originally from lock_dlm
283 */
284
285static ssize_t proto_name_show(struct gfs2_sbd *sdp, char *buf)
286{
287	const struct lm_lockops *ops = sdp->sd_lockstruct.ls_ops;
288	return sprintf(buf, "%s\n", ops->lm_proto_name);
289}
290
291static ssize_t block_show(struct gfs2_sbd *sdp, char *buf)
292{
293	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
294	ssize_t ret;
295	int val = 0;
296
297	if (test_bit(DFL_BLOCK_LOCKS, &ls->ls_flags))
298		val = 1;
299	ret = sprintf(buf, "%d\n", val);
300	return ret;
301}
302
303static ssize_t block_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
304{
305	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
306	ssize_t ret = len;
307	int val;
308
309	val = simple_strtol(buf, NULL, 0);
310
311	if (val == 1)
312		set_bit(DFL_BLOCK_LOCKS, &ls->ls_flags);
313	else if (val == 0) {
314		clear_bit(DFL_BLOCK_LOCKS, &ls->ls_flags);
315		smp_mb__after_clear_bit();
316		gfs2_glock_thaw(sdp);
317	} else {
318		ret = -EINVAL;
319	}
320	return ret;
321}
322
323static ssize_t lkfirst_show(struct gfs2_sbd *sdp, char *buf)
324{
325	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
326	return sprintf(buf, "%d\n", ls->ls_first);
327}
328
329static ssize_t lkfirst_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
330{
331	unsigned first;
332	int rv;
333
334	rv = sscanf(buf, "%u", &first);
335	if (rv != 1 || first > 1)
336		return -EINVAL;
337	spin_lock(&sdp->sd_jindex_spin);
338	rv = -EBUSY;
339	if (test_bit(SDF_NOJOURNALID, &sdp->sd_flags) == 0)
340		goto out;
341	rv = -EINVAL;
342	if (sdp->sd_args.ar_spectator)
343		goto out;
344	if (sdp->sd_lockstruct.ls_ops->lm_mount == NULL)
345		goto out;
346        sdp->sd_lockstruct.ls_first = first;
347        rv = 0;
348out:
349        spin_unlock(&sdp->sd_jindex_spin);
350        return rv ? rv : len;
351}
352
353static ssize_t first_done_show(struct gfs2_sbd *sdp, char *buf)
354{
355	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
356	return sprintf(buf, "%d\n", ls->ls_first_done);
357}
358
359static ssize_t recover_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
360{
361	unsigned jid;
362	struct gfs2_jdesc *jd;
363	int rv;
364
365	rv = sscanf(buf, "%u", &jid);
366	if (rv != 1)
367		return -EINVAL;
368
369	rv = -ESHUTDOWN;
370	spin_lock(&sdp->sd_jindex_spin);
371	if (test_bit(SDF_NORECOVERY, &sdp->sd_flags))
372		goto out;
373	rv = -EBUSY;
374	if (sdp->sd_jdesc->jd_jid == jid)
375		goto out;
376	rv = -ENOENT;
377	list_for_each_entry(jd, &sdp->sd_jindex_list, jd_list) {
378		if (jd->jd_jid != jid)
379			continue;
380		rv = gfs2_recover_journal(jd, false);
381		break;
382	}
383out:
384	spin_unlock(&sdp->sd_jindex_spin);
385	return rv ? rv : len;
386}
387
388static ssize_t recover_done_show(struct gfs2_sbd *sdp, char *buf)
389{
390	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
391	return sprintf(buf, "%d\n", ls->ls_recover_jid_done);
392}
393
394static ssize_t recover_status_show(struct gfs2_sbd *sdp, char *buf)
395{
396	struct lm_lockstruct *ls = &sdp->sd_lockstruct;
397	return sprintf(buf, "%d\n", ls->ls_recover_jid_status);
398}
399
400static ssize_t jid_show(struct gfs2_sbd *sdp, char *buf)
401{
402	return sprintf(buf, "%u\n", sdp->sd_lockstruct.ls_jid);
403}
404
405static ssize_t jid_store(struct gfs2_sbd *sdp, const char *buf, size_t len)
406{
407        unsigned jid;
408	int rv;
409
410	rv = sscanf(buf, "%u", &jid);
411	if (rv != 1)
412		return -EINVAL;
413
414	spin_lock(&sdp->sd_jindex_spin);
415	rv = -EINVAL;
416	if (sdp->sd_args.ar_spectator)
417		goto out;
418	if (sdp->sd_lockstruct.ls_ops->lm_mount == NULL)
419		goto out;
420	rv = -EBUSY;
421	if (test_and_clear_bit(SDF_NOJOURNALID, &sdp->sd_flags) == 0)
422		goto out;
423	sdp->sd_lockstruct.ls_jid = jid;
424	smp_mb__after_clear_bit();
425	wake_up_bit(&sdp->sd_flags, SDF_NOJOURNALID);
426	rv = 0;
427out:
428	spin_unlock(&sdp->sd_jindex_spin);
429	return rv ? rv : len;
430}
431
432#define GDLM_ATTR(_name,_mode,_show,_store) \
433static struct gfs2_attr gdlm_attr_##_name = __ATTR(_name,_mode,_show,_store)
434
435GDLM_ATTR(proto_name,		0444, proto_name_show,		NULL);
436GDLM_ATTR(block,		0644, block_show,		block_store);
437GDLM_ATTR(withdraw,		0644, withdraw_show,		withdraw_store);
438GDLM_ATTR(jid,			0644, jid_show,			jid_store);
439GDLM_ATTR(first,		0644, lkfirst_show,		lkfirst_store);
440GDLM_ATTR(first_done,		0444, first_done_show,		NULL);
441GDLM_ATTR(recover,		0600, NULL,			recover_store);
442GDLM_ATTR(recover_done,		0444, recover_done_show,	NULL);
443GDLM_ATTR(recover_status,	0444, recover_status_show,	NULL);
444
445static struct attribute *lock_module_attrs[] = {
446	&gdlm_attr_proto_name.attr,
447	&gdlm_attr_block.attr,
448	&gdlm_attr_withdraw.attr,
449	&gdlm_attr_jid.attr,
450	&gdlm_attr_first.attr,
451	&gdlm_attr_first_done.attr,
452	&gdlm_attr_recover.attr,
453	&gdlm_attr_recover_done.attr,
454	&gdlm_attr_recover_status.attr,
455	NULL,
456};
457
458/*
459 * get and set struct gfs2_tune fields
460 */
461
462static ssize_t quota_scale_show(struct gfs2_sbd *sdp, char *buf)
463{
464	return snprintf(buf, PAGE_SIZE, "%u %u\n",
465			sdp->sd_tune.gt_quota_scale_num,
466			sdp->sd_tune.gt_quota_scale_den);
467}
468
469static ssize_t quota_scale_store(struct gfs2_sbd *sdp, const char *buf,
470				 size_t len)
471{
472	struct gfs2_tune *gt = &sdp->sd_tune;
473	unsigned int x, y;
474
475	if (!capable(CAP_SYS_ADMIN))
476		return -EACCES;
477
478	if (sscanf(buf, "%u %u", &x, &y) != 2 || !y)
479		return -EINVAL;
480
481	spin_lock(&gt->gt_spin);
482	gt->gt_quota_scale_num = x;
483	gt->gt_quota_scale_den = y;
484	spin_unlock(&gt->gt_spin);
485	return len;
486}
487
488static ssize_t tune_set(struct gfs2_sbd *sdp, unsigned int *field,
489			int check_zero, const char *buf, size_t len)
490{
491	struct gfs2_tune *gt = &sdp->sd_tune;
492	unsigned int x;
493
494	if (!capable(CAP_SYS_ADMIN))
495		return -EACCES;
496
497	x = simple_strtoul(buf, NULL, 0);
498
499	if (check_zero && !x)
500		return -EINVAL;
501
502	spin_lock(&gt->gt_spin);
503	*field = x;
504	spin_unlock(&gt->gt_spin);
505	return len;
506}
507
508#define TUNE_ATTR_3(name, show, store)                                        \
509static struct gfs2_attr tune_attr_##name = __ATTR(name, 0644, show, store)
510
511#define TUNE_ATTR_2(name, store)                                              \
512static ssize_t name##_show(struct gfs2_sbd *sdp, char *buf)                   \
513{                                                                             \
514	return snprintf(buf, PAGE_SIZE, "%u\n", sdp->sd_tune.gt_##name);      \
515}                                                                             \
516TUNE_ATTR_3(name, name##_show, store)
517
518#define TUNE_ATTR(name, check_zero)                                           \
519static ssize_t name##_store(struct gfs2_sbd *sdp, const char *buf, size_t len)\
520{                                                                             \
521	return tune_set(sdp, &sdp->sd_tune.gt_##name, check_zero, buf, len);  \
522}                                                                             \
523TUNE_ATTR_2(name, name##_store)
524
525TUNE_ATTR(quota_warn_period, 0);
526TUNE_ATTR(quota_quantum, 0);
527TUNE_ATTR(max_readahead, 0);
528TUNE_ATTR(complain_secs, 0);
529TUNE_ATTR(statfs_slow, 0);
530TUNE_ATTR(new_files_jdata, 0);
531TUNE_ATTR(quota_simul_sync, 1);
532TUNE_ATTR(statfs_quantum, 1);
533TUNE_ATTR_3(quota_scale, quota_scale_show, quota_scale_store);
534
535static struct attribute *tune_attrs[] = {
536	&tune_attr_quota_warn_period.attr,
537	&tune_attr_quota_quantum.attr,
538	&tune_attr_max_readahead.attr,
539	&tune_attr_complain_secs.attr,
540	&tune_attr_statfs_slow.attr,
541	&tune_attr_quota_simul_sync.attr,
542	&tune_attr_statfs_quantum.attr,
543	&tune_attr_quota_scale.attr,
544	&tune_attr_new_files_jdata.attr,
545	NULL,
546};
547
548static struct attribute_group tune_group = {
549	.name = "tune",
550	.attrs = tune_attrs,
551};
552
553static struct attribute_group lock_module_group = {
554	.name = "lock_module",
555	.attrs = lock_module_attrs,
556};
557
558int gfs2_sys_fs_add(struct gfs2_sbd *sdp)
559{
560	struct super_block *sb = sdp->sd_vfs;
561	int error;
562	char ro[20];
563	char spectator[20];
564	char *envp[] = { ro, spectator, NULL };
565
566	sprintf(ro, "RDONLY=%d", (sb->s_flags & MS_RDONLY) ? 1 : 0);
567	sprintf(spectator, "SPECTATOR=%d", sdp->sd_args.ar_spectator ? 1 : 0);
568
569	sdp->sd_kobj.kset = gfs2_kset;
570	error = kobject_init_and_add(&sdp->sd_kobj, &gfs2_ktype, NULL,
571				     "%s", sdp->sd_table_name);
572	if (error)
573		goto fail;
574
575	error = sysfs_create_group(&sdp->sd_kobj, &tune_group);
576	if (error)
577		goto fail_reg;
578
579	error = sysfs_create_group(&sdp->sd_kobj, &lock_module_group);
580	if (error)
581		goto fail_tune;
582
583	error = sysfs_create_link(&sdp->sd_kobj,
584				  &disk_to_dev(sb->s_bdev->bd_disk)->kobj,
585				  "device");
586	if (error)
587		goto fail_lock_module;
588
589	kobject_uevent_env(&sdp->sd_kobj, KOBJ_ADD, envp);
590	return 0;
591
592fail_lock_module:
593	sysfs_remove_group(&sdp->sd_kobj, &lock_module_group);
594fail_tune:
595	sysfs_remove_group(&sdp->sd_kobj, &tune_group);
596fail_reg:
597	kobject_put(&sdp->sd_kobj);
598fail:
599	fs_err(sdp, "error %d adding sysfs files", error);
600	return error;
601}
602
603void gfs2_sys_fs_del(struct gfs2_sbd *sdp)
604{
605	sysfs_remove_link(&sdp->sd_kobj, "device");
606	sysfs_remove_group(&sdp->sd_kobj, &tune_group);
607	sysfs_remove_group(&sdp->sd_kobj, &lock_module_group);
608	kobject_put(&sdp->sd_kobj);
609}
610
611static int gfs2_uevent(struct kset *kset, struct kobject *kobj,
612		       struct kobj_uevent_env *env)
613{
614	struct gfs2_sbd *sdp = container_of(kobj, struct gfs2_sbd, sd_kobj);
615	const u8 *uuid = sdp->sd_sb.sb_uuid;
616
617	add_uevent_var(env, "LOCKTABLE=%s", sdp->sd_table_name);
618	add_uevent_var(env, "LOCKPROTO=%s", sdp->sd_proto_name);
619	if (!test_bit(SDF_NOJOURNALID, &sdp->sd_flags))
620		add_uevent_var(env, "JOURNALID=%u", sdp->sd_lockstruct.ls_jid);
621	if (gfs2_uuid_valid(uuid))
622		add_uevent_var(env, "UUID=%pUB", uuid);
623	return 0;
624}
625
626static const struct kset_uevent_ops gfs2_uevent_ops = {
627	.uevent = gfs2_uevent,
628};
629
630int gfs2_sys_init(void)
631{
632	gfs2_kset = kset_create_and_add("gfs2", &gfs2_uevent_ops, fs_kobj);
633	if (!gfs2_kset)
634		return -ENOMEM;
635	return 0;
636}
637
638void gfs2_sys_uninit(void)
639{
640	kset_unregister(gfs2_kset);
641}
642