net/tipc/netlink_compat.c

   1 /*
   2  * Copyright (c) 2014, Ericsson AB
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions are met:
   7  *
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. Neither the names of the copyright holders nor the names of its
  14  *    contributors may be used to endorse or promote products derived from
  15  *    this software without specific prior written permission.
  16  *
  17  * Alternatively, this software may be distributed under the terms of the
  18  * GNU General Public License ("GPL") version 2 as published by the Free
  19  * Software Foundation.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
  25  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  31  * POSSIBILITY OF SUCH DAMAGE.
  32  */
  33
  34 #include "core.h"
  35 #include "bearer.h"
  36 #include "link.h"
  37 #include "name_table.h"
  38 #include "socket.h"
  39 #include "node.h"
  40 #include "net.h"
  41 #include <net/genetlink.h>
  42 #include <linux/tipc_config.h>
  43
  44 /* The legacy API had an artificial message length limit called
  45  * ULTRA_STRING_MAX_LEN.
  46  */
  47 #define ULTRA_STRING_MAX_LEN 32768
  48
  49 #define TIPC_SKB_MAX TLV_SPACE(ULTRA_STRING_MAX_LEN)
  50
  51 #define REPLY_TRUNCATED "<truncated>\n"
  52
  53 struct tipc_nl_compat_msg {
  54         u16 cmd;
  55         int rep_type;
  56         int rep_size;
  57         int req_type;
  58         struct net *net;
  59         struct sk_buff *rep;
  60         struct tlv_desc *req;
  61         struct sock *dst_sk;
  62 };
  63
  64 struct tipc_nl_compat_cmd_dump {
  65         int (*header)(struct tipc_nl_compat_msg *);
  66         int (*dumpit)(struct sk_buff *, struct netlink_callback *);
  67         int (*format)(struct tipc_nl_compat_msg *msg, struct nlattr **attrs);
  68 };
  69
  70 struct tipc_nl_compat_cmd_doit {
  71         int (*doit)(struct sk_buff *skb, struct genl_info *info);
  72         int (*transcode)(struct tipc_nl_compat_cmd_doit *cmd,
  73                          struct sk_buff *skb, struct tipc_nl_compat_msg *msg);
  74 };
  75
  76 static int tipc_skb_tailroom(struct sk_buff *skb)
  77 {
  78         int tailroom;
  79         int limit;
  80
  81         tailroom = skb_tailroom(skb);
  82         limit = TIPC_SKB_MAX - skb->len;
  83
  84         if (tailroom < limit)
  85                 return tailroom;
  86
  87         return limit;
  88 }
  89
  90 static int tipc_add_tlv(struct sk_buff *skb, u16 type, void *data, u16 len)
  91 {
  92         struct tlv_desc *tlv = (struct tlv_desc *)skb_tail_pointer(skb);
  93
  94         if (tipc_skb_tailroom(skb) < TLV_SPACE(len))
  95                 return -EMSGSIZE;
  96
  97         skb_put(skb, TLV_SPACE(len));
  98         tlv->tlv_type = htons(type);
  99         tlv->tlv_len = htons(TLV_LENGTH(len));
 100         if (len && data)
 101                 memcpy(TLV_DATA(tlv), data, len);
 102
 103         return 0;
 104 }
 105
 106 static void tipc_tlv_init(struct sk_buff *skb, u16 type)
 107 {
 108         struct tlv_desc *tlv = (struct tlv_desc *)skb->data;
 109
 110         TLV_SET_LEN(tlv, 0);
 111         TLV_SET_TYPE(tlv, type);
 112         skb_put(skb, sizeof(struct tlv_desc));
 113 }
 114
 115 static int tipc_tlv_sprintf(struct sk_buff *skb, const char *fmt, ...)
 116 {
 117         int n;
 118         u16 len;
 119         u32 rem;
 120         char *buf;
 121         struct tlv_desc *tlv;
 122         va_list args;
 123
 124         rem = tipc_skb_tailroom(skb);
 125
 126         tlv = (struct tlv_desc *)skb->data;
 127         len = TLV_GET_LEN(tlv);
 128         buf = TLV_DATA(tlv) + len;
 129
 130         va_start(args, fmt);
 131         n = vscnprintf(buf, rem, fmt, args);
 132         va_end(args);
 133
 134         TLV_SET_LEN(tlv, n + len);
 135         skb_put(skb, n);
 136
 137         return n;
 138 }
 139
 140 static struct sk_buff *tipc_tlv_alloc(int size)
 141 {
 142         int hdr_len;
 143         struct sk_buff *buf;
 144
 145         size = TLV_SPACE(size);
 146         hdr_len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
 147
 148         buf = alloc_skb(hdr_len + size, GFP_KERNEL);
 149         if (!buf)
 150                 return NULL;
 151
 152         skb_reserve(buf, hdr_len);
 153
 154         return buf;
 155 }
 156
 157 static struct sk_buff *tipc_get_err_tlv(char *str)
 158 {
 159         int str_len = strlen(str) + 1;
 160         struct sk_buff *buf;
 161
 162         buf = tipc_tlv_alloc(TLV_SPACE(str_len));
 163         if (buf)
 164                 tipc_add_tlv(buf, TIPC_TLV_ERROR_STRING, str, str_len);
 165
 166         return buf;
 167 }
 168
 169 static int __tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 170                                    struct tipc_nl_compat_msg *msg,
 171                                    struct sk_buff *arg)
 172 {
 173         int len = 0;
 174         int err;
 175         struct sk_buff *buf;
 176         struct nlmsghdr *nlmsg;
 177         struct netlink_callback cb;
 178
 179         memset(&cb, 0, sizeof(cb));
 180         cb.nlh = (struct nlmsghdr *)arg->data;
 181         cb.skb = arg;
 182
 183         buf = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
 184         if (!buf)
 185                 return -ENOMEM;
 186
 187         buf->sk = msg->dst_sk;
 188         if (__tipc_dump_start(&cb, msg->net)) {
 189                 kfree_skb(buf);
 190                 return -ENOMEM;
 191         }
 192
 193         do {
 194                 int rem;
 195
 196                 len = (*cmd->dumpit)(buf, &cb);
 197
 198                 nlmsg_for_each_msg(nlmsg, nlmsg_hdr(buf), len, rem) {
 199                         struct nlattr **attrs;
 200
 201                         err = tipc_nlmsg_parse(nlmsg, &attrs);
 202                         if (err)
 203                                 goto err_out;
 204
 205                         err = (*cmd->format)(msg, attrs);
 206                         if (err)
 207                                 goto err_out;
 208
 209                         if (tipc_skb_tailroom(msg->rep) <= 1) {
 210                                 err = -EMSGSIZE;
 211                                 goto err_out;
 212                         }
 213                 }
 214
 215                 skb_reset_tail_pointer(buf);
 216                 buf->len = 0;
 217
 218         } while (len);
 219
 220         err = 0;
 221
 222 err_out:
 223         tipc_dump_done(&cb);
 224         kfree_skb(buf);
 225
 226         if (err == -EMSGSIZE) {
 227                 /* The legacy API only considered messages filling
 228                  * "ULTRA_STRING_MAX_LEN" to be truncated.
 229                  */
 230                 if ((TIPC_SKB_MAX - msg->rep->len) <= 1) {
 231                         char *tail = skb_tail_pointer(msg->rep);
 232
 233                         if (*tail != '\0')
 234                                 sprintf(tail - sizeof(REPLY_TRUNCATED) - 1,
 235                                         REPLY_TRUNCATED);
 236                 }
 237
 238                 return 0;
 239         }
 240
 241         return err;
 242 }
 243
 244 static int tipc_nl_compat_dumpit(struct tipc_nl_compat_cmd_dump *cmd,
 245                                  struct tipc_nl_compat_msg *msg)
 246 {
 247         int err;
 248         struct sk_buff *arg;
 249
 250         if (msg->req_type && !TLV_CHECK_TYPE(msg->req, msg->req_type))
 251                 return -EINVAL;
 252
 253         msg->rep = tipc_tlv_alloc(msg->rep_size);
 254         if (!msg->rep)
 255                 return -ENOMEM;
 256
 257         if (msg->rep_type)
 258                 tipc_tlv_init(msg->rep, msg->rep_type);
 259
 260         if (cmd->header)
 261                 (*cmd->header)(msg);
 262
 263         arg = nlmsg_new(0, GFP_KERNEL);
 264         if (!arg) {
 265                 kfree_skb(msg->rep);
 266                 msg->rep = NULL;
 267                 return -ENOMEM;
 268         }
 269
 270         err = __tipc_nl_compat_dumpit(cmd, msg, arg);
 271         if (err) {
 272                 kfree_skb(msg->rep);
 273                 msg->rep = NULL;
 274         }
 275         kfree_skb(arg);
 276
 277         return err;
 278 }
 279
 280 static int __tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 281                                  struct tipc_nl_compat_msg *msg)
 282 {
 283         int err;
 284         struct sk_buff *doit_buf;
 285         struct sk_buff *trans_buf;
 286         struct nlattr **attrbuf;
 287         struct genl_info info;
 288
 289         trans_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 290         if (!trans_buf)
 291                 return -ENOMEM;
 292
 293         attrbuf = kmalloc_array(tipc_genl_family.maxattr + 1,
 294                                 sizeof(struct nlattr *),
 295                                 GFP_KERNEL);
 296         if (!attrbuf) {
 297                 err = -ENOMEM;
 298                 goto trans_out;
 299         }
 300
 301         doit_buf = alloc_skb(NLMSG_GOODSIZE, GFP_KERNEL);
 302         if (!doit_buf) {
 303                 err = -ENOMEM;
 304                 goto attrbuf_out;
 305         }
 306
 307         memset(&info, 0, sizeof(info));
 308         info.attrs = attrbuf;
 309
 310         rtnl_lock();
 311         err = (*cmd->transcode)(cmd, trans_buf, msg);
 312         if (err)
 313                 goto doit_out;
 314
 315         err = nla_parse(attrbuf, tipc_genl_family.maxattr,
 316                         (const struct nlattr *)trans_buf->data,
 317                         trans_buf->len, NULL, NULL);
 318         if (err)
 319                 goto doit_out;
 320
 321         doit_buf->sk = msg->dst_sk;
 322
 323         err = (*cmd->doit)(doit_buf, &info);
 324 doit_out:
 325         rtnl_unlock();
 326
 327         kfree_skb(doit_buf);
 328 attrbuf_out:
 329         kfree(attrbuf);
 330 trans_out:
 331         kfree_skb(trans_buf);
 332
 333         return err;
 334 }
 335
 336 static int tipc_nl_compat_doit(struct tipc_nl_compat_cmd_doit *cmd,
 337                                struct tipc_nl_compat_msg *msg)
 338 {
 339         int err;
 340
 341         if (msg->req_type && !TLV_CHECK_TYPE(msg->req, msg->req_type))
 342                 return -EINVAL;
 343
 344         err = __tipc_nl_compat_doit(cmd, msg);
 345         if (err)
 346                 return err;
 347
 348         /* The legacy API considered an empty message a success message */
 349         msg->rep = tipc_tlv_alloc(0);
 350         if (!msg->rep)
 351                 return -ENOMEM;
 352
 353         return 0;
 354 }
 355
 356 static int tipc_nl_compat_bearer_dump(struct tipc_nl_compat_msg *msg,
 357                                       struct nlattr **attrs)
 358 {
 359         struct nlattr *bearer[TIPC_NLA_BEARER_MAX + 1];
 360         int err;
 361
 362         if (!attrs[TIPC_NLA_BEARER])
 363                 return -EINVAL;
 364
 365         err = nla_parse_nested(bearer, TIPC_NLA_BEARER_MAX,
 366                                attrs[TIPC_NLA_BEARER], NULL, NULL);
 367         if (err)
 368                 return err;
 369
 370         return tipc_add_tlv(msg->rep, TIPC_TLV_BEARER_NAME,
 371                             nla_data(bearer[TIPC_NLA_BEARER_NAME]),
 372                             nla_len(bearer[TIPC_NLA_BEARER_NAME]));
 373 }
 374
 375 static int tipc_nl_compat_bearer_enable(struct tipc_nl_compat_cmd_doit *cmd,
 376                                         struct sk_buff *skb,
 377                                         struct tipc_nl_compat_msg *msg)
 378 {
 379         struct nlattr *prop;
 380         struct nlattr *bearer;
 381         struct tipc_bearer_config *b;
 382
 383         b = (struct tipc_bearer_config *)TLV_DATA(msg->req);
 384
 385         bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 386         if (!bearer)
 387                 return -EMSGSIZE;
 388
 389         if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, b->name))
 390                 return -EMSGSIZE;
 391
 392         if (nla_put_u32(skb, TIPC_NLA_BEARER_DOMAIN, ntohl(b->disc_domain)))
 393                 return -EMSGSIZE;
 394
 395         if (ntohl(b->priority) <= TIPC_MAX_LINK_PRI) {
 396                 prop = nla_nest_start(skb, TIPC_NLA_BEARER_PROP);
 397                 if (!prop)
 398                         return -EMSGSIZE;
 399                 if (nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(b->priority)))
 400                         return -EMSGSIZE;
 401                 nla_nest_end(skb, prop);
 402         }
 403         nla_nest_end(skb, bearer);
 404
 405         return 0;
 406 }
 407
 408 static int tipc_nl_compat_bearer_disable(struct tipc_nl_compat_cmd_doit *cmd,
 409                                          struct sk_buff *skb,
 410                                          struct tipc_nl_compat_msg *msg)
 411 {
 412         char *name;
 413         struct nlattr *bearer;
 414
 415         name = (char *)TLV_DATA(msg->req);
 416
 417         bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 418         if (!bearer)
 419                 return -EMSGSIZE;
 420
 421         if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, name))
 422                 return -EMSGSIZE;
 423
 424         nla_nest_end(skb, bearer);
 425
 426         return 0;
 427 }
 428
 429 static inline u32 perc(u32 count, u32 total)
 430 {
 431         return (count * 100 + (total / 2)) / total;
 432 }
 433
 434 static void __fill_bc_link_stat(struct tipc_nl_compat_msg *msg,
 435                                 struct nlattr *prop[], struct nlattr *stats[])
 436 {
 437         tipc_tlv_sprintf(msg->rep, "  Window:%u packets\n",
 438                          nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 439
 440         tipc_tlv_sprintf(msg->rep,
 441                          "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 442                          nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 443                          nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 444                          nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 445                          nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 446                          nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 447
 448         tipc_tlv_sprintf(msg->rep,
 449                          "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 450                          nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 451                          nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 452                          nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 453                          nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 454                          nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 455
 456         tipc_tlv_sprintf(msg->rep, "  RX naks:%u defs:%u dups:%u\n",
 457                          nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 458                          nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 459                          nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 460
 461         tipc_tlv_sprintf(msg->rep, "  TX naks:%u acks:%u dups:%u\n",
 462                          nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 463                          nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 464                          nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 465
 466         tipc_tlv_sprintf(msg->rep,
 467                          "  Congestion link:%u  Send queue max:%u avg:%u",
 468                          nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 469                          nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 470                          nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 471 }
 472
 473 static int tipc_nl_compat_link_stat_dump(struct tipc_nl_compat_msg *msg,
 474                                          struct nlattr **attrs)
 475 {
 476         char *name;
 477         struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 478         struct nlattr *prop[TIPC_NLA_PROP_MAX + 1];
 479         struct nlattr *stats[TIPC_NLA_STATS_MAX + 1];
 480         int err;
 481
 482         if (!attrs[TIPC_NLA_LINK])
 483                 return -EINVAL;
 484
 485         err = nla_parse_nested(link, TIPC_NLA_LINK_MAX, attrs[TIPC_NLA_LINK],
 486                                NULL, NULL);
 487         if (err)
 488                 return err;
 489
 490         if (!link[TIPC_NLA_LINK_PROP])
 491                 return -EINVAL;
 492
 493         err = nla_parse_nested(prop, TIPC_NLA_PROP_MAX,
 494                                link[TIPC_NLA_LINK_PROP], NULL, NULL);
 495         if (err)
 496                 return err;
 497
 498         if (!link[TIPC_NLA_LINK_STATS])
 499                 return -EINVAL;
 500
 501         err = nla_parse_nested(stats, TIPC_NLA_STATS_MAX,
 502                                link[TIPC_NLA_LINK_STATS], NULL, NULL);
 503         if (err)
 504                 return err;
 505
 506         name = (char *)TLV_DATA(msg->req);
 507         if (strcmp(name, nla_data(link[TIPC_NLA_LINK_NAME])) != 0)
 508                 return 0;
 509
 510         tipc_tlv_sprintf(msg->rep, "\nLink <%s>\n",
 511                          nla_data(link[TIPC_NLA_LINK_NAME]));
 512
 513         if (link[TIPC_NLA_LINK_BROADCAST]) {
 514                 __fill_bc_link_stat(msg, prop, stats);
 515                 return 0;
 516         }
 517
 518         if (link[TIPC_NLA_LINK_ACTIVE])
 519                 tipc_tlv_sprintf(msg->rep, "  ACTIVE");
 520         else if (link[TIPC_NLA_LINK_UP])
 521                 tipc_tlv_sprintf(msg->rep, "  STANDBY");
 522         else
 523                 tipc_tlv_sprintf(msg->rep, "  DEFUNCT");
 524
 525         tipc_tlv_sprintf(msg->rep, "  MTU:%u  Priority:%u",
 526                          nla_get_u32(link[TIPC_NLA_LINK_MTU]),
 527                          nla_get_u32(prop[TIPC_NLA_PROP_PRIO]));
 528
 529         tipc_tlv_sprintf(msg->rep, "  Tolerance:%u ms  Window:%u packets\n",
 530                          nla_get_u32(prop[TIPC_NLA_PROP_TOL]),
 531                          nla_get_u32(prop[TIPC_NLA_PROP_WIN]));
 532
 533         tipc_tlv_sprintf(msg->rep,
 534                          "  RX packets:%u fragments:%u/%u bundles:%u/%u\n",
 535                          nla_get_u32(link[TIPC_NLA_LINK_RX]) -
 536                          nla_get_u32(stats[TIPC_NLA_STATS_RX_INFO]),
 537                          nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTS]),
 538                          nla_get_u32(stats[TIPC_NLA_STATS_RX_FRAGMENTED]),
 539                          nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLES]),
 540                          nla_get_u32(stats[TIPC_NLA_STATS_RX_BUNDLED]));
 541
 542         tipc_tlv_sprintf(msg->rep,
 543                          "  TX packets:%u fragments:%u/%u bundles:%u/%u\n",
 544                          nla_get_u32(link[TIPC_NLA_LINK_TX]) -
 545                          nla_get_u32(stats[TIPC_NLA_STATS_TX_INFO]),
 546                          nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTS]),
 547                          nla_get_u32(stats[TIPC_NLA_STATS_TX_FRAGMENTED]),
 548                          nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLES]),
 549                          nla_get_u32(stats[TIPC_NLA_STATS_TX_BUNDLED]));
 550
 551         tipc_tlv_sprintf(msg->rep,
 552                          "  TX profile sample:%u packets  average:%u octets\n",
 553                          nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_CNT]),
 554                          nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_TOT]) /
 555                          nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT]));
 556
 557         tipc_tlv_sprintf(msg->rep,
 558                          "  0-64:%u%% -256:%u%% -1024:%u%% -4096:%u%% ",
 559                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P0]),
 560                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 561                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P1]),
 562                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 563                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P2]),
 564                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 565                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P3]),
 566                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 567
 568         tipc_tlv_sprintf(msg->rep, "-16384:%u%% -32768:%u%% -66000:%u%%\n",
 569                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P4]),
 570                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 571                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P5]),
 572                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])),
 573                          perc(nla_get_u32(stats[TIPC_NLA_STATS_MSG_LEN_P6]),
 574                               nla_get_u32(stats[TIPC_NLA_STATS_MSG_PROF_TOT])));
 575
 576         tipc_tlv_sprintf(msg->rep,
 577                          "  RX states:%u probes:%u naks:%u defs:%u dups:%u\n",
 578                          nla_get_u32(stats[TIPC_NLA_STATS_RX_STATES]),
 579                          nla_get_u32(stats[TIPC_NLA_STATS_RX_PROBES]),
 580                          nla_get_u32(stats[TIPC_NLA_STATS_RX_NACKS]),
 581                          nla_get_u32(stats[TIPC_NLA_STATS_RX_DEFERRED]),
 582                          nla_get_u32(stats[TIPC_NLA_STATS_DUPLICATES]));
 583
 584         tipc_tlv_sprintf(msg->rep,
 585                          "  TX states:%u probes:%u naks:%u acks:%u dups:%u\n",
 586                          nla_get_u32(stats[TIPC_NLA_STATS_TX_STATES]),
 587                          nla_get_u32(stats[TIPC_NLA_STATS_TX_PROBES]),
 588                          nla_get_u32(stats[TIPC_NLA_STATS_TX_NACKS]),
 589                          nla_get_u32(stats[TIPC_NLA_STATS_TX_ACKS]),
 590                          nla_get_u32(stats[TIPC_NLA_STATS_RETRANSMITTED]));
 591
 592         tipc_tlv_sprintf(msg->rep,
 593                          "  Congestion link:%u  Send queue max:%u avg:%u",
 594                          nla_get_u32(stats[TIPC_NLA_STATS_LINK_CONGS]),
 595                          nla_get_u32(stats[TIPC_NLA_STATS_MAX_QUEUE]),
 596                          nla_get_u32(stats[TIPC_NLA_STATS_AVG_QUEUE]));
 597
 598         return 0;
 599 }
 600
 601 static int tipc_nl_compat_link_dump(struct tipc_nl_compat_msg *msg,
 602                                     struct nlattr **attrs)
 603 {
 604         struct nlattr *link[TIPC_NLA_LINK_MAX + 1];
 605         struct tipc_link_info link_info;
 606         int err;
 607
 608         if (!attrs[TIPC_NLA_LINK])
 609                 return -EINVAL;
 610
 611         err = nla_parse_nested(link, TIPC_NLA_LINK_MAX, attrs[TIPC_NLA_LINK],
 612                                NULL, NULL);
 613         if (err)
 614                 return err;
 615
 616         link_info.dest = nla_get_flag(link[TIPC_NLA_LINK_DEST]);
 617         link_info.up = htonl(nla_get_flag(link[TIPC_NLA_LINK_UP]));
 618         nla_strlcpy(link_info.str, link[TIPC_NLA_LINK_NAME],
 619                     TIPC_MAX_LINK_NAME);
 620
 621         return tipc_add_tlv(msg->rep, TIPC_TLV_LINK_INFO,
 622                             &link_info, sizeof(link_info));
 623 }
 624
 625 static int __tipc_add_link_prop(struct sk_buff *skb,
 626                                 struct tipc_nl_compat_msg *msg,
 627                                 struct tipc_link_config *lc)
 628 {
 629         switch (msg->cmd) {
 630         case TIPC_CMD_SET_LINK_PRI:
 631                 return nla_put_u32(skb, TIPC_NLA_PROP_PRIO, ntohl(lc->value));
 632         case TIPC_CMD_SET_LINK_TOL:
 633                 return nla_put_u32(skb, TIPC_NLA_PROP_TOL, ntohl(lc->value));
 634         case TIPC_CMD_SET_LINK_WINDOW:
 635                 return nla_put_u32(skb, TIPC_NLA_PROP_WIN, ntohl(lc->value));
 636         }
 637
 638         return -EINVAL;
 639 }
 640
 641 static int tipc_nl_compat_media_set(struct sk_buff *skb,
 642                                     struct tipc_nl_compat_msg *msg)
 643 {
 644         struct nlattr *prop;
 645         struct nlattr *media;
 646         struct tipc_link_config *lc;
 647
 648         lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 649
 650         media = nla_nest_start(skb, TIPC_NLA_MEDIA);
 651         if (!media)
 652                 return -EMSGSIZE;
 653
 654         if (nla_put_string(skb, TIPC_NLA_MEDIA_NAME, lc->name))
 655                 return -EMSGSIZE;
 656
 657         prop = nla_nest_start(skb, TIPC_NLA_MEDIA_PROP);
 658         if (!prop)
 659                 return -EMSGSIZE;
 660
 661         __tipc_add_link_prop(skb, msg, lc);
 662         nla_nest_end(skb, prop);
 663         nla_nest_end(skb, media);
 664
 665         return 0;
 666 }
 667
 668 static int tipc_nl_compat_bearer_set(struct sk_buff *skb,
 669                                      struct tipc_nl_compat_msg *msg)
 670 {
 671         struct nlattr *prop;
 672         struct nlattr *bearer;
 673         struct tipc_link_config *lc;
 674
 675         lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 676
 677         bearer = nla_nest_start(skb, TIPC_NLA_BEARER);
 678         if (!bearer)
 679                 return -EMSGSIZE;
 680
 681         if (nla_put_string(skb, TIPC_NLA_BEARER_NAME, lc->name))
 682                 return -EMSGSIZE;
 683
 684         prop = nla_nest_start(skb, TIPC_NLA_BEARER_PROP);
 685         if (!prop)
 686                 return -EMSGSIZE;
 687
 688         __tipc_add_link_prop(skb, msg, lc);
 689         nla_nest_end(skb, prop);
 690         nla_nest_end(skb, bearer);
 691
 692         return 0;
 693 }
 694
 695 static int __tipc_nl_compat_link_set(struct sk_buff *skb,
 696                                      struct tipc_nl_compat_msg *msg)
 697 {
 698         struct nlattr *prop;
 699         struct nlattr *link;
 700         struct tipc_link_config *lc;
 701
 702         lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 703
 704         link = nla_nest_start(skb, TIPC_NLA_LINK);
 705         if (!link)
 706                 return -EMSGSIZE;
 707
 708         if (nla_put_string(skb, TIPC_NLA_LINK_NAME, lc->name))
 709                 return -EMSGSIZE;
 710
 711         prop = nla_nest_start(skb, TIPC_NLA_LINK_PROP);
 712         if (!prop)
 713                 return -EMSGSIZE;
 714
 715         __tipc_add_link_prop(skb, msg, lc);
 716         nla_nest_end(skb, prop);
 717         nla_nest_end(skb, link);
 718
 719         return 0;
 720 }
 721
 722 static int tipc_nl_compat_link_set(struct tipc_nl_compat_cmd_doit *cmd,
 723                                    struct sk_buff *skb,
 724                                    struct tipc_nl_compat_msg *msg)
 725 {
 726         struct tipc_link_config *lc;
 727         struct tipc_bearer *bearer;
 728         struct tipc_media *media;
 729
 730         lc = (struct tipc_link_config *)TLV_DATA(msg->req);
 731
 732         media = tipc_media_find(lc->name);
 733         if (media) {
 734                 cmd->doit = &__tipc_nl_media_set;
 735                 return tipc_nl_compat_media_set(skb, msg);
 736         }
 737
 738         bearer = tipc_bearer_find(msg->net, lc->name);
 739         if (bearer) {
 740                 cmd->doit = &__tipc_nl_bearer_set;
 741                 return tipc_nl_compat_bearer_set(skb, msg);
 742         }
 743
 744         return __tipc_nl_compat_link_set(skb, msg);
 745 }
 746
 747 static int tipc_nl_compat_link_reset_stats(struct tipc_nl_compat_cmd_doit *cmd,
 748                                            struct sk_buff *skb,
 749                                            struct tipc_nl_compat_msg *msg)
 750 {
 751         char *name;
 752         struct nlattr *link;
 753
 754         name = (char *)TLV_DATA(msg->req);
 755
 756         link = nla_nest_start(skb, TIPC_NLA_LINK);
 757         if (!link)
 758                 return -EMSGSIZE;
 759
 760         if (nla_put_string(skb, TIPC_NLA_LINK_NAME, name))
 761                 return -EMSGSIZE;
 762
 763         nla_nest_end(skb, link);
 764
 765         return 0;
 766 }
 767
 768 static int tipc_nl_compat_name_table_dump_header(struct tipc_nl_compat_msg *msg)
 769 {
 770         int i;
 771         u32 depth;
 772         struct tipc_name_table_query *ntq;
 773         static const char * const header[] = {
 774                 "Type       ",
 775                 "Lower      Upper      ",
 776                 "Port Identity              ",
 777                 "Publication Scope"
 778         };
 779
 780         ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 781
 782         depth = ntohl(ntq->depth);
 783
 784         if (depth > 4)
 785                 depth = 4;
 786         for (i = 0; i < depth; i++)
 787                 tipc_tlv_sprintf(msg->rep, header[i]);
 788         tipc_tlv_sprintf(msg->rep, "\n");
 789
 790         return 0;
 791 }
 792
 793 static int tipc_nl_compat_name_table_dump(struct tipc_nl_compat_msg *msg,
 794                                           struct nlattr **attrs)
 795 {
 796         char port_str[27];
 797         struct tipc_name_table_query *ntq;
 798         struct nlattr *nt[TIPC_NLA_NAME_TABLE_MAX + 1];
 799         struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 800         u32 node, depth, type, lowbound, upbound;
 801         static const char * const scope_str[] = {"", " zone", " cluster",
 802                                                  " node"};
 803         int err;
 804
 805         if (!attrs[TIPC_NLA_NAME_TABLE])
 806                 return -EINVAL;
 807
 808         err = nla_parse_nested(nt, TIPC_NLA_NAME_TABLE_MAX,
 809                                attrs[TIPC_NLA_NAME_TABLE], NULL, NULL);
 810         if (err)
 811                 return err;
 812
 813         if (!nt[TIPC_NLA_NAME_TABLE_PUBL])
 814                 return -EINVAL;
 815
 816         err = nla_parse_nested(publ, TIPC_NLA_PUBL_MAX,
 817                                nt[TIPC_NLA_NAME_TABLE_PUBL], NULL, NULL);
 818         if (err)
 819                 return err;
 820
 821         ntq = (struct tipc_name_table_query *)TLV_DATA(msg->req);
 822
 823         depth = ntohl(ntq->depth);
 824         type = ntohl(ntq->type);
 825         lowbound = ntohl(ntq->lowbound);
 826         upbound = ntohl(ntq->upbound);
 827
 828         if (!(depth & TIPC_NTQ_ALLTYPES) &&
 829             (type != nla_get_u32(publ[TIPC_NLA_PUBL_TYPE])))
 830                 return 0;
 831         if (lowbound && (lowbound > nla_get_u32(publ[TIPC_NLA_PUBL_UPPER])))
 832                 return 0;
 833         if (upbound && (upbound < nla_get_u32(publ[TIPC_NLA_PUBL_LOWER])))
 834                 return 0;
 835
 836         tipc_tlv_sprintf(msg->rep, "%-10u ",
 837                          nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]));
 838
 839         if (depth == 1)
 840                 goto out;
 841
 842         tipc_tlv_sprintf(msg->rep, "%-10u %-10u ",
 843                          nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]),
 844                          nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]));
 845
 846         if (depth == 2)
 847                 goto out;
 848
 849         node = nla_get_u32(publ[TIPC_NLA_PUBL_NODE]);
 850         sprintf(port_str, "<%u.%u.%u:%u>", tipc_zone(node), tipc_cluster(node),
 851                 tipc_node(node), nla_get_u32(publ[TIPC_NLA_PUBL_REF]));
 852         tipc_tlv_sprintf(msg->rep, "%-26s ", port_str);
 853
 854         if (depth == 3)
 855                 goto out;
 856
 857         tipc_tlv_sprintf(msg->rep, "%-10u %s",
 858                          nla_get_u32(publ[TIPC_NLA_PUBL_KEY]),
 859                          scope_str[nla_get_u32(publ[TIPC_NLA_PUBL_SCOPE])]);
 860 out:
 861         tipc_tlv_sprintf(msg->rep, "\n");
 862
 863         return 0;
 864 }
 865
 866 static int __tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg,
 867                                       struct nlattr **attrs)
 868 {
 869         u32 type, lower, upper;
 870         struct nlattr *publ[TIPC_NLA_PUBL_MAX + 1];
 871         int err;
 872
 873         if (!attrs[TIPC_NLA_PUBL])
 874                 return -EINVAL;
 875
 876         err = nla_parse_nested(publ, TIPC_NLA_PUBL_MAX, attrs[TIPC_NLA_PUBL],
 877                                NULL, NULL);
 878         if (err)
 879                 return err;
 880
 881         type = nla_get_u32(publ[TIPC_NLA_PUBL_TYPE]);
 882         lower = nla_get_u32(publ[TIPC_NLA_PUBL_LOWER]);
 883         upper = nla_get_u32(publ[TIPC_NLA_PUBL_UPPER]);
 884
 885         if (lower == upper)
 886                 tipc_tlv_sprintf(msg->rep, " {%u,%u}", type, lower);
 887         else
 888                 tipc_tlv_sprintf(msg->rep, " {%u,%u,%u}", type, lower, upper);
 889
 890         return 0;
 891 }
 892
 893 static int tipc_nl_compat_publ_dump(struct tipc_nl_compat_msg *msg, u32 sock)
 894 {
 895         int err;
 896         void *hdr;
 897         struct nlattr *nest;
 898         struct sk_buff *args;
 899         struct tipc_nl_compat_cmd_dump dump;
 900
 901         args = nlmsg_new(NLMSG_GOODSIZE, GFP_KERNEL);
 902         if (!args)
 903                 return -ENOMEM;
 904
 905         hdr = genlmsg_put(args, 0, 0, &tipc_genl_family, NLM_F_MULTI,
 906                           TIPC_NL_PUBL_GET);
 907         if (!hdr) {
 908                 kfree_skb(args);
 909                 return -EMSGSIZE;
 910         }
 911
 912         nest = nla_nest_start(args, TIPC_NLA_SOCK);
 913         if (!nest) {
 914                 kfree_skb(args);
 915                 return -EMSGSIZE;
 916         }
 917
 918         if (nla_put_u32(args, TIPC_NLA_SOCK_REF, sock)) {
 919                 kfree_skb(args);
 920                 return -EMSGSIZE;
 921         }
 922
 923         nla_nest_end(args, nest);
 924         genlmsg_end(args, hdr);
 925
 926         dump.dumpit = tipc_nl_publ_dump;
 927         dump.format = __tipc_nl_compat_publ_dump;
 928
 929         err = __tipc_nl_compat_dumpit(&dump, msg, args);
 930
 931         kfree_skb(args);
 932
 933         return err;
 934 }
 935
 936 static int tipc_nl_compat_sk_dump(struct tipc_nl_compat_msg *msg,
 937                                   struct nlattr **attrs)
 938 {
 939         int err;
 940         u32 sock_ref;
 941         struct nlattr *sock[TIPC_NLA_SOCK_MAX + 1];
 942
 943         if (!attrs[TIPC_NLA_SOCK])
 944                 return -EINVAL;
 945
 946         err = nla_parse_nested(sock, TIPC_NLA_SOCK_MAX, attrs[TIPC_NLA_SOCK],
 947                                NULL, NULL);
 948         if (err)
 949                 return err;
 950
 951         sock_ref = nla_get_u32(sock[TIPC_NLA_SOCK_REF]);
 952         tipc_tlv_sprintf(msg->rep, "%u:", sock_ref);
 953
 954         if (sock[TIPC_NLA_SOCK_CON]) {
 955                 u32 node;
 956                 struct nlattr *con[TIPC_NLA_CON_MAX + 1];
 957
 958                 err = nla_parse_nested(con, TIPC_NLA_CON_MAX,
 959                                        sock[TIPC_NLA_SOCK_CON], NULL, NULL);
 960
 961                 if (err)
 962                         return err;
 963
 964                 node = nla_get_u32(con[TIPC_NLA_CON_NODE]);
 965                 tipc_tlv_sprintf(msg->rep, "  connected to <%u.%u.%u:%u>",
 966                                  tipc_zone(node),
 967                                  tipc_cluster(node),
 968                                  tipc_node(node),
 969                                  nla_get_u32(con[TIPC_NLA_CON_SOCK]));
 970
 971                 if (con[TIPC_NLA_CON_FLAG])
 972                         tipc_tlv_sprintf(msg->rep, " via {%u,%u}\n",
 973                                          nla_get_u32(con[TIPC_NLA_CON_TYPE]),
 974                                          nla_get_u32(con[TIPC_NLA_CON_INST]));
 975                 else
 976                         tipc_tlv_sprintf(msg->rep, "\n");
 977         } else if (sock[TIPC_NLA_SOCK_HAS_PUBL]) {
 978                 tipc_tlv_sprintf(msg->rep, " bound to");
 979
 980                 err = tipc_nl_compat_publ_dump(msg, sock_ref);
 981                 if (err)
 982                         return err;
 983         }
 984         tipc_tlv_sprintf(msg->rep, "\n");
 985
 986         return 0;
 987 }
 988
 989 static int tipc_nl_compat_media_dump(struct tipc_nl_compat_msg *msg,
 990                                      struct nlattr **attrs)
 991 {
 992         struct nlattr *media[TIPC_NLA_MEDIA_MAX + 1];
 993         int err;
 994
 995         if (!attrs[TIPC_NLA_MEDIA])
 996                 return -EINVAL;
 997
 998         err = nla_parse_nested(media, TIPC_NLA_MEDIA_MAX,
 999                                attrs[TIPC_NLA_MEDIA], NULL, NULL);
1000         if (err)
1001                 return err;
1002
1003         return tipc_add_tlv(msg->rep, TIPC_TLV_MEDIA_NAME,
1004                             nla_data(media[TIPC_NLA_MEDIA_NAME]),
1005                             nla_len(media[TIPC_NLA_MEDIA_NAME]));
1006 }
1007
1008 static int tipc_nl_compat_node_dump(struct tipc_nl_compat_msg *msg,
1009                                     struct nlattr **attrs)
1010 {
1011         struct tipc_node_info node_info;
1012         struct nlattr *node[TIPC_NLA_NODE_MAX + 1];
1013         int err;
1014
1015         if (!attrs[TIPC_NLA_NODE])
1016                 return -EINVAL;
1017
1018         err = nla_parse_nested(node, TIPC_NLA_NODE_MAX, attrs[TIPC_NLA_NODE],
1019                                NULL, NULL);
1020         if (err)
1021                 return err;
1022
1023         node_info.addr = htonl(nla_get_u32(node[TIPC_NLA_NODE_ADDR]));
1024         node_info.up = htonl(nla_get_flag(node[TIPC_NLA_NODE_UP]));
1025
1026         return tipc_add_tlv(msg->rep, TIPC_TLV_NODE_INFO, &node_info,
1027                             sizeof(node_info));
1028 }
1029
1030 static int tipc_nl_compat_net_set(struct tipc_nl_compat_cmd_doit *cmd,
1031                                   struct sk_buff *skb,
1032                                   struct tipc_nl_compat_msg *msg)
1033 {
1034         u32 val;
1035         struct nlattr *net;
1036
1037         val = ntohl(*(__be32 *)TLV_DATA(msg->req));
1038
1039         net = nla_nest_start(skb, TIPC_NLA_NET);
1040         if (!net)
1041                 return -EMSGSIZE;
1042
1043         if (msg->cmd == TIPC_CMD_SET_NODE_ADDR) {
1044                 if (nla_put_u32(skb, TIPC_NLA_NET_ADDR, val))
1045                         return -EMSGSIZE;
1046         } else if (msg->cmd == TIPC_CMD_SET_NETID) {
1047                 if (nla_put_u32(skb, TIPC_NLA_NET_ID, val))
1048                         return -EMSGSIZE;
1049         }
1050         nla_nest_end(skb, net);
1051
1052         return 0;
1053 }
1054
1055 static int tipc_nl_compat_net_dump(struct tipc_nl_compat_msg *msg,
1056                                    struct nlattr **attrs)
1057 {
1058         __be32 id;
1059         struct nlattr *net[TIPC_NLA_NET_MAX + 1];
1060         int err;
1061
1062         if (!attrs[TIPC_NLA_NET])
1063                 return -EINVAL;
1064
1065         err = nla_parse_nested(net, TIPC_NLA_NET_MAX, attrs[TIPC_NLA_NET],
1066                                NULL, NULL);
1067         if (err)
1068                 return err;
1069
1070         id = htonl(nla_get_u32(net[TIPC_NLA_NET_ID]));
1071
1072         return tipc_add_tlv(msg->rep, TIPC_TLV_UNSIGNED, &id, sizeof(id));
1073 }
1074
1075 static int tipc_cmd_show_stats_compat(struct tipc_nl_compat_msg *msg)
1076 {
1077         msg->rep = tipc_tlv_alloc(ULTRA_STRING_MAX_LEN);
1078         if (!msg->rep)
1079                 return -ENOMEM;
1080
1081         tipc_tlv_init(msg->rep, TIPC_TLV_ULTRA_STRING);
1082         tipc_tlv_sprintf(msg->rep, "TIPC version " TIPC_MOD_VER "\n");
1083
1084         return 0;
1085 }
1086
1087 static int tipc_nl_compat_handle(struct tipc_nl_compat_msg *msg)
1088 {
1089         struct tipc_nl_compat_cmd_dump dump;
1090         struct tipc_nl_compat_cmd_doit doit;
1091
1092         memset(&dump, 0, sizeof(dump));
1093         memset(&doit, 0, sizeof(doit));
1094
1095         switch (msg->cmd) {
1096         case TIPC_CMD_NOOP:
1097                 msg->rep = tipc_tlv_alloc(0);
1098                 if (!msg->rep)
1099                         return -ENOMEM;
1100                 return 0;
1101         case TIPC_CMD_GET_BEARER_NAMES:
1102                 msg->rep_size = MAX_BEARERS * TLV_SPACE(TIPC_MAX_BEARER_NAME);
1103                 dump.dumpit = tipc_nl_bearer_dump;
1104                 dump.format = tipc_nl_compat_bearer_dump;
1105                 return tipc_nl_compat_dumpit(&dump, msg);
1106         case TIPC_CMD_ENABLE_BEARER:
1107                 msg->req_type = TIPC_TLV_BEARER_CONFIG;
1108                 doit.doit = __tipc_nl_bearer_enable;
1109                 doit.transcode = tipc_nl_compat_bearer_enable;
1110                 return tipc_nl_compat_doit(&doit, msg);
1111         case TIPC_CMD_DISABLE_BEARER:
1112                 msg->req_type = TIPC_TLV_BEARER_NAME;
1113                 doit.doit = __tipc_nl_bearer_disable;
1114                 doit.transcode = tipc_nl_compat_bearer_disable;
1115                 return tipc_nl_compat_doit(&doit, msg);
1116         case TIPC_CMD_SHOW_LINK_STATS:
1117                 msg->req_type = TIPC_TLV_LINK_NAME;
1118                 msg->rep_size = ULTRA_STRING_MAX_LEN;
1119                 msg->rep_type = TIPC_TLV_ULTRA_STRING;
1120                 dump.dumpit = tipc_nl_node_dump_link;
1121                 dump.format = tipc_nl_compat_link_stat_dump;
1122                 return tipc_nl_compat_dumpit(&dump, msg);
1123         case TIPC_CMD_GET_LINKS:
1124                 msg->req_type = TIPC_TLV_NET_ADDR;
1125                 msg->rep_size = ULTRA_STRING_MAX_LEN;
1126                 dump.dumpit = tipc_nl_node_dump_link;
1127                 dump.format = tipc_nl_compat_link_dump;
1128                 return tipc_nl_compat_dumpit(&dump, msg);
1129         case TIPC_CMD_SET_LINK_TOL:
1130         case TIPC_CMD_SET_LINK_PRI:
1131         case TIPC_CMD_SET_LINK_WINDOW:
1132                 msg->req_type =  TIPC_TLV_LINK_CONFIG;
1133                 doit.doit = tipc_nl_node_set_link;
1134                 doit.transcode = tipc_nl_compat_link_set;
1135                 return tipc_nl_compat_doit(&doit, msg);
1136         case TIPC_CMD_RESET_LINK_STATS:
1137                 msg->req_type = TIPC_TLV_LINK_NAME;
1138                 doit.doit = tipc_nl_node_reset_link_stats;
1139                 doit.transcode = tipc_nl_compat_link_reset_stats;
1140                 return tipc_nl_compat_doit(&doit, msg);
1141         case TIPC_CMD_SHOW_NAME_TABLE:
1142                 msg->req_type = TIPC_TLV_NAME_TBL_QUERY;
1143                 msg->rep_size = ULTRA_STRING_MAX_LEN;
1144                 msg->rep_type = TIPC_TLV_ULTRA_STRING;
1145                 dump.header = tipc_nl_compat_name_table_dump_header;
1146                 dump.dumpit = tipc_nl_name_table_dump;
1147                 dump.format = tipc_nl_compat_name_table_dump;
1148                 return tipc_nl_compat_dumpit(&dump, msg);
1149         case TIPC_CMD_SHOW_PORTS:
1150                 msg->rep_size = ULTRA_STRING_MAX_LEN;
1151                 msg->rep_type = TIPC_TLV_ULTRA_STRING;
1152                 dump.dumpit = tipc_nl_sk_dump;
1153                 dump.format = tipc_nl_compat_sk_dump;
1154                 return tipc_nl_compat_dumpit(&dump, msg);
1155         case TIPC_CMD_GET_MEDIA_NAMES:
1156                 msg->rep_size = MAX_MEDIA * TLV_SPACE(TIPC_MAX_MEDIA_NAME);
1157                 dump.dumpit = tipc_nl_media_dump;
1158                 dump.format = tipc_nl_compat_media_dump;
1159                 return tipc_nl_compat_dumpit(&dump, msg);
1160         case TIPC_CMD_GET_NODES:
1161                 msg->rep_size = ULTRA_STRING_MAX_LEN;
1162                 dump.dumpit = tipc_nl_node_dump;
1163                 dump.format = tipc_nl_compat_node_dump;
1164                 return tipc_nl_compat_dumpit(&dump, msg);
1165         case TIPC_CMD_SET_NODE_ADDR:
1166                 msg->req_type = TIPC_TLV_NET_ADDR;
1167                 doit.doit = __tipc_nl_net_set;
1168                 doit.transcode = tipc_nl_compat_net_set;
1169                 return tipc_nl_compat_doit(&doit, msg);
1170         case TIPC_CMD_SET_NETID:
1171                 msg->req_type = TIPC_TLV_UNSIGNED;
1172                 doit.doit = __tipc_nl_net_set;
1173                 doit.transcode = tipc_nl_compat_net_set;
1174                 return tipc_nl_compat_doit(&doit, msg);
1175         case TIPC_CMD_GET_NETID:
1176                 msg->rep_size = sizeof(u32);
1177                 dump.dumpit = tipc_nl_net_dump;
1178                 dump.format = tipc_nl_compat_net_dump;
1179                 return tipc_nl_compat_dumpit(&dump, msg);
1180         case TIPC_CMD_SHOW_STATS:
1181                 return tipc_cmd_show_stats_compat(msg);
1182         }
1183
1184         return -EOPNOTSUPP;
1185 }
1186
1187 static int tipc_nl_compat_recv(struct sk_buff *skb, struct genl_info *info)
1188 {
1189         int err;
1190         int len;
1191         struct tipc_nl_compat_msg msg;
1192         struct nlmsghdr *req_nlh;
1193         struct nlmsghdr *rep_nlh;
1194         struct tipc_genlmsghdr *req_userhdr = info->userhdr;
1195
1196         memset(&msg, 0, sizeof(msg));
1197
1198         req_nlh = (struct nlmsghdr *)skb->data;
1199         msg.req = nlmsg_data(req_nlh) + GENL_HDRLEN + TIPC_GENL_HDRLEN;
1200         msg.cmd = req_userhdr->cmd;
1201         msg.net = genl_info_net(info);
1202         msg.dst_sk = skb->sk;
1203
1204         if ((msg.cmd & 0xC000) && (!netlink_net_capable(skb, CAP_NET_ADMIN))) {
1205                 msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_NET_ADMIN);
1206                 err = -EACCES;
1207                 goto send;
1208         }
1209
1210         len = nlmsg_attrlen(req_nlh, GENL_HDRLEN + TIPC_GENL_HDRLEN);
1211         if (len && !TLV_OK(msg.req, len)) {
1212                 msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1213                 err = -EOPNOTSUPP;
1214                 goto send;
1215         }
1216
1217         err = tipc_nl_compat_handle(&msg);
1218         if ((err == -EOPNOTSUPP) || (err == -EPERM))
1219                 msg.rep = tipc_get_err_tlv(TIPC_CFG_NOT_SUPPORTED);
1220         else if (err == -EINVAL)
1221                 msg.rep = tipc_get_err_tlv(TIPC_CFG_TLV_ERROR);
1222 send:
1223         if (!msg.rep)
1224                 return err;
1225
1226         len = nlmsg_total_size(GENL_HDRLEN + TIPC_GENL_HDRLEN);
1227         skb_push(msg.rep, len);
1228         rep_nlh = nlmsg_hdr(msg.rep);
1229         memcpy(rep_nlh, info->nlhdr, len);
1230         rep_nlh->nlmsg_len = msg.rep->len;
1231         genlmsg_unicast(msg.net, msg.rep, NETLINK_CB(skb).portid);
1232
1233         return err;
1234 }
1235
1236 static const struct genl_ops tipc_genl_compat_ops[] = {
1237         {
1238                 .cmd            = TIPC_GENL_CMD,
1239                 .doit           = tipc_nl_compat_recv,
1240         },
1241 };
1242
1243 static struct genl_family tipc_genl_compat_family __ro_after_init = {
1244         .name           = TIPC_GENL_NAME,
1245         .version        = TIPC_GENL_VERSION,
1246         .hdrsize        = TIPC_GENL_HDRLEN,
1247         .maxattr        = 0,
1248         .netnsok        = true,
1249         .module         = THIS_MODULE,
1250         .ops            = tipc_genl_compat_ops,
1251         .n_ops          = ARRAY_SIZE(tipc_genl_compat_ops),
1252 };
1253
1254 int __init tipc_netlink_compat_start(void)
1255 {
1256         int res;
1257
1258         res = genl_register_family(&tipc_genl_compat_family);
1259         if (res) {
1260                 pr_err("Failed to register legacy compat interface\n");
1261                 return res;
1262         }
1263
1264         return 0;
1265 }
1266
1267 void tipc_netlink_compat_stop(void)
1268 {
1269         genl_unregister_family(&tipc_genl_compat_family);
1270 }