4 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2 only,
8 * as published by the Free Software Foundation.
10 * This program is distributed in the hope that it will be useful, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * General Public License version 2 for more details (a copy is included
14 * in the LICENSE file that accompanied this code).
16 * You should have received a copy of the GNU General Public License
17 * version 2 along with this program; If not, see
18 * http://www.gnu.org/licenses/gpl-2.0.html
23 * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
24 * Use is subject to license terms.
26 * Copyright (c) 2012, 2017, Intel Corporation.
29 * This file is part of Lustre, http://www.lustre.org/
32 #define DEBUG_SUBSYSTEM S_LNET
34 #include <linux/ctype.h>
35 #include <linux/inetdevice.h>
36 #include <linux/nsproxy.h>
37 #include <linux/ethtool.h>
38 #include <net/net_namespace.h>
39 #include <lnet/lib-lnet.h>
40 #include <net/addrconf.h>
42 /* tmp struct for parsing routes */
43 struct lnet_text_buf {
44 struct list_head ltb_list; /* stash on lists */
45 int ltb_size; /* allocated size */
46 char ltb_text[0]; /* text buffer */
49 static int lnet_tbnob = 0; /* track text buf allocation */
50 #define LNET_MAX_TEXTBUF_NOB (64<<10) /* bound allocation */
51 #define LNET_SINGLE_TEXTBUF_NOB (4<<10)
53 #define SPACESTR " \t\v\r\n"
54 #define DELIMITERS ":()[]"
57 lnet_syntax(const char *name, const char *str, int offset, int width)
59 static char dots[LNET_SINGLE_TEXTBUF_NOB];
60 static char dashes[LNET_SINGLE_TEXTBUF_NOB];
62 memset(dots, '.', sizeof(dots));
63 dots[sizeof(dots)-1] = 0;
64 memset(dashes, '-', sizeof(dashes));
65 dashes[sizeof(dashes)-1] = 0;
67 LCONSOLE_ERROR_MSG(0x10f, "Error parsing '%s=\"%s\"'\n", name, str);
68 LCONSOLE_ERROR_MSG(0x110, "here...........%.*s..%.*s|%.*s|\n",
69 (int)strlen(name), dots, offset, dots,
70 (width < 1) ? 0 : width - 1, dashes);
87 lnet_net_unique(__u32 net_id, struct list_head *netlist,
88 struct lnet_net **net)
90 struct lnet_net *net_l;
95 list_for_each_entry(net_l, netlist, net_list) {
96 if (net_l->net_id == net_id) {
106 /* check that the NI is unique within the list of NIs already added to
109 lnet_ni_unique_net(struct list_head *nilist, char *iface)
111 struct list_head *tmp;
114 list_for_each(tmp, nilist) {
115 ni = list_entry(tmp, struct lnet_ni, ni_netlist);
117 if (ni->ni_interface != NULL &&
118 strncmp(ni->ni_interface, iface, strlen(iface)) == 0)
125 in_array(__u32 *array, __u32 size, __u32 value)
129 for (i = 0; i < size; i++) {
130 if (array[i] == value)
138 lnet_net_append_cpts(__u32 *cpts, __u32 ncpts, struct lnet_net *net)
140 __u32 *added_cpts = NULL;
141 int i, j = 0, rc = 0;
144 * no need to go futher since a subset of the NIs already exist on
147 if (net->net_ncpts == LNET_CPT_NUMBER)
151 /* there is an NI which will exist on all CPTs */
152 if (net->net_cpts != NULL)
153 CFS_FREE_PTR_ARRAY(net->net_cpts, net->net_ncpts);
154 net->net_cpts = NULL;
155 net->net_ncpts = LNET_CPT_NUMBER;
159 if (net->net_cpts == NULL) {
160 CFS_ALLOC_PTR_ARRAY(net->net_cpts, ncpts);
161 if (net->net_cpts == NULL)
163 memcpy(net->net_cpts, cpts, ncpts * sizeof(*net->net_cpts));
164 net->net_ncpts = ncpts;
168 CFS_ALLOC_PTR_ARRAY(added_cpts, LNET_CPT_NUMBER);
169 if (added_cpts == NULL)
172 for (i = 0; i < ncpts; i++) {
173 if (!in_array(net->net_cpts, net->net_ncpts, cpts[i])) {
174 added_cpts[j] = cpts[i];
179 /* append the new cpts if any to the list of cpts in the net */
181 __u32 *array = NULL, *loc;
182 __u32 total_entries = j + net->net_ncpts;
184 CFS_ALLOC_PTR_ARRAY(array, total_entries);
190 memcpy(array, net->net_cpts,
191 net->net_ncpts * sizeof(*net->net_cpts));
192 loc = array + net->net_ncpts;
193 memcpy(loc, added_cpts, j * sizeof(*net->net_cpts));
195 CFS_FREE_PTR_ARRAY(net->net_cpts, net->net_ncpts);
196 net->net_ncpts = total_entries;
197 net->net_cpts = array;
201 CFS_FREE_PTR_ARRAY(added_cpts, LNET_CPT_NUMBER);
207 lnet_net_remove_cpts(__u32 *cpts, __u32 ncpts, struct lnet_net *net)
213 * Operation Assumption:
214 * This function is called after an NI has been removed from
217 * if we're removing an NI which exists on all CPTs then
218 * we have to check if any of the other NIs on this net also
219 * exists on all CPTs. If none, then we need to build our Net CPT
220 * list based on the remaining NIs.
222 * If the NI being removed exist on a subset of the CPTs then we
223 * alo rebuild the Net CPT list based on the remaining NIs, which
224 * should resutl in the expected Net CPT list.
228 * sometimes this function can be called due to some failure
229 * creating an NI, before any of the cpts are allocated, so check
230 * for that case and don't do anything
235 if (ncpts == LNET_CPT_NUMBER) {
237 * first iteration through the NI list in the net to see
238 * if any of the NIs exist on all the CPTs. If one is
239 * found then our job is done.
241 list_for_each_entry(ni, &net->net_ni_list, ni_netlist) {
242 if (ni->ni_ncpts == LNET_CPT_NUMBER)
248 * Rebuild the Net CPT list again, thereby only including only the
249 * CPTs which the remaining NIs are associated with.
251 if (net->net_cpts != NULL) {
252 CFS_FREE_PTR_ARRAY(net->net_cpts, net->net_ncpts);
253 net->net_cpts = NULL;
256 list_for_each_entry(ni, &net->net_ni_list, ni_netlist) {
257 rc = lnet_net_append_cpts(ni->ni_cpts, ni->ni_ncpts,
260 CERROR("Out of Memory\n");
262 * do our best to keep on going. Delete
263 * the net cpts and set it to NULL. This
264 * way we can keep on going but less
265 * efficiently, since memory accesses might be
268 if (net->net_cpts != NULL) {
269 CFS_FREE_PTR_ARRAY(net->net_cpts,
271 net->net_cpts = NULL;
272 net->net_ncpts = LNET_CPT_NUMBER;
280 lnet_ni_free(struct lnet_ni *ni)
282 lnet_net_remove_cpts(ni->ni_cpts, ni->ni_ncpts, ni->ni_net);
284 if (ni->ni_refs != NULL)
285 cfs_percpt_free(ni->ni_refs);
287 if (ni->ni_tx_queues != NULL)
288 cfs_percpt_free(ni->ni_tx_queues);
290 if (ni->ni_cpts != NULL)
291 cfs_expr_list_values_free(ni->ni_cpts, ni->ni_ncpts);
293 if (ni->ni_interface != NULL) {
294 LIBCFS_FREE(ni->ni_interface,
295 strlen(ni->ni_interface) + 1);
298 /* release reference to net namespace */
299 if (ni->ni_net_ns != NULL)
300 put_net(ni->ni_net_ns);
302 LIBCFS_FREE(ni, sizeof(*ni));
306 lnet_net_free(struct lnet_net *net)
308 struct list_head *tmp, *tmp2;
311 LASSERT(list_empty(&net->net_ni_zombie));
314 * delete any nis that haven't been added yet. This could happen
315 * if there is a failure on net startup
317 list_for_each_safe(tmp, tmp2, &net->net_ni_added) {
318 ni = list_entry(tmp, struct lnet_ni, ni_netlist);
319 list_del_init(&ni->ni_netlist);
323 /* delete any nis which have been started. */
324 list_for_each_safe(tmp, tmp2, &net->net_ni_list) {
325 ni = list_entry(tmp, struct lnet_ni, ni_netlist);
326 list_del_init(&ni->ni_netlist);
330 if (net->net_cpts != NULL) {
331 CFS_FREE_PTR_ARRAY(net->net_cpts, net->net_ncpts);
332 net->net_ncpts = LNET_CPT_NUMBER;
333 net->net_cpts = NULL;
336 LIBCFS_FREE(net, sizeof(*net));
340 lnet_net_alloc(__u32 net_id, struct list_head *net_list)
342 struct lnet_net *net;
344 if (!lnet_net_unique(net_id, net_list, &net)) {
345 CDEBUG(D_NET, "Returning duplicate net %p %s\n", net,
346 libcfs_net2str(net->net_id));
350 LIBCFS_ALLOC(net, sizeof(*net));
352 CERROR("Out of memory creating network %s\n",
353 libcfs_net2str(net_id));
357 INIT_LIST_HEAD(&net->net_list);
358 INIT_LIST_HEAD(&net->net_ni_list);
359 INIT_LIST_HEAD(&net->net_ni_added);
360 INIT_LIST_HEAD(&net->net_ni_zombie);
361 INIT_LIST_HEAD(&net->net_rtr_pref_nids);
362 spin_lock_init(&net->net_lock);
364 net->net_id = net_id;
365 net->net_last_alive = ktime_get_seconds();
367 net->net_sel_priority = LNET_MAX_SELECTION_PRIORITY;
369 /* initialize global paramters to undefiend */
370 net->net_tunables.lct_peer_timeout = -1;
371 net->net_tunables.lct_max_tx_credits = -1;
372 net->net_tunables.lct_peer_tx_credits = -1;
373 net->net_tunables.lct_peer_rtr_credits = -1;
376 list_add_tail(&net->net_list, net_list);
381 int lnet_ni_add_interface(struct lnet_ni *ni, char *iface)
383 size_t iface_len = strlen(iface) + 1;
388 if (ni->ni_interface != NULL) {
389 LCONSOLE_ERROR_MSG(0x115, "%s: interface %s already set for net %s: rc = %d\n",
390 iface, ni->ni_interface,
391 libcfs_net2str(LNET_NID_NET(&ni->ni_nid)),
396 /* Allocate memory for the interface, so the code parsing input into
397 * tokens and adding interfaces can free the input safely.
398 * ni->ni_interface is freed in lnet_ni_free().
400 LIBCFS_ALLOC(ni->ni_interface, iface_len);
402 if (ni->ni_interface == NULL) {
403 CERROR("%s: cannot allocate net interface name: rc = %d\n",
408 strscpy(ni->ni_interface, iface, iface_len);
412 EXPORT_SYMBOL(lnet_ni_add_interface);
414 static struct lnet_ni *
415 lnet_ni_alloc_common(struct lnet_net *net, char *iface)
417 struct lnet_tx_queue *tq;
422 /* make sure that this NI is unique in the net it's
424 if (!lnet_ni_unique_net(&net->net_ni_added, iface))
427 LIBCFS_ALLOC(ni, sizeof(*ni));
429 CERROR("Out of memory creating network interface %s%s\n",
430 libcfs_net2str(net->net_id),
431 (iface != NULL) ? iface : "");
435 spin_lock_init(&ni->ni_lock);
436 INIT_LIST_HEAD(&ni->ni_netlist);
437 INIT_LIST_HEAD(&ni->ni_recovery);
438 LNetInvalidateMDHandle(&ni->ni_ping_mdh);
439 ni->ni_refs = cfs_percpt_alloc(lnet_cpt_table(),
440 sizeof(*ni->ni_refs[0]));
441 if (ni->ni_refs == NULL)
444 ni->ni_tx_queues = cfs_percpt_alloc(lnet_cpt_table(),
445 sizeof(*ni->ni_tx_queues[0]));
446 if (ni->ni_tx_queues == NULL)
449 cfs_percpt_for_each(tq, i, ni->ni_tx_queues)
450 INIT_LIST_HEAD(&tq->tq_delayed);
453 /* LND will fill in the address part of the NID */
454 ni->ni_nid.nid_type = LNET_NETTYP(net->net_id);
455 ni->ni_nid.nid_num = cpu_to_be16(LNET_NETNUM(net->net_id));
457 /* Store net namespace in which current ni is being created */
458 if (current->nsproxy && current->nsproxy->net_ns)
459 ni->ni_net_ns = get_net(current->nsproxy->net_ns);
461 ni->ni_net_ns = get_net(&init_net);
463 ni->ni_state = LNET_NI_STATE_INIT;
464 ni->ni_sel_priority = LNET_MAX_SELECTION_PRIORITY;
465 list_add_tail(&ni->ni_netlist, &net->net_ni_added);
468 * if an interface name is provided then make sure to add in that
469 * interface name in NI
472 if (lnet_ni_add_interface(ni, iface) != 0)
481 /* allocate and add to the provided network */
483 lnet_ni_alloc(struct lnet_net *net, struct cfs_expr_list *el, char *iface)
488 ni = lnet_ni_alloc_common(net, iface);
494 ni->ni_ncpts = LNET_CPT_NUMBER;
496 rc = cfs_expr_list_values(el, LNET_CPT_NUMBER, &ni->ni_cpts);
498 CERROR("Failed to set CPTs for NI %s(%s): %d\n",
499 libcfs_net2str(net->net_id),
500 (iface != NULL) ? iface : "", rc);
504 LASSERT(rc <= LNET_CPT_NUMBER);
505 if (rc == LNET_CPT_NUMBER) {
506 CFS_FREE_PTR_ARRAY(ni->ni_cpts, rc);
513 rc = lnet_net_append_cpts(ni->ni_cpts, ni->ni_ncpts, net);
524 lnet_ni_alloc_w_cpt_array(struct lnet_net *net, __u32 *cpts, __u32 ncpts,
530 ni = lnet_ni_alloc_common(net, iface);
536 ni->ni_ncpts = LNET_CPT_NUMBER;
538 size_t array_size = ncpts * sizeof(ni->ni_cpts[0]);
540 CFS_ALLOC_PTR_ARRAY(ni->ni_cpts, ncpts);
541 if (ni->ni_cpts == NULL)
543 memcpy(ni->ni_cpts, cpts, array_size);
544 ni->ni_ncpts = ncpts;
547 rc = lnet_net_append_cpts(ni->ni_cpts, ni->ni_ncpts, net);
558 * Parse the networks string and create the matching set of NIs on the
562 lnet_parse_networks(struct list_head *netlist, const char *networks)
564 struct cfs_expr_list *net_el = NULL;
565 struct cfs_expr_list *ni_el = NULL;
569 struct lnet_net *net;
570 struct lnet_ni *ni = NULL;
574 if (networks == NULL) {
575 CERROR("networks string is undefined\n");
579 if (strlen(networks) > LNET_SINGLE_TEXTBUF_NOB) {
580 /* _WAY_ conservative */
581 LCONSOLE_ERROR_MSG(0x112, "Can't parse networks: string too "
586 tokensize = strlen(networks) + 1;
588 LIBCFS_ALLOC(tokens, tokensize);
589 if (tokens == NULL) {
590 CERROR("Can't allocate net tokens\n");
594 memcpy(tokens, networks, tokensize);
600 * NB we don't check interface conflicts here; it's the LNDs
601 * responsibility (if it cares at all)
610 * Parse a network string into its components.
612 * <name>{"("...")"}{"["<el>"]"}
615 /* Network name (mandatory) */
616 while (isspace(*str))
621 str += strcspn(str, SPACESTR ":()[],");
622 while (isspace(*str))
625 /* Interface list (optional) */
629 str += strcspn(str, ")");
636 } while (isspace(*str));
641 /* CPT expression (optional) */
644 str += strcspn(str, "]");
649 rc = cfs_expr_list_parse(elstr, str - elstr + 1,
650 0, LNET_CPT_NUMBER - 1,
659 } while (isspace(*str));
663 if (*str && (strchr(DELIMITERS, *str) != NULL))
666 /* go to the next net if it exits */
667 str += strcspn(str, ",");
672 * At this point the name is properly terminated.
674 net_id = libcfs_str2net(name);
675 if (net_id == LNET_NET_ANY) {
676 LCONSOLE_ERROR_MSG(0x113,
677 "Unrecognised network type\n");
682 if (LNET_NETTYP(net_id) == LOLND) {
683 /* Loopback is implicit, and there can be only one. */
685 cfs_expr_list_free(net_el);
688 /* Should we error out instead? */
693 * All network paramaters are now known.
697 /* always allocate a net, since we will eventually add an
698 * interface to it, or we will fail, in which case we'll
700 net = lnet_net_alloc(net_id, netlist);
701 if (IS_ERR_OR_NULL(net))
706 * No interface list was specified, allocate a
707 * ni using the defaults.
709 ni = lnet_ni_alloc(net, net_el, NULL);
710 if (IS_ERR_OR_NULL(ni))
715 cfs_expr_list_free(net_el);
725 /* Interface name (mandatory) */
726 while (isspace(*nistr))
729 nistr += strcspn(nistr, SPACESTR "[],");
730 while (isspace(*nistr))
733 /* CPT expression (optional) */
736 nistr += strcspn(nistr, "]");
741 rc = cfs_expr_list_parse(elstr,
743 0, LNET_CPT_NUMBER - 1,
752 } while (isspace(*nistr));
758 * End of single interface specificaton,
759 * advance to the start of the next one, if
765 } while (isspace(*nistr));
776 * At this point the name is properly terminated.
783 ni = lnet_ni_alloc(net, ni_el, name);
784 if (IS_ERR_OR_NULL(ni))
788 if (ni_el != net_el) {
789 cfs_expr_list_free(ni_el);
796 cfs_expr_list_free(net_el);
801 LIBCFS_FREE(tokens, tokensize);
805 lnet_syntax("networks", networks, (int)(str - tokens), strlen(str));
807 /* free the net list and all the nis on each net */
808 while ((net = list_first_entry_or_null(netlist,
810 net_list)) != NULL) {
811 list_del_init(&net->net_list);
815 if (ni_el && ni_el != net_el)
816 cfs_expr_list_free(ni_el);
818 cfs_expr_list_free(net_el);
820 LIBCFS_FREE(tokens, tokensize);
825 static struct lnet_text_buf *lnet_new_text_buf(int str_len)
827 struct lnet_text_buf *ltb;
830 /* NB allocate space for the terminating 0 */
831 nob = offsetof(struct lnet_text_buf, ltb_text[str_len + 1]);
832 if (nob > LNET_SINGLE_TEXTBUF_NOB) {
833 /* _way_ conservative for "route net gateway..." */
834 CERROR("text buffer too big\n");
838 if (lnet_tbnob + nob > LNET_MAX_TEXTBUF_NOB) {
839 CERROR("Too many text buffers\n");
843 LIBCFS_ALLOC(ltb, nob);
848 ltb->ltb_text[0] = 0;
854 lnet_free_text_buf(struct lnet_text_buf *ltb)
856 lnet_tbnob -= ltb->ltb_size;
857 LIBCFS_FREE(ltb, ltb->ltb_size);
861 lnet_free_text_bufs(struct list_head *tbs)
863 struct lnet_text_buf *ltb;
865 while ((ltb = list_first_entry_or_null(tbs, struct lnet_text_buf,
866 ltb_list)) != NULL) {
867 list_del(<b->ltb_list);
868 lnet_free_text_buf(ltb);
873 lnet_str2tbs_sep(struct list_head *tbs, const char *str)
879 struct lnet_text_buf *ltb;
881 /* Split 'str' into separate commands */
883 /* skip leading whitespace */
884 while (isspace(*str))
887 /* scan for separator or comment */
888 for (sep = str; *sep != 0; sep++)
889 if (lnet_issep(*sep) || *sep == '#')
892 nob = (int)(sep - str);
894 ltb = lnet_new_text_buf(nob);
896 lnet_free_text_bufs(&pending);
900 for (i = 0; i < nob; i++)
902 ltb->ltb_text[i] = ' ';
904 ltb->ltb_text[i] = str[i];
906 ltb->ltb_text[nob] = 0;
908 list_add_tail(<b->ltb_list, &pending);
912 /* scan for separator */
915 } while (*sep != 0 && !lnet_issep(*sep));
924 list_splice(&pending, tbs->prev);
929 lnet_expand1tb(struct list_head *list,
930 char *str, char *sep1, char *sep2,
931 char *item, int itemlen)
933 int len1 = (int)(sep1 - str);
934 int len2 = strlen(sep2 + 1);
935 struct lnet_text_buf *ltb;
937 LASSERT (*sep1 == '[');
938 LASSERT (*sep2 == ']');
940 ltb = lnet_new_text_buf(len1 + itemlen + len2);
944 memcpy(ltb->ltb_text, str, len1);
945 memcpy(<b->ltb_text[len1], item, itemlen);
946 memcpy(<b->ltb_text[len1+itemlen], sep2 + 1, len2);
947 ltb->ltb_text[len1 + itemlen + len2] = 0;
949 list_add_tail(<b->ltb_list, list);
954 lnet_str2tbs_expand(struct list_head *tbs, char *str)
969 sep = strchr(str, '[');
970 if (sep == NULL) /* nothing to expand */
973 sep2 = strchr(sep, ']');
977 for (parsed = sep; parsed < sep2; parsed = enditem) {
980 while (enditem < sep2 && *enditem != ',')
983 if (enditem == parsed) /* no empty items */
986 if (sscanf(parsed, "%d-%d/%d%n", &lo, &hi, &stride, &scanned) < 3) {
988 if (sscanf(parsed, "%d-%d%n", &lo, &hi, &scanned) < 2) {
990 /* simple string enumeration */
991 if (lnet_expand1tb(&pending, str, sep, sep2,
992 parsed, (int)(enditem - parsed)) != 0)
1001 /* range expansion */
1003 if (enditem != parsed + scanned) /* no trailing junk */
1006 if (hi < 0 || lo < 0 || stride < 0 || hi < lo ||
1007 (hi - lo) % stride != 0)
1010 for (i = lo; i <= hi; i += stride) {
1012 snprintf(num, sizeof(num), "%d", i);
1014 if (nob + 1 == sizeof(num))
1017 if (lnet_expand1tb(&pending, str, sep, sep2,
1023 list_splice(&pending, tbs->prev);
1027 lnet_free_text_bufs(&pending);
1032 lnet_parse_hops (char *str, unsigned int *hops)
1034 int len = strlen(str);
1037 return (sscanf(str, "%u%n", hops, &nob) >= 1 &&
1039 *hops > 0 && *hops < 256);
1042 #define LNET_PRIORITY_SEPARATOR (':')
1045 lnet_parse_priority(char *str, unsigned int *priority, char **token)
1051 sep = strchr(str, LNET_PRIORITY_SEPARATOR);
1056 len = strlen(sep + 1);
1058 if ((sscanf((sep+1), "%u%n", priority, &nob) < 1) || (len != nob)) {
1059 /* Update the caller's token pointer so it treats the found
1060 priority as the token to report in the error message. */
1061 *token += sep - str + 1;
1065 CDEBUG(D_NET, "gateway %s, priority %d, nob %d\n", str, *priority, nob);
1068 * Change priority separator to \0 to be able to parse NID
1075 lnet_parse_route(char *str, int *im_a_router)
1077 /* static scratch buffer OK (single threaded) */
1078 static char cmd[LNET_SINGLE_TEXTBUF_NOB];
1081 LIST_HEAD(gateways);
1082 struct list_head *tmp1;
1083 struct list_head *tmp2;
1085 struct lnet_nid nid;
1086 struct lnet_text_buf *ltb = NULL;
1087 struct lnet_text_buf *ltb1, *ltb2;
1095 unsigned int priority = 0;
1097 /* save a copy of the string for error messages */
1098 strncpy(cmd, str, sizeof(cmd));
1099 cmd[sizeof(cmd) - 1] = '\0';
1103 /* scan for token start */
1104 while (isspace(*sep))
1107 if (ntokens < (got_hops ? 3 : 2))
1115 /* scan for token end */
1116 while (*sep != 0 && !isspace(*sep))
1122 tmp2 = &nets; /* expanding nets */
1123 } else if (ntokens == 2 &&
1124 lnet_parse_hops(token, &hops)) {
1125 got_hops = 1; /* got a hop count */
1128 tmp2 = &gateways; /* expanding gateways */
1131 ltb = lnet_new_text_buf(strlen(token));
1135 strcpy(ltb->ltb_text, token);
1136 tmp1 = <b->ltb_list;
1137 list_add_tail(tmp1, tmp2);
1139 while (tmp1 != tmp2) {
1140 ltb = list_entry(tmp1, struct lnet_text_buf, ltb_list);
1142 rc = lnet_str2tbs_expand(tmp1->next, ltb->ltb_text);
1148 if (rc > 0) { /* expanded! */
1149 list_del(<b->ltb_list);
1150 lnet_free_text_buf(ltb);
1155 net = libcfs_str2net(ltb->ltb_text);
1156 if (net == LNET_NET_ANY ||
1157 LNET_NETTYP(net) == LOLND)
1160 rc = lnet_parse_priority(ltb->ltb_text,
1165 if (libcfs_strnid(&nid, ltb->ltb_text) != 0 ||
1172 /* if there are no hops set then we want to flag this value as
1173 * unset since hops is an optional parameter */
1175 hops = LNET_UNDEFINED_HOPS;
1177 LASSERT(!list_empty(&nets));
1178 LASSERT(!list_empty(&gateways));
1180 list_for_each_entry(ltb1, &nets, ltb_list) {
1181 net = libcfs_str2net(ltb1->ltb_text);
1182 LASSERT(net != LNET_NET_ANY);
1184 list_for_each_entry(ltb2, &gateways, ltb_list) {
1185 LASSERT(libcfs_strnid(&nid, ltb2->ltb_text) == 0);
1187 if (lnet_islocalnid(&nid)) {
1192 rc = lnet_add_route(net, hops, &nid, priority, 1);
1193 if (rc != 0 && rc != -EEXIST && rc != -EHOSTUNREACH) {
1194 CERROR("Can't create route "
1196 libcfs_net2str(net),
1197 libcfs_nidstr(&nid));
1207 lnet_syntax("routes", cmd, (int)(token - str), strlen(token));
1209 lnet_free_text_bufs(&nets);
1210 lnet_free_text_bufs(&gateways);
1215 lnet_parse_route_tbs(struct list_head *tbs, int *im_a_router)
1217 struct lnet_text_buf *ltb;
1219 while ((ltb = list_first_entry_or_null(tbs, struct lnet_text_buf,
1220 ltb_list)) != NULL) {
1221 if (lnet_parse_route(ltb->ltb_text, im_a_router) < 0) {
1222 lnet_free_text_bufs(tbs);
1226 list_del(<b->ltb_list);
1227 lnet_free_text_buf(ltb);
1234 lnet_parse_routes(const char *routes, int *im_a_router)
1241 if (lnet_str2tbs_sep(&tbs, routes) < 0) {
1242 CERROR("Error parsing routes\n");
1245 rc = lnet_parse_route_tbs(&tbs, im_a_router);
1248 LASSERT (lnet_tbnob == 0);
1253 lnet_match_network_token(char *token, __u32 *ipaddrs, int nip)
1259 rc = cfs_ip_addr_parse(token, 0, &list);
1263 for (rc = i = 0; !rc && i < nip; i++)
1264 rc = cfs_ip_addr_match(ipaddrs[i], &list);
1266 cfs_expr_list_free_list(&list);
1272 lnet_match_network_tokens(char *net_entry, __u32 *ipaddrs, int nip)
1274 static char tokens[LNET_SINGLE_TEXTBUF_NOB];
1283 LASSERT(strlen(net_entry) < sizeof(tokens));
1285 /* work on a copy of the string */
1286 strcpy(tokens, net_entry);
1289 /* scan for token start */
1290 sep = skip_spaces(sep);
1294 token = strsep(&sep, " \t\n\r\v\f");
1296 if (ntokens++ == 0) {
1301 rc = lnet_match_network_token(token, ipaddrs, nip);
1303 lnet_syntax("ip2nets", net_entry,
1304 (int)(token - tokens), strlen(token));
1308 matched |= (rc != 0);
1314 strcpy(net_entry, net); /* replace with matched net */
1319 lnet_netspec2net(char *netspec)
1321 char *bracket = strchr(netspec, '(');
1324 if (bracket != NULL)
1327 net = libcfs_str2net(netspec);
1329 if (bracket != NULL)
1336 lnet_splitnets(char *source, struct list_head *nets)
1341 struct lnet_text_buf *tb;
1342 struct lnet_text_buf *tb2;
1347 LASSERT(!list_empty(nets));
1348 LASSERT(nets->next == nets->prev); /* single entry */
1350 tb = list_first_entry(nets, struct lnet_text_buf, ltb_list);
1353 sep = strchr(tb->ltb_text, ',');
1354 bracket = strchr(tb->ltb_text, '(');
1359 /* netspec lists interfaces... */
1361 offset2 = offset + (int)(bracket - tb->ltb_text);
1362 len = strlen(bracket);
1364 bracket = strchr(bracket + 1, ')');
1366 if (bracket == NULL ||
1367 !(bracket[1] == ',' || bracket[1] == 0)) {
1368 lnet_syntax("ip2nets", source, offset2, len);
1372 sep = (bracket[1] == 0) ? NULL : bracket + 1;
1378 net = lnet_netspec2net(tb->ltb_text);
1379 if (net == LNET_NET_ANY) {
1380 lnet_syntax("ip2nets", source, offset,
1381 strlen(tb->ltb_text));
1385 list_for_each_entry(tb2, nets, ltb_list) {
1389 if (net == lnet_netspec2net(tb2->ltb_text)) {
1390 /* duplicate network */
1391 lnet_syntax("ip2nets", source, offset,
1392 strlen(tb->ltb_text));
1400 offset += (int)(sep - tb->ltb_text);
1402 tb2 = lnet_new_text_buf(len);
1406 strncpy(tb2->ltb_text, sep, len);
1407 tb2->ltb_text[len] = '\0';
1408 list_add_tail(&tb2->ltb_list, nets);
1415 lnet_match_networks(const char **networksp, const char *ip2nets,
1416 __u32 *ipaddrs, int nip)
1418 static char networks[LNET_SINGLE_TEXTBUF_NOB];
1419 static char source[LNET_SINGLE_TEXTBUF_NOB];
1421 LIST_HEAD(raw_entries);
1422 LIST_HEAD(matched_nets);
1423 LIST_HEAD(current_nets);
1424 struct list_head *t;
1425 struct list_head *t2;
1426 struct lnet_text_buf *tb;
1431 if (lnet_str2tbs_sep(&raw_entries, ip2nets) < 0) {
1432 CERROR("Error parsing ip2nets\n");
1433 LASSERT(lnet_tbnob == 0);
1442 while ((tb = list_first_entry_or_null(&raw_entries,
1443 struct lnet_text_buf,
1444 ltb_list)) != NULL) {
1445 strncpy(source, tb->ltb_text, sizeof(source));
1446 source[sizeof(source) - 1] = '\0';
1448 /* replace ltb_text with the network(s) add on match */
1449 rc = lnet_match_network_tokens(tb->ltb_text, ipaddrs, nip);
1453 list_del(&tb->ltb_list);
1455 if (rc == 0) { /* no match */
1456 lnet_free_text_buf(tb);
1460 /* split into separate networks */
1461 INIT_LIST_HEAD(¤t_nets);
1462 list_add(&tb->ltb_list, ¤t_nets);
1463 rc = lnet_splitnets(source, ¤t_nets);
1467 list_for_each_safe(t, t2, ¤t_nets) {
1468 tb = list_entry(t, struct lnet_text_buf, ltb_list);
1470 list_move_tail(&tb->ltb_list, &matched_nets);
1472 len += scnprintf(networks + len, sizeof(networks) - len,
1473 "%s%s", (len == 0) ? "" : ",",
1476 if (len >= sizeof(networks)) {
1477 CERROR("Too many matched networks\n");
1487 lnet_free_text_bufs(&raw_entries);
1488 lnet_free_text_bufs(&matched_nets);
1489 lnet_free_text_bufs(¤t_nets);
1490 LASSERT(lnet_tbnob == 0);
1495 *networksp = networks;
1499 __u32 lnet_set_link_fatal_state(struct lnet_ni *ni, unsigned int link_state)
1501 CDEBUG(D_NET, "%s: set link fatal state to %u\n",
1502 libcfs_nidstr(&ni->ni_nid), link_state);
1503 return atomic_xchg(&ni->ni_fatal_error_on, link_state);
1505 EXPORT_SYMBOL(lnet_set_link_fatal_state);
1507 int lnet_get_link_status(struct net_device *dev)
1514 if (!netif_running(dev)) {
1516 CDEBUG(D_NET, "device idx %d not running\n", dev->ifindex);
1518 /* Some devices may not be providing link settings */
1519 else if (dev->ethtool_ops->get_link) {
1520 ret = dev->ethtool_ops->get_link(dev);
1521 CDEBUG(D_NET, "device idx %d get_link %u\n",
1528 EXPORT_SYMBOL(lnet_get_link_status);
1530 int lnet_inet_enumerate(struct lnet_inetdev **dev_list, struct net *ns, bool v6)
1532 struct lnet_inetdev *ifaces = NULL;
1533 struct net_device *dev;
1536 DECLARE_CONST_IN_IFADDR(ifa);
1539 for_each_netdev(ns, dev) {
1540 int flags = dev_get_flags(dev);
1541 struct in_device *in_dev;
1542 #if IS_ENABLED(CONFIG_IPV6)
1543 struct inet6_dev *in6_dev;
1544 const struct inet6_ifaddr *ifa6;
1549 if (flags & IFF_LOOPBACK) /* skip the loopback IF */
1552 if (!(flags & IFF_UP)) {
1553 CWARN("lnet: Ignoring interface %s: it's down\n",
1558 node_id = dev_to_node(&dev->dev);
1559 cpt = cfs_cpt_of_node(lnet_cpt_table(), node_id);
1561 in_dev = __in_dev_get_rtnl(dev);
1564 CWARN("lnet: Interface %s has no IPv4 status.\n",
1569 in_dev_for_each_ifa_rtnl(ifa, in_dev) {
1570 if (nip >= nalloc) {
1571 struct lnet_inetdev *tmp;
1573 nalloc += LNET_INTERFACES_NUM;
1574 tmp = krealloc(ifaces, nalloc * sizeof(*tmp),
1585 ifaces[nip].li_cpt = cpt;
1586 ifaces[nip].li_iff_master = !!(flags & IFF_MASTER);
1587 ifaces[nip].li_size = sizeof(ifa->ifa_local);
1588 ifaces[nip].li_index = dev->ifindex;
1589 ifaces[nip].li_ipaddr = ifa->ifa_local;
1590 ifaces[nip].li_netmask = ntohl(ifa->ifa_mask);
1591 strlcpy(ifaces[nip].li_name, ifa->ifa_label,
1592 sizeof(ifaces[nip].li_name));
1600 #if IS_ENABLED(CONFIG_IPV6)
1601 in6_dev = __in6_dev_get(dev);
1604 CWARN("lnet: Interface %s has no IP status.\n",
1609 list_for_each_entry_rcu(ifa6, &in6_dev->addr_list, if_list) {
1610 if (ifa6->flags & IFA_F_TEMPORARY)
1612 if (nip >= nalloc) {
1613 struct lnet_inetdev *tmp;
1615 nalloc += LNET_INTERFACES_NUM;
1616 tmp = krealloc(ifaces, nalloc * sizeof(*tmp),
1627 ifaces[nip].li_cpt = cpt;
1628 ifaces[nip].li_iff_master = !!(flags & IFF_MASTER);
1629 ifaces[nip].li_size = sizeof(struct in6_addr);
1630 ifaces[nip].li_index = dev->ifindex;
1631 memcpy(ifaces[nip].li_ipv6addr,
1632 &ifa6->addr, sizeof(struct in6_addr));
1633 strlcpy(ifaces[nip].li_name, dev->name,
1634 sizeof(ifaces[nip].li_name));
1636 /* As different IPv6 addresses don't have unique
1637 * labels, it is safest just to use the first
1638 * and ignore the rest.
1642 #endif /* IS_ENABLED(CONFIG_IPV6) */
1649 CERROR("lnet: Can't find any usable interfaces, rc = -ENOENT\n");
1656 EXPORT_SYMBOL(lnet_inet_enumerate);
1658 int lnet_inet_select(struct lnet_ni *ni,
1659 struct lnet_inetdev *ifaces,
1662 bool addr_set = nid_addr_is_set(&ni->ni_nid);
1665 /* default to first interface if both interface and NID unspecified */
1666 if (!ni->ni_interface && !addr_set)
1669 for (if_idx = 0; if_idx < num_ifaces; if_idx++) {
1670 if (ni->ni_interface &&
1671 strcmp(ni->ni_interface, ifaces[if_idx].li_name) != 0)
1672 /* not the specified interface */
1676 /* IP unspecified, use IP of first matching interface */
1679 if (ifaces[if_idx].li_size == NID_ADDR_BYTES(&ni->ni_nid)) {
1680 char *addr = (char *)&ifaces[if_idx].li_ipaddr;
1682 if (ifaces[if_idx].li_size != 4)
1683 addr = (char *)ifaces[if_idx].li_ipv6addr;
1685 if (memcmp(ni->ni_nid.nid_addr, addr,
1686 ifaces[if_idx].li_size) == 0)
1691 if (if_idx < num_ifaces)
1694 if (ni->ni_interface)
1695 CERROR("%s: failed to find interface %s%s%s\n",
1696 libcfs_lnd2modname(ni->ni_nid.nid_type),
1697 ni->ni_interface, addr_set ? "@" : "",
1698 addr_set ? libcfs_nidstr(&ni->ni_nid) : "");
1700 CERROR("%s: failed to find IP address %s\n",
1701 libcfs_lnd2modname(ni->ni_nid.nid_type),
1702 libcfs_nidstr(&ni->ni_nid));
1706 EXPORT_SYMBOL(lnet_inet_select);
1709 lnet_parse_ip2nets(const char **networksp, const char *ip2nets)
1711 struct lnet_inetdev *ifaces = NULL;
1712 __u32 *ipaddrs = NULL;
1717 if (current->nsproxy && current->nsproxy->net_ns)
1718 nip = lnet_inet_enumerate(&ifaces, current->nsproxy->net_ns,
1721 nip = lnet_inet_enumerate(&ifaces, &init_net, false);
1723 if (nip != -ENOENT) {
1724 LCONSOLE_ERROR_MSG(0x117,
1725 "Error %d enumerating local IP interfaces for ip2nets to match\n",
1728 LCONSOLE_ERROR_MSG(0x118,
1729 "No local IP interfaces for ip2nets to match\n");
1734 CFS_ALLOC_PTR_ARRAY(ipaddrs, nip);
1737 CERROR("lnet: Can't allocate ipaddrs[%d], rc = %d\n",
1739 goto out_free_addrs;
1742 for (i = 0; i < nip; i++)
1743 ipaddrs[i] = ntohl(ifaces[i].li_ipaddr);
1745 rc = lnet_match_networks(networksp, ip2nets, ipaddrs, nip);
1747 LCONSOLE_ERROR_MSG(0x119, "Error %d parsing ip2nets\n", rc);
1748 } else if (rc == 0) {
1749 LCONSOLE_ERROR_MSG(0x11a, "ip2nets does not match "
1750 "any local IP interfaces\n");
1753 CFS_FREE_PTR_ARRAY(ipaddrs, nip);
1756 return rc > 0 ? 0 : rc;