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/*
11 * Quota change tags are associated with each transaction that allocates or
12 * deallocates space.  Those changes are accumulated locally to each node (in a
13 * per-node file) and then are periodically synced to the quota file.  This
14 * avoids the bottleneck of constantly touching the quota file, but introduces
15 * fuzziness in the current usage value of IDs that are being used on different
16 * nodes in the cluster simultaneously.  So, it is possible for a user on
17 * multiple nodes to overrun their quota, but that overrun is controlable.
18 * Since quota tags are part of transactions, there is no need to a quota check
19 * program to be run on node crashes or anything like that.
20 *
21 * There are couple of knobs that let the administrator manage the quota
22 * fuzziness.  "quota_quantum" sets the maximum time a quota change can be
23 * sitting on one node before being synced to the quota file.  (The default is
24 * 60 seconds.)  Another knob, "quota_scale" controls how quickly the frequency
25 * of quota file syncs increases as the user moves closer to their limit.  The
26 * more frequent the syncs, the more accurate the quota enforcement, but that
27 * means that there is more contention between the nodes for the quota file.
28 * The default value is one.  This sets the maximum theoretical quota overrun
29 * (with infinite node with infinite bandwidth) to twice the user's limit.  (In
30 * practice, the maximum overrun you see should be much less.)  A "quota_scale"
31 * number greater than one makes quota syncs more frequent and reduces the
32 * maximum overrun.  Numbers less than one (but greater than zero) make quota
33 * syncs less frequent.
34 *
35 * GFS quotas also use per-ID Lock Value Blocks (LVBs) to cache the contents of
36 * the quota file, so it is not being constantly read.
37 */
38
39#include <linux/sched.h>
40#include <linux/slab.h>
41#include <linux/spinlock.h>
42#include <linux/completion.h>
43#include <linux/buffer_head.h>
44#include <linux/sort.h>
45#include <linux/fs.h>
46#include <linux/bio.h>
47#include <linux/gfs2_ondisk.h>
48#include <linux/lm_interface.h>
49
50#include "gfs2.h"
51#include "incore.h"
52#include "bmap.h"
53#include "glock.h"
54#include "glops.h"
55#include "log.h"
56#include "meta_io.h"
57#include "quota.h"
58#include "rgrp.h"
59#include "super.h"
60#include "trans.h"
61#include "inode.h"
62#include "ops_file.h"
63#include "ops_address.h"
64#include "util.h"
65
66#define QUOTA_USER 1
67#define QUOTA_GROUP 0
68
69static u64 qd2offset(struct gfs2_quota_data *qd)
70{
71	u64 offset;
72
73	offset = 2 * (u64)qd->qd_id + !test_bit(QDF_USER, &qd->qd_flags);
74	offset *= sizeof(struct gfs2_quota);
75
76	return offset;
77}
78
79static int qd_alloc(struct gfs2_sbd *sdp, int user, u32 id,
80		    struct gfs2_quota_data **qdp)
81{
82	struct gfs2_quota_data *qd;
83	int error;
84
85	qd = kzalloc(sizeof(struct gfs2_quota_data), GFP_KERNEL);
86	if (!qd)
87		return -ENOMEM;
88
89	qd->qd_count = 1;
90	qd->qd_id = id;
91	if (user)
92		set_bit(QDF_USER, &qd->qd_flags);
93	qd->qd_slot = -1;
94
95	error = gfs2_glock_get(sdp, 2 * (u64)id + !user,
96			      &gfs2_quota_glops, CREATE, &qd->qd_gl);
97	if (error)
98		goto fail;
99
100	error = gfs2_lvb_hold(qd->qd_gl);
101	gfs2_glock_put(qd->qd_gl);
102	if (error)
103		goto fail;
104
105	*qdp = qd;
106
107	return 0;
108
109fail:
110	kfree(qd);
111	return error;
112}
113
114static int qd_get(struct gfs2_sbd *sdp, int user, u32 id, int create,
115		  struct gfs2_quota_data **qdp)
116{
117	struct gfs2_quota_data *qd = NULL, *new_qd = NULL;
118	int error, found;
119
120	*qdp = NULL;
121
122	for (;;) {
123		found = 0;
124		spin_lock(&sdp->sd_quota_spin);
125		list_for_each_entry(qd, &sdp->sd_quota_list, qd_list) {
126			if (qd->qd_id == id &&
127			    !test_bit(QDF_USER, &qd->qd_flags) == !user) {
128				qd->qd_count++;
129				found = 1;
130				break;
131			}
132		}
133
134		if (!found)
135			qd = NULL;
136
137		if (!qd && new_qd) {
138			qd = new_qd;
139			list_add(&qd->qd_list, &sdp->sd_quota_list);
140			atomic_inc(&sdp->sd_quota_count);
141			new_qd = NULL;
142		}
143
144		spin_unlock(&sdp->sd_quota_spin);
145
146		if (qd || !create) {
147			if (new_qd) {
148				gfs2_lvb_unhold(new_qd->qd_gl);
149				kfree(new_qd);
150			}
151			*qdp = qd;
152			return 0;
153		}
154
155		error = qd_alloc(sdp, user, id, &new_qd);
156		if (error)
157			return error;
158	}
159}
160
161static void qd_hold(struct gfs2_quota_data *qd)
162{
163	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
164
165	spin_lock(&sdp->sd_quota_spin);
166	gfs2_assert(sdp, qd->qd_count);
167	qd->qd_count++;
168	spin_unlock(&sdp->sd_quota_spin);
169}
170
171static void qd_put(struct gfs2_quota_data *qd)
172{
173	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
174	spin_lock(&sdp->sd_quota_spin);
175	gfs2_assert(sdp, qd->qd_count);
176	if (!--qd->qd_count)
177		qd->qd_last_touched = jiffies;
178	spin_unlock(&sdp->sd_quota_spin);
179}
180
181static int slot_get(struct gfs2_quota_data *qd)
182{
183	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
184	unsigned int c, o = 0, b;
185	unsigned char byte = 0;
186
187	spin_lock(&sdp->sd_quota_spin);
188
189	if (qd->qd_slot_count++) {
190		spin_unlock(&sdp->sd_quota_spin);
191		return 0;
192	}
193
194	for (c = 0; c < sdp->sd_quota_chunks; c++)
195		for (o = 0; o < PAGE_SIZE; o++) {
196			byte = sdp->sd_quota_bitmap[c][o];
197			if (byte != 0xFF)
198				goto found;
199		}
200
201	goto fail;
202
203found:
204	for (b = 0; b < 8; b++)
205		if (!(byte & (1 << b)))
206			break;
207	qd->qd_slot = c * (8 * PAGE_SIZE) + o * 8 + b;
208
209	if (qd->qd_slot >= sdp->sd_quota_slots)
210		goto fail;
211
212	sdp->sd_quota_bitmap[c][o] |= 1 << b;
213
214	spin_unlock(&sdp->sd_quota_spin);
215
216	return 0;
217
218fail:
219	qd->qd_slot_count--;
220	spin_unlock(&sdp->sd_quota_spin);
221	return -ENOSPC;
222}
223
224static void slot_hold(struct gfs2_quota_data *qd)
225{
226	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
227
228	spin_lock(&sdp->sd_quota_spin);
229	gfs2_assert(sdp, qd->qd_slot_count);
230	qd->qd_slot_count++;
231	spin_unlock(&sdp->sd_quota_spin);
232}
233
234static void slot_put(struct gfs2_quota_data *qd)
235{
236	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
237
238	spin_lock(&sdp->sd_quota_spin);
239	gfs2_assert(sdp, qd->qd_slot_count);
240	if (!--qd->qd_slot_count) {
241		gfs2_icbit_munge(sdp, sdp->sd_quota_bitmap, qd->qd_slot, 0);
242		qd->qd_slot = -1;
243	}
244	spin_unlock(&sdp->sd_quota_spin);
245}
246
247static int bh_get(struct gfs2_quota_data *qd)
248{
249	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
250	struct gfs2_inode *ip = GFS2_I(sdp->sd_qc_inode);
251	unsigned int block, offset;
252	struct buffer_head *bh;
253	int error;
254	struct buffer_head bh_map = { .b_state = 0, .b_blocknr = 0 };
255
256	mutex_lock(&sdp->sd_quota_mutex);
257
258	if (qd->qd_bh_count++) {
259		mutex_unlock(&sdp->sd_quota_mutex);
260		return 0;
261	}
262
263	block = qd->qd_slot / sdp->sd_qc_per_block;
264	offset = qd->qd_slot % sdp->sd_qc_per_block;;
265
266	bh_map.b_size = 1 << ip->i_inode.i_blkbits;
267	error = gfs2_block_map(&ip->i_inode, block, 0, &bh_map);
268	if (error)
269		goto fail;
270	error = gfs2_meta_read(ip->i_gl, bh_map.b_blocknr, DIO_WAIT, &bh);
271	if (error)
272		goto fail;
273	error = -EIO;
274	if (gfs2_metatype_check(sdp, bh, GFS2_METATYPE_QC))
275		goto fail_brelse;
276
277	qd->qd_bh = bh;
278	qd->qd_bh_qc = (struct gfs2_quota_change *)
279		(bh->b_data + sizeof(struct gfs2_meta_header) +
280		 offset * sizeof(struct gfs2_quota_change));
281
282	mutex_unlock(&sdp->sd_quota_mutex);
283
284	return 0;
285
286fail_brelse:
287	brelse(bh);
288fail:
289	qd->qd_bh_count--;
290	mutex_unlock(&sdp->sd_quota_mutex);
291	return error;
292}
293
294static void bh_put(struct gfs2_quota_data *qd)
295{
296	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
297
298	mutex_lock(&sdp->sd_quota_mutex);
299	gfs2_assert(sdp, qd->qd_bh_count);
300	if (!--qd->qd_bh_count) {
301		brelse(qd->qd_bh);
302		qd->qd_bh = NULL;
303		qd->qd_bh_qc = NULL;
304	}
305	mutex_unlock(&sdp->sd_quota_mutex);
306}
307
308static int qd_fish(struct gfs2_sbd *sdp, struct gfs2_quota_data **qdp)
309{
310	struct gfs2_quota_data *qd = NULL;
311	int error;
312	int found = 0;
313
314	*qdp = NULL;
315
316	if (sdp->sd_vfs->s_flags & MS_RDONLY)
317		return 0;
318
319	spin_lock(&sdp->sd_quota_spin);
320
321	list_for_each_entry(qd, &sdp->sd_quota_list, qd_list) {
322		if (test_bit(QDF_LOCKED, &qd->qd_flags) ||
323		    !test_bit(QDF_CHANGE, &qd->qd_flags) ||
324		    qd->qd_sync_gen >= sdp->sd_quota_sync_gen)
325			continue;
326
327		list_move_tail(&qd->qd_list, &sdp->sd_quota_list);
328
329		set_bit(QDF_LOCKED, &qd->qd_flags);
330		gfs2_assert_warn(sdp, qd->qd_count);
331		qd->qd_count++;
332		qd->qd_change_sync = qd->qd_change;
333		gfs2_assert_warn(sdp, qd->qd_slot_count);
334		qd->qd_slot_count++;
335		found = 1;
336
337		break;
338	}
339
340	if (!found)
341		qd = NULL;
342
343	spin_unlock(&sdp->sd_quota_spin);
344
345	if (qd) {
346		gfs2_assert_warn(sdp, qd->qd_change_sync);
347		error = bh_get(qd);
348		if (error) {
349			clear_bit(QDF_LOCKED, &qd->qd_flags);
350			slot_put(qd);
351			qd_put(qd);
352			return error;
353		}
354	}
355
356	*qdp = qd;
357
358	return 0;
359}
360
361static int qd_trylock(struct gfs2_quota_data *qd)
362{
363	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
364
365	if (sdp->sd_vfs->s_flags & MS_RDONLY)
366		return 0;
367
368	spin_lock(&sdp->sd_quota_spin);
369
370	if (test_bit(QDF_LOCKED, &qd->qd_flags) ||
371	    !test_bit(QDF_CHANGE, &qd->qd_flags)) {
372		spin_unlock(&sdp->sd_quota_spin);
373		return 0;
374	}
375
376	list_move_tail(&qd->qd_list, &sdp->sd_quota_list);
377
378	set_bit(QDF_LOCKED, &qd->qd_flags);
379	gfs2_assert_warn(sdp, qd->qd_count);
380	qd->qd_count++;
381	qd->qd_change_sync = qd->qd_change;
382	gfs2_assert_warn(sdp, qd->qd_slot_count);
383	qd->qd_slot_count++;
384
385	spin_unlock(&sdp->sd_quota_spin);
386
387	gfs2_assert_warn(sdp, qd->qd_change_sync);
388	if (bh_get(qd)) {
389		clear_bit(QDF_LOCKED, &qd->qd_flags);
390		slot_put(qd);
391		qd_put(qd);
392		return 0;
393	}
394
395	return 1;
396}
397
398static void qd_unlock(struct gfs2_quota_data *qd)
399{
400	gfs2_assert_warn(qd->qd_gl->gl_sbd,
401			 test_bit(QDF_LOCKED, &qd->qd_flags));
402	clear_bit(QDF_LOCKED, &qd->qd_flags);
403	bh_put(qd);
404	slot_put(qd);
405	qd_put(qd);
406}
407
408static int qdsb_get(struct gfs2_sbd *sdp, int user, u32 id, int create,
409		    struct gfs2_quota_data **qdp)
410{
411	int error;
412
413	error = qd_get(sdp, user, id, create, qdp);
414	if (error)
415		return error;
416
417	error = slot_get(*qdp);
418	if (error)
419		goto fail;
420
421	error = bh_get(*qdp);
422	if (error)
423		goto fail_slot;
424
425	return 0;
426
427fail_slot:
428	slot_put(*qdp);
429fail:
430	qd_put(*qdp);
431	return error;
432}
433
434static void qdsb_put(struct gfs2_quota_data *qd)
435{
436	bh_put(qd);
437	slot_put(qd);
438	qd_put(qd);
439}
440
441int gfs2_quota_hold(struct gfs2_inode *ip, u32 uid, u32 gid)
442{
443	struct gfs2_sbd *sdp = GFS2_SB(&ip->i_inode);
444	struct gfs2_alloc *al = &ip->i_alloc;
445	struct gfs2_quota_data **qd = al->al_qd;
446	int error;
447
448	if (gfs2_assert_warn(sdp, !al->al_qd_num) ||
449	    gfs2_assert_warn(sdp, !test_bit(GIF_QD_LOCKED, &ip->i_flags)))
450		return -EIO;
451
452	if (sdp->sd_args.ar_quota == GFS2_QUOTA_OFF)
453		return 0;
454
455	error = qdsb_get(sdp, QUOTA_USER, ip->i_inode.i_uid, CREATE, qd);
456	if (error)
457		goto out;
458	al->al_qd_num++;
459	qd++;
460
461	error = qdsb_get(sdp, QUOTA_GROUP, ip->i_inode.i_gid, CREATE, qd);
462	if (error)
463		goto out;
464	al->al_qd_num++;
465	qd++;
466
467	if (uid != NO_QUOTA_CHANGE && uid != ip->i_inode.i_uid) {
468		error = qdsb_get(sdp, QUOTA_USER, uid, CREATE, qd);
469		if (error)
470			goto out;
471		al->al_qd_num++;
472		qd++;
473	}
474
475	if (gid != NO_QUOTA_CHANGE && gid != ip->i_inode.i_gid) {
476		error = qdsb_get(sdp, QUOTA_GROUP, gid, CREATE, qd);
477		if (error)
478			goto out;
479		al->al_qd_num++;
480		qd++;
481	}
482
483out:
484	if (error)
485		gfs2_quota_unhold(ip);
486	return error;
487}
488
489void gfs2_quota_unhold(struct gfs2_inode *ip)
490{
491	struct gfs2_sbd *sdp = GFS2_SB(&ip->i_inode);
492	struct gfs2_alloc *al = &ip->i_alloc;
493	unsigned int x;
494
495	gfs2_assert_warn(sdp, !test_bit(GIF_QD_LOCKED, &ip->i_flags));
496
497	for (x = 0; x < al->al_qd_num; x++) {
498		qdsb_put(al->al_qd[x]);
499		al->al_qd[x] = NULL;
500	}
501	al->al_qd_num = 0;
502}
503
504static int sort_qd(const void *a, const void *b)
505{
506	const struct gfs2_quota_data *qd_a = *(const struct gfs2_quota_data **)a;
507	const struct gfs2_quota_data *qd_b = *(const struct gfs2_quota_data **)b;
508
509	if (!test_bit(QDF_USER, &qd_a->qd_flags) !=
510	    !test_bit(QDF_USER, &qd_b->qd_flags)) {
511		if (test_bit(QDF_USER, &qd_a->qd_flags))
512			return -1;
513		else
514			return 1;
515	}
516	if (qd_a->qd_id < qd_b->qd_id)
517		return -1;
518	if (qd_a->qd_id > qd_b->qd_id)
519		return 1;
520
521	return 0;
522}
523
524static void do_qc(struct gfs2_quota_data *qd, s64 change)
525{
526	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
527	struct gfs2_inode *ip = GFS2_I(sdp->sd_qc_inode);
528	struct gfs2_quota_change *qc = qd->qd_bh_qc;
529	s64 x;
530
531	mutex_lock(&sdp->sd_quota_mutex);
532	gfs2_trans_add_bh(ip->i_gl, qd->qd_bh, 1);
533
534	if (!test_bit(QDF_CHANGE, &qd->qd_flags)) {
535		qc->qc_change = 0;
536		qc->qc_flags = 0;
537		if (test_bit(QDF_USER, &qd->qd_flags))
538			qc->qc_flags = cpu_to_be32(GFS2_QCF_USER);
539		qc->qc_id = cpu_to_be32(qd->qd_id);
540	}
541
542	x = be64_to_cpu(qc->qc_change) + change;
543	qc->qc_change = cpu_to_be64(x);
544
545	spin_lock(&sdp->sd_quota_spin);
546	qd->qd_change = x;
547	spin_unlock(&sdp->sd_quota_spin);
548
549	if (!x) {
550		gfs2_assert_warn(sdp, test_bit(QDF_CHANGE, &qd->qd_flags));
551		clear_bit(QDF_CHANGE, &qd->qd_flags);
552		qc->qc_flags = 0;
553		qc->qc_id = 0;
554		slot_put(qd);
555		qd_put(qd);
556	} else if (!test_and_set_bit(QDF_CHANGE, &qd->qd_flags)) {
557		qd_hold(qd);
558		slot_hold(qd);
559	}
560
561	mutex_unlock(&sdp->sd_quota_mutex);
562}
563
564/**
565 * gfs2_adjust_quota
566 *
567 * This function was mostly borrowed from gfs2_block_truncate_page which was
568 * in turn mostly borrowed from ext3
569 */
570static int gfs2_adjust_quota(struct gfs2_inode *ip, loff_t loc,
571			     s64 change, struct gfs2_quota_data *qd)
572{
573	struct inode *inode = &ip->i_inode;
574	struct address_space *mapping = inode->i_mapping;
575	unsigned long index = loc >> PAGE_CACHE_SHIFT;
576	unsigned offset = loc & (PAGE_CACHE_SHIFT - 1);
577	unsigned blocksize, iblock, pos;
578	struct buffer_head *bh;
579	struct page *page;
580	void *kaddr;
581	__be64 *ptr;
582	s64 value;
583	int err = -EIO;
584
585	page = grab_cache_page(mapping, index);
586	if (!page)
587		return -ENOMEM;
588
589	blocksize = inode->i_sb->s_blocksize;
590	iblock = index << (PAGE_CACHE_SHIFT - inode->i_sb->s_blocksize_bits);
591
592	if (!page_has_buffers(page))
593		create_empty_buffers(page, blocksize, 0);
594
595	bh = page_buffers(page);
596	pos = blocksize;
597	while (offset >= pos) {
598		bh = bh->b_this_page;
599		iblock++;
600		pos += blocksize;
601	}
602
603	if (!buffer_mapped(bh)) {
604		gfs2_get_block(inode, iblock, bh, 1);
605		if (!buffer_mapped(bh))
606			goto unlock;
607	}
608
609	if (PageUptodate(page))
610		set_buffer_uptodate(bh);
611
612	if (!buffer_uptodate(bh)) {
613		ll_rw_block(READ_META, 1, &bh);
614		wait_on_buffer(bh);
615		if (!buffer_uptodate(bh))
616			goto unlock;
617	}
618
619	gfs2_trans_add_bh(ip->i_gl, bh, 0);
620
621	kaddr = kmap_atomic(page, KM_USER0);
622	ptr = kaddr + offset;
623	value = (s64)be64_to_cpu(*ptr) + change;
624	*ptr = cpu_to_be64(value);
625	flush_dcache_page(page);
626	kunmap_atomic(kaddr, KM_USER0);
627	err = 0;
628	qd->qd_qb.qb_magic = cpu_to_be32(GFS2_MAGIC);
629	qd->qd_qb.qb_value = cpu_to_be64(value);
630unlock:
631	unlock_page(page);
632	page_cache_release(page);
633	return err;
634}
635
636static int do_sync(unsigned int num_qd, struct gfs2_quota_data **qda)
637{
638	struct gfs2_sbd *sdp = (*qda)->qd_gl->gl_sbd;
639	struct gfs2_inode *ip = GFS2_I(sdp->sd_quota_inode);
640	unsigned int data_blocks, ind_blocks;
641	struct gfs2_holder *ghs, i_gh;
642	unsigned int qx, x;
643	struct gfs2_quota_data *qd;
644	loff_t offset;
645	unsigned int nalloc = 0;
646	struct gfs2_alloc *al = NULL;
647	int error;
648
649	gfs2_write_calc_reserv(ip, sizeof(struct gfs2_quota),
650			      &data_blocks, &ind_blocks);
651
652	ghs = kcalloc(num_qd, sizeof(struct gfs2_holder), GFP_KERNEL);
653	if (!ghs)
654		return -ENOMEM;
655
656	sort(qda, num_qd, sizeof(struct gfs2_quota_data *), sort_qd, NULL);
657	for (qx = 0; qx < num_qd; qx++) {
658		error = gfs2_glock_nq_init(qda[qx]->qd_gl,
659					   LM_ST_EXCLUSIVE,
660					   GL_NOCACHE, &ghs[qx]);
661		if (error)
662			goto out;
663	}
664
665	error = gfs2_glock_nq_init(ip->i_gl, LM_ST_EXCLUSIVE, 0, &i_gh);
666	if (error)
667		goto out;
668
669	for (x = 0; x < num_qd; x++) {
670		int alloc_required;
671
672		offset = qd2offset(qda[x]);
673		error = gfs2_write_alloc_required(ip, offset,
674						  sizeof(struct gfs2_quota),
675						  &alloc_required);
676		if (error)
677			goto out_gunlock;
678		if (alloc_required)
679			nalloc++;
680	}
681
682	if (nalloc) {
683		al = gfs2_alloc_get(ip);
684
685		al->al_requested = nalloc * (data_blocks + ind_blocks);
686
687		error = gfs2_inplace_reserve(ip);
688		if (error)
689			goto out_alloc;
690
691		error = gfs2_trans_begin(sdp,
692					 al->al_rgd->rd_ri.ri_length +
693					 num_qd * data_blocks +
694					 nalloc * ind_blocks +
695					 RES_DINODE + num_qd +
696					 RES_STATFS, 0);
697		if (error)
698			goto out_ipres;
699	} else {
700		error = gfs2_trans_begin(sdp,
701					 num_qd * data_blocks +
702					 RES_DINODE + num_qd, 0);
703		if (error)
704			goto out_gunlock;
705	}
706
707	for (x = 0; x < num_qd; x++) {
708		qd = qda[x];
709		offset = qd2offset(qd);
710		error = gfs2_adjust_quota(ip, offset, qd->qd_change_sync,
711					  (struct gfs2_quota_data *)
712					  qd->qd_gl->gl_lvb);
713		if (error)
714			goto out_end_trans;
715
716		do_qc(qd, -qd->qd_change_sync);
717	}
718
719	error = 0;
720
721out_end_trans:
722	gfs2_trans_end(sdp);
723out_ipres:
724	if (nalloc)
725		gfs2_inplace_release(ip);
726out_alloc:
727	if (nalloc)
728		gfs2_alloc_put(ip);
729out_gunlock:
730	gfs2_glock_dq_uninit(&i_gh);
731out:
732	while (qx--)
733		gfs2_glock_dq_uninit(&ghs[qx]);
734	kfree(ghs);
735	gfs2_log_flush(ip->i_gl->gl_sbd, ip->i_gl);
736	return error;
737}
738
739static int do_glock(struct gfs2_quota_data *qd, int force_refresh,
740		    struct gfs2_holder *q_gh)
741{
742	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
743	struct gfs2_inode *ip = GFS2_I(sdp->sd_quota_inode);
744	struct gfs2_holder i_gh;
745	struct gfs2_quota_host q;
746	char buf[sizeof(struct gfs2_quota)];
747	struct file_ra_state ra_state;
748	int error;
749	struct gfs2_quota_lvb *qlvb;
750
751	file_ra_state_init(&ra_state, sdp->sd_quota_inode->i_mapping);
752restart:
753	error = gfs2_glock_nq_init(qd->qd_gl, LM_ST_SHARED, 0, q_gh);
754	if (error)
755		return error;
756
757	qd->qd_qb = *(struct gfs2_quota_lvb *)qd->qd_gl->gl_lvb;
758
759	if (force_refresh || qd->qd_qb.qb_magic != cpu_to_be32(GFS2_MAGIC)) {
760		loff_t pos;
761		gfs2_glock_dq_uninit(q_gh);
762		error = gfs2_glock_nq_init(qd->qd_gl,
763					  LM_ST_EXCLUSIVE, GL_NOCACHE,
764					  q_gh);
765		if (error)
766			return error;
767
768		error = gfs2_glock_nq_init(ip->i_gl, LM_ST_SHARED, 0, &i_gh);
769		if (error)
770			goto fail;
771
772		memset(buf, 0, sizeof(struct gfs2_quota));
773		pos = qd2offset(qd);
774		error = gfs2_internal_read(ip, &ra_state, buf,
775					   &pos, sizeof(struct gfs2_quota));
776		if (error < 0)
777			goto fail_gunlock;
778
779		gfs2_glock_dq_uninit(&i_gh);
780
781
782		gfs2_quota_in(&q, buf);
783		qlvb = (struct gfs2_quota_lvb *)qd->qd_gl->gl_lvb;
784		qlvb->qb_magic = cpu_to_be32(GFS2_MAGIC);
785		qlvb->__pad = 0;
786		qlvb->qb_limit = cpu_to_be64(q.qu_limit);
787		qlvb->qb_warn = cpu_to_be64(q.qu_warn);
788		qlvb->qb_value = cpu_to_be64(q.qu_value);
789		qd->qd_qb = *qlvb;
790
791		if (gfs2_glock_is_blocking(qd->qd_gl)) {
792			gfs2_glock_dq_uninit(q_gh);
793			force_refresh = 0;
794			goto restart;
795		}
796	}
797
798	return 0;
799
800fail_gunlock:
801	gfs2_glock_dq_uninit(&i_gh);
802fail:
803	gfs2_glock_dq_uninit(q_gh);
804	return error;
805}
806
807int gfs2_quota_lock(struct gfs2_inode *ip, u32 uid, u32 gid)
808{
809	struct gfs2_sbd *sdp = GFS2_SB(&ip->i_inode);
810	struct gfs2_alloc *al = &ip->i_alloc;
811	unsigned int x;
812	int error = 0;
813
814	gfs2_quota_hold(ip, uid, gid);
815
816	if (capable(CAP_SYS_RESOURCE) ||
817	    sdp->sd_args.ar_quota != GFS2_QUOTA_ON)
818		return 0;
819
820	sort(al->al_qd, al->al_qd_num, sizeof(struct gfs2_quota_data *),
821	     sort_qd, NULL);
822
823	for (x = 0; x < al->al_qd_num; x++) {
824		error = do_glock(al->al_qd[x], NO_FORCE, &al->al_qd_ghs[x]);
825		if (error)
826			break;
827	}
828
829	if (!error)
830		set_bit(GIF_QD_LOCKED, &ip->i_flags);
831	else {
832		while (x--)
833			gfs2_glock_dq_uninit(&al->al_qd_ghs[x]);
834		gfs2_quota_unhold(ip);
835	}
836
837	return error;
838}
839
840static int need_sync(struct gfs2_quota_data *qd)
841{
842	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
843	struct gfs2_tune *gt = &sdp->sd_tune;
844	s64 value;
845	unsigned int num, den;
846	int do_sync = 1;
847
848	if (!qd->qd_qb.qb_limit)
849		return 0;
850
851	spin_lock(&sdp->sd_quota_spin);
852	value = qd->qd_change;
853	spin_unlock(&sdp->sd_quota_spin);
854
855	spin_lock(&gt->gt_spin);
856	num = gt->gt_quota_scale_num;
857	den = gt->gt_quota_scale_den;
858	spin_unlock(&gt->gt_spin);
859
860	if (value < 0)
861		do_sync = 0;
862	else if ((s64)be64_to_cpu(qd->qd_qb.qb_value) >=
863		 (s64)be64_to_cpu(qd->qd_qb.qb_limit))
864		do_sync = 0;
865	else {
866		value *= gfs2_jindex_size(sdp) * num;
867		do_div(value, den);
868		value += (s64)be64_to_cpu(qd->qd_qb.qb_value);
869		if (value < (s64)be64_to_cpu(qd->qd_qb.qb_limit))
870			do_sync = 0;
871	}
872
873	return do_sync;
874}
875
876void gfs2_quota_unlock(struct gfs2_inode *ip)
877{
878	struct gfs2_alloc *al = &ip->i_alloc;
879	struct gfs2_quota_data *qda[4];
880	unsigned int count = 0;
881	unsigned int x;
882
883	if (!test_and_clear_bit(GIF_QD_LOCKED, &ip->i_flags))
884		goto out;
885
886	for (x = 0; x < al->al_qd_num; x++) {
887		struct gfs2_quota_data *qd;
888		int sync;
889
890		qd = al->al_qd[x];
891		sync = need_sync(qd);
892
893		gfs2_glock_dq_uninit(&al->al_qd_ghs[x]);
894
895		if (sync && qd_trylock(qd))
896			qda[count++] = qd;
897	}
898
899	if (count) {
900		do_sync(count, qda);
901		for (x = 0; x < count; x++)
902			qd_unlock(qda[x]);
903	}
904
905out:
906	gfs2_quota_unhold(ip);
907}
908
909#define MAX_LINE 256
910
911static int print_message(struct gfs2_quota_data *qd, char *type)
912{
913	struct gfs2_sbd *sdp = qd->qd_gl->gl_sbd;
914
915	printk(KERN_INFO "GFS2: fsid=%s: quota %s for %s %u\r\n",
916	       sdp->sd_fsname, type,
917	       (test_bit(QDF_USER, &qd->qd_flags)) ? "user" : "group",
918	       qd->qd_id);
919
920	return 0;
921}
922
923int gfs2_quota_check(struct gfs2_inode *ip, u32 uid, u32 gid)
924{
925	struct gfs2_sbd *sdp = GFS2_SB(&ip->i_inode);
926	struct gfs2_alloc *al = &ip->i_alloc;
927	struct gfs2_quota_data *qd;
928	s64 value;
929	unsigned int x;
930	int error = 0;
931
932	if (!test_bit(GIF_QD_LOCKED, &ip->i_flags))
933		return 0;
934
935        if (sdp->sd_args.ar_quota != GFS2_QUOTA_ON)
936                return 0;
937
938	for (x = 0; x < al->al_qd_num; x++) {
939		qd = al->al_qd[x];
940
941		if (!((qd->qd_id == uid && test_bit(QDF_USER, &qd->qd_flags)) ||
942		      (qd->qd_id == gid && !test_bit(QDF_USER, &qd->qd_flags))))
943			continue;
944
945		value = (s64)be64_to_cpu(qd->qd_qb.qb_value);
946		spin_lock(&sdp->sd_quota_spin);
947		value += qd->qd_change;
948		spin_unlock(&sdp->sd_quota_spin);
949
950		if (be64_to_cpu(qd->qd_qb.qb_limit) && (s64)be64_to_cpu(qd->qd_qb.qb_limit) < value) {
951			print_message(qd, "exceeded");
952			error = -EDQUOT;
953			break;
954		} else if (be64_to_cpu(qd->qd_qb.qb_warn) &&
955			   (s64)be64_to_cpu(qd->qd_qb.qb_warn) < value &&
956			   time_after_eq(jiffies, qd->qd_last_warn +
957					 gfs2_tune_get(sdp,
958						gt_quota_warn_period) * HZ)) {
959			error = print_message(qd, "warning");
960			qd->qd_last_warn = jiffies;
961		}
962	}
963
964	return error;
965}
966
967void gfs2_quota_change(struct gfs2_inode *ip, s64 change,
968		       u32 uid, u32 gid)
969{
970	struct gfs2_alloc *al = &ip->i_alloc;
971	struct gfs2_quota_data *qd;
972	unsigned int x;
973	unsigned int found = 0;
974
975	if (gfs2_assert_warn(GFS2_SB(&ip->i_inode), change))
976		return;
977	if (ip->i_di.di_flags & GFS2_DIF_SYSTEM)
978		return;
979
980	for (x = 0; x < al->al_qd_num; x++) {
981		qd = al->al_qd[x];
982
983		if ((qd->qd_id == uid && test_bit(QDF_USER, &qd->qd_flags)) ||
984		    (qd->qd_id == gid && !test_bit(QDF_USER, &qd->qd_flags))) {
985			do_qc(qd, change);
986			found++;
987		}
988	}
989}
990
991int gfs2_quota_sync(struct gfs2_sbd *sdp)
992{
993	struct gfs2_quota_data **qda;
994	unsigned int max_qd = gfs2_tune_get(sdp, gt_quota_simul_sync);
995	unsigned int num_qd;
996	unsigned int x;
997	int error = 0;
998
999	sdp->sd_quota_sync_gen++;
1000
1001	qda = kcalloc(max_qd, sizeof(struct gfs2_quota_data *), GFP_KERNEL);
1002	if (!qda)
1003		return -ENOMEM;
1004
1005	do {
1006		num_qd = 0;
1007
1008		for (;;) {
1009			error = qd_fish(sdp, qda + num_qd);
1010			if (error || !qda[num_qd])
1011				break;
1012			if (++num_qd == max_qd)
1013				break;
1014		}
1015
1016		if (num_qd) {
1017			if (!error)
1018				error = do_sync(num_qd, qda);
1019			if (!error)
1020				for (x = 0; x < num_qd; x++)
1021					qda[x]->qd_sync_gen =
1022						sdp->sd_quota_sync_gen;
1023
1024			for (x = 0; x < num_qd; x++)
1025				qd_unlock(qda[x]);
1026		}
1027	} while (!error && num_qd == max_qd);
1028
1029	kfree(qda);
1030
1031	return error;
1032}
1033
1034int gfs2_quota_refresh(struct gfs2_sbd *sdp, int user, u32 id)
1035{
1036	struct gfs2_quota_data *qd;
1037	struct gfs2_holder q_gh;
1038	int error;
1039
1040	error = qd_get(sdp, user, id, CREATE, &qd);
1041	if (error)
1042		return error;
1043
1044	error = do_glock(qd, FORCE, &q_gh);
1045	if (!error)
1046		gfs2_glock_dq_uninit(&q_gh);
1047
1048	qd_put(qd);
1049
1050	return error;
1051}
1052
1053int gfs2_quota_init(struct gfs2_sbd *sdp)
1054{
1055	struct gfs2_inode *ip = GFS2_I(sdp->sd_qc_inode);
1056	unsigned int blocks = ip->i_di.di_size >> sdp->sd_sb.sb_bsize_shift;
1057	unsigned int x, slot = 0;
1058	unsigned int found = 0;
1059	u64 dblock;
1060	u32 extlen = 0;
1061	int error;
1062
1063	if (!ip->i_di.di_size || ip->i_di.di_size > (64 << 20) ||
1064	    ip->i_di.di_size & (sdp->sd_sb.sb_bsize - 1)) {
1065		gfs2_consist_inode(ip);
1066		return -EIO;
1067	}
1068	sdp->sd_quota_slots = blocks * sdp->sd_qc_per_block;
1069	sdp->sd_quota_chunks = DIV_ROUND_UP(sdp->sd_quota_slots, 8 * PAGE_SIZE);
1070
1071	error = -ENOMEM;
1072
1073	sdp->sd_quota_bitmap = kcalloc(sdp->sd_quota_chunks,
1074				       sizeof(unsigned char *), GFP_KERNEL);
1075	if (!sdp->sd_quota_bitmap)
1076		return error;
1077
1078	for (x = 0; x < sdp->sd_quota_chunks; x++) {
1079		sdp->sd_quota_bitmap[x] = kzalloc(PAGE_SIZE, GFP_KERNEL);
1080		if (!sdp->sd_quota_bitmap[x])
1081			goto fail;
1082	}
1083
1084	for (x = 0; x < blocks; x++) {
1085		struct buffer_head *bh;
1086		unsigned int y;
1087
1088		if (!extlen) {
1089			int new = 0;
1090			error = gfs2_extent_map(&ip->i_inode, x, &new, &dblock, &extlen);
1091			if (error)
1092				goto fail;
1093		}
1094		error = -EIO;
1095		bh = gfs2_meta_ra(ip->i_gl, dblock, extlen);
1096		if (!bh)
1097			goto fail;
1098		if (gfs2_metatype_check(sdp, bh, GFS2_METATYPE_QC)) {
1099			brelse(bh);
1100			goto fail;
1101		}
1102
1103		for (y = 0; y < sdp->sd_qc_per_block && slot < sdp->sd_quota_slots;
1104		     y++, slot++) {
1105			struct gfs2_quota_change_host qc;
1106			struct gfs2_quota_data *qd;
1107
1108			gfs2_quota_change_in(&qc, bh->b_data +
1109					  sizeof(struct gfs2_meta_header) +
1110					  y * sizeof(struct gfs2_quota_change));
1111			if (!qc.qc_change)
1112				continue;
1113
1114			error = qd_alloc(sdp, (qc.qc_flags & GFS2_QCF_USER),
1115					 qc.qc_id, &qd);
1116			if (error) {
1117				brelse(bh);
1118				goto fail;
1119			}
1120
1121			set_bit(QDF_CHANGE, &qd->qd_flags);
1122			qd->qd_change = qc.qc_change;
1123			qd->qd_slot = slot;
1124			qd->qd_slot_count = 1;
1125			qd->qd_last_touched = jiffies;
1126
1127			spin_lock(&sdp->sd_quota_spin);
1128			gfs2_icbit_munge(sdp, sdp->sd_quota_bitmap, slot, 1);
1129			list_add(&qd->qd_list, &sdp->sd_quota_list);
1130			atomic_inc(&sdp->sd_quota_count);
1131			spin_unlock(&sdp->sd_quota_spin);
1132
1133			found++;
1134		}
1135
1136		brelse(bh);
1137		dblock++;
1138		extlen--;
1139	}
1140
1141	if (found)
1142		fs_info(sdp, "found %u quota changes\n", found);
1143
1144	return 0;
1145
1146fail:
1147	gfs2_quota_cleanup(sdp);
1148	return error;
1149}
1150
1151void gfs2_quota_scan(struct gfs2_sbd *sdp)
1152{
1153	struct gfs2_quota_data *qd, *safe;
1154	LIST_HEAD(dead);
1155
1156	spin_lock(&sdp->sd_quota_spin);
1157	list_for_each_entry_safe(qd, safe, &sdp->sd_quota_list, qd_list) {
1158		if (!qd->qd_count &&
1159		    time_after_eq(jiffies, qd->qd_last_touched +
1160			        gfs2_tune_get(sdp, gt_quota_cache_secs) * HZ)) {
1161			list_move(&qd->qd_list, &dead);
1162			gfs2_assert_warn(sdp,
1163					 atomic_read(&sdp->sd_quota_count) > 0);
1164			atomic_dec(&sdp->sd_quota_count);
1165		}
1166	}
1167	spin_unlock(&sdp->sd_quota_spin);
1168
1169	while (!list_empty(&dead)) {
1170		qd = list_entry(dead.next, struct gfs2_quota_data, qd_list);
1171		list_del(&qd->qd_list);
1172
1173		gfs2_assert_warn(sdp, !qd->qd_change);
1174		gfs2_assert_warn(sdp, !qd->qd_slot_count);
1175		gfs2_assert_warn(sdp, !qd->qd_bh_count);
1176
1177		gfs2_lvb_unhold(qd->qd_gl);
1178		kfree(qd);
1179	}
1180}
1181
1182void gfs2_quota_cleanup(struct gfs2_sbd *sdp)
1183{
1184	struct list_head *head = &sdp->sd_quota_list;
1185	struct gfs2_quota_data *qd;
1186	unsigned int x;
1187
1188	spin_lock(&sdp->sd_quota_spin);
1189	while (!list_empty(head)) {
1190		qd = list_entry(head->prev, struct gfs2_quota_data, qd_list);
1191
1192		if (qd->qd_count > 1 ||
1193		    (qd->qd_count && !test_bit(QDF_CHANGE, &qd->qd_flags))) {
1194			list_move(&qd->qd_list, head);
1195			spin_unlock(&sdp->sd_quota_spin);
1196			schedule();
1197			spin_lock(&sdp->sd_quota_spin);
1198			continue;
1199		}
1200
1201		list_del(&qd->qd_list);
1202		atomic_dec(&sdp->sd_quota_count);
1203		spin_unlock(&sdp->sd_quota_spin);
1204
1205		if (!qd->qd_count) {
1206			gfs2_assert_warn(sdp, !qd->qd_change);
1207			gfs2_assert_warn(sdp, !qd->qd_slot_count);
1208		} else
1209			gfs2_assert_warn(sdp, qd->qd_slot_count == 1);
1210		gfs2_assert_warn(sdp, !qd->qd_bh_count);
1211
1212		gfs2_lvb_unhold(qd->qd_gl);
1213		kfree(qd);
1214
1215		spin_lock(&sdp->sd_quota_spin);
1216	}
1217	spin_unlock(&sdp->sd_quota_spin);
1218
1219	gfs2_assert_warn(sdp, !atomic_read(&sdp->sd_quota_count));
1220
1221	if (sdp->sd_quota_bitmap) {
1222		for (x = 0; x < sdp->sd_quota_chunks; x++)
1223			kfree(sdp->sd_quota_bitmap[x]);
1224		kfree(sdp->sd_quota_bitmap);
1225	}
1226}
1227