Linux Audio

Check our new training course

Loading...
v5.4
   1// SPDX-License-Identifier: GPL-2.0-or-later
   2/*
   3 * net/sched/sch_api.c	Packet scheduler API.
   4 *
 
 
 
 
 
   5 * Authors:	Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
   6 *
   7 * Fixes:
   8 *
   9 * Rani Assaf <rani@magic.metawire.com> :980802: JIFFIES and CPU clock sources are repaired.
  10 * Eduardo J. Blanco <ejbs@netlabs.com.uy> :990222: kmod support
  11 * Jamal Hadi Salim <hadi@nortelnetworks.com>: 990601: ingress support
  12 */
  13
  14#include <linux/module.h>
  15#include <linux/types.h>
  16#include <linux/kernel.h>
  17#include <linux/string.h>
  18#include <linux/errno.h>
  19#include <linux/skbuff.h>
  20#include <linux/init.h>
  21#include <linux/proc_fs.h>
  22#include <linux/seq_file.h>
  23#include <linux/kmod.h>
  24#include <linux/list.h>
  25#include <linux/hrtimer.h>
 
  26#include <linux/slab.h>
  27#include <linux/hashtable.h>
  28
  29#include <net/net_namespace.h>
  30#include <net/sock.h>
  31#include <net/netlink.h>
  32#include <net/pkt_sched.h>
  33#include <net/pkt_cls.h>
 
 
 
 
 
 
  34
  35/*
  36
  37   Short review.
  38   -------------
  39
  40   This file consists of two interrelated parts:
  41
  42   1. queueing disciplines manager frontend.
  43   2. traffic classes manager frontend.
  44
  45   Generally, queueing discipline ("qdisc") is a black box,
  46   which is able to enqueue packets and to dequeue them (when
  47   device is ready to send something) in order and at times
  48   determined by algorithm hidden in it.
  49
  50   qdisc's are divided to two categories:
  51   - "queues", which have no internal structure visible from outside.
  52   - "schedulers", which split all the packets to "traffic classes",
  53     using "packet classifiers" (look at cls_api.c)
  54
  55   In turn, classes may have child qdiscs (as rule, queues)
  56   attached to them etc. etc. etc.
  57
  58   The goal of the routines in this file is to translate
  59   information supplied by user in the form of handles
  60   to more intelligible for kernel form, to make some sanity
  61   checks and part of work, which is common to all qdiscs
  62   and to provide rtnetlink notifications.
  63
  64   All real intelligent work is done inside qdisc modules.
  65
  66
  67
  68   Every discipline has two major routines: enqueue and dequeue.
  69
  70   ---dequeue
  71
  72   dequeue usually returns a skb to send. It is allowed to return NULL,
  73   but it does not mean that queue is empty, it just means that
  74   discipline does not want to send anything this time.
  75   Queue is really empty if q->q.qlen == 0.
  76   For complicated disciplines with multiple queues q->q is not
  77   real packet queue, but however q->q.qlen must be valid.
  78
  79   ---enqueue
  80
  81   enqueue returns 0, if packet was enqueued successfully.
  82   If packet (this one or another one) was dropped, it returns
  83   not zero error code.
  84   NET_XMIT_DROP 	- this packet dropped
  85     Expected action: do not backoff, but wait until queue will clear.
  86   NET_XMIT_CN	 	- probably this packet enqueued, but another one dropped.
  87     Expected action: backoff or ignore
 
 
  88
  89   Auxiliary routines:
  90
  91   ---peek
  92
  93   like dequeue but without removing a packet from the queue
  94
  95   ---reset
  96
  97   returns qdisc to initial state: purge all buffers, clear all
  98   timers, counters (except for statistics) etc.
  99
 100   ---init
 101
 102   initializes newly created qdisc.
 103
 104   ---destroy
 105
 106   destroys resources allocated by init and during lifetime of qdisc.
 107
 108   ---change
 109
 110   changes qdisc parameters.
 111 */
 112
 113/* Protects list of registered TC modules. It is pure SMP lock. */
 114static DEFINE_RWLOCK(qdisc_mod_lock);
 115
 116
 117/************************************************
 118 *	Queueing disciplines manipulation.	*
 119 ************************************************/
 120
 121
 122/* The list of all installed queueing disciplines. */
 123
 124static struct Qdisc_ops *qdisc_base;
 125
 126/* Register/unregister queueing discipline */
 127
 128int register_qdisc(struct Qdisc_ops *qops)
 129{
 130	struct Qdisc_ops *q, **qp;
 131	int rc = -EEXIST;
 132
 133	write_lock(&qdisc_mod_lock);
 134	for (qp = &qdisc_base; (q = *qp) != NULL; qp = &q->next)
 135		if (!strcmp(qops->id, q->id))
 136			goto out;
 137
 138	if (qops->enqueue == NULL)
 139		qops->enqueue = noop_qdisc_ops.enqueue;
 140	if (qops->peek == NULL) {
 141		if (qops->dequeue == NULL)
 142			qops->peek = noop_qdisc_ops.peek;
 143		else
 144			goto out_einval;
 145	}
 146	if (qops->dequeue == NULL)
 147		qops->dequeue = noop_qdisc_ops.dequeue;
 148
 149	if (qops->cl_ops) {
 150		const struct Qdisc_class_ops *cops = qops->cl_ops;
 151
 152		if (!(cops->find && cops->walk && cops->leaf))
 153			goto out_einval;
 154
 155		if (cops->tcf_block && !(cops->bind_tcf && cops->unbind_tcf))
 156			goto out_einval;
 157	}
 158
 159	qops->next = NULL;
 160	*qp = qops;
 161	rc = 0;
 162out:
 163	write_unlock(&qdisc_mod_lock);
 164	return rc;
 165
 166out_einval:
 167	rc = -EINVAL;
 168	goto out;
 169}
 170EXPORT_SYMBOL(register_qdisc);
 171
 172int unregister_qdisc(struct Qdisc_ops *qops)
 173{
 174	struct Qdisc_ops *q, **qp;
 175	int err = -ENOENT;
 176
 177	write_lock(&qdisc_mod_lock);
 178	for (qp = &qdisc_base; (q = *qp) != NULL; qp = &q->next)
 179		if (q == qops)
 180			break;
 181	if (q) {
 182		*qp = q->next;
 183		q->next = NULL;
 184		err = 0;
 185	}
 186	write_unlock(&qdisc_mod_lock);
 187	return err;
 188}
 189EXPORT_SYMBOL(unregister_qdisc);
 190
 191/* Get default qdisc if not otherwise specified */
 192void qdisc_get_default(char *name, size_t len)
 193{
 194	read_lock(&qdisc_mod_lock);
 195	strlcpy(name, default_qdisc_ops->id, len);
 196	read_unlock(&qdisc_mod_lock);
 197}
 198
 199static struct Qdisc_ops *qdisc_lookup_default(const char *name)
 200{
 201	struct Qdisc_ops *q = NULL;
 202
 203	for (q = qdisc_base; q; q = q->next) {
 204		if (!strcmp(name, q->id)) {
 205			if (!try_module_get(q->owner))
 206				q = NULL;
 207			break;
 208		}
 209	}
 210
 211	return q;
 212}
 213
 214/* Set new default qdisc to use */
 215int qdisc_set_default(const char *name)
 216{
 217	const struct Qdisc_ops *ops;
 218
 219	if (!capable(CAP_NET_ADMIN))
 220		return -EPERM;
 221
 222	write_lock(&qdisc_mod_lock);
 223	ops = qdisc_lookup_default(name);
 224	if (!ops) {
 225		/* Not found, drop lock and try to load module */
 226		write_unlock(&qdisc_mod_lock);
 227		request_module("sch_%s", name);
 228		write_lock(&qdisc_mod_lock);
 229
 230		ops = qdisc_lookup_default(name);
 231	}
 232
 233	if (ops) {
 234		/* Set new default */
 235		module_put(default_qdisc_ops->owner);
 236		default_qdisc_ops = ops;
 237	}
 238	write_unlock(&qdisc_mod_lock);
 239
 240	return ops ? 0 : -ENOENT;
 241}
 242
 243#ifdef CONFIG_NET_SCH_DEFAULT
 244/* Set default value from kernel config */
 245static int __init sch_default_qdisc(void)
 246{
 247	return qdisc_set_default(CONFIG_DEFAULT_NET_SCH);
 248}
 249late_initcall(sch_default_qdisc);
 250#endif
 251
 252/* We know handle. Find qdisc among all qdisc's attached to device
 253 * (root qdisc, all its children, children of children etc.)
 254 * Note: caller either uses rtnl or rcu_read_lock()
 255 */
 256
 257static struct Qdisc *qdisc_match_from_root(struct Qdisc *root, u32 handle)
 258{
 259	struct Qdisc *q;
 260
 261	if (!qdisc_dev(root))
 262		return (root->handle == handle ? root : NULL);
 263
 264	if (!(root->flags & TCQ_F_BUILTIN) &&
 265	    root->handle == handle)
 266		return root;
 267
 268	hash_for_each_possible_rcu(qdisc_dev(root)->qdisc_hash, q, hash, handle) {
 269		if (q->handle == handle)
 270			return q;
 271	}
 272	return NULL;
 273}
 274
 275void qdisc_hash_add(struct Qdisc *q, bool invisible)
 276{
 277	if ((q->parent != TC_H_ROOT) && !(q->flags & TCQ_F_INGRESS)) {
 278		ASSERT_RTNL();
 279		hash_add_rcu(qdisc_dev(q)->qdisc_hash, &q->hash, q->handle);
 280		if (invisible)
 281			q->flags |= TCQ_F_INVISIBLE;
 282	}
 283}
 284EXPORT_SYMBOL(qdisc_hash_add);
 285
 286void qdisc_hash_del(struct Qdisc *q)
 287{
 288	if ((q->parent != TC_H_ROOT) && !(q->flags & TCQ_F_INGRESS)) {
 289		ASSERT_RTNL();
 290		hash_del_rcu(&q->hash);
 291	}
 292}
 293EXPORT_SYMBOL(qdisc_hash_del);
 294
 295struct Qdisc *qdisc_lookup(struct net_device *dev, u32 handle)
 296{
 297	struct Qdisc *q;
 298
 299	if (!handle)
 300		return NULL;
 301	q = qdisc_match_from_root(dev->qdisc, handle);
 302	if (q)
 303		goto out;
 304
 305	if (dev_ingress_queue(dev))
 306		q = qdisc_match_from_root(
 307			dev_ingress_queue(dev)->qdisc_sleeping,
 308			handle);
 309out:
 310	return q;
 311}
 312
 313struct Qdisc *qdisc_lookup_rcu(struct net_device *dev, u32 handle)
 314{
 315	struct netdev_queue *nq;
 316	struct Qdisc *q;
 317
 318	if (!handle)
 319		return NULL;
 320	q = qdisc_match_from_root(dev->qdisc, handle);
 321	if (q)
 322		goto out;
 323
 324	nq = dev_ingress_queue_rcu(dev);
 325	if (nq)
 326		q = qdisc_match_from_root(nq->qdisc_sleeping, handle);
 327out:
 328	return q;
 329}
 330
 331static struct Qdisc *qdisc_leaf(struct Qdisc *p, u32 classid)
 332{
 333	unsigned long cl;
 
 334	const struct Qdisc_class_ops *cops = p->ops->cl_ops;
 335
 336	if (cops == NULL)
 337		return NULL;
 338	cl = cops->find(p, classid);
 339
 340	if (cl == 0)
 341		return NULL;
 342	return cops->leaf(p, cl);
 
 
 343}
 344
 345/* Find queueing discipline by name */
 346
 347static struct Qdisc_ops *qdisc_lookup_ops(struct nlattr *kind)
 348{
 349	struct Qdisc_ops *q = NULL;
 350
 351	if (kind) {
 352		read_lock(&qdisc_mod_lock);
 353		for (q = qdisc_base; q; q = q->next) {
 354			if (nla_strcmp(kind, q->id) == 0) {
 355				if (!try_module_get(q->owner))
 356					q = NULL;
 357				break;
 358			}
 359		}
 360		read_unlock(&qdisc_mod_lock);
 361	}
 362	return q;
 363}
 364
 365/* The linklayer setting were not transferred from iproute2, in older
 366 * versions, and the rate tables lookup systems have been dropped in
 367 * the kernel. To keep backward compatible with older iproute2 tc
 368 * utils, we detect the linklayer setting by detecting if the rate
 369 * table were modified.
 370 *
 371 * For linklayer ATM table entries, the rate table will be aligned to
 372 * 48 bytes, thus some table entries will contain the same value.  The
 373 * mpu (min packet unit) is also encoded into the old rate table, thus
 374 * starting from the mpu, we find low and high table entries for
 375 * mapping this cell.  If these entries contain the same value, when
 376 * the rate tables have been modified for linklayer ATM.
 377 *
 378 * This is done by rounding mpu to the nearest 48 bytes cell/entry,
 379 * and then roundup to the next cell, calc the table entry one below,
 380 * and compare.
 381 */
 382static __u8 __detect_linklayer(struct tc_ratespec *r, __u32 *rtab)
 383{
 384	int low       = roundup(r->mpu, 48);
 385	int high      = roundup(low+1, 48);
 386	int cell_low  = low >> r->cell_log;
 387	int cell_high = (high >> r->cell_log) - 1;
 388
 389	/* rtab is too inaccurate at rates > 100Mbit/s */
 390	if ((r->rate > (100000000/8)) || (rtab[0] == 0)) {
 391		pr_debug("TC linklayer: Giving up ATM detection\n");
 392		return TC_LINKLAYER_ETHERNET;
 393	}
 394
 395	if ((cell_high > cell_low) && (cell_high < 256)
 396	    && (rtab[cell_low] == rtab[cell_high])) {
 397		pr_debug("TC linklayer: Detected ATM, low(%d)=high(%d)=%u\n",
 398			 cell_low, cell_high, rtab[cell_high]);
 399		return TC_LINKLAYER_ATM;
 400	}
 401	return TC_LINKLAYER_ETHERNET;
 402}
 403
 404static struct qdisc_rate_table *qdisc_rtab_list;
 405
 406struct qdisc_rate_table *qdisc_get_rtab(struct tc_ratespec *r,
 407					struct nlattr *tab,
 408					struct netlink_ext_ack *extack)
 409{
 410	struct qdisc_rate_table *rtab;
 411
 412	if (tab == NULL || r->rate == 0 || r->cell_log == 0 ||
 413	    nla_len(tab) != TC_RTAB_SIZE) {
 414		NL_SET_ERR_MSG(extack, "Invalid rate table parameters for searching");
 415		return NULL;
 416	}
 417
 418	for (rtab = qdisc_rtab_list; rtab; rtab = rtab->next) {
 419		if (!memcmp(&rtab->rate, r, sizeof(struct tc_ratespec)) &&
 420		    !memcmp(&rtab->data, nla_data(tab), 1024)) {
 421			rtab->refcnt++;
 422			return rtab;
 423		}
 424	}
 425
 426	rtab = kmalloc(sizeof(*rtab), GFP_KERNEL);
 427	if (rtab) {
 428		rtab->rate = *r;
 429		rtab->refcnt = 1;
 430		memcpy(rtab->data, nla_data(tab), 1024);
 431		if (r->linklayer == TC_LINKLAYER_UNAWARE)
 432			r->linklayer = __detect_linklayer(r, rtab->data);
 433		rtab->next = qdisc_rtab_list;
 434		qdisc_rtab_list = rtab;
 435	} else {
 436		NL_SET_ERR_MSG(extack, "Failed to allocate new qdisc rate table");
 437	}
 438	return rtab;
 439}
 440EXPORT_SYMBOL(qdisc_get_rtab);
 441
 442void qdisc_put_rtab(struct qdisc_rate_table *tab)
 443{
 444	struct qdisc_rate_table *rtab, **rtabp;
 445
 446	if (!tab || --tab->refcnt)
 447		return;
 448
 449	for (rtabp = &qdisc_rtab_list;
 450	     (rtab = *rtabp) != NULL;
 451	     rtabp = &rtab->next) {
 452		if (rtab == tab) {
 453			*rtabp = rtab->next;
 454			kfree(rtab);
 455			return;
 456		}
 457	}
 458}
 459EXPORT_SYMBOL(qdisc_put_rtab);
 460
 461static LIST_HEAD(qdisc_stab_list);
 
 462
 463static const struct nla_policy stab_policy[TCA_STAB_MAX + 1] = {
 464	[TCA_STAB_BASE]	= { .len = sizeof(struct tc_sizespec) },
 465	[TCA_STAB_DATA] = { .type = NLA_BINARY },
 466};
 467
 468static struct qdisc_size_table *qdisc_get_stab(struct nlattr *opt,
 469					       struct netlink_ext_ack *extack)
 470{
 471	struct nlattr *tb[TCA_STAB_MAX + 1];
 472	struct qdisc_size_table *stab;
 473	struct tc_sizespec *s;
 474	unsigned int tsize = 0;
 475	u16 *tab = NULL;
 476	int err;
 477
 478	err = nla_parse_nested_deprecated(tb, TCA_STAB_MAX, opt, stab_policy,
 479					  extack);
 480	if (err < 0)
 481		return ERR_PTR(err);
 482	if (!tb[TCA_STAB_BASE]) {
 483		NL_SET_ERR_MSG(extack, "Size table base attribute is missing");
 484		return ERR_PTR(-EINVAL);
 485	}
 486
 487	s = nla_data(tb[TCA_STAB_BASE]);
 488
 489	if (s->tsize > 0) {
 490		if (!tb[TCA_STAB_DATA]) {
 491			NL_SET_ERR_MSG(extack, "Size table data attribute is missing");
 492			return ERR_PTR(-EINVAL);
 493		}
 494		tab = nla_data(tb[TCA_STAB_DATA]);
 495		tsize = nla_len(tb[TCA_STAB_DATA]) / sizeof(u16);
 496	}
 497
 498	if (tsize != s->tsize || (!tab && tsize > 0)) {
 499		NL_SET_ERR_MSG(extack, "Invalid size of size table");
 500		return ERR_PTR(-EINVAL);
 501	}
 
 502
 503	list_for_each_entry(stab, &qdisc_stab_list, list) {
 504		if (memcmp(&stab->szopts, s, sizeof(*s)))
 505			continue;
 506		if (tsize > 0 && memcmp(stab->data, tab, tsize * sizeof(u16)))
 507			continue;
 508		stab->refcnt++;
 
 509		return stab;
 510	}
 511
 
 
 512	stab = kmalloc(sizeof(*stab) + tsize * sizeof(u16), GFP_KERNEL);
 513	if (!stab)
 514		return ERR_PTR(-ENOMEM);
 515
 516	stab->refcnt = 1;
 517	stab->szopts = *s;
 518	if (tsize > 0)
 519		memcpy(stab->data, tab, tsize * sizeof(u16));
 520
 
 521	list_add_tail(&stab->list, &qdisc_stab_list);
 
 522
 523	return stab;
 524}
 525
 
 
 
 
 
 526void qdisc_put_stab(struct qdisc_size_table *tab)
 527{
 528	if (!tab)
 529		return;
 530
 
 
 531	if (--tab->refcnt == 0) {
 532		list_del(&tab->list);
 533		kfree_rcu(tab, rcu);
 534	}
 
 
 535}
 536EXPORT_SYMBOL(qdisc_put_stab);
 537
 538static int qdisc_dump_stab(struct sk_buff *skb, struct qdisc_size_table *stab)
 539{
 540	struct nlattr *nest;
 541
 542	nest = nla_nest_start_noflag(skb, TCA_STAB);
 543	if (nest == NULL)
 544		goto nla_put_failure;
 545	if (nla_put(skb, TCA_STAB_BASE, sizeof(stab->szopts), &stab->szopts))
 546		goto nla_put_failure;
 547	nla_nest_end(skb, nest);
 548
 549	return skb->len;
 550
 551nla_put_failure:
 552	return -1;
 553}
 554
 555void __qdisc_calculate_pkt_len(struct sk_buff *skb,
 556			       const struct qdisc_size_table *stab)
 557{
 558	int pkt_len, slot;
 559
 560	pkt_len = skb->len + stab->szopts.overhead;
 561	if (unlikely(!stab->szopts.tsize))
 562		goto out;
 563
 564	slot = pkt_len + stab->szopts.cell_align;
 565	if (unlikely(slot < 0))
 566		slot = 0;
 567
 568	slot >>= stab->szopts.cell_log;
 569	if (likely(slot < stab->szopts.tsize))
 570		pkt_len = stab->data[slot];
 571	else
 572		pkt_len = stab->data[stab->szopts.tsize - 1] *
 573				(slot / stab->szopts.tsize) +
 574				stab->data[slot % stab->szopts.tsize];
 575
 576	pkt_len <<= stab->szopts.size_log;
 577out:
 578	if (unlikely(pkt_len < 1))
 579		pkt_len = 1;
 580	qdisc_skb_cb(skb)->pkt_len = pkt_len;
 581}
 582EXPORT_SYMBOL(__qdisc_calculate_pkt_len);
 583
 584void qdisc_warn_nonwc(const char *txt, struct Qdisc *qdisc)
 585{
 586	if (!(qdisc->flags & TCQ_F_WARN_NONWC)) {
 587		pr_warn("%s: %s qdisc %X: is non-work-conserving?\n",
 588			txt, qdisc->ops->id, qdisc->handle >> 16);
 589		qdisc->flags |= TCQ_F_WARN_NONWC;
 590	}
 591}
 592EXPORT_SYMBOL(qdisc_warn_nonwc);
 593
 594static enum hrtimer_restart qdisc_watchdog(struct hrtimer *timer)
 595{
 596	struct qdisc_watchdog *wd = container_of(timer, struct qdisc_watchdog,
 597						 timer);
 598
 599	rcu_read_lock();
 600	__netif_schedule(qdisc_root(wd->qdisc));
 601	rcu_read_unlock();
 602
 603	return HRTIMER_NORESTART;
 604}
 605
 606void qdisc_watchdog_init_clockid(struct qdisc_watchdog *wd, struct Qdisc *qdisc,
 607				 clockid_t clockid)
 608{
 609	hrtimer_init(&wd->timer, clockid, HRTIMER_MODE_ABS_PINNED);
 610	wd->timer.function = qdisc_watchdog;
 611	wd->qdisc = qdisc;
 612}
 613EXPORT_SYMBOL(qdisc_watchdog_init_clockid);
 614
 615void qdisc_watchdog_init(struct qdisc_watchdog *wd, struct Qdisc *qdisc)
 616{
 617	qdisc_watchdog_init_clockid(wd, qdisc, CLOCK_MONOTONIC);
 618}
 619EXPORT_SYMBOL(qdisc_watchdog_init);
 620
 621void qdisc_watchdog_schedule_ns(struct qdisc_watchdog *wd, u64 expires)
 622{
 623	if (test_bit(__QDISC_STATE_DEACTIVATED,
 624		     &qdisc_root_sleeping(wd->qdisc)->state))
 625		return;
 626
 627	if (wd->last_expires == expires)
 628		return;
 629
 630	wd->last_expires = expires;
 631	hrtimer_start(&wd->timer,
 632		      ns_to_ktime(expires),
 633		      HRTIMER_MODE_ABS_PINNED);
 634}
 635EXPORT_SYMBOL(qdisc_watchdog_schedule_ns);
 636
 637void qdisc_watchdog_cancel(struct qdisc_watchdog *wd)
 638{
 639	hrtimer_cancel(&wd->timer);
 
 640}
 641EXPORT_SYMBOL(qdisc_watchdog_cancel);
 642
 643static struct hlist_head *qdisc_class_hash_alloc(unsigned int n)
 644{
 
 645	struct hlist_head *h;
 646	unsigned int i;
 647
 648	h = kvmalloc_array(n, sizeof(struct hlist_head), GFP_KERNEL);
 
 
 
 
 649
 650	if (h != NULL) {
 651		for (i = 0; i < n; i++)
 652			INIT_HLIST_HEAD(&h[i]);
 653	}
 654	return h;
 655}
 656
 
 
 
 
 
 
 
 
 
 
 657void qdisc_class_hash_grow(struct Qdisc *sch, struct Qdisc_class_hash *clhash)
 658{
 659	struct Qdisc_class_common *cl;
 660	struct hlist_node *next;
 661	struct hlist_head *nhash, *ohash;
 662	unsigned int nsize, nmask, osize;
 663	unsigned int i, h;
 664
 665	/* Rehash when load factor exceeds 0.75 */
 666	if (clhash->hashelems * 4 <= clhash->hashsize * 3)
 667		return;
 668	nsize = clhash->hashsize * 2;
 669	nmask = nsize - 1;
 670	nhash = qdisc_class_hash_alloc(nsize);
 671	if (nhash == NULL)
 672		return;
 673
 674	ohash = clhash->hash;
 675	osize = clhash->hashsize;
 676
 677	sch_tree_lock(sch);
 678	for (i = 0; i < osize; i++) {
 679		hlist_for_each_entry_safe(cl, next, &ohash[i], hnode) {
 680			h = qdisc_class_hash(cl->classid, nmask);
 681			hlist_add_head(&cl->hnode, &nhash[h]);
 682		}
 683	}
 684	clhash->hash     = nhash;
 685	clhash->hashsize = nsize;
 686	clhash->hashmask = nmask;
 687	sch_tree_unlock(sch);
 688
 689	kvfree(ohash);
 690}
 691EXPORT_SYMBOL(qdisc_class_hash_grow);
 692
 693int qdisc_class_hash_init(struct Qdisc_class_hash *clhash)
 694{
 695	unsigned int size = 4;
 696
 697	clhash->hash = qdisc_class_hash_alloc(size);
 698	if (!clhash->hash)
 699		return -ENOMEM;
 700	clhash->hashsize  = size;
 701	clhash->hashmask  = size - 1;
 702	clhash->hashelems = 0;
 703	return 0;
 704}
 705EXPORT_SYMBOL(qdisc_class_hash_init);
 706
 707void qdisc_class_hash_destroy(struct Qdisc_class_hash *clhash)
 708{
 709	kvfree(clhash->hash);
 710}
 711EXPORT_SYMBOL(qdisc_class_hash_destroy);
 712
 713void qdisc_class_hash_insert(struct Qdisc_class_hash *clhash,
 714			     struct Qdisc_class_common *cl)
 715{
 716	unsigned int h;
 717
 718	INIT_HLIST_NODE(&cl->hnode);
 719	h = qdisc_class_hash(cl->classid, clhash->hashmask);
 720	hlist_add_head(&cl->hnode, &clhash->hash[h]);
 721	clhash->hashelems++;
 722}
 723EXPORT_SYMBOL(qdisc_class_hash_insert);
 724
 725void qdisc_class_hash_remove(struct Qdisc_class_hash *clhash,
 726			     struct Qdisc_class_common *cl)
 727{
 728	hlist_del(&cl->hnode);
 729	clhash->hashelems--;
 730}
 731EXPORT_SYMBOL(qdisc_class_hash_remove);
 732
 733/* Allocate an unique handle from space managed by kernel
 734 * Possible range is [8000-FFFF]:0000 (0x8000 values)
 735 */
 736static u32 qdisc_alloc_handle(struct net_device *dev)
 737{
 738	int i = 0x8000;
 739	static u32 autohandle = TC_H_MAKE(0x80000000U, 0);
 740
 741	do {
 742		autohandle += TC_H_MAKE(0x10000U, 0);
 743		if (autohandle == TC_H_MAKE(TC_H_ROOT, 0))
 744			autohandle = TC_H_MAKE(0x80000000U, 0);
 745		if (!qdisc_lookup(dev, autohandle))
 746			return autohandle;
 747		cond_resched();
 748	} while	(--i > 0);
 749
 750	return 0;
 751}
 752
 753void qdisc_tree_reduce_backlog(struct Qdisc *sch, int n, int len)
 754{
 755	bool qdisc_is_offloaded = sch->flags & TCQ_F_OFFLOADED;
 756	const struct Qdisc_class_ops *cops;
 757	unsigned long cl;
 758	u32 parentid;
 759	bool notify;
 760	int drops;
 761
 762	if (n == 0 && len == 0)
 763		return;
 764	drops = max_t(int, n, 0);
 765	rcu_read_lock();
 766	while ((parentid = sch->parent)) {
 767		if (TC_H_MAJ(parentid) == TC_H_MAJ(TC_H_INGRESS))
 768			break;
 769
 770		if (sch->flags & TCQ_F_NOPARENT)
 771			break;
 772		/* Notify parent qdisc only if child qdisc becomes empty.
 773		 *
 774		 * If child was empty even before update then backlog
 775		 * counter is screwed and we skip notification because
 776		 * parent class is already passive.
 777		 *
 778		 * If the original child was offloaded then it is allowed
 779		 * to be seem as empty, so the parent is notified anyway.
 780		 */
 781		notify = !sch->q.qlen && !WARN_ON_ONCE(!n &&
 782						       !qdisc_is_offloaded);
 783		/* TODO: perform the search on a per txq basis */
 784		sch = qdisc_lookup(qdisc_dev(sch), TC_H_MAJ(parentid));
 785		if (sch == NULL) {
 786			WARN_ON_ONCE(parentid != TC_H_ROOT);
 787			break;
 788		}
 789		cops = sch->ops->cl_ops;
 790		if (notify && cops->qlen_notify) {
 791			cl = cops->find(sch, parentid);
 792			cops->qlen_notify(sch, cl);
 
 793		}
 794		sch->q.qlen -= n;
 795		sch->qstats.backlog -= len;
 796		__qdisc_qstats_drop(sch, drops);
 797	}
 798	rcu_read_unlock();
 799}
 800EXPORT_SYMBOL(qdisc_tree_reduce_backlog);
 801
 802int qdisc_offload_dump_helper(struct Qdisc *sch, enum tc_setup_type type,
 803			      void *type_data)
 804{
 805	struct net_device *dev = qdisc_dev(sch);
 806	int err;
 807
 808	sch->flags &= ~TCQ_F_OFFLOADED;
 809	if (!tc_can_offload(dev) || !dev->netdev_ops->ndo_setup_tc)
 810		return 0;
 811
 812	err = dev->netdev_ops->ndo_setup_tc(dev, type, type_data);
 813	if (err == -EOPNOTSUPP)
 814		return 0;
 815
 816	if (!err)
 817		sch->flags |= TCQ_F_OFFLOADED;
 818
 819	return err;
 820}
 821EXPORT_SYMBOL(qdisc_offload_dump_helper);
 822
 823void qdisc_offload_graft_helper(struct net_device *dev, struct Qdisc *sch,
 824				struct Qdisc *new, struct Qdisc *old,
 825				enum tc_setup_type type, void *type_data,
 826				struct netlink_ext_ack *extack)
 827{
 828	bool any_qdisc_is_offloaded;
 829	int err;
 830
 831	if (!tc_can_offload(dev) || !dev->netdev_ops->ndo_setup_tc)
 832		return;
 833
 834	err = dev->netdev_ops->ndo_setup_tc(dev, type, type_data);
 835
 836	/* Don't report error if the graft is part of destroy operation. */
 837	if (!err || !new || new == &noop_qdisc)
 838		return;
 839
 840	/* Don't report error if the parent, the old child and the new
 841	 * one are not offloaded.
 842	 */
 843	any_qdisc_is_offloaded = new->flags & TCQ_F_OFFLOADED;
 844	any_qdisc_is_offloaded |= sch && sch->flags & TCQ_F_OFFLOADED;
 845	any_qdisc_is_offloaded |= old && old->flags & TCQ_F_OFFLOADED;
 846
 847	if (any_qdisc_is_offloaded)
 848		NL_SET_ERR_MSG(extack, "Offloading graft operation failed.");
 849}
 850EXPORT_SYMBOL(qdisc_offload_graft_helper);
 851
 852static void qdisc_offload_graft_root(struct net_device *dev,
 853				     struct Qdisc *new, struct Qdisc *old,
 854				     struct netlink_ext_ack *extack)
 855{
 856	struct tc_root_qopt_offload graft_offload = {
 857		.command	= TC_ROOT_GRAFT,
 858		.handle		= new ? new->handle : 0,
 859		.ingress	= (new && new->flags & TCQ_F_INGRESS) ||
 860				  (old && old->flags & TCQ_F_INGRESS),
 861	};
 862
 863	qdisc_offload_graft_helper(dev, NULL, new, old,
 864				   TC_SETUP_ROOT_QDISC, &graft_offload, extack);
 865}
 866
 867static int tc_fill_qdisc(struct sk_buff *skb, struct Qdisc *q, u32 clid,
 868			 u32 portid, u32 seq, u16 flags, int event)
 869{
 870	struct gnet_stats_basic_cpu __percpu *cpu_bstats = NULL;
 871	struct gnet_stats_queue __percpu *cpu_qstats = NULL;
 872	struct tcmsg *tcm;
 873	struct nlmsghdr  *nlh;
 874	unsigned char *b = skb_tail_pointer(skb);
 875	struct gnet_dump d;
 876	struct qdisc_size_table *stab;
 877	u32 block_index;
 878	__u32 qlen;
 879
 880	cond_resched();
 881	nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
 882	if (!nlh)
 883		goto out_nlmsg_trim;
 884	tcm = nlmsg_data(nlh);
 885	tcm->tcm_family = AF_UNSPEC;
 886	tcm->tcm__pad1 = 0;
 887	tcm->tcm__pad2 = 0;
 888	tcm->tcm_ifindex = qdisc_dev(q)->ifindex;
 889	tcm->tcm_parent = clid;
 890	tcm->tcm_handle = q->handle;
 891	tcm->tcm_info = refcount_read(&q->refcnt);
 892	if (nla_put_string(skb, TCA_KIND, q->ops->id))
 893		goto nla_put_failure;
 894	if (q->ops->ingress_block_get) {
 895		block_index = q->ops->ingress_block_get(q);
 896		if (block_index &&
 897		    nla_put_u32(skb, TCA_INGRESS_BLOCK, block_index))
 898			goto nla_put_failure;
 899	}
 900	if (q->ops->egress_block_get) {
 901		block_index = q->ops->egress_block_get(q);
 902		if (block_index &&
 903		    nla_put_u32(skb, TCA_EGRESS_BLOCK, block_index))
 904			goto nla_put_failure;
 905	}
 906	if (q->ops->dump && q->ops->dump(q, skb) < 0)
 907		goto nla_put_failure;
 908	if (nla_put_u8(skb, TCA_HW_OFFLOAD, !!(q->flags & TCQ_F_OFFLOADED)))
 909		goto nla_put_failure;
 910	qlen = qdisc_qlen_sum(q);
 911
 912	stab = rtnl_dereference(q->stab);
 913	if (stab && qdisc_dump_stab(skb, stab) < 0)
 914		goto nla_put_failure;
 915
 916	if (gnet_stats_start_copy_compat(skb, TCA_STATS2, TCA_STATS, TCA_XSTATS,
 917					 NULL, &d, TCA_PAD) < 0)
 918		goto nla_put_failure;
 919
 920	if (q->ops->dump_stats && q->ops->dump_stats(q, &d) < 0)
 921		goto nla_put_failure;
 922
 923	if (qdisc_is_percpu_stats(q)) {
 924		cpu_bstats = q->cpu_bstats;
 925		cpu_qstats = q->cpu_qstats;
 926	}
 927
 928	if (gnet_stats_copy_basic(qdisc_root_sleeping_running(q),
 929				  &d, cpu_bstats, &q->bstats) < 0 ||
 930	    gnet_stats_copy_rate_est(&d, &q->rate_est) < 0 ||
 931	    gnet_stats_copy_queue(&d, cpu_qstats, &q->qstats, qlen) < 0)
 932		goto nla_put_failure;
 933
 934	if (gnet_stats_finish_copy(&d) < 0)
 935		goto nla_put_failure;
 936
 937	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
 938	return skb->len;
 939
 940out_nlmsg_trim:
 941nla_put_failure:
 942	nlmsg_trim(skb, b);
 943	return -1;
 944}
 945
 946static bool tc_qdisc_dump_ignore(struct Qdisc *q, bool dump_invisible)
 947{
 948	if (q->flags & TCQ_F_BUILTIN)
 949		return true;
 950	if ((q->flags & TCQ_F_INVISIBLE) && !dump_invisible)
 951		return true;
 952
 953	return false;
 954}
 955
 956static int qdisc_notify(struct net *net, struct sk_buff *oskb,
 957			struct nlmsghdr *n, u32 clid,
 958			struct Qdisc *old, struct Qdisc *new)
 959{
 960	struct sk_buff *skb;
 961	u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
 962
 963	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 964	if (!skb)
 965		return -ENOBUFS;
 966
 967	if (old && !tc_qdisc_dump_ignore(old, false)) {
 968		if (tc_fill_qdisc(skb, old, clid, portid, n->nlmsg_seq,
 969				  0, RTM_DELQDISC) < 0)
 970			goto err_out;
 971	}
 972	if (new && !tc_qdisc_dump_ignore(new, false)) {
 973		if (tc_fill_qdisc(skb, new, clid, portid, n->nlmsg_seq,
 974				  old ? NLM_F_REPLACE : 0, RTM_NEWQDISC) < 0)
 975			goto err_out;
 976	}
 977
 978	if (skb->len)
 979		return rtnetlink_send(skb, net, portid, RTNLGRP_TC,
 980				      n->nlmsg_flags & NLM_F_ECHO);
 981
 982err_out:
 983	kfree_skb(skb);
 984	return -EINVAL;
 985}
 
 986
 987static void notify_and_destroy(struct net *net, struct sk_buff *skb,
 988			       struct nlmsghdr *n, u32 clid,
 989			       struct Qdisc *old, struct Qdisc *new)
 990{
 991	if (new || old)
 992		qdisc_notify(net, skb, n, clid, old, new);
 993
 994	if (old)
 995		qdisc_put(old);
 996}
 997
 998static void qdisc_clear_nolock(struct Qdisc *sch)
 999{
1000	sch->flags &= ~TCQ_F_NOLOCK;
1001	if (!(sch->flags & TCQ_F_CPUSTATS))
1002		return;
1003
1004	free_percpu(sch->cpu_bstats);
1005	free_percpu(sch->cpu_qstats);
1006	sch->cpu_bstats = NULL;
1007	sch->cpu_qstats = NULL;
1008	sch->flags &= ~TCQ_F_CPUSTATS;
1009}
1010
1011/* Graft qdisc "new" to class "classid" of qdisc "parent" or
1012 * to device "dev".
1013 *
1014 * When appropriate send a netlink notification using 'skb'
1015 * and "n".
1016 *
1017 * On success, destroy old qdisc.
1018 */
1019
1020static int qdisc_graft(struct net_device *dev, struct Qdisc *parent,
1021		       struct sk_buff *skb, struct nlmsghdr *n, u32 classid,
1022		       struct Qdisc *new, struct Qdisc *old,
1023		       struct netlink_ext_ack *extack)
1024{
1025	struct Qdisc *q = old;
1026	struct net *net = dev_net(dev);
 
1027
1028	if (parent == NULL) {
1029		unsigned int i, num_q, ingress;
1030
1031		ingress = 0;
1032		num_q = dev->num_tx_queues;
1033		if ((q && q->flags & TCQ_F_INGRESS) ||
1034		    (new && new->flags & TCQ_F_INGRESS)) {
1035			num_q = 1;
1036			ingress = 1;
1037			if (!dev_ingress_queue(dev)) {
1038				NL_SET_ERR_MSG(extack, "Device does not have an ingress queue");
1039				return -ENOENT;
1040			}
1041		}
1042
1043		if (dev->flags & IFF_UP)
1044			dev_deactivate(dev);
1045
1046		qdisc_offload_graft_root(dev, new, old, extack);
1047
1048		if (new && new->ops->attach)
1049			goto skip;
1050
1051		for (i = 0; i < num_q; i++) {
1052			struct netdev_queue *dev_queue = dev_ingress_queue(dev);
1053
1054			if (!ingress)
1055				dev_queue = netdev_get_tx_queue(dev, i);
1056
1057			old = dev_graft_qdisc(dev_queue, new);
1058			if (new && i > 0)
1059				qdisc_refcount_inc(new);
1060
1061			if (!ingress)
1062				qdisc_put(old);
1063		}
1064
1065skip:
1066		if (!ingress) {
1067			notify_and_destroy(net, skb, n, classid,
1068					   dev->qdisc, new);
1069			if (new && !new->ops->attach)
1070				qdisc_refcount_inc(new);
1071			dev->qdisc = new ? : &noop_qdisc;
1072
1073			if (new && new->ops->attach)
1074				new->ops->attach(new);
1075		} else {
1076			notify_and_destroy(net, skb, n, classid, old, new);
1077		}
1078
1079		if (dev->flags & IFF_UP)
1080			dev_activate(dev);
1081	} else {
1082		const struct Qdisc_class_ops *cops = parent->ops->cl_ops;
1083		unsigned long cl;
1084		int err;
1085
1086		/* Only support running class lockless if parent is lockless */
1087		if (new && (new->flags & TCQ_F_NOLOCK) &&
1088		    parent && !(parent->flags & TCQ_F_NOLOCK))
1089			qdisc_clear_nolock(new);
1090
1091		if (!cops || !cops->graft)
1092			return -EOPNOTSUPP;
1093
1094		cl = cops->find(parent, classid);
1095		if (!cl) {
1096			NL_SET_ERR_MSG(extack, "Specified class not found");
1097			return -ENOENT;
1098		}
1099
1100		err = cops->graft(parent, cl, new, &old, extack);
1101		if (err)
1102			return err;
1103		notify_and_destroy(net, skb, n, classid, old, new);
1104	}
1105	return 0;
1106}
1107
1108static int qdisc_block_indexes_set(struct Qdisc *sch, struct nlattr **tca,
1109				   struct netlink_ext_ack *extack)
1110{
1111	u32 block_index;
1112
1113	if (tca[TCA_INGRESS_BLOCK]) {
1114		block_index = nla_get_u32(tca[TCA_INGRESS_BLOCK]);
1115
1116		if (!block_index) {
1117			NL_SET_ERR_MSG(extack, "Ingress block index cannot be 0");
1118			return -EINVAL;
1119		}
1120		if (!sch->ops->ingress_block_set) {
1121			NL_SET_ERR_MSG(extack, "Ingress block sharing is not supported");
1122			return -EOPNOTSUPP;
1123		}
1124		sch->ops->ingress_block_set(sch, block_index);
1125	}
1126	if (tca[TCA_EGRESS_BLOCK]) {
1127		block_index = nla_get_u32(tca[TCA_EGRESS_BLOCK]);
1128
1129		if (!block_index) {
1130			NL_SET_ERR_MSG(extack, "Egress block index cannot be 0");
1131			return -EINVAL;
1132		}
1133		if (!sch->ops->egress_block_set) {
1134			NL_SET_ERR_MSG(extack, "Egress block sharing is not supported");
1135			return -EOPNOTSUPP;
1136		}
1137		sch->ops->egress_block_set(sch, block_index);
1138	}
1139	return 0;
1140}
1141
1142/*
1143   Allocate and initialize new qdisc.
1144
1145   Parameters are passed via opt.
1146 */
1147
1148static struct Qdisc *qdisc_create(struct net_device *dev,
1149				  struct netdev_queue *dev_queue,
1150				  struct Qdisc *p, u32 parent, u32 handle,
1151				  struct nlattr **tca, int *errp,
1152				  struct netlink_ext_ack *extack)
1153{
1154	int err;
1155	struct nlattr *kind = tca[TCA_KIND];
1156	struct Qdisc *sch;
1157	struct Qdisc_ops *ops;
1158	struct qdisc_size_table *stab;
1159
1160	ops = qdisc_lookup_ops(kind);
1161#ifdef CONFIG_MODULES
1162	if (ops == NULL && kind != NULL) {
1163		char name[IFNAMSIZ];
1164		if (nla_strlcpy(name, kind, IFNAMSIZ) < IFNAMSIZ) {
1165			/* We dropped the RTNL semaphore in order to
1166			 * perform the module load.  So, even if we
1167			 * succeeded in loading the module we have to
1168			 * tell the caller to replay the request.  We
1169			 * indicate this using -EAGAIN.
1170			 * We replay the request because the device may
1171			 * go away in the mean time.
1172			 */
1173			rtnl_unlock();
1174			request_module("sch_%s", name);
1175			rtnl_lock();
1176			ops = qdisc_lookup_ops(kind);
1177			if (ops != NULL) {
1178				/* We will try again qdisc_lookup_ops,
1179				 * so don't keep a reference.
1180				 */
1181				module_put(ops->owner);
1182				err = -EAGAIN;
1183				goto err_out;
1184			}
1185		}
1186	}
1187#endif
1188
1189	err = -ENOENT;
1190	if (!ops) {
1191		NL_SET_ERR_MSG(extack, "Specified qdisc not found");
1192		goto err_out;
1193	}
1194
1195	sch = qdisc_alloc(dev_queue, ops, extack);
1196	if (IS_ERR(sch)) {
1197		err = PTR_ERR(sch);
1198		goto err_out2;
1199	}
1200
1201	sch->parent = parent;
1202
1203	if (handle == TC_H_INGRESS) {
1204		sch->flags |= TCQ_F_INGRESS;
1205		handle = TC_H_MAKE(TC_H_INGRESS, 0);
 
1206	} else {
1207		if (handle == 0) {
1208			handle = qdisc_alloc_handle(dev);
1209			if (handle == 0) {
1210				NL_SET_ERR_MSG(extack, "Maximum number of qdisc handles was exceeded");
1211				err = -ENOSPC;
1212				goto err_out3;
1213			}
1214		}
 
1215		if (!netif_is_multiqueue(dev))
1216			sch->flags |= TCQ_F_ONETXQUEUE;
1217	}
1218
1219	sch->handle = handle;
1220
1221	/* This exist to keep backward compatible with a userspace
1222	 * loophole, what allowed userspace to get IFF_NO_QUEUE
1223	 * facility on older kernels by setting tx_queue_len=0 (prior
1224	 * to qdisc init), and then forgot to reinit tx_queue_len
1225	 * before again attaching a qdisc.
1226	 */
1227	if ((dev->priv_flags & IFF_NO_QUEUE) && (dev->tx_queue_len == 0)) {
1228		dev->tx_queue_len = DEFAULT_TX_QUEUE_LEN;
1229		netdev_info(dev, "Caught tx_queue_len zero misconfig\n");
1230	}
1231
1232	err = qdisc_block_indexes_set(sch, tca, extack);
1233	if (err)
1234		goto err_out3;
1235
1236	if (ops->init) {
1237		err = ops->init(sch, tca[TCA_OPTIONS], extack);
1238		if (err != 0)
1239			goto err_out5;
1240	}
1241
1242	if (tca[TCA_STAB]) {
1243		stab = qdisc_get_stab(tca[TCA_STAB], extack);
1244		if (IS_ERR(stab)) {
1245			err = PTR_ERR(stab);
1246			goto err_out4;
1247		}
1248		rcu_assign_pointer(sch->stab, stab);
1249	}
1250	if (tca[TCA_RATE]) {
1251		seqcount_t *running;
1252
1253		err = -EOPNOTSUPP;
1254		if (sch->flags & TCQ_F_MQROOT) {
1255			NL_SET_ERR_MSG(extack, "Cannot attach rate estimator to a multi-queue root qdisc");
1256			goto err_out4;
1257		}
1258
1259		if (sch->parent != TC_H_ROOT &&
1260		    !(sch->flags & TCQ_F_INGRESS) &&
1261		    (!p || !(p->flags & TCQ_F_MQROOT)))
1262			running = qdisc_root_sleeping_running(sch);
1263		else
1264			running = &sch->running;
1265
1266		err = gen_new_estimator(&sch->bstats,
1267					sch->cpu_bstats,
1268					&sch->rate_est,
1269					NULL,
1270					running,
1271					tca[TCA_RATE]);
1272		if (err) {
1273			NL_SET_ERR_MSG(extack, "Failed to generate new estimator");
1274			goto err_out4;
1275		}
1276	}
1277
1278	qdisc_hash_add(sch, false);
1279
1280	return sch;
1281
1282err_out5:
1283	/* ops->init() failed, we call ->destroy() like qdisc_create_dflt() */
1284	if (ops->destroy)
1285		ops->destroy(sch);
1286err_out3:
1287	dev_put(dev);
1288	qdisc_free(sch);
1289err_out2:
1290	module_put(ops->owner);
1291err_out:
1292	*errp = err;
1293	return NULL;
1294
1295err_out4:
1296	/*
1297	 * Any broken qdiscs that would require a ops->reset() here?
1298	 * The qdisc was never in action so it shouldn't be necessary.
1299	 */
1300	qdisc_put_stab(rtnl_dereference(sch->stab));
1301	if (ops->destroy)
1302		ops->destroy(sch);
1303	goto err_out3;
1304}
1305
1306static int qdisc_change(struct Qdisc *sch, struct nlattr **tca,
1307			struct netlink_ext_ack *extack)
1308{
1309	struct qdisc_size_table *ostab, *stab = NULL;
1310	int err = 0;
1311
1312	if (tca[TCA_OPTIONS]) {
1313		if (!sch->ops->change) {
1314			NL_SET_ERR_MSG(extack, "Change operation not supported by specified qdisc");
1315			return -EINVAL;
1316		}
1317		if (tca[TCA_INGRESS_BLOCK] || tca[TCA_EGRESS_BLOCK]) {
1318			NL_SET_ERR_MSG(extack, "Change of blocks is not supported");
1319			return -EOPNOTSUPP;
1320		}
1321		err = sch->ops->change(sch, tca[TCA_OPTIONS], extack);
1322		if (err)
1323			return err;
1324	}
1325
1326	if (tca[TCA_STAB]) {
1327		stab = qdisc_get_stab(tca[TCA_STAB], extack);
1328		if (IS_ERR(stab))
1329			return PTR_ERR(stab);
1330	}
1331
1332	ostab = rtnl_dereference(sch->stab);
1333	rcu_assign_pointer(sch->stab, stab);
1334	qdisc_put_stab(ostab);
1335
1336	if (tca[TCA_RATE]) {
1337		/* NB: ignores errors from replace_estimator
1338		   because change can't be undone. */
1339		if (sch->flags & TCQ_F_MQROOT)
1340			goto out;
1341		gen_replace_estimator(&sch->bstats,
1342				      sch->cpu_bstats,
1343				      &sch->rate_est,
1344				      NULL,
1345				      qdisc_root_sleeping_running(sch),
1346				      tca[TCA_RATE]);
1347	}
1348out:
1349	return 0;
1350}
1351
1352struct check_loop_arg {
1353	struct qdisc_walker	w;
1354	struct Qdisc		*p;
1355	int			depth;
1356};
1357
1358static int check_loop_fn(struct Qdisc *q, unsigned long cl,
1359			 struct qdisc_walker *w);
1360
1361static int check_loop(struct Qdisc *q, struct Qdisc *p, int depth)
1362{
1363	struct check_loop_arg	arg;
1364
1365	if (q->ops->cl_ops == NULL)
1366		return 0;
1367
1368	arg.w.stop = arg.w.skip = arg.w.count = 0;
1369	arg.w.fn = check_loop_fn;
1370	arg.depth = depth;
1371	arg.p = p;
1372	q->ops->cl_ops->walk(q, &arg.w);
1373	return arg.w.stop ? -ELOOP : 0;
1374}
1375
1376static int
1377check_loop_fn(struct Qdisc *q, unsigned long cl, struct qdisc_walker *w)
1378{
1379	struct Qdisc *leaf;
1380	const struct Qdisc_class_ops *cops = q->ops->cl_ops;
1381	struct check_loop_arg *arg = (struct check_loop_arg *)w;
1382
1383	leaf = cops->leaf(q, cl);
1384	if (leaf) {
1385		if (leaf == arg->p || arg->depth > 7)
1386			return -ELOOP;
1387		return check_loop(leaf, arg->p, arg->depth + 1);
1388	}
1389	return 0;
1390}
1391
1392const struct nla_policy rtm_tca_policy[TCA_MAX + 1] = {
1393	[TCA_KIND]		= { .type = NLA_STRING },
1394	[TCA_RATE]		= { .type = NLA_BINARY,
1395				    .len = sizeof(struct tc_estimator) },
1396	[TCA_STAB]		= { .type = NLA_NESTED },
1397	[TCA_DUMP_INVISIBLE]	= { .type = NLA_FLAG },
1398	[TCA_CHAIN]		= { .type = NLA_U32 },
1399	[TCA_INGRESS_BLOCK]	= { .type = NLA_U32 },
1400	[TCA_EGRESS_BLOCK]	= { .type = NLA_U32 },
1401};
1402
1403/*
1404 * Delete/get qdisc.
1405 */
1406
1407static int tc_get_qdisc(struct sk_buff *skb, struct nlmsghdr *n,
1408			struct netlink_ext_ack *extack)
1409{
1410	struct net *net = sock_net(skb->sk);
1411	struct tcmsg *tcm = nlmsg_data(n);
1412	struct nlattr *tca[TCA_MAX + 1];
1413	struct net_device *dev;
1414	u32 clid;
1415	struct Qdisc *q = NULL;
1416	struct Qdisc *p = NULL;
1417	int err;
1418
1419	if ((n->nlmsg_type != RTM_GETQDISC) &&
1420	    !netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
1421		return -EPERM;
1422
1423	err = nlmsg_parse_deprecated(n, sizeof(*tcm), tca, TCA_MAX,
1424				     rtm_tca_policy, extack);
1425	if (err < 0)
1426		return err;
1427
1428	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1429	if (!dev)
1430		return -ENODEV;
1431
1432	clid = tcm->tcm_parent;
1433	if (clid) {
1434		if (clid != TC_H_ROOT) {
1435			if (TC_H_MAJ(clid) != TC_H_MAJ(TC_H_INGRESS)) {
1436				p = qdisc_lookup(dev, TC_H_MAJ(clid));
1437				if (!p) {
1438					NL_SET_ERR_MSG(extack, "Failed to find qdisc with specified classid");
1439					return -ENOENT;
1440				}
1441				q = qdisc_leaf(p, clid);
1442			} else if (dev_ingress_queue(dev)) {
1443				q = dev_ingress_queue(dev)->qdisc_sleeping;
1444			}
1445		} else {
1446			q = dev->qdisc;
1447		}
1448		if (!q) {
1449			NL_SET_ERR_MSG(extack, "Cannot find specified qdisc on specified device");
1450			return -ENOENT;
1451		}
1452
1453		if (tcm->tcm_handle && q->handle != tcm->tcm_handle) {
1454			NL_SET_ERR_MSG(extack, "Invalid handle");
1455			return -EINVAL;
1456		}
1457	} else {
1458		q = qdisc_lookup(dev, tcm->tcm_handle);
1459		if (!q) {
1460			NL_SET_ERR_MSG(extack, "Failed to find qdisc with specified handle");
1461			return -ENOENT;
1462		}
1463	}
1464
1465	if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], q->ops->id)) {
1466		NL_SET_ERR_MSG(extack, "Invalid qdisc name");
1467		return -EINVAL;
1468	}
1469
1470	if (n->nlmsg_type == RTM_DELQDISC) {
1471		if (!clid) {
1472			NL_SET_ERR_MSG(extack, "Classid cannot be zero");
1473			return -EINVAL;
1474		}
1475		if (q->handle == 0) {
1476			NL_SET_ERR_MSG(extack, "Cannot delete qdisc with handle of zero");
1477			return -ENOENT;
1478		}
1479		err = qdisc_graft(dev, p, skb, n, clid, NULL, q, extack);
1480		if (err != 0)
1481			return err;
1482	} else {
1483		qdisc_notify(net, skb, n, clid, NULL, q);
1484	}
1485	return 0;
1486}
1487
1488/*
1489 * Create/change qdisc.
1490 */
1491
1492static int tc_modify_qdisc(struct sk_buff *skb, struct nlmsghdr *n,
1493			   struct netlink_ext_ack *extack)
1494{
1495	struct net *net = sock_net(skb->sk);
1496	struct tcmsg *tcm;
1497	struct nlattr *tca[TCA_MAX + 1];
1498	struct net_device *dev;
1499	u32 clid;
1500	struct Qdisc *q, *p;
1501	int err;
1502
1503	if (!netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
1504		return -EPERM;
1505
1506replay:
1507	/* Reinit, just in case something touches this. */
1508	err = nlmsg_parse_deprecated(n, sizeof(*tcm), tca, TCA_MAX,
1509				     rtm_tca_policy, extack);
1510	if (err < 0)
1511		return err;
1512
1513	tcm = nlmsg_data(n);
1514	clid = tcm->tcm_parent;
1515	q = p = NULL;
1516
1517	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1518	if (!dev)
1519		return -ENODEV;
1520
1521
1522	if (clid) {
1523		if (clid != TC_H_ROOT) {
1524			if (clid != TC_H_INGRESS) {
1525				p = qdisc_lookup(dev, TC_H_MAJ(clid));
1526				if (!p) {
1527					NL_SET_ERR_MSG(extack, "Failed to find specified qdisc");
1528					return -ENOENT;
1529				}
1530				q = qdisc_leaf(p, clid);
1531			} else if (dev_ingress_queue_create(dev)) {
1532				q = dev_ingress_queue(dev)->qdisc_sleeping;
1533			}
1534		} else {
1535			q = dev->qdisc;
1536		}
1537
1538		/* It may be default qdisc, ignore it */
1539		if (q && q->handle == 0)
1540			q = NULL;
1541
1542		if (!q || !tcm->tcm_handle || q->handle != tcm->tcm_handle) {
1543			if (tcm->tcm_handle) {
1544				if (q && !(n->nlmsg_flags & NLM_F_REPLACE)) {
1545					NL_SET_ERR_MSG(extack, "NLM_F_REPLACE needed to override");
1546					return -EEXIST;
1547				}
1548				if (TC_H_MIN(tcm->tcm_handle)) {
1549					NL_SET_ERR_MSG(extack, "Invalid minor handle");
1550					return -EINVAL;
1551				}
1552				q = qdisc_lookup(dev, tcm->tcm_handle);
1553				if (!q)
1554					goto create_n_graft;
1555				if (n->nlmsg_flags & NLM_F_EXCL) {
1556					NL_SET_ERR_MSG(extack, "Exclusivity flag on, cannot override");
1557					return -EEXIST;
1558				}
1559				if (tca[TCA_KIND] &&
1560				    nla_strcmp(tca[TCA_KIND], q->ops->id)) {
1561					NL_SET_ERR_MSG(extack, "Invalid qdisc name");
1562					return -EINVAL;
1563				}
1564				if (q == p ||
1565				    (p && check_loop(q, p, 0))) {
1566					NL_SET_ERR_MSG(extack, "Qdisc parent/child loop detected");
1567					return -ELOOP;
1568				}
1569				qdisc_refcount_inc(q);
1570				goto graft;
1571			} else {
1572				if (!q)
1573					goto create_n_graft;
1574
1575				/* This magic test requires explanation.
1576				 *
1577				 *   We know, that some child q is already
1578				 *   attached to this parent and have choice:
1579				 *   either to change it or to create/graft new one.
1580				 *
1581				 *   1. We are allowed to create/graft only
1582				 *   if CREATE and REPLACE flags are set.
1583				 *
1584				 *   2. If EXCL is set, requestor wanted to say,
1585				 *   that qdisc tcm_handle is not expected
1586				 *   to exist, so that we choose create/graft too.
1587				 *
1588				 *   3. The last case is when no flags are set.
1589				 *   Alas, it is sort of hole in API, we
1590				 *   cannot decide what to do unambiguously.
1591				 *   For now we select create/graft, if
1592				 *   user gave KIND, which does not match existing.
1593				 */
1594				if ((n->nlmsg_flags & NLM_F_CREATE) &&
1595				    (n->nlmsg_flags & NLM_F_REPLACE) &&
1596				    ((n->nlmsg_flags & NLM_F_EXCL) ||
1597				     (tca[TCA_KIND] &&
1598				      nla_strcmp(tca[TCA_KIND], q->ops->id))))
1599					goto create_n_graft;
1600			}
1601		}
1602	} else {
1603		if (!tcm->tcm_handle) {
1604			NL_SET_ERR_MSG(extack, "Handle cannot be zero");
1605			return -EINVAL;
1606		}
1607		q = qdisc_lookup(dev, tcm->tcm_handle);
1608	}
1609
1610	/* Change qdisc parameters */
1611	if (!q) {
1612		NL_SET_ERR_MSG(extack, "Specified qdisc not found");
1613		return -ENOENT;
1614	}
1615	if (n->nlmsg_flags & NLM_F_EXCL) {
1616		NL_SET_ERR_MSG(extack, "Exclusivity flag on, cannot modify");
1617		return -EEXIST;
1618	}
1619	if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], q->ops->id)) {
1620		NL_SET_ERR_MSG(extack, "Invalid qdisc name");
1621		return -EINVAL;
1622	}
1623	err = qdisc_change(q, tca, extack);
1624	if (err == 0)
1625		qdisc_notify(net, skb, n, clid, NULL, q);
1626	return err;
1627
1628create_n_graft:
1629	if (!(n->nlmsg_flags & NLM_F_CREATE)) {
1630		NL_SET_ERR_MSG(extack, "Qdisc not found. To create specify NLM_F_CREATE flag");
1631		return -ENOENT;
1632	}
1633	if (clid == TC_H_INGRESS) {
1634		if (dev_ingress_queue(dev)) {
1635			q = qdisc_create(dev, dev_ingress_queue(dev), p,
1636					 tcm->tcm_parent, tcm->tcm_parent,
1637					 tca, &err, extack);
1638		} else {
1639			NL_SET_ERR_MSG(extack, "Cannot find ingress queue for specified device");
1640			err = -ENOENT;
1641		}
1642	} else {
1643		struct netdev_queue *dev_queue;
1644
1645		if (p && p->ops->cl_ops && p->ops->cl_ops->select_queue)
1646			dev_queue = p->ops->cl_ops->select_queue(p, tcm);
1647		else if (p)
1648			dev_queue = p->dev_queue;
1649		else
1650			dev_queue = netdev_get_tx_queue(dev, 0);
1651
1652		q = qdisc_create(dev, dev_queue, p,
1653				 tcm->tcm_parent, tcm->tcm_handle,
1654				 tca, &err, extack);
1655	}
1656	if (q == NULL) {
1657		if (err == -EAGAIN)
1658			goto replay;
1659		return err;
1660	}
1661
1662graft:
1663	err = qdisc_graft(dev, p, skb, n, clid, q, NULL, extack);
1664	if (err) {
1665		if (q)
1666			qdisc_put(q);
1667		return err;
1668	}
1669
1670	return 0;
1671}
1672
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1673static int tc_dump_qdisc_root(struct Qdisc *root, struct sk_buff *skb,
1674			      struct netlink_callback *cb,
1675			      int *q_idx_p, int s_q_idx, bool recur,
1676			      bool dump_invisible)
1677{
1678	int ret = 0, q_idx = *q_idx_p;
1679	struct Qdisc *q;
1680	int b;
1681
1682	if (!root)
1683		return 0;
1684
1685	q = root;
1686	if (q_idx < s_q_idx) {
1687		q_idx++;
1688	} else {
1689		if (!tc_qdisc_dump_ignore(q, dump_invisible) &&
1690		    tc_fill_qdisc(skb, q, q->parent, NETLINK_CB(cb->skb).portid,
1691				  cb->nlh->nlmsg_seq, NLM_F_MULTI,
1692				  RTM_NEWQDISC) <= 0)
1693			goto done;
1694		q_idx++;
1695	}
1696
1697	/* If dumping singletons, there is no qdisc_dev(root) and the singleton
1698	 * itself has already been dumped.
1699	 *
1700	 * If we've already dumped the top-level (ingress) qdisc above and the global
1701	 * qdisc hashtable, we don't want to hit it again
1702	 */
1703	if (!qdisc_dev(root) || !recur)
1704		goto out;
1705
1706	hash_for_each(qdisc_dev(root)->qdisc_hash, b, q, hash) {
1707		if (q_idx < s_q_idx) {
1708			q_idx++;
1709			continue;
1710		}
1711		if (!tc_qdisc_dump_ignore(q, dump_invisible) &&
1712		    tc_fill_qdisc(skb, q, q->parent, NETLINK_CB(cb->skb).portid,
1713				  cb->nlh->nlmsg_seq, NLM_F_MULTI,
1714				  RTM_NEWQDISC) <= 0)
1715			goto done;
1716		q_idx++;
1717	}
1718
1719out:
1720	*q_idx_p = q_idx;
1721	return ret;
1722done:
1723	ret = -1;
1724	goto out;
1725}
1726
1727static int tc_dump_qdisc(struct sk_buff *skb, struct netlink_callback *cb)
1728{
1729	struct net *net = sock_net(skb->sk);
1730	int idx, q_idx;
1731	int s_idx, s_q_idx;
1732	struct net_device *dev;
1733	const struct nlmsghdr *nlh = cb->nlh;
1734	struct nlattr *tca[TCA_MAX + 1];
1735	int err;
1736
1737	s_idx = cb->args[0];
1738	s_q_idx = q_idx = cb->args[1];
1739
1740	idx = 0;
1741	ASSERT_RTNL();
1742
1743	err = nlmsg_parse_deprecated(nlh, sizeof(struct tcmsg), tca, TCA_MAX,
1744				     rtm_tca_policy, cb->extack);
1745	if (err < 0)
1746		return err;
1747
1748	for_each_netdev(net, dev) {
1749		struct netdev_queue *dev_queue;
1750
1751		if (idx < s_idx)
1752			goto cont;
1753		if (idx > s_idx)
1754			s_q_idx = 0;
1755		q_idx = 0;
1756
1757		if (tc_dump_qdisc_root(dev->qdisc, skb, cb, &q_idx, s_q_idx,
1758				       true, tca[TCA_DUMP_INVISIBLE]) < 0)
1759			goto done;
1760
1761		dev_queue = dev_ingress_queue(dev);
1762		if (dev_queue &&
1763		    tc_dump_qdisc_root(dev_queue->qdisc_sleeping, skb, cb,
1764				       &q_idx, s_q_idx, false,
1765				       tca[TCA_DUMP_INVISIBLE]) < 0)
1766			goto done;
1767
1768cont:
1769		idx++;
1770	}
1771
1772done:
1773	cb->args[0] = idx;
1774	cb->args[1] = q_idx;
1775
1776	return skb->len;
1777}
1778
1779
1780
1781/************************************************
1782 *	Traffic classes manipulation.		*
1783 ************************************************/
1784
1785static int tc_fill_tclass(struct sk_buff *skb, struct Qdisc *q,
1786			  unsigned long cl,
1787			  u32 portid, u32 seq, u16 flags, int event)
1788{
1789	struct tcmsg *tcm;
1790	struct nlmsghdr  *nlh;
1791	unsigned char *b = skb_tail_pointer(skb);
1792	struct gnet_dump d;
1793	const struct Qdisc_class_ops *cl_ops = q->ops->cl_ops;
1794
1795	cond_resched();
1796	nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
1797	if (!nlh)
1798		goto out_nlmsg_trim;
1799	tcm = nlmsg_data(nlh);
1800	tcm->tcm_family = AF_UNSPEC;
1801	tcm->tcm__pad1 = 0;
1802	tcm->tcm__pad2 = 0;
1803	tcm->tcm_ifindex = qdisc_dev(q)->ifindex;
1804	tcm->tcm_parent = q->handle;
1805	tcm->tcm_handle = q->handle;
1806	tcm->tcm_info = 0;
1807	if (nla_put_string(skb, TCA_KIND, q->ops->id))
1808		goto nla_put_failure;
1809	if (cl_ops->dump && cl_ops->dump(q, cl, skb, tcm) < 0)
1810		goto nla_put_failure;
1811
1812	if (gnet_stats_start_copy_compat(skb, TCA_STATS2, TCA_STATS, TCA_XSTATS,
1813					 NULL, &d, TCA_PAD) < 0)
1814		goto nla_put_failure;
1815
1816	if (cl_ops->dump_stats && cl_ops->dump_stats(q, cl, &d) < 0)
1817		goto nla_put_failure;
1818
1819	if (gnet_stats_finish_copy(&d) < 0)
1820		goto nla_put_failure;
1821
1822	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
1823	return skb->len;
1824
1825out_nlmsg_trim:
1826nla_put_failure:
1827	nlmsg_trim(skb, b);
1828	return -1;
1829}
1830
1831static int tclass_notify(struct net *net, struct sk_buff *oskb,
1832			 struct nlmsghdr *n, struct Qdisc *q,
1833			 unsigned long cl, int event)
1834{
1835	struct sk_buff *skb;
1836	u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1837	int err = 0;
1838
1839	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1840	if (!skb)
1841		return -ENOBUFS;
1842
1843	if (tc_fill_tclass(skb, q, cl, portid, n->nlmsg_seq, 0, event) < 0) {
1844		kfree_skb(skb);
1845		return -EINVAL;
1846	}
1847
1848	err = rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1849			     n->nlmsg_flags & NLM_F_ECHO);
1850	if (err > 0)
1851		err = 0;
1852	return err;
1853}
1854
1855static int tclass_del_notify(struct net *net,
1856			     const struct Qdisc_class_ops *cops,
1857			     struct sk_buff *oskb, struct nlmsghdr *n,
1858			     struct Qdisc *q, unsigned long cl)
1859{
1860	u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1861	struct sk_buff *skb;
1862	int err = 0;
1863
1864	if (!cops->delete)
1865		return -EOPNOTSUPP;
1866
1867	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1868	if (!skb)
1869		return -ENOBUFS;
1870
1871	if (tc_fill_tclass(skb, q, cl, portid, n->nlmsg_seq, 0,
1872			   RTM_DELTCLASS) < 0) {
1873		kfree_skb(skb);
1874		return -EINVAL;
1875	}
1876
1877	err = cops->delete(q, cl);
1878	if (err) {
1879		kfree_skb(skb);
1880		return err;
1881	}
1882
1883	err = rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1884			     n->nlmsg_flags & NLM_F_ECHO);
1885	if (err > 0)
1886		err = 0;
1887	return err;
1888}
1889
1890#ifdef CONFIG_NET_CLS
1891
1892struct tcf_bind_args {
1893	struct tcf_walker w;
1894	u32 classid;
1895	unsigned long cl;
1896};
1897
1898static int tcf_node_bind(struct tcf_proto *tp, void *n, struct tcf_walker *arg)
1899{
1900	struct tcf_bind_args *a = (void *)arg;
1901
1902	if (tp->ops->bind_class) {
1903		struct Qdisc *q = tcf_block_q(tp->chain->block);
1904
1905		sch_tree_lock(q);
1906		tp->ops->bind_class(n, a->classid, a->cl);
1907		sch_tree_unlock(q);
1908	}
1909	return 0;
1910}
1911
1912static void tc_bind_tclass(struct Qdisc *q, u32 portid, u32 clid,
1913			   unsigned long new_cl)
1914{
1915	const struct Qdisc_class_ops *cops = q->ops->cl_ops;
1916	struct tcf_block *block;
1917	struct tcf_chain *chain;
1918	unsigned long cl;
1919
1920	cl = cops->find(q, portid);
1921	if (!cl)
1922		return;
1923	if (!cops->tcf_block)
1924		return;
1925	block = cops->tcf_block(q, cl, NULL);
1926	if (!block)
1927		return;
1928	for (chain = tcf_get_next_chain(block, NULL);
1929	     chain;
1930	     chain = tcf_get_next_chain(block, chain)) {
1931		struct tcf_proto *tp;
1932
1933		for (tp = tcf_get_next_proto(chain, NULL, true);
1934		     tp; tp = tcf_get_next_proto(chain, tp, true)) {
1935			struct tcf_bind_args arg = {};
1936
1937			arg.w.fn = tcf_node_bind;
1938			arg.classid = clid;
1939			arg.cl = new_cl;
1940			tp->ops->walk(tp, &arg.w, true);
1941		}
1942	}
1943}
1944
1945#else
1946
1947static void tc_bind_tclass(struct Qdisc *q, u32 portid, u32 clid,
1948			   unsigned long new_cl)
1949{
1950}
1951
1952#endif
1953
1954static int tc_ctl_tclass(struct sk_buff *skb, struct nlmsghdr *n,
1955			 struct netlink_ext_ack *extack)
1956{
1957	struct net *net = sock_net(skb->sk);
1958	struct tcmsg *tcm = nlmsg_data(n);
1959	struct nlattr *tca[TCA_MAX + 1];
1960	struct net_device *dev;
1961	struct Qdisc *q = NULL;
1962	const struct Qdisc_class_ops *cops;
1963	unsigned long cl = 0;
1964	unsigned long new_cl;
1965	u32 portid;
1966	u32 clid;
1967	u32 qid;
1968	int err;
1969
1970	if ((n->nlmsg_type != RTM_GETTCLASS) &&
1971	    !netlink_ns_capable(skb, net->user_ns, CAP_NET_ADMIN))
1972		return -EPERM;
1973
1974	err = nlmsg_parse_deprecated(n, sizeof(*tcm), tca, TCA_MAX,
1975				     rtm_tca_policy, extack);
1976	if (err < 0)
1977		return err;
1978
1979	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1980	if (!dev)
1981		return -ENODEV;
1982
1983	/*
1984	   parent == TC_H_UNSPEC - unspecified parent.
1985	   parent == TC_H_ROOT   - class is root, which has no parent.
1986	   parent == X:0	 - parent is root class.
1987	   parent == X:Y	 - parent is a node in hierarchy.
1988	   parent == 0:Y	 - parent is X:Y, where X:0 is qdisc.
1989
1990	   handle == 0:0	 - generate handle from kernel pool.
1991	   handle == 0:Y	 - class is X:Y, where X:0 is qdisc.
1992	   handle == X:Y	 - clear.
1993	   handle == X:0	 - root class.
1994	 */
1995
1996	/* Step 1. Determine qdisc handle X:0 */
1997
1998	portid = tcm->tcm_parent;
1999	clid = tcm->tcm_handle;
2000	qid = TC_H_MAJ(clid);
2001
2002	if (portid != TC_H_ROOT) {
2003		u32 qid1 = TC_H_MAJ(portid);
2004
2005		if (qid && qid1) {
2006			/* If both majors are known, they must be identical. */
2007			if (qid != qid1)
2008				return -EINVAL;
2009		} else if (qid1) {
2010			qid = qid1;
2011		} else if (qid == 0)
2012			qid = dev->qdisc->handle;
2013
2014		/* Now qid is genuine qdisc handle consistent
2015		 * both with parent and child.
2016		 *
2017		 * TC_H_MAJ(portid) still may be unspecified, complete it now.
2018		 */
2019		if (portid)
2020			portid = TC_H_MAKE(qid, portid);
2021	} else {
2022		if (qid == 0)
2023			qid = dev->qdisc->handle;
2024	}
2025
2026	/* OK. Locate qdisc */
2027	q = qdisc_lookup(dev, qid);
2028	if (!q)
2029		return -ENOENT;
2030
2031	/* An check that it supports classes */
2032	cops = q->ops->cl_ops;
2033	if (cops == NULL)
2034		return -EINVAL;
2035
2036	/* Now try to get class */
2037	if (clid == 0) {
2038		if (portid == TC_H_ROOT)
2039			clid = qid;
2040	} else
2041		clid = TC_H_MAKE(qid, clid);
2042
2043	if (clid)
2044		cl = cops->find(q, clid);
2045
2046	if (cl == 0) {
2047		err = -ENOENT;
2048		if (n->nlmsg_type != RTM_NEWTCLASS ||
2049		    !(n->nlmsg_flags & NLM_F_CREATE))
2050			goto out;
2051	} else {
2052		switch (n->nlmsg_type) {
2053		case RTM_NEWTCLASS:
2054			err = -EEXIST;
2055			if (n->nlmsg_flags & NLM_F_EXCL)
2056				goto out;
2057			break;
2058		case RTM_DELTCLASS:
2059			err = tclass_del_notify(net, cops, skb, n, q, cl);
2060			/* Unbind the class with flilters with 0 */
2061			tc_bind_tclass(q, portid, clid, 0);
 
 
2062			goto out;
2063		case RTM_GETTCLASS:
2064			err = tclass_notify(net, skb, n, q, cl, RTM_NEWTCLASS);
2065			goto out;
2066		default:
2067			err = -EINVAL;
2068			goto out;
2069		}
2070	}
2071
2072	if (tca[TCA_INGRESS_BLOCK] || tca[TCA_EGRESS_BLOCK]) {
2073		NL_SET_ERR_MSG(extack, "Shared blocks are not supported for classes");
2074		return -EOPNOTSUPP;
2075	}
2076
2077	new_cl = cl;
2078	err = -EOPNOTSUPP;
2079	if (cops->change)
2080		err = cops->change(q, clid, portid, tca, &new_cl, extack);
2081	if (err == 0) {
2082		tclass_notify(net, skb, n, q, new_cl, RTM_NEWTCLASS);
2083		/* We just create a new class, need to do reverse binding. */
2084		if (cl != new_cl)
2085			tc_bind_tclass(q, portid, clid, new_cl);
2086	}
2087out:
 
 
 
2088	return err;
2089}
2090
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2091struct qdisc_dump_args {
2092	struct qdisc_walker	w;
2093	struct sk_buff		*skb;
2094	struct netlink_callback	*cb;
2095};
2096
2097static int qdisc_class_dump(struct Qdisc *q, unsigned long cl,
2098			    struct qdisc_walker *arg)
2099{
2100	struct qdisc_dump_args *a = (struct qdisc_dump_args *)arg;
2101
2102	return tc_fill_tclass(a->skb, q, cl, NETLINK_CB(a->cb->skb).portid,
2103			      a->cb->nlh->nlmsg_seq, NLM_F_MULTI,
2104			      RTM_NEWTCLASS);
2105}
2106
2107static int tc_dump_tclass_qdisc(struct Qdisc *q, struct sk_buff *skb,
2108				struct tcmsg *tcm, struct netlink_callback *cb,
2109				int *t_p, int s_t)
2110{
2111	struct qdisc_dump_args arg;
2112
2113	if (tc_qdisc_dump_ignore(q, false) ||
2114	    *t_p < s_t || !q->ops->cl_ops ||
2115	    (tcm->tcm_parent &&
2116	     TC_H_MAJ(tcm->tcm_parent) != q->handle)) {
2117		(*t_p)++;
2118		return 0;
2119	}
2120	if (*t_p > s_t)
2121		memset(&cb->args[1], 0, sizeof(cb->args)-sizeof(cb->args[0]));
2122	arg.w.fn = qdisc_class_dump;
2123	arg.skb = skb;
2124	arg.cb = cb;
2125	arg.w.stop  = 0;
2126	arg.w.skip = cb->args[1];
2127	arg.w.count = 0;
2128	q->ops->cl_ops->walk(q, &arg.w);
2129	cb->args[1] = arg.w.count;
2130	if (arg.w.stop)
2131		return -1;
2132	(*t_p)++;
2133	return 0;
2134}
2135
2136static int tc_dump_tclass_root(struct Qdisc *root, struct sk_buff *skb,
2137			       struct tcmsg *tcm, struct netlink_callback *cb,
2138			       int *t_p, int s_t)
2139{
2140	struct Qdisc *q;
2141	int b;
2142
2143	if (!root)
2144		return 0;
2145
2146	if (tc_dump_tclass_qdisc(root, skb, tcm, cb, t_p, s_t) < 0)
2147		return -1;
2148
2149	if (!qdisc_dev(root))
2150		return 0;
2151
2152	if (tcm->tcm_parent) {
2153		q = qdisc_match_from_root(root, TC_H_MAJ(tcm->tcm_parent));
2154		if (q && q != root &&
2155		    tc_dump_tclass_qdisc(q, skb, tcm, cb, t_p, s_t) < 0)
2156			return -1;
2157		return 0;
2158	}
2159	hash_for_each(qdisc_dev(root)->qdisc_hash, b, q, hash) {
2160		if (tc_dump_tclass_qdisc(q, skb, tcm, cb, t_p, s_t) < 0)
2161			return -1;
2162	}
2163
2164	return 0;
2165}
2166
2167static int tc_dump_tclass(struct sk_buff *skb, struct netlink_callback *cb)
2168{
2169	struct tcmsg *tcm = nlmsg_data(cb->nlh);
2170	struct net *net = sock_net(skb->sk);
2171	struct netdev_queue *dev_queue;
2172	struct net_device *dev;
2173	int t, s_t;
2174
2175	if (nlmsg_len(cb->nlh) < sizeof(*tcm))
2176		return 0;
2177	dev = dev_get_by_index(net, tcm->tcm_ifindex);
2178	if (!dev)
2179		return 0;
2180
2181	s_t = cb->args[0];
2182	t = 0;
2183
2184	if (tc_dump_tclass_root(dev->qdisc, skb, tcm, cb, &t, s_t) < 0)
2185		goto done;
2186
2187	dev_queue = dev_ingress_queue(dev);
2188	if (dev_queue &&
2189	    tc_dump_tclass_root(dev_queue->qdisc_sleeping, skb, tcm, cb,
2190				&t, s_t) < 0)
2191		goto done;
2192
2193done:
2194	cb->args[0] = t;
2195
2196	dev_put(dev);
2197	return skb->len;
2198}
2199
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2200#ifdef CONFIG_PROC_FS
2201static int psched_show(struct seq_file *seq, void *v)
2202{
 
 
 
2203	seq_printf(seq, "%08x %08x %08x %08x\n",
2204		   (u32)NSEC_PER_USEC, (u32)PSCHED_TICKS2NS(1),
2205		   1000000,
2206		   (u32)NSEC_PER_SEC / hrtimer_resolution);
2207
2208	return 0;
2209}
2210
 
 
 
 
 
 
 
 
 
 
 
 
 
2211static int __net_init psched_net_init(struct net *net)
2212{
2213	struct proc_dir_entry *e;
2214
2215	e = proc_create_single("psched", 0, net->proc_net, psched_show);
2216	if (e == NULL)
2217		return -ENOMEM;
2218
2219	return 0;
2220}
2221
2222static void __net_exit psched_net_exit(struct net *net)
2223{
2224	remove_proc_entry("psched", net->proc_net);
2225}
2226#else
2227static int __net_init psched_net_init(struct net *net)
2228{
2229	return 0;
2230}
2231
2232static void __net_exit psched_net_exit(struct net *net)
2233{
2234}
2235#endif
2236
2237static struct pernet_operations psched_net_ops = {
2238	.init = psched_net_init,
2239	.exit = psched_net_exit,
2240};
2241
2242static int __init pktsched_init(void)
2243{
2244	int err;
2245
2246	err = register_pernet_subsys(&psched_net_ops);
2247	if (err) {
2248		pr_err("pktsched_init: "
2249		       "cannot initialize per netns operations\n");
2250		return err;
2251	}
2252
2253	register_qdisc(&pfifo_fast_ops);
2254	register_qdisc(&pfifo_qdisc_ops);
2255	register_qdisc(&bfifo_qdisc_ops);
2256	register_qdisc(&pfifo_head_drop_qdisc_ops);
2257	register_qdisc(&mq_qdisc_ops);
2258	register_qdisc(&noqueue_qdisc_ops);
2259
2260	rtnl_register(PF_UNSPEC, RTM_NEWQDISC, tc_modify_qdisc, NULL, 0);
2261	rtnl_register(PF_UNSPEC, RTM_DELQDISC, tc_get_qdisc, NULL, 0);
2262	rtnl_register(PF_UNSPEC, RTM_GETQDISC, tc_get_qdisc, tc_dump_qdisc,
2263		      0);
2264	rtnl_register(PF_UNSPEC, RTM_NEWTCLASS, tc_ctl_tclass, NULL, 0);
2265	rtnl_register(PF_UNSPEC, RTM_DELTCLASS, tc_ctl_tclass, NULL, 0);
2266	rtnl_register(PF_UNSPEC, RTM_GETTCLASS, tc_ctl_tclass, tc_dump_tclass,
2267		      0);
2268
2269	return 0;
2270}
2271
2272subsys_initcall(pktsched_init);
v3.15
 
   1/*
   2 * net/sched/sch_api.c	Packet scheduler API.
   3 *
   4 *		This program is free software; you can redistribute it and/or
   5 *		modify it under the terms of the GNU General Public License
   6 *		as published by the Free Software Foundation; either version
   7 *		2 of the License, or (at your option) any later version.
   8 *
   9 * Authors:	Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
  10 *
  11 * Fixes:
  12 *
  13 * Rani Assaf <rani@magic.metawire.com> :980802: JIFFIES and CPU clock sources are repaired.
  14 * Eduardo J. Blanco <ejbs@netlabs.com.uy> :990222: kmod support
  15 * Jamal Hadi Salim <hadi@nortelnetworks.com>: 990601: ingress support
  16 */
  17
  18#include <linux/module.h>
  19#include <linux/types.h>
  20#include <linux/kernel.h>
  21#include <linux/string.h>
  22#include <linux/errno.h>
  23#include <linux/skbuff.h>
  24#include <linux/init.h>
  25#include <linux/proc_fs.h>
  26#include <linux/seq_file.h>
  27#include <linux/kmod.h>
  28#include <linux/list.h>
  29#include <linux/hrtimer.h>
  30#include <linux/lockdep.h>
  31#include <linux/slab.h>
 
  32
  33#include <net/net_namespace.h>
  34#include <net/sock.h>
  35#include <net/netlink.h>
  36#include <net/pkt_sched.h>
  37
  38static int qdisc_notify(struct net *net, struct sk_buff *oskb,
  39			struct nlmsghdr *n, u32 clid,
  40			struct Qdisc *old, struct Qdisc *new);
  41static int tclass_notify(struct net *net, struct sk_buff *oskb,
  42			 struct nlmsghdr *n, struct Qdisc *q,
  43			 unsigned long cl, int event);
  44
  45/*
  46
  47   Short review.
  48   -------------
  49
  50   This file consists of two interrelated parts:
  51
  52   1. queueing disciplines manager frontend.
  53   2. traffic classes manager frontend.
  54
  55   Generally, queueing discipline ("qdisc") is a black box,
  56   which is able to enqueue packets and to dequeue them (when
  57   device is ready to send something) in order and at times
  58   determined by algorithm hidden in it.
  59
  60   qdisc's are divided to two categories:
  61   - "queues", which have no internal structure visible from outside.
  62   - "schedulers", which split all the packets to "traffic classes",
  63     using "packet classifiers" (look at cls_api.c)
  64
  65   In turn, classes may have child qdiscs (as rule, queues)
  66   attached to them etc. etc. etc.
  67
  68   The goal of the routines in this file is to translate
  69   information supplied by user in the form of handles
  70   to more intelligible for kernel form, to make some sanity
  71   checks and part of work, which is common to all qdiscs
  72   and to provide rtnetlink notifications.
  73
  74   All real intelligent work is done inside qdisc modules.
  75
  76
  77
  78   Every discipline has two major routines: enqueue and dequeue.
  79
  80   ---dequeue
  81
  82   dequeue usually returns a skb to send. It is allowed to return NULL,
  83   but it does not mean that queue is empty, it just means that
  84   discipline does not want to send anything this time.
  85   Queue is really empty if q->q.qlen == 0.
  86   For complicated disciplines with multiple queues q->q is not
  87   real packet queue, but however q->q.qlen must be valid.
  88
  89   ---enqueue
  90
  91   enqueue returns 0, if packet was enqueued successfully.
  92   If packet (this one or another one) was dropped, it returns
  93   not zero error code.
  94   NET_XMIT_DROP 	- this packet dropped
  95     Expected action: do not backoff, but wait until queue will clear.
  96   NET_XMIT_CN	 	- probably this packet enqueued, but another one dropped.
  97     Expected action: backoff or ignore
  98   NET_XMIT_POLICED	- dropped by police.
  99     Expected action: backoff or error to real-time apps.
 100
 101   Auxiliary routines:
 102
 103   ---peek
 104
 105   like dequeue but without removing a packet from the queue
 106
 107   ---reset
 108
 109   returns qdisc to initial state: purge all buffers, clear all
 110   timers, counters (except for statistics) etc.
 111
 112   ---init
 113
 114   initializes newly created qdisc.
 115
 116   ---destroy
 117
 118   destroys resources allocated by init and during lifetime of qdisc.
 119
 120   ---change
 121
 122   changes qdisc parameters.
 123 */
 124
 125/* Protects list of registered TC modules. It is pure SMP lock. */
 126static DEFINE_RWLOCK(qdisc_mod_lock);
 127
 128
 129/************************************************
 130 *	Queueing disciplines manipulation.	*
 131 ************************************************/
 132
 133
 134/* The list of all installed queueing disciplines. */
 135
 136static struct Qdisc_ops *qdisc_base;
 137
 138/* Register/unregister queueing discipline */
 139
 140int register_qdisc(struct Qdisc_ops *qops)
 141{
 142	struct Qdisc_ops *q, **qp;
 143	int rc = -EEXIST;
 144
 145	write_lock(&qdisc_mod_lock);
 146	for (qp = &qdisc_base; (q = *qp) != NULL; qp = &q->next)
 147		if (!strcmp(qops->id, q->id))
 148			goto out;
 149
 150	if (qops->enqueue == NULL)
 151		qops->enqueue = noop_qdisc_ops.enqueue;
 152	if (qops->peek == NULL) {
 153		if (qops->dequeue == NULL)
 154			qops->peek = noop_qdisc_ops.peek;
 155		else
 156			goto out_einval;
 157	}
 158	if (qops->dequeue == NULL)
 159		qops->dequeue = noop_qdisc_ops.dequeue;
 160
 161	if (qops->cl_ops) {
 162		const struct Qdisc_class_ops *cops = qops->cl_ops;
 163
 164		if (!(cops->get && cops->put && cops->walk && cops->leaf))
 165			goto out_einval;
 166
 167		if (cops->tcf_chain && !(cops->bind_tcf && cops->unbind_tcf))
 168			goto out_einval;
 169	}
 170
 171	qops->next = NULL;
 172	*qp = qops;
 173	rc = 0;
 174out:
 175	write_unlock(&qdisc_mod_lock);
 176	return rc;
 177
 178out_einval:
 179	rc = -EINVAL;
 180	goto out;
 181}
 182EXPORT_SYMBOL(register_qdisc);
 183
 184int unregister_qdisc(struct Qdisc_ops *qops)
 185{
 186	struct Qdisc_ops *q, **qp;
 187	int err = -ENOENT;
 188
 189	write_lock(&qdisc_mod_lock);
 190	for (qp = &qdisc_base; (q = *qp) != NULL; qp = &q->next)
 191		if (q == qops)
 192			break;
 193	if (q) {
 194		*qp = q->next;
 195		q->next = NULL;
 196		err = 0;
 197	}
 198	write_unlock(&qdisc_mod_lock);
 199	return err;
 200}
 201EXPORT_SYMBOL(unregister_qdisc);
 202
 203/* Get default qdisc if not otherwise specified */
 204void qdisc_get_default(char *name, size_t len)
 205{
 206	read_lock(&qdisc_mod_lock);
 207	strlcpy(name, default_qdisc_ops->id, len);
 208	read_unlock(&qdisc_mod_lock);
 209}
 210
 211static struct Qdisc_ops *qdisc_lookup_default(const char *name)
 212{
 213	struct Qdisc_ops *q = NULL;
 214
 215	for (q = qdisc_base; q; q = q->next) {
 216		if (!strcmp(name, q->id)) {
 217			if (!try_module_get(q->owner))
 218				q = NULL;
 219			break;
 220		}
 221	}
 222
 223	return q;
 224}
 225
 226/* Set new default qdisc to use */
 227int qdisc_set_default(const char *name)
 228{
 229	const struct Qdisc_ops *ops;
 230
 231	if (!capable(CAP_NET_ADMIN))
 232		return -EPERM;
 233
 234	write_lock(&qdisc_mod_lock);
 235	ops = qdisc_lookup_default(name);
 236	if (!ops) {
 237		/* Not found, drop lock and try to load module */
 238		write_unlock(&qdisc_mod_lock);
 239		request_module("sch_%s", name);
 240		write_lock(&qdisc_mod_lock);
 241
 242		ops = qdisc_lookup_default(name);
 243	}
 244
 245	if (ops) {
 246		/* Set new default */
 247		module_put(default_qdisc_ops->owner);
 248		default_qdisc_ops = ops;
 249	}
 250	write_unlock(&qdisc_mod_lock);
 251
 252	return ops ? 0 : -ENOENT;
 253}
 254
 
 
 
 
 
 
 
 
 
 255/* We know handle. Find qdisc among all qdisc's attached to device
 256   (root qdisc, all its children, children of children etc.)
 
 257 */
 258
 259static struct Qdisc *qdisc_match_from_root(struct Qdisc *root, u32 handle)
 260{
 261	struct Qdisc *q;
 262
 
 
 
 263	if (!(root->flags & TCQ_F_BUILTIN) &&
 264	    root->handle == handle)
 265		return root;
 266
 267	list_for_each_entry(q, &root->list, list) {
 268		if (q->handle == handle)
 269			return q;
 270	}
 271	return NULL;
 272}
 273
 274void qdisc_list_add(struct Qdisc *q)
 275{
 276	if ((q->parent != TC_H_ROOT) && !(q->flags & TCQ_F_INGRESS)) {
 277		struct Qdisc *root = qdisc_dev(q)->qdisc;
 278
 279		WARN_ON_ONCE(root == &noop_qdisc);
 280		list_add_tail(&q->list, &root->list);
 281	}
 282}
 283EXPORT_SYMBOL(qdisc_list_add);
 284
 285void qdisc_list_del(struct Qdisc *q)
 286{
 287	if ((q->parent != TC_H_ROOT) && !(q->flags & TCQ_F_INGRESS))
 288		list_del(&q->list);
 
 
 289}
 290EXPORT_SYMBOL(qdisc_list_del);
 291
 292struct Qdisc *qdisc_lookup(struct net_device *dev, u32 handle)
 293{
 294	struct Qdisc *q;
 295
 
 
 296	q = qdisc_match_from_root(dev->qdisc, handle);
 297	if (q)
 298		goto out;
 299
 300	if (dev_ingress_queue(dev))
 301		q = qdisc_match_from_root(
 302			dev_ingress_queue(dev)->qdisc_sleeping,
 303			handle);
 304out:
 305	return q;
 306}
 307
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 308static struct Qdisc *qdisc_leaf(struct Qdisc *p, u32 classid)
 309{
 310	unsigned long cl;
 311	struct Qdisc *leaf;
 312	const struct Qdisc_class_ops *cops = p->ops->cl_ops;
 313
 314	if (cops == NULL)
 315		return NULL;
 316	cl = cops->get(p, classid);
 317
 318	if (cl == 0)
 319		return NULL;
 320	leaf = cops->leaf(p, cl);
 321	cops->put(p, cl);
 322	return leaf;
 323}
 324
 325/* Find queueing discipline by name */
 326
 327static struct Qdisc_ops *qdisc_lookup_ops(struct nlattr *kind)
 328{
 329	struct Qdisc_ops *q = NULL;
 330
 331	if (kind) {
 332		read_lock(&qdisc_mod_lock);
 333		for (q = qdisc_base; q; q = q->next) {
 334			if (nla_strcmp(kind, q->id) == 0) {
 335				if (!try_module_get(q->owner))
 336					q = NULL;
 337				break;
 338			}
 339		}
 340		read_unlock(&qdisc_mod_lock);
 341	}
 342	return q;
 343}
 344
 345/* The linklayer setting were not transferred from iproute2, in older
 346 * versions, and the rate tables lookup systems have been dropped in
 347 * the kernel. To keep backward compatible with older iproute2 tc
 348 * utils, we detect the linklayer setting by detecting if the rate
 349 * table were modified.
 350 *
 351 * For linklayer ATM table entries, the rate table will be aligned to
 352 * 48 bytes, thus some table entries will contain the same value.  The
 353 * mpu (min packet unit) is also encoded into the old rate table, thus
 354 * starting from the mpu, we find low and high table entries for
 355 * mapping this cell.  If these entries contain the same value, when
 356 * the rate tables have been modified for linklayer ATM.
 357 *
 358 * This is done by rounding mpu to the nearest 48 bytes cell/entry,
 359 * and then roundup to the next cell, calc the table entry one below,
 360 * and compare.
 361 */
 362static __u8 __detect_linklayer(struct tc_ratespec *r, __u32 *rtab)
 363{
 364	int low       = roundup(r->mpu, 48);
 365	int high      = roundup(low+1, 48);
 366	int cell_low  = low >> r->cell_log;
 367	int cell_high = (high >> r->cell_log) - 1;
 368
 369	/* rtab is too inaccurate at rates > 100Mbit/s */
 370	if ((r->rate > (100000000/8)) || (rtab[0] == 0)) {
 371		pr_debug("TC linklayer: Giving up ATM detection\n");
 372		return TC_LINKLAYER_ETHERNET;
 373	}
 374
 375	if ((cell_high > cell_low) && (cell_high < 256)
 376	    && (rtab[cell_low] == rtab[cell_high])) {
 377		pr_debug("TC linklayer: Detected ATM, low(%d)=high(%d)=%u\n",
 378			 cell_low, cell_high, rtab[cell_high]);
 379		return TC_LINKLAYER_ATM;
 380	}
 381	return TC_LINKLAYER_ETHERNET;
 382}
 383
 384static struct qdisc_rate_table *qdisc_rtab_list;
 385
 386struct qdisc_rate_table *qdisc_get_rtab(struct tc_ratespec *r, struct nlattr *tab)
 
 
 387{
 388	struct qdisc_rate_table *rtab;
 389
 390	if (tab == NULL || r->rate == 0 || r->cell_log == 0 ||
 391	    nla_len(tab) != TC_RTAB_SIZE)
 
 392		return NULL;
 
 393
 394	for (rtab = qdisc_rtab_list; rtab; rtab = rtab->next) {
 395		if (!memcmp(&rtab->rate, r, sizeof(struct tc_ratespec)) &&
 396		    !memcmp(&rtab->data, nla_data(tab), 1024)) {
 397			rtab->refcnt++;
 398			return rtab;
 399		}
 400	}
 401
 402	rtab = kmalloc(sizeof(*rtab), GFP_KERNEL);
 403	if (rtab) {
 404		rtab->rate = *r;
 405		rtab->refcnt = 1;
 406		memcpy(rtab->data, nla_data(tab), 1024);
 407		if (r->linklayer == TC_LINKLAYER_UNAWARE)
 408			r->linklayer = __detect_linklayer(r, rtab->data);
 409		rtab->next = qdisc_rtab_list;
 410		qdisc_rtab_list = rtab;
 
 
 411	}
 412	return rtab;
 413}
 414EXPORT_SYMBOL(qdisc_get_rtab);
 415
 416void qdisc_put_rtab(struct qdisc_rate_table *tab)
 417{
 418	struct qdisc_rate_table *rtab, **rtabp;
 419
 420	if (!tab || --tab->refcnt)
 421		return;
 422
 423	for (rtabp = &qdisc_rtab_list;
 424	     (rtab = *rtabp) != NULL;
 425	     rtabp = &rtab->next) {
 426		if (rtab == tab) {
 427			*rtabp = rtab->next;
 428			kfree(rtab);
 429			return;
 430		}
 431	}
 432}
 433EXPORT_SYMBOL(qdisc_put_rtab);
 434
 435static LIST_HEAD(qdisc_stab_list);
 436static DEFINE_SPINLOCK(qdisc_stab_lock);
 437
 438static const struct nla_policy stab_policy[TCA_STAB_MAX + 1] = {
 439	[TCA_STAB_BASE]	= { .len = sizeof(struct tc_sizespec) },
 440	[TCA_STAB_DATA] = { .type = NLA_BINARY },
 441};
 442
 443static struct qdisc_size_table *qdisc_get_stab(struct nlattr *opt)
 
 444{
 445	struct nlattr *tb[TCA_STAB_MAX + 1];
 446	struct qdisc_size_table *stab;
 447	struct tc_sizespec *s;
 448	unsigned int tsize = 0;
 449	u16 *tab = NULL;
 450	int err;
 451
 452	err = nla_parse_nested(tb, TCA_STAB_MAX, opt, stab_policy);
 
 453	if (err < 0)
 454		return ERR_PTR(err);
 455	if (!tb[TCA_STAB_BASE])
 
 456		return ERR_PTR(-EINVAL);
 
 457
 458	s = nla_data(tb[TCA_STAB_BASE]);
 459
 460	if (s->tsize > 0) {
 461		if (!tb[TCA_STAB_DATA])
 
 462			return ERR_PTR(-EINVAL);
 
 463		tab = nla_data(tb[TCA_STAB_DATA]);
 464		tsize = nla_len(tb[TCA_STAB_DATA]) / sizeof(u16);
 465	}
 466
 467	if (tsize != s->tsize || (!tab && tsize > 0))
 
 468		return ERR_PTR(-EINVAL);
 469
 470	spin_lock(&qdisc_stab_lock);
 471
 472	list_for_each_entry(stab, &qdisc_stab_list, list) {
 473		if (memcmp(&stab->szopts, s, sizeof(*s)))
 474			continue;
 475		if (tsize > 0 && memcmp(stab->data, tab, tsize * sizeof(u16)))
 476			continue;
 477		stab->refcnt++;
 478		spin_unlock(&qdisc_stab_lock);
 479		return stab;
 480	}
 481
 482	spin_unlock(&qdisc_stab_lock);
 483
 484	stab = kmalloc(sizeof(*stab) + tsize * sizeof(u16), GFP_KERNEL);
 485	if (!stab)
 486		return ERR_PTR(-ENOMEM);
 487
 488	stab->refcnt = 1;
 489	stab->szopts = *s;
 490	if (tsize > 0)
 491		memcpy(stab->data, tab, tsize * sizeof(u16));
 492
 493	spin_lock(&qdisc_stab_lock);
 494	list_add_tail(&stab->list, &qdisc_stab_list);
 495	spin_unlock(&qdisc_stab_lock);
 496
 497	return stab;
 498}
 499
 500static void stab_kfree_rcu(struct rcu_head *head)
 501{
 502	kfree(container_of(head, struct qdisc_size_table, rcu));
 503}
 504
 505void qdisc_put_stab(struct qdisc_size_table *tab)
 506{
 507	if (!tab)
 508		return;
 509
 510	spin_lock(&qdisc_stab_lock);
 511
 512	if (--tab->refcnt == 0) {
 513		list_del(&tab->list);
 514		call_rcu_bh(&tab->rcu, stab_kfree_rcu);
 515	}
 516
 517	spin_unlock(&qdisc_stab_lock);
 518}
 519EXPORT_SYMBOL(qdisc_put_stab);
 520
 521static int qdisc_dump_stab(struct sk_buff *skb, struct qdisc_size_table *stab)
 522{
 523	struct nlattr *nest;
 524
 525	nest = nla_nest_start(skb, TCA_STAB);
 526	if (nest == NULL)
 527		goto nla_put_failure;
 528	if (nla_put(skb, TCA_STAB_BASE, sizeof(stab->szopts), &stab->szopts))
 529		goto nla_put_failure;
 530	nla_nest_end(skb, nest);
 531
 532	return skb->len;
 533
 534nla_put_failure:
 535	return -1;
 536}
 537
 538void __qdisc_calculate_pkt_len(struct sk_buff *skb, const struct qdisc_size_table *stab)
 
 539{
 540	int pkt_len, slot;
 541
 542	pkt_len = skb->len + stab->szopts.overhead;
 543	if (unlikely(!stab->szopts.tsize))
 544		goto out;
 545
 546	slot = pkt_len + stab->szopts.cell_align;
 547	if (unlikely(slot < 0))
 548		slot = 0;
 549
 550	slot >>= stab->szopts.cell_log;
 551	if (likely(slot < stab->szopts.tsize))
 552		pkt_len = stab->data[slot];
 553	else
 554		pkt_len = stab->data[stab->szopts.tsize - 1] *
 555				(slot / stab->szopts.tsize) +
 556				stab->data[slot % stab->szopts.tsize];
 557
 558	pkt_len <<= stab->szopts.size_log;
 559out:
 560	if (unlikely(pkt_len < 1))
 561		pkt_len = 1;
 562	qdisc_skb_cb(skb)->pkt_len = pkt_len;
 563}
 564EXPORT_SYMBOL(__qdisc_calculate_pkt_len);
 565
 566void qdisc_warn_nonwc(char *txt, struct Qdisc *qdisc)
 567{
 568	if (!(qdisc->flags & TCQ_F_WARN_NONWC)) {
 569		pr_warn("%s: %s qdisc %X: is non-work-conserving?\n",
 570			txt, qdisc->ops->id, qdisc->handle >> 16);
 571		qdisc->flags |= TCQ_F_WARN_NONWC;
 572	}
 573}
 574EXPORT_SYMBOL(qdisc_warn_nonwc);
 575
 576static enum hrtimer_restart qdisc_watchdog(struct hrtimer *timer)
 577{
 578	struct qdisc_watchdog *wd = container_of(timer, struct qdisc_watchdog,
 579						 timer);
 580
 581	qdisc_unthrottled(wd->qdisc);
 582	__netif_schedule(qdisc_root(wd->qdisc));
 
 583
 584	return HRTIMER_NORESTART;
 585}
 586
 587void qdisc_watchdog_init(struct qdisc_watchdog *wd, struct Qdisc *qdisc)
 
 588{
 589	hrtimer_init(&wd->timer, CLOCK_MONOTONIC, HRTIMER_MODE_ABS);
 590	wd->timer.function = qdisc_watchdog;
 591	wd->qdisc = qdisc;
 592}
 
 
 
 
 
 
 593EXPORT_SYMBOL(qdisc_watchdog_init);
 594
 595void qdisc_watchdog_schedule_ns(struct qdisc_watchdog *wd, u64 expires)
 596{
 597	if (test_bit(__QDISC_STATE_DEACTIVATED,
 598		     &qdisc_root_sleeping(wd->qdisc)->state))
 599		return;
 600
 601	qdisc_throttled(wd->qdisc);
 
 602
 
 603	hrtimer_start(&wd->timer,
 604		      ns_to_ktime(expires),
 605		      HRTIMER_MODE_ABS);
 606}
 607EXPORT_SYMBOL(qdisc_watchdog_schedule_ns);
 608
 609void qdisc_watchdog_cancel(struct qdisc_watchdog *wd)
 610{
 611	hrtimer_cancel(&wd->timer);
 612	qdisc_unthrottled(wd->qdisc);
 613}
 614EXPORT_SYMBOL(qdisc_watchdog_cancel);
 615
 616static struct hlist_head *qdisc_class_hash_alloc(unsigned int n)
 617{
 618	unsigned int size = n * sizeof(struct hlist_head), i;
 619	struct hlist_head *h;
 
 620
 621	if (size <= PAGE_SIZE)
 622		h = kmalloc(size, GFP_KERNEL);
 623	else
 624		h = (struct hlist_head *)
 625			__get_free_pages(GFP_KERNEL, get_order(size));
 626
 627	if (h != NULL) {
 628		for (i = 0; i < n; i++)
 629			INIT_HLIST_HEAD(&h[i]);
 630	}
 631	return h;
 632}
 633
 634static void qdisc_class_hash_free(struct hlist_head *h, unsigned int n)
 635{
 636	unsigned int size = n * sizeof(struct hlist_head);
 637
 638	if (size <= PAGE_SIZE)
 639		kfree(h);
 640	else
 641		free_pages((unsigned long)h, get_order(size));
 642}
 643
 644void qdisc_class_hash_grow(struct Qdisc *sch, struct Qdisc_class_hash *clhash)
 645{
 646	struct Qdisc_class_common *cl;
 647	struct hlist_node *next;
 648	struct hlist_head *nhash, *ohash;
 649	unsigned int nsize, nmask, osize;
 650	unsigned int i, h;
 651
 652	/* Rehash when load factor exceeds 0.75 */
 653	if (clhash->hashelems * 4 <= clhash->hashsize * 3)
 654		return;
 655	nsize = clhash->hashsize * 2;
 656	nmask = nsize - 1;
 657	nhash = qdisc_class_hash_alloc(nsize);
 658	if (nhash == NULL)
 659		return;
 660
 661	ohash = clhash->hash;
 662	osize = clhash->hashsize;
 663
 664	sch_tree_lock(sch);
 665	for (i = 0; i < osize; i++) {
 666		hlist_for_each_entry_safe(cl, next, &ohash[i], hnode) {
 667			h = qdisc_class_hash(cl->classid, nmask);
 668			hlist_add_head(&cl->hnode, &nhash[h]);
 669		}
 670	}
 671	clhash->hash     = nhash;
 672	clhash->hashsize = nsize;
 673	clhash->hashmask = nmask;
 674	sch_tree_unlock(sch);
 675
 676	qdisc_class_hash_free(ohash, osize);
 677}
 678EXPORT_SYMBOL(qdisc_class_hash_grow);
 679
 680int qdisc_class_hash_init(struct Qdisc_class_hash *clhash)
 681{
 682	unsigned int size = 4;
 683
 684	clhash->hash = qdisc_class_hash_alloc(size);
 685	if (clhash->hash == NULL)
 686		return -ENOMEM;
 687	clhash->hashsize  = size;
 688	clhash->hashmask  = size - 1;
 689	clhash->hashelems = 0;
 690	return 0;
 691}
 692EXPORT_SYMBOL(qdisc_class_hash_init);
 693
 694void qdisc_class_hash_destroy(struct Qdisc_class_hash *clhash)
 695{
 696	qdisc_class_hash_free(clhash->hash, clhash->hashsize);
 697}
 698EXPORT_SYMBOL(qdisc_class_hash_destroy);
 699
 700void qdisc_class_hash_insert(struct Qdisc_class_hash *clhash,
 701			     struct Qdisc_class_common *cl)
 702{
 703	unsigned int h;
 704
 705	INIT_HLIST_NODE(&cl->hnode);
 706	h = qdisc_class_hash(cl->classid, clhash->hashmask);
 707	hlist_add_head(&cl->hnode, &clhash->hash[h]);
 708	clhash->hashelems++;
 709}
 710EXPORT_SYMBOL(qdisc_class_hash_insert);
 711
 712void qdisc_class_hash_remove(struct Qdisc_class_hash *clhash,
 713			     struct Qdisc_class_common *cl)
 714{
 715	hlist_del(&cl->hnode);
 716	clhash->hashelems--;
 717}
 718EXPORT_SYMBOL(qdisc_class_hash_remove);
 719
 720/* Allocate an unique handle from space managed by kernel
 721 * Possible range is [8000-FFFF]:0000 (0x8000 values)
 722 */
 723static u32 qdisc_alloc_handle(struct net_device *dev)
 724{
 725	int i = 0x8000;
 726	static u32 autohandle = TC_H_MAKE(0x80000000U, 0);
 727
 728	do {
 729		autohandle += TC_H_MAKE(0x10000U, 0);
 730		if (autohandle == TC_H_MAKE(TC_H_ROOT, 0))
 731			autohandle = TC_H_MAKE(0x80000000U, 0);
 732		if (!qdisc_lookup(dev, autohandle))
 733			return autohandle;
 734		cond_resched();
 735	} while	(--i > 0);
 736
 737	return 0;
 738}
 739
 740void qdisc_tree_decrease_qlen(struct Qdisc *sch, unsigned int n)
 741{
 
 742	const struct Qdisc_class_ops *cops;
 743	unsigned long cl;
 744	u32 parentid;
 
 745	int drops;
 746
 747	if (n == 0)
 748		return;
 749	drops = max_t(int, n, 0);
 
 750	while ((parentid = sch->parent)) {
 751		if (TC_H_MAJ(parentid) == TC_H_MAJ(TC_H_INGRESS))
 752			return;
 753
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 754		sch = qdisc_lookup(qdisc_dev(sch), TC_H_MAJ(parentid));
 755		if (sch == NULL) {
 756			WARN_ON(parentid != TC_H_ROOT);
 757			return;
 758		}
 759		cops = sch->ops->cl_ops;
 760		if (cops->qlen_notify) {
 761			cl = cops->get(sch, parentid);
 762			cops->qlen_notify(sch, cl);
 763			cops->put(sch, cl);
 764		}
 765		sch->q.qlen -= n;
 766		sch->qstats.drops += drops;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 767	}
 
 
 
 
 
 
 
 
 
 
 
 
 
 768}
 769EXPORT_SYMBOL(qdisc_tree_decrease_qlen);
 770
 771static void notify_and_destroy(struct net *net, struct sk_buff *skb,
 772			       struct nlmsghdr *n, u32 clid,
 773			       struct Qdisc *old, struct Qdisc *new)
 774{
 775	if (new || old)
 776		qdisc_notify(net, skb, n, clid, old, new);
 777
 778	if (old)
 779		qdisc_destroy(old);
 
 
 
 
 
 
 
 
 
 
 
 
 
 780}
 781
 782/* Graft qdisc "new" to class "classid" of qdisc "parent" or
 783 * to device "dev".
 784 *
 785 * When appropriate send a netlink notification using 'skb'
 786 * and "n".
 787 *
 788 * On success, destroy old qdisc.
 789 */
 790
 791static int qdisc_graft(struct net_device *dev, struct Qdisc *parent,
 792		       struct sk_buff *skb, struct nlmsghdr *n, u32 classid,
 793		       struct Qdisc *new, struct Qdisc *old)
 
 794{
 795	struct Qdisc *q = old;
 796	struct net *net = dev_net(dev);
 797	int err = 0;
 798
 799	if (parent == NULL) {
 800		unsigned int i, num_q, ingress;
 801
 802		ingress = 0;
 803		num_q = dev->num_tx_queues;
 804		if ((q && q->flags & TCQ_F_INGRESS) ||
 805		    (new && new->flags & TCQ_F_INGRESS)) {
 806			num_q = 1;
 807			ingress = 1;
 808			if (!dev_ingress_queue(dev))
 
 809				return -ENOENT;
 
 810		}
 811
 812		if (dev->flags & IFF_UP)
 813			dev_deactivate(dev);
 814
 815		if (new && new->ops->attach) {
 816			new->ops->attach(new);
 817			num_q = 0;
 818		}
 819
 820		for (i = 0; i < num_q; i++) {
 821			struct netdev_queue *dev_queue = dev_ingress_queue(dev);
 822
 823			if (!ingress)
 824				dev_queue = netdev_get_tx_queue(dev, i);
 825
 826			old = dev_graft_qdisc(dev_queue, new);
 827			if (new && i > 0)
 828				atomic_inc(&new->refcnt);
 829
 830			if (!ingress)
 831				qdisc_destroy(old);
 832		}
 833
 
 834		if (!ingress) {
 835			notify_and_destroy(net, skb, n, classid,
 836					   dev->qdisc, new);
 837			if (new && !new->ops->attach)
 838				atomic_inc(&new->refcnt);
 839			dev->qdisc = new ? : &noop_qdisc;
 
 
 
 840		} else {
 841			notify_and_destroy(net, skb, n, classid, old, new);
 842		}
 843
 844		if (dev->flags & IFF_UP)
 845			dev_activate(dev);
 846	} else {
 847		const struct Qdisc_class_ops *cops = parent->ops->cl_ops;
 
 
 848
 849		err = -EOPNOTSUPP;
 850		if (cops && cops->graft) {
 851			unsigned long cl = cops->get(parent, classid);
 852			if (cl) {
 853				err = cops->graft(parent, cl, new, &old);
 854				cops->put(parent, cl);
 855			} else
 856				err = -ENOENT;
 
 
 
 
 857		}
 858		if (!err)
 859			notify_and_destroy(net, skb, n, classid, old, new);
 
 
 
 860	}
 861	return err;
 862}
 863
 864/* lockdep annotation is needed for ingress; egress gets it only for name */
 865static struct lock_class_key qdisc_tx_lock;
 866static struct lock_class_key qdisc_rx_lock;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 867
 868/*
 869   Allocate and initialize new qdisc.
 870
 871   Parameters are passed via opt.
 872 */
 873
 874static struct Qdisc *
 875qdisc_create(struct net_device *dev, struct netdev_queue *dev_queue,
 876	     struct Qdisc *p, u32 parent, u32 handle,
 877	     struct nlattr **tca, int *errp)
 
 878{
 879	int err;
 880	struct nlattr *kind = tca[TCA_KIND];
 881	struct Qdisc *sch;
 882	struct Qdisc_ops *ops;
 883	struct qdisc_size_table *stab;
 884
 885	ops = qdisc_lookup_ops(kind);
 886#ifdef CONFIG_MODULES
 887	if (ops == NULL && kind != NULL) {
 888		char name[IFNAMSIZ];
 889		if (nla_strlcpy(name, kind, IFNAMSIZ) < IFNAMSIZ) {
 890			/* We dropped the RTNL semaphore in order to
 891			 * perform the module load.  So, even if we
 892			 * succeeded in loading the module we have to
 893			 * tell the caller to replay the request.  We
 894			 * indicate this using -EAGAIN.
 895			 * We replay the request because the device may
 896			 * go away in the mean time.
 897			 */
 898			rtnl_unlock();
 899			request_module("sch_%s", name);
 900			rtnl_lock();
 901			ops = qdisc_lookup_ops(kind);
 902			if (ops != NULL) {
 903				/* We will try again qdisc_lookup_ops,
 904				 * so don't keep a reference.
 905				 */
 906				module_put(ops->owner);
 907				err = -EAGAIN;
 908				goto err_out;
 909			}
 910		}
 911	}
 912#endif
 913
 914	err = -ENOENT;
 915	if (ops == NULL)
 
 916		goto err_out;
 
 917
 918	sch = qdisc_alloc(dev_queue, ops);
 919	if (IS_ERR(sch)) {
 920		err = PTR_ERR(sch);
 921		goto err_out2;
 922	}
 923
 924	sch->parent = parent;
 925
 926	if (handle == TC_H_INGRESS) {
 927		sch->flags |= TCQ_F_INGRESS;
 928		handle = TC_H_MAKE(TC_H_INGRESS, 0);
 929		lockdep_set_class(qdisc_lock(sch), &qdisc_rx_lock);
 930	} else {
 931		if (handle == 0) {
 932			handle = qdisc_alloc_handle(dev);
 933			err = -ENOMEM;
 934			if (handle == 0)
 
 935				goto err_out3;
 
 936		}
 937		lockdep_set_class(qdisc_lock(sch), &qdisc_tx_lock);
 938		if (!netif_is_multiqueue(dev))
 939			sch->flags |= TCQ_F_ONETXQUEUE;
 940	}
 941
 942	sch->handle = handle;
 943
 944	if (!ops->init || (err = ops->init(sch, tca[TCA_OPTIONS])) == 0) {
 945		if (tca[TCA_STAB]) {
 946			stab = qdisc_get_stab(tca[TCA_STAB]);
 947			if (IS_ERR(stab)) {
 948				err = PTR_ERR(stab);
 949				goto err_out4;
 950			}
 951			rcu_assign_pointer(sch->stab, stab);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 952		}
 953		if (tca[TCA_RATE]) {
 954			spinlock_t *root_lock;
 
 
 955
 956			err = -EOPNOTSUPP;
 957			if (sch->flags & TCQ_F_MQROOT)
 958				goto err_out4;
 
 
 959
 960			if ((sch->parent != TC_H_ROOT) &&
 961			    !(sch->flags & TCQ_F_INGRESS) &&
 962			    (!p || !(p->flags & TCQ_F_MQROOT)))
 963				root_lock = qdisc_root_sleeping_lock(sch);
 964			else
 965				root_lock = qdisc_lock(sch);
 966
 967			err = gen_new_estimator(&sch->bstats, &sch->rate_est,
 968						root_lock, tca[TCA_RATE]);
 969			if (err)
 970				goto err_out4;
 
 
 
 
 
 971		}
 
 972
 973		qdisc_list_add(sch);
 974
 975		return sch;
 976	}
 
 
 
 
 977err_out3:
 978	dev_put(dev);
 979	kfree((char *) sch - sch->padded);
 980err_out2:
 981	module_put(ops->owner);
 982err_out:
 983	*errp = err;
 984	return NULL;
 985
 986err_out4:
 987	/*
 988	 * Any broken qdiscs that would require a ops->reset() here?
 989	 * The qdisc was never in action so it shouldn't be necessary.
 990	 */
 991	qdisc_put_stab(rtnl_dereference(sch->stab));
 992	if (ops->destroy)
 993		ops->destroy(sch);
 994	goto err_out3;
 995}
 996
 997static int qdisc_change(struct Qdisc *sch, struct nlattr **tca)
 
 998{
 999	struct qdisc_size_table *ostab, *stab = NULL;
1000	int err = 0;
1001
1002	if (tca[TCA_OPTIONS]) {
1003		if (sch->ops->change == NULL)
 
1004			return -EINVAL;
1005		err = sch->ops->change(sch, tca[TCA_OPTIONS]);
 
 
 
 
 
1006		if (err)
1007			return err;
1008	}
1009
1010	if (tca[TCA_STAB]) {
1011		stab = qdisc_get_stab(tca[TCA_STAB]);
1012		if (IS_ERR(stab))
1013			return PTR_ERR(stab);
1014	}
1015
1016	ostab = rtnl_dereference(sch->stab);
1017	rcu_assign_pointer(sch->stab, stab);
1018	qdisc_put_stab(ostab);
1019
1020	if (tca[TCA_RATE]) {
1021		/* NB: ignores errors from replace_estimator
1022		   because change can't be undone. */
1023		if (sch->flags & TCQ_F_MQROOT)
1024			goto out;
1025		gen_replace_estimator(&sch->bstats, &sch->rate_est,
1026					    qdisc_root_sleeping_lock(sch),
1027					    tca[TCA_RATE]);
 
 
 
1028	}
1029out:
1030	return 0;
1031}
1032
1033struct check_loop_arg {
1034	struct qdisc_walker	w;
1035	struct Qdisc		*p;
1036	int			depth;
1037};
1038
1039static int check_loop_fn(struct Qdisc *q, unsigned long cl, struct qdisc_walker *w);
 
1040
1041static int check_loop(struct Qdisc *q, struct Qdisc *p, int depth)
1042{
1043	struct check_loop_arg	arg;
1044
1045	if (q->ops->cl_ops == NULL)
1046		return 0;
1047
1048	arg.w.stop = arg.w.skip = arg.w.count = 0;
1049	arg.w.fn = check_loop_fn;
1050	arg.depth = depth;
1051	arg.p = p;
1052	q->ops->cl_ops->walk(q, &arg.w);
1053	return arg.w.stop ? -ELOOP : 0;
1054}
1055
1056static int
1057check_loop_fn(struct Qdisc *q, unsigned long cl, struct qdisc_walker *w)
1058{
1059	struct Qdisc *leaf;
1060	const struct Qdisc_class_ops *cops = q->ops->cl_ops;
1061	struct check_loop_arg *arg = (struct check_loop_arg *)w;
1062
1063	leaf = cops->leaf(q, cl);
1064	if (leaf) {
1065		if (leaf == arg->p || arg->depth > 7)
1066			return -ELOOP;
1067		return check_loop(leaf, arg->p, arg->depth + 1);
1068	}
1069	return 0;
1070}
1071
 
 
 
 
 
 
 
 
 
 
 
1072/*
1073 * Delete/get qdisc.
1074 */
1075
1076static int tc_get_qdisc(struct sk_buff *skb, struct nlmsghdr *n)
 
1077{
1078	struct net *net = sock_net(skb->sk);
1079	struct tcmsg *tcm = nlmsg_data(n);
1080	struct nlattr *tca[TCA_MAX + 1];
1081	struct net_device *dev;
1082	u32 clid;
1083	struct Qdisc *q = NULL;
1084	struct Qdisc *p = NULL;
1085	int err;
1086
1087	if ((n->nlmsg_type != RTM_GETQDISC) && !netlink_capable(skb, CAP_NET_ADMIN))
 
1088		return -EPERM;
1089
1090	err = nlmsg_parse(n, sizeof(*tcm), tca, TCA_MAX, NULL);
 
1091	if (err < 0)
1092		return err;
1093
1094	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1095	if (!dev)
1096		return -ENODEV;
1097
1098	clid = tcm->tcm_parent;
1099	if (clid) {
1100		if (clid != TC_H_ROOT) {
1101			if (TC_H_MAJ(clid) != TC_H_MAJ(TC_H_INGRESS)) {
1102				p = qdisc_lookup(dev, TC_H_MAJ(clid));
1103				if (!p)
 
1104					return -ENOENT;
 
1105				q = qdisc_leaf(p, clid);
1106			} else if (dev_ingress_queue(dev)) {
1107				q = dev_ingress_queue(dev)->qdisc_sleeping;
1108			}
1109		} else {
1110			q = dev->qdisc;
1111		}
1112		if (!q)
 
1113			return -ENOENT;
 
1114
1115		if (tcm->tcm_handle && q->handle != tcm->tcm_handle)
 
1116			return -EINVAL;
 
1117	} else {
1118		q = qdisc_lookup(dev, tcm->tcm_handle);
1119		if (!q)
 
1120			return -ENOENT;
 
1121	}
1122
1123	if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], q->ops->id))
 
1124		return -EINVAL;
 
1125
1126	if (n->nlmsg_type == RTM_DELQDISC) {
1127		if (!clid)
 
1128			return -EINVAL;
1129		if (q->handle == 0)
 
 
1130			return -ENOENT;
1131		err = qdisc_graft(dev, p, skb, n, clid, NULL, q);
 
1132		if (err != 0)
1133			return err;
1134	} else {
1135		qdisc_notify(net, skb, n, clid, NULL, q);
1136	}
1137	return 0;
1138}
1139
1140/*
1141 * Create/change qdisc.
1142 */
1143
1144static int tc_modify_qdisc(struct sk_buff *skb, struct nlmsghdr *n)
 
1145{
1146	struct net *net = sock_net(skb->sk);
1147	struct tcmsg *tcm;
1148	struct nlattr *tca[TCA_MAX + 1];
1149	struct net_device *dev;
1150	u32 clid;
1151	struct Qdisc *q, *p;
1152	int err;
1153
1154	if (!netlink_capable(skb, CAP_NET_ADMIN))
1155		return -EPERM;
1156
1157replay:
1158	/* Reinit, just in case something touches this. */
1159	err = nlmsg_parse(n, sizeof(*tcm), tca, TCA_MAX, NULL);
 
1160	if (err < 0)
1161		return err;
1162
1163	tcm = nlmsg_data(n);
1164	clid = tcm->tcm_parent;
1165	q = p = NULL;
1166
1167	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1168	if (!dev)
1169		return -ENODEV;
1170
1171
1172	if (clid) {
1173		if (clid != TC_H_ROOT) {
1174			if (clid != TC_H_INGRESS) {
1175				p = qdisc_lookup(dev, TC_H_MAJ(clid));
1176				if (!p)
 
1177					return -ENOENT;
 
1178				q = qdisc_leaf(p, clid);
1179			} else if (dev_ingress_queue_create(dev)) {
1180				q = dev_ingress_queue(dev)->qdisc_sleeping;
1181			}
1182		} else {
1183			q = dev->qdisc;
1184		}
1185
1186		/* It may be default qdisc, ignore it */
1187		if (q && q->handle == 0)
1188			q = NULL;
1189
1190		if (!q || !tcm->tcm_handle || q->handle != tcm->tcm_handle) {
1191			if (tcm->tcm_handle) {
1192				if (q && !(n->nlmsg_flags & NLM_F_REPLACE))
 
1193					return -EEXIST;
1194				if (TC_H_MIN(tcm->tcm_handle))
 
 
1195					return -EINVAL;
 
1196				q = qdisc_lookup(dev, tcm->tcm_handle);
1197				if (!q)
1198					goto create_n_graft;
1199				if (n->nlmsg_flags & NLM_F_EXCL)
 
1200					return -EEXIST;
1201				if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], q->ops->id))
 
 
 
1202					return -EINVAL;
 
1203				if (q == p ||
1204				    (p && check_loop(q, p, 0)))
 
1205					return -ELOOP;
1206				atomic_inc(&q->refcnt);
 
1207				goto graft;
1208			} else {
1209				if (!q)
1210					goto create_n_graft;
1211
1212				/* This magic test requires explanation.
1213				 *
1214				 *   We know, that some child q is already
1215				 *   attached to this parent and have choice:
1216				 *   either to change it or to create/graft new one.
1217				 *
1218				 *   1. We are allowed to create/graft only
1219				 *   if CREATE and REPLACE flags are set.
1220				 *
1221				 *   2. If EXCL is set, requestor wanted to say,
1222				 *   that qdisc tcm_handle is not expected
1223				 *   to exist, so that we choose create/graft too.
1224				 *
1225				 *   3. The last case is when no flags are set.
1226				 *   Alas, it is sort of hole in API, we
1227				 *   cannot decide what to do unambiguously.
1228				 *   For now we select create/graft, if
1229				 *   user gave KIND, which does not match existing.
1230				 */
1231				if ((n->nlmsg_flags & NLM_F_CREATE) &&
1232				    (n->nlmsg_flags & NLM_F_REPLACE) &&
1233				    ((n->nlmsg_flags & NLM_F_EXCL) ||
1234				     (tca[TCA_KIND] &&
1235				      nla_strcmp(tca[TCA_KIND], q->ops->id))))
1236					goto create_n_graft;
1237			}
1238		}
1239	} else {
1240		if (!tcm->tcm_handle)
 
1241			return -EINVAL;
 
1242		q = qdisc_lookup(dev, tcm->tcm_handle);
1243	}
1244
1245	/* Change qdisc parameters */
1246	if (q == NULL)
 
1247		return -ENOENT;
1248	if (n->nlmsg_flags & NLM_F_EXCL)
 
 
1249		return -EEXIST;
1250	if (tca[TCA_KIND] && nla_strcmp(tca[TCA_KIND], q->ops->id))
 
 
1251		return -EINVAL;
1252	err = qdisc_change(q, tca);
 
1253	if (err == 0)
1254		qdisc_notify(net, skb, n, clid, NULL, q);
1255	return err;
1256
1257create_n_graft:
1258	if (!(n->nlmsg_flags & NLM_F_CREATE))
 
1259		return -ENOENT;
 
1260	if (clid == TC_H_INGRESS) {
1261		if (dev_ingress_queue(dev))
1262			q = qdisc_create(dev, dev_ingress_queue(dev), p,
1263					 tcm->tcm_parent, tcm->tcm_parent,
1264					 tca, &err);
1265		else
 
1266			err = -ENOENT;
 
1267	} else {
1268		struct netdev_queue *dev_queue;
1269
1270		if (p && p->ops->cl_ops && p->ops->cl_ops->select_queue)
1271			dev_queue = p->ops->cl_ops->select_queue(p, tcm);
1272		else if (p)
1273			dev_queue = p->dev_queue;
1274		else
1275			dev_queue = netdev_get_tx_queue(dev, 0);
1276
1277		q = qdisc_create(dev, dev_queue, p,
1278				 tcm->tcm_parent, tcm->tcm_handle,
1279				 tca, &err);
1280	}
1281	if (q == NULL) {
1282		if (err == -EAGAIN)
1283			goto replay;
1284		return err;
1285	}
1286
1287graft:
1288	err = qdisc_graft(dev, p, skb, n, clid, q, NULL);
1289	if (err) {
1290		if (q)
1291			qdisc_destroy(q);
1292		return err;
1293	}
1294
1295	return 0;
1296}
1297
1298static int tc_fill_qdisc(struct sk_buff *skb, struct Qdisc *q, u32 clid,
1299			 u32 portid, u32 seq, u16 flags, int event)
1300{
1301	struct tcmsg *tcm;
1302	struct nlmsghdr  *nlh;
1303	unsigned char *b = skb_tail_pointer(skb);
1304	struct gnet_dump d;
1305	struct qdisc_size_table *stab;
1306
1307	cond_resched();
1308	nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
1309	if (!nlh)
1310		goto out_nlmsg_trim;
1311	tcm = nlmsg_data(nlh);
1312	tcm->tcm_family = AF_UNSPEC;
1313	tcm->tcm__pad1 = 0;
1314	tcm->tcm__pad2 = 0;
1315	tcm->tcm_ifindex = qdisc_dev(q)->ifindex;
1316	tcm->tcm_parent = clid;
1317	tcm->tcm_handle = q->handle;
1318	tcm->tcm_info = atomic_read(&q->refcnt);
1319	if (nla_put_string(skb, TCA_KIND, q->ops->id))
1320		goto nla_put_failure;
1321	if (q->ops->dump && q->ops->dump(q, skb) < 0)
1322		goto nla_put_failure;
1323	q->qstats.qlen = q->q.qlen;
1324
1325	stab = rtnl_dereference(q->stab);
1326	if (stab && qdisc_dump_stab(skb, stab) < 0)
1327		goto nla_put_failure;
1328
1329	if (gnet_stats_start_copy_compat(skb, TCA_STATS2, TCA_STATS, TCA_XSTATS,
1330					 qdisc_root_sleeping_lock(q), &d) < 0)
1331		goto nla_put_failure;
1332
1333	if (q->ops->dump_stats && q->ops->dump_stats(q, &d) < 0)
1334		goto nla_put_failure;
1335
1336	if (gnet_stats_copy_basic(&d, &q->bstats) < 0 ||
1337	    gnet_stats_copy_rate_est(&d, &q->bstats, &q->rate_est) < 0 ||
1338	    gnet_stats_copy_queue(&d, &q->qstats) < 0)
1339		goto nla_put_failure;
1340
1341	if (gnet_stats_finish_copy(&d) < 0)
1342		goto nla_put_failure;
1343
1344	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
1345	return skb->len;
1346
1347out_nlmsg_trim:
1348nla_put_failure:
1349	nlmsg_trim(skb, b);
1350	return -1;
1351}
1352
1353static bool tc_qdisc_dump_ignore(struct Qdisc *q)
1354{
1355	return (q->flags & TCQ_F_BUILTIN) ? true : false;
1356}
1357
1358static int qdisc_notify(struct net *net, struct sk_buff *oskb,
1359			struct nlmsghdr *n, u32 clid,
1360			struct Qdisc *old, struct Qdisc *new)
1361{
1362	struct sk_buff *skb;
1363	u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1364
1365	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1366	if (!skb)
1367		return -ENOBUFS;
1368
1369	if (old && !tc_qdisc_dump_ignore(old)) {
1370		if (tc_fill_qdisc(skb, old, clid, portid, n->nlmsg_seq,
1371				  0, RTM_DELQDISC) < 0)
1372			goto err_out;
1373	}
1374	if (new && !tc_qdisc_dump_ignore(new)) {
1375		if (tc_fill_qdisc(skb, new, clid, portid, n->nlmsg_seq,
1376				  old ? NLM_F_REPLACE : 0, RTM_NEWQDISC) < 0)
1377			goto err_out;
1378	}
1379
1380	if (skb->len)
1381		return rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1382				      n->nlmsg_flags & NLM_F_ECHO);
1383
1384err_out:
1385	kfree_skb(skb);
1386	return -EINVAL;
1387}
1388
1389static int tc_dump_qdisc_root(struct Qdisc *root, struct sk_buff *skb,
1390			      struct netlink_callback *cb,
1391			      int *q_idx_p, int s_q_idx)
 
1392{
1393	int ret = 0, q_idx = *q_idx_p;
1394	struct Qdisc *q;
 
1395
1396	if (!root)
1397		return 0;
1398
1399	q = root;
1400	if (q_idx < s_q_idx) {
1401		q_idx++;
1402	} else {
1403		if (!tc_qdisc_dump_ignore(q) &&
1404		    tc_fill_qdisc(skb, q, q->parent, NETLINK_CB(cb->skb).portid,
1405				  cb->nlh->nlmsg_seq, NLM_F_MULTI, RTM_NEWQDISC) <= 0)
 
1406			goto done;
1407		q_idx++;
1408	}
1409	list_for_each_entry(q, &root->list, list) {
 
 
 
 
 
 
 
 
 
 
1410		if (q_idx < s_q_idx) {
1411			q_idx++;
1412			continue;
1413		}
1414		if (!tc_qdisc_dump_ignore(q) &&
1415		    tc_fill_qdisc(skb, q, q->parent, NETLINK_CB(cb->skb).portid,
1416				  cb->nlh->nlmsg_seq, NLM_F_MULTI, RTM_NEWQDISC) <= 0)
 
1417			goto done;
1418		q_idx++;
1419	}
1420
1421out:
1422	*q_idx_p = q_idx;
1423	return ret;
1424done:
1425	ret = -1;
1426	goto out;
1427}
1428
1429static int tc_dump_qdisc(struct sk_buff *skb, struct netlink_callback *cb)
1430{
1431	struct net *net = sock_net(skb->sk);
1432	int idx, q_idx;
1433	int s_idx, s_q_idx;
1434	struct net_device *dev;
 
 
 
1435
1436	s_idx = cb->args[0];
1437	s_q_idx = q_idx = cb->args[1];
1438
1439	idx = 0;
1440	ASSERT_RTNL();
 
 
 
 
 
 
1441	for_each_netdev(net, dev) {
1442		struct netdev_queue *dev_queue;
1443
1444		if (idx < s_idx)
1445			goto cont;
1446		if (idx > s_idx)
1447			s_q_idx = 0;
1448		q_idx = 0;
1449
1450		if (tc_dump_qdisc_root(dev->qdisc, skb, cb, &q_idx, s_q_idx) < 0)
 
1451			goto done;
1452
1453		dev_queue = dev_ingress_queue(dev);
1454		if (dev_queue &&
1455		    tc_dump_qdisc_root(dev_queue->qdisc_sleeping, skb, cb,
1456				       &q_idx, s_q_idx) < 0)
 
1457			goto done;
1458
1459cont:
1460		idx++;
1461	}
1462
1463done:
1464	cb->args[0] = idx;
1465	cb->args[1] = q_idx;
1466
1467	return skb->len;
1468}
1469
1470
1471
1472/************************************************
1473 *	Traffic classes manipulation.		*
1474 ************************************************/
1475
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1476
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1477
1478static int tc_ctl_tclass(struct sk_buff *skb, struct nlmsghdr *n)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1479{
1480	struct net *net = sock_net(skb->sk);
1481	struct tcmsg *tcm = nlmsg_data(n);
1482	struct nlattr *tca[TCA_MAX + 1];
1483	struct net_device *dev;
1484	struct Qdisc *q = NULL;
1485	const struct Qdisc_class_ops *cops;
1486	unsigned long cl = 0;
1487	unsigned long new_cl;
1488	u32 portid;
1489	u32 clid;
1490	u32 qid;
1491	int err;
1492
1493	if ((n->nlmsg_type != RTM_GETTCLASS) && !netlink_capable(skb, CAP_NET_ADMIN))
 
1494		return -EPERM;
1495
1496	err = nlmsg_parse(n, sizeof(*tcm), tca, TCA_MAX, NULL);
 
1497	if (err < 0)
1498		return err;
1499
1500	dev = __dev_get_by_index(net, tcm->tcm_ifindex);
1501	if (!dev)
1502		return -ENODEV;
1503
1504	/*
1505	   parent == TC_H_UNSPEC - unspecified parent.
1506	   parent == TC_H_ROOT   - class is root, which has no parent.
1507	   parent == X:0	 - parent is root class.
1508	   parent == X:Y	 - parent is a node in hierarchy.
1509	   parent == 0:Y	 - parent is X:Y, where X:0 is qdisc.
1510
1511	   handle == 0:0	 - generate handle from kernel pool.
1512	   handle == 0:Y	 - class is X:Y, where X:0 is qdisc.
1513	   handle == X:Y	 - clear.
1514	   handle == X:0	 - root class.
1515	 */
1516
1517	/* Step 1. Determine qdisc handle X:0 */
1518
1519	portid = tcm->tcm_parent;
1520	clid = tcm->tcm_handle;
1521	qid = TC_H_MAJ(clid);
1522
1523	if (portid != TC_H_ROOT) {
1524		u32 qid1 = TC_H_MAJ(portid);
1525
1526		if (qid && qid1) {
1527			/* If both majors are known, they must be identical. */
1528			if (qid != qid1)
1529				return -EINVAL;
1530		} else if (qid1) {
1531			qid = qid1;
1532		} else if (qid == 0)
1533			qid = dev->qdisc->handle;
1534
1535		/* Now qid is genuine qdisc handle consistent
1536		 * both with parent and child.
1537		 *
1538		 * TC_H_MAJ(portid) still may be unspecified, complete it now.
1539		 */
1540		if (portid)
1541			portid = TC_H_MAKE(qid, portid);
1542	} else {
1543		if (qid == 0)
1544			qid = dev->qdisc->handle;
1545	}
1546
1547	/* OK. Locate qdisc */
1548	q = qdisc_lookup(dev, qid);
1549	if (!q)
1550		return -ENOENT;
1551
1552	/* An check that it supports classes */
1553	cops = q->ops->cl_ops;
1554	if (cops == NULL)
1555		return -EINVAL;
1556
1557	/* Now try to get class */
1558	if (clid == 0) {
1559		if (portid == TC_H_ROOT)
1560			clid = qid;
1561	} else
1562		clid = TC_H_MAKE(qid, clid);
1563
1564	if (clid)
1565		cl = cops->get(q, clid);
1566
1567	if (cl == 0) {
1568		err = -ENOENT;
1569		if (n->nlmsg_type != RTM_NEWTCLASS ||
1570		    !(n->nlmsg_flags & NLM_F_CREATE))
1571			goto out;
1572	} else {
1573		switch (n->nlmsg_type) {
1574		case RTM_NEWTCLASS:
1575			err = -EEXIST;
1576			if (n->nlmsg_flags & NLM_F_EXCL)
1577				goto out;
1578			break;
1579		case RTM_DELTCLASS:
1580			err = -EOPNOTSUPP;
1581			if (cops->delete)
1582				err = cops->delete(q, cl);
1583			if (err == 0)
1584				tclass_notify(net, skb, n, q, cl, RTM_DELTCLASS);
1585			goto out;
1586		case RTM_GETTCLASS:
1587			err = tclass_notify(net, skb, n, q, cl, RTM_NEWTCLASS);
1588			goto out;
1589		default:
1590			err = -EINVAL;
1591			goto out;
1592		}
1593	}
1594
 
 
 
 
 
1595	new_cl = cl;
1596	err = -EOPNOTSUPP;
1597	if (cops->change)
1598		err = cops->change(q, clid, portid, tca, &new_cl);
1599	if (err == 0)
1600		tclass_notify(net, skb, n, q, new_cl, RTM_NEWTCLASS);
1601
 
 
 
1602out:
1603	if (cl)
1604		cops->put(q, cl);
1605
1606	return err;
1607}
1608
1609
1610static int tc_fill_tclass(struct sk_buff *skb, struct Qdisc *q,
1611			  unsigned long cl,
1612			  u32 portid, u32 seq, u16 flags, int event)
1613{
1614	struct tcmsg *tcm;
1615	struct nlmsghdr  *nlh;
1616	unsigned char *b = skb_tail_pointer(skb);
1617	struct gnet_dump d;
1618	const struct Qdisc_class_ops *cl_ops = q->ops->cl_ops;
1619
1620	cond_resched();
1621	nlh = nlmsg_put(skb, portid, seq, event, sizeof(*tcm), flags);
1622	if (!nlh)
1623		goto out_nlmsg_trim;
1624	tcm = nlmsg_data(nlh);
1625	tcm->tcm_family = AF_UNSPEC;
1626	tcm->tcm__pad1 = 0;
1627	tcm->tcm__pad2 = 0;
1628	tcm->tcm_ifindex = qdisc_dev(q)->ifindex;
1629	tcm->tcm_parent = q->handle;
1630	tcm->tcm_handle = q->handle;
1631	tcm->tcm_info = 0;
1632	if (nla_put_string(skb, TCA_KIND, q->ops->id))
1633		goto nla_put_failure;
1634	if (cl_ops->dump && cl_ops->dump(q, cl, skb, tcm) < 0)
1635		goto nla_put_failure;
1636
1637	if (gnet_stats_start_copy_compat(skb, TCA_STATS2, TCA_STATS, TCA_XSTATS,
1638					 qdisc_root_sleeping_lock(q), &d) < 0)
1639		goto nla_put_failure;
1640
1641	if (cl_ops->dump_stats && cl_ops->dump_stats(q, cl, &d) < 0)
1642		goto nla_put_failure;
1643
1644	if (gnet_stats_finish_copy(&d) < 0)
1645		goto nla_put_failure;
1646
1647	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
1648	return skb->len;
1649
1650out_nlmsg_trim:
1651nla_put_failure:
1652	nlmsg_trim(skb, b);
1653	return -1;
1654}
1655
1656static int tclass_notify(struct net *net, struct sk_buff *oskb,
1657			 struct nlmsghdr *n, struct Qdisc *q,
1658			 unsigned long cl, int event)
1659{
1660	struct sk_buff *skb;
1661	u32 portid = oskb ? NETLINK_CB(oskb).portid : 0;
1662
1663	skb = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
1664	if (!skb)
1665		return -ENOBUFS;
1666
1667	if (tc_fill_tclass(skb, q, cl, portid, n->nlmsg_seq, 0, event) < 0) {
1668		kfree_skb(skb);
1669		return -EINVAL;
1670	}
1671
1672	return rtnetlink_send(skb, net, portid, RTNLGRP_TC,
1673			      n->nlmsg_flags & NLM_F_ECHO);
1674}
1675
1676struct qdisc_dump_args {
1677	struct qdisc_walker	w;
1678	struct sk_buff		*skb;
1679	struct netlink_callback	*cb;
1680};
1681
1682static int qdisc_class_dump(struct Qdisc *q, unsigned long cl, struct qdisc_walker *arg)
 
1683{
1684	struct qdisc_dump_args *a = (struct qdisc_dump_args *)arg;
1685
1686	return tc_fill_tclass(a->skb, q, cl, NETLINK_CB(a->cb->skb).portid,
1687			      a->cb->nlh->nlmsg_seq, NLM_F_MULTI, RTM_NEWTCLASS);
 
1688}
1689
1690static int tc_dump_tclass_qdisc(struct Qdisc *q, struct sk_buff *skb,
1691				struct tcmsg *tcm, struct netlink_callback *cb,
1692				int *t_p, int s_t)
1693{
1694	struct qdisc_dump_args arg;
1695
1696	if (tc_qdisc_dump_ignore(q) ||
1697	    *t_p < s_t || !q->ops->cl_ops ||
1698	    (tcm->tcm_parent &&
1699	     TC_H_MAJ(tcm->tcm_parent) != q->handle)) {
1700		(*t_p)++;
1701		return 0;
1702	}
1703	if (*t_p > s_t)
1704		memset(&cb->args[1], 0, sizeof(cb->args)-sizeof(cb->args[0]));
1705	arg.w.fn = qdisc_class_dump;
1706	arg.skb = skb;
1707	arg.cb = cb;
1708	arg.w.stop  = 0;
1709	arg.w.skip = cb->args[1];
1710	arg.w.count = 0;
1711	q->ops->cl_ops->walk(q, &arg.w);
1712	cb->args[1] = arg.w.count;
1713	if (arg.w.stop)
1714		return -1;
1715	(*t_p)++;
1716	return 0;
1717}
1718
1719static int tc_dump_tclass_root(struct Qdisc *root, struct sk_buff *skb,
1720			       struct tcmsg *tcm, struct netlink_callback *cb,
1721			       int *t_p, int s_t)
1722{
1723	struct Qdisc *q;
 
1724
1725	if (!root)
1726		return 0;
1727
1728	if (tc_dump_tclass_qdisc(root, skb, tcm, cb, t_p, s_t) < 0)
1729		return -1;
1730
1731	list_for_each_entry(q, &root->list, list) {
 
 
 
 
 
 
 
 
 
 
1732		if (tc_dump_tclass_qdisc(q, skb, tcm, cb, t_p, s_t) < 0)
1733			return -1;
1734	}
1735
1736	return 0;
1737}
1738
1739static int tc_dump_tclass(struct sk_buff *skb, struct netlink_callback *cb)
1740{
1741	struct tcmsg *tcm = nlmsg_data(cb->nlh);
1742	struct net *net = sock_net(skb->sk);
1743	struct netdev_queue *dev_queue;
1744	struct net_device *dev;
1745	int t, s_t;
1746
1747	if (nlmsg_len(cb->nlh) < sizeof(*tcm))
1748		return 0;
1749	dev = dev_get_by_index(net, tcm->tcm_ifindex);
1750	if (!dev)
1751		return 0;
1752
1753	s_t = cb->args[0];
1754	t = 0;
1755
1756	if (tc_dump_tclass_root(dev->qdisc, skb, tcm, cb, &t, s_t) < 0)
1757		goto done;
1758
1759	dev_queue = dev_ingress_queue(dev);
1760	if (dev_queue &&
1761	    tc_dump_tclass_root(dev_queue->qdisc_sleeping, skb, tcm, cb,
1762				&t, s_t) < 0)
1763		goto done;
1764
1765done:
1766	cb->args[0] = t;
1767
1768	dev_put(dev);
1769	return skb->len;
1770}
1771
1772/* Main classifier routine: scans classifier chain attached
1773 * to this qdisc, (optionally) tests for protocol and asks
1774 * specific classifiers.
1775 */
1776int tc_classify_compat(struct sk_buff *skb, const struct tcf_proto *tp,
1777		       struct tcf_result *res)
1778{
1779	__be16 protocol = skb->protocol;
1780	int err;
1781
1782	for (; tp; tp = tp->next) {
1783		if (tp->protocol != protocol &&
1784		    tp->protocol != htons(ETH_P_ALL))
1785			continue;
1786		err = tp->classify(skb, tp, res);
1787
1788		if (err >= 0) {
1789#ifdef CONFIG_NET_CLS_ACT
1790			if (err != TC_ACT_RECLASSIFY && skb->tc_verd)
1791				skb->tc_verd = SET_TC_VERD(skb->tc_verd, 0);
1792#endif
1793			return err;
1794		}
1795	}
1796	return -1;
1797}
1798EXPORT_SYMBOL(tc_classify_compat);
1799
1800int tc_classify(struct sk_buff *skb, const struct tcf_proto *tp,
1801		struct tcf_result *res)
1802{
1803	int err = 0;
1804#ifdef CONFIG_NET_CLS_ACT
1805	const struct tcf_proto *otp = tp;
1806reclassify:
1807#endif
1808
1809	err = tc_classify_compat(skb, tp, res);
1810#ifdef CONFIG_NET_CLS_ACT
1811	if (err == TC_ACT_RECLASSIFY) {
1812		u32 verd = G_TC_VERD(skb->tc_verd);
1813		tp = otp;
1814
1815		if (verd++ >= MAX_REC_LOOP) {
1816			net_notice_ratelimited("%s: packet reclassify loop rule prio %u protocol %02x\n",
1817					       tp->q->ops->id,
1818					       tp->prio & 0xffff,
1819					       ntohs(tp->protocol));
1820			return TC_ACT_SHOT;
1821		}
1822		skb->tc_verd = SET_TC_VERD(skb->tc_verd, verd);
1823		goto reclassify;
1824	}
1825#endif
1826	return err;
1827}
1828EXPORT_SYMBOL(tc_classify);
1829
1830void tcf_destroy(struct tcf_proto *tp)
1831{
1832	tp->ops->destroy(tp);
1833	module_put(tp->ops->owner);
1834	kfree(tp);
1835}
1836
1837void tcf_destroy_chain(struct tcf_proto **fl)
1838{
1839	struct tcf_proto *tp;
1840
1841	while ((tp = *fl) != NULL) {
1842		*fl = tp->next;
1843		tcf_destroy(tp);
1844	}
1845}
1846EXPORT_SYMBOL(tcf_destroy_chain);
1847
1848#ifdef CONFIG_PROC_FS
1849static int psched_show(struct seq_file *seq, void *v)
1850{
1851	struct timespec ts;
1852
1853	hrtimer_get_res(CLOCK_MONOTONIC, &ts);
1854	seq_printf(seq, "%08x %08x %08x %08x\n",
1855		   (u32)NSEC_PER_USEC, (u32)PSCHED_TICKS2NS(1),
1856		   1000000,
1857		   (u32)NSEC_PER_SEC/(u32)ktime_to_ns(timespec_to_ktime(ts)));
1858
1859	return 0;
1860}
1861
1862static int psched_open(struct inode *inode, struct file *file)
1863{
1864	return single_open(file, psched_show, NULL);
1865}
1866
1867static const struct file_operations psched_fops = {
1868	.owner = THIS_MODULE,
1869	.open = psched_open,
1870	.read  = seq_read,
1871	.llseek = seq_lseek,
1872	.release = single_release,
1873};
1874
1875static int __net_init psched_net_init(struct net *net)
1876{
1877	struct proc_dir_entry *e;
1878
1879	e = proc_create("psched", 0, net->proc_net, &psched_fops);
1880	if (e == NULL)
1881		return -ENOMEM;
1882
1883	return 0;
1884}
1885
1886static void __net_exit psched_net_exit(struct net *net)
1887{
1888	remove_proc_entry("psched", net->proc_net);
1889}
1890#else
1891static int __net_init psched_net_init(struct net *net)
1892{
1893	return 0;
1894}
1895
1896static void __net_exit psched_net_exit(struct net *net)
1897{
1898}
1899#endif
1900
1901static struct pernet_operations psched_net_ops = {
1902	.init = psched_net_init,
1903	.exit = psched_net_exit,
1904};
1905
1906static int __init pktsched_init(void)
1907{
1908	int err;
1909
1910	err = register_pernet_subsys(&psched_net_ops);
1911	if (err) {
1912		pr_err("pktsched_init: "
1913		       "cannot initialize per netns operations\n");
1914		return err;
1915	}
1916
1917	register_qdisc(&pfifo_fast_ops);
1918	register_qdisc(&pfifo_qdisc_ops);
1919	register_qdisc(&bfifo_qdisc_ops);
1920	register_qdisc(&pfifo_head_drop_qdisc_ops);
1921	register_qdisc(&mq_qdisc_ops);
 
1922
1923	rtnl_register(PF_UNSPEC, RTM_NEWQDISC, tc_modify_qdisc, NULL, NULL);
1924	rtnl_register(PF_UNSPEC, RTM_DELQDISC, tc_get_qdisc, NULL, NULL);
1925	rtnl_register(PF_UNSPEC, RTM_GETQDISC, tc_get_qdisc, tc_dump_qdisc, NULL);
1926	rtnl_register(PF_UNSPEC, RTM_NEWTCLASS, tc_ctl_tclass, NULL, NULL);
1927	rtnl_register(PF_UNSPEC, RTM_DELTCLASS, tc_ctl_tclass, NULL, NULL);
1928	rtnl_register(PF_UNSPEC, RTM_GETTCLASS, tc_ctl_tclass, tc_dump_tclass, NULL);
 
 
1929
1930	return 0;
1931}
1932
1933subsys_initcall(pktsched_init);