Linux Audio

Check our new training course

Loading...
v3.1
   1/*
   2 *  drivers/s390/net/qeth_l3_main.c
   3 *
   4 *    Copyright IBM Corp. 2007, 2009
   5 *    Author(s): Utz Bacher <utz.bacher@de.ibm.com>,
   6 *		 Frank Pavlic <fpavlic@de.ibm.com>,
   7 *		 Thomas Spatzier <tspat@de.ibm.com>,
   8 *		 Frank Blaschka <frank.blaschka@de.ibm.com>
   9 */
  10
  11#define KMSG_COMPONENT "qeth"
  12#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  13
  14#include <linux/module.h>
  15#include <linux/moduleparam.h>
  16#include <linux/bitops.h>
  17#include <linux/string.h>
  18#include <linux/errno.h>
  19#include <linux/kernel.h>
  20#include <linux/etherdevice.h>
  21#include <linux/mii.h>
  22#include <linux/ip.h>
  23#include <linux/ipv6.h>
  24#include <linux/inetdevice.h>
  25#include <linux/igmp.h>
  26#include <linux/slab.h>
  27#include <linux/if_vlan.h>
  28
  29#include <net/ip.h>
  30#include <net/arp.h>
 
 
  31#include <net/ip6_checksum.h>
 
  32
  33#include "qeth_l3.h"
  34
  35
  36static int qeth_l3_set_offline(struct ccwgroup_device *);
  37static int qeth_l3_recover(void *);
  38static int qeth_l3_stop(struct net_device *);
  39static void qeth_l3_set_multicast_list(struct net_device *);
  40static int qeth_l3_neigh_setup(struct net_device *, struct neigh_parms *);
  41static int qeth_l3_register_addr_entry(struct qeth_card *,
  42		struct qeth_ipaddr *);
  43static int qeth_l3_deregister_addr_entry(struct qeth_card *,
  44		struct qeth_ipaddr *);
  45static int __qeth_l3_set_online(struct ccwgroup_device *, int);
  46static int __qeth_l3_set_offline(struct ccwgroup_device *, int);
  47
  48static int qeth_l3_isxdigit(char *buf)
  49{
  50	while (*buf) {
  51		if (!isxdigit(*buf++))
  52			return 0;
  53	}
  54	return 1;
  55}
  56
  57void qeth_l3_ipaddr4_to_string(const __u8 *addr, char *buf)
  58{
  59	sprintf(buf, "%i.%i.%i.%i", addr[0], addr[1], addr[2], addr[3]);
  60}
  61
  62int qeth_l3_string_to_ipaddr4(const char *buf, __u8 *addr)
  63{
  64	int count = 0, rc = 0;
  65	int in[4];
  66	char c;
  67
  68	rc = sscanf(buf, "%u.%u.%u.%u%c",
  69		    &in[0], &in[1], &in[2], &in[3], &c);
  70	if (rc != 4 && (rc != 5 || c != '\n'))
  71		return -EINVAL;
  72	for (count = 0; count < 4; count++) {
  73		if (in[count] > 255)
  74			return -EINVAL;
  75		addr[count] = in[count];
  76	}
  77	return 0;
  78}
  79
  80void qeth_l3_ipaddr6_to_string(const __u8 *addr, char *buf)
  81{
  82	sprintf(buf, "%pI6", addr);
  83}
  84
  85int qeth_l3_string_to_ipaddr6(const char *buf, __u8 *addr)
  86{
  87	const char *end, *end_tmp, *start;
  88	__u16 *in;
  89	char num[5];
  90	int num2, cnt, out, found, save_cnt;
  91	unsigned short in_tmp[8] = {0, };
  92
  93	cnt = out = found = save_cnt = num2 = 0;
  94	end = start = buf;
  95	in = (__u16 *) addr;
  96	memset(in, 0, 16);
  97	while (*end) {
  98		end = strchr(start, ':');
  99		if (end == NULL) {
 100			end = buf + strlen(buf);
 101			end_tmp = strchr(start, '\n');
 102			if (end_tmp != NULL)
 103				end = end_tmp;
 104			out = 1;
 105		}
 106		if ((end - start)) {
 107			memset(num, 0, 5);
 108			if ((end - start) > 4)
 109				return -EINVAL;
 110			memcpy(num, start, end - start);
 111			if (!qeth_l3_isxdigit(num))
 112				return -EINVAL;
 113			sscanf(start, "%x", &num2);
 114			if (found)
 115				in_tmp[save_cnt++] = num2;
 116			else
 117				in[cnt++] = num2;
 118			if (out)
 119				break;
 120		} else {
 121			if (found)
 122				return -EINVAL;
 123			found = 1;
 124		}
 125		start = ++end;
 126	}
 127	if (cnt + save_cnt > 8)
 128		return -EINVAL;
 129	cnt = 7;
 130	while (save_cnt)
 131		in[cnt--] = in_tmp[--save_cnt];
 132	return 0;
 133}
 134
 135void qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto, const __u8 *addr,
 136				char *buf)
 137{
 138	if (proto == QETH_PROT_IPV4)
 139		qeth_l3_ipaddr4_to_string(addr, buf);
 140	else if (proto == QETH_PROT_IPV6)
 141		qeth_l3_ipaddr6_to_string(addr, buf);
 142}
 143
 144int qeth_l3_string_to_ipaddr(const char *buf, enum qeth_prot_versions proto,
 145				__u8 *addr)
 146{
 147	if (proto == QETH_PROT_IPV4)
 148		return qeth_l3_string_to_ipaddr4(buf, addr);
 149	else if (proto == QETH_PROT_IPV6)
 150		return qeth_l3_string_to_ipaddr6(buf, addr);
 151	else
 152		return -EINVAL;
 153}
 154
 155static void qeth_l3_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
 156{
 157	int i, j;
 158	u8 octet;
 159
 160	for (i = 0; i < len; ++i) {
 161		octet = addr[i];
 162		for (j = 7; j >= 0; --j) {
 163			bits[i*8 + j] = octet & 1;
 164			octet >>= 1;
 165		}
 166	}
 167}
 168
 169int qeth_l3_is_addr_covered_by_ipato(struct qeth_card *card,
 170						struct qeth_ipaddr *addr)
 171{
 172	struct qeth_ipato_entry *ipatoe;
 173	u8 addr_bits[128] = {0, };
 174	u8 ipatoe_bits[128] = {0, };
 175	int rc = 0;
 176
 177	if (!card->ipato.enabled)
 178		return 0;
 179
 180	qeth_l3_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
 181				  (addr->proto == QETH_PROT_IPV4)? 4:16);
 182	list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 183		if (addr->proto != ipatoe->proto)
 184			continue;
 185		qeth_l3_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
 186					  (ipatoe->proto == QETH_PROT_IPV4) ?
 187					  4 : 16);
 188		if (addr->proto == QETH_PROT_IPV4)
 189			rc = !memcmp(addr_bits, ipatoe_bits,
 190				     min(32, ipatoe->mask_bits));
 191		else
 192			rc = !memcmp(addr_bits, ipatoe_bits,
 193				     min(128, ipatoe->mask_bits));
 194		if (rc)
 195			break;
 196	}
 197	/* invert? */
 198	if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
 199		rc = !rc;
 200	else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
 201		rc = !rc;
 202
 203	return rc;
 204}
 205
 206/*
 207 * Add IP to be added to todo list. If there is already an "add todo"
 208 * in this list we just incremenent the reference count.
 209 * Returns 0 if we  just incremented reference count.
 210 */
 211static int __qeth_l3_insert_ip_todo(struct qeth_card *card,
 212					struct qeth_ipaddr *addr, int add)
 213{
 214	struct qeth_ipaddr *tmp, *t;
 215	int found = 0;
 216
 217	if (card->options.sniffer)
 218		return 0;
 219	list_for_each_entry_safe(tmp, t, card->ip_tbd_list, entry) {
 220		if ((addr->type == QETH_IP_TYPE_DEL_ALL_MC) &&
 221		    (tmp->type == QETH_IP_TYPE_DEL_ALL_MC))
 222			return 0;
 223		if ((tmp->proto        == QETH_PROT_IPV4)     &&
 224		    (addr->proto       == QETH_PROT_IPV4)     &&
 225		    (tmp->type         == addr->type)         &&
 226		    (tmp->is_multicast == addr->is_multicast) &&
 227		    (tmp->u.a4.addr    == addr->u.a4.addr)    &&
 228		    (tmp->u.a4.mask    == addr->u.a4.mask)) {
 229			found = 1;
 230			break;
 231		}
 232		if ((tmp->proto        == QETH_PROT_IPV6)      &&
 233		    (addr->proto       == QETH_PROT_IPV6)      &&
 234		    (tmp->type         == addr->type)          &&
 235		    (tmp->is_multicast == addr->is_multicast)  &&
 236		    (tmp->u.a6.pfxlen  == addr->u.a6.pfxlen)   &&
 237		    (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
 238			    sizeof(struct in6_addr)) == 0)) {
 239			found = 1;
 240			break;
 241		}
 242	}
 243	if (found) {
 244		if (addr->users != 0)
 245			tmp->users += addr->users;
 246		else
 247			tmp->users += add ? 1 : -1;
 248		if (tmp->users == 0) {
 249			list_del(&tmp->entry);
 250			kfree(tmp);
 251		}
 252		return 0;
 253	} else {
 254		if (addr->type == QETH_IP_TYPE_DEL_ALL_MC)
 255			list_add(&addr->entry, card->ip_tbd_list);
 256		else {
 257			if (addr->users == 0)
 258				addr->users += add ? 1 : -1;
 259			if (add && (addr->type == QETH_IP_TYPE_NORMAL) &&
 260			    qeth_l3_is_addr_covered_by_ipato(card, addr)) {
 261				QETH_CARD_TEXT(card, 2, "tkovaddr");
 262				addr->set_flags |= QETH_IPA_SETIP_TAKEOVER_FLAG;
 263			}
 264			list_add_tail(&addr->entry, card->ip_tbd_list);
 265		}
 266		return 1;
 267	}
 268}
 269
 270static int qeth_l3_delete_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
 271{
 272	unsigned long flags;
 273	int rc = 0;
 274
 275	QETH_CARD_TEXT(card, 4, "delip");
 276
 277	if (addr->proto == QETH_PROT_IPV4)
 278		QETH_CARD_HEX(card, 4, &addr->u.a4.addr, 4);
 279	else {
 280		QETH_CARD_HEX(card, 4, &addr->u.a6.addr, 8);
 281		QETH_CARD_HEX(card, 4, ((char *)&addr->u.a6.addr) + 8, 8);
 282	}
 283	spin_lock_irqsave(&card->ip_lock, flags);
 284	rc = __qeth_l3_insert_ip_todo(card, addr, 0);
 285	spin_unlock_irqrestore(&card->ip_lock, flags);
 286	return rc;
 287}
 288
 289static int qeth_l3_add_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
 290{
 291	unsigned long flags;
 292	int rc = 0;
 293
 294	QETH_CARD_TEXT(card, 4, "addip");
 295	if (addr->proto == QETH_PROT_IPV4)
 296		QETH_CARD_HEX(card, 4, &addr->u.a4.addr, 4);
 297	else {
 298		QETH_CARD_HEX(card, 4, &addr->u.a6.addr, 8);
 299		QETH_CARD_HEX(card, 4, ((char *)&addr->u.a6.addr) + 8, 8);
 300	}
 301	spin_lock_irqsave(&card->ip_lock, flags);
 302	rc = __qeth_l3_insert_ip_todo(card, addr, 1);
 303	spin_unlock_irqrestore(&card->ip_lock, flags);
 304	return rc;
 305}
 306
 307
 308static struct qeth_ipaddr *qeth_l3_get_addr_buffer(
 309				enum qeth_prot_versions prot)
 310{
 311	struct qeth_ipaddr *addr;
 312
 313	addr = kzalloc(sizeof(struct qeth_ipaddr), GFP_ATOMIC);
 314	if (addr == NULL) {
 315		return NULL;
 316	}
 317	addr->type = QETH_IP_TYPE_NORMAL;
 318	addr->proto = prot;
 319	return addr;
 320}
 321
 322static void qeth_l3_delete_mc_addresses(struct qeth_card *card)
 323{
 324	struct qeth_ipaddr *iptodo;
 325	unsigned long flags;
 326
 327	QETH_CARD_TEXT(card, 4, "delmc");
 328	iptodo = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
 329	if (!iptodo) {
 330		QETH_CARD_TEXT(card, 2, "dmcnomem");
 331		return;
 332	}
 333	iptodo->type = QETH_IP_TYPE_DEL_ALL_MC;
 334	spin_lock_irqsave(&card->ip_lock, flags);
 335	if (!__qeth_l3_insert_ip_todo(card, iptodo, 0))
 336		kfree(iptodo);
 337	spin_unlock_irqrestore(&card->ip_lock, flags);
 338}
 339
 340/*
 341 * Add/remove address to/from card's ip list, i.e. try to add or remove
 342 * reference to/from an IP address that is already registered on the card.
 343 * Returns:
 344 *	0  address was on card and its reference count has been adjusted,
 345 *	   but is still > 0, so nothing has to be done
 346 *	   also returns 0 if card was not on card and the todo was to delete
 347 *	   the address -> there is also nothing to be done
 348 *	1  address was not on card and the todo is to add it to the card's ip
 349 *	   list
 350 *	-1 address was on card and its reference count has been decremented
 351 *	   to <= 0 by the todo -> address must be removed from card
 352 */
 353static int __qeth_l3_ref_ip_on_card(struct qeth_card *card,
 354		struct qeth_ipaddr *todo, struct qeth_ipaddr **__addr)
 355{
 356	struct qeth_ipaddr *addr;
 357	int found = 0;
 358
 359	list_for_each_entry(addr, &card->ip_list, entry) {
 360		if ((addr->proto == QETH_PROT_IPV4) &&
 361		    (todo->proto == QETH_PROT_IPV4) &&
 362		    (addr->type == todo->type) &&
 363		    (addr->u.a4.addr == todo->u.a4.addr) &&
 364		    (addr->u.a4.mask == todo->u.a4.mask)) {
 365			found = 1;
 366			break;
 367		}
 368		if ((addr->proto == QETH_PROT_IPV6) &&
 369		    (todo->proto == QETH_PROT_IPV6) &&
 370		    (addr->type == todo->type) &&
 371		    (addr->u.a6.pfxlen == todo->u.a6.pfxlen) &&
 372		    (memcmp(&addr->u.a6.addr, &todo->u.a6.addr,
 373			    sizeof(struct in6_addr)) == 0)) {
 374			found = 1;
 375			break;
 376		}
 377	}
 378	if (found) {
 379		addr->users += todo->users;
 380		if (addr->users <= 0) {
 381			*__addr = addr;
 382			return -1;
 383		} else {
 384			/* for VIPA and RXIP limit refcount to 1 */
 385			if (addr->type != QETH_IP_TYPE_NORMAL)
 386				addr->users = 1;
 387			return 0;
 388		}
 389	}
 390	if (todo->users > 0) {
 391		/* for VIPA and RXIP limit refcount to 1 */
 392		if (todo->type != QETH_IP_TYPE_NORMAL)
 393			todo->users = 1;
 394		return 1;
 395	} else
 396		return 0;
 397}
 398
 399static void __qeth_l3_delete_all_mc(struct qeth_card *card,
 400					unsigned long *flags)
 401{
 402	struct list_head fail_list;
 403	struct qeth_ipaddr *addr, *tmp;
 404	int rc;
 405
 406	INIT_LIST_HEAD(&fail_list);
 407again:
 408	list_for_each_entry_safe(addr, tmp, &card->ip_list, entry) {
 409		if (addr->is_multicast) {
 410			list_del(&addr->entry);
 411			spin_unlock_irqrestore(&card->ip_lock, *flags);
 412			rc = qeth_l3_deregister_addr_entry(card, addr);
 413			spin_lock_irqsave(&card->ip_lock, *flags);
 414			if (!rc || (rc == IPA_RC_MC_ADDR_NOT_FOUND))
 415				kfree(addr);
 416			else
 417				list_add_tail(&addr->entry, &fail_list);
 418			goto again;
 419		}
 420	}
 421	list_splice(&fail_list, &card->ip_list);
 422}
 423
 424static void qeth_l3_set_ip_addr_list(struct qeth_card *card)
 425{
 426	struct list_head *tbd_list;
 427	struct qeth_ipaddr *todo, *addr;
 428	unsigned long flags;
 429	int rc;
 430
 431	QETH_CARD_TEXT(card, 2, "sdiplist");
 432	QETH_CARD_HEX(card, 2, &card, sizeof(void *));
 433
 434	if ((card->state != CARD_STATE_UP &&
 435	     card->state != CARD_STATE_SOFTSETUP) || card->options.sniffer) {
 436		return;
 437	}
 438
 439	spin_lock_irqsave(&card->ip_lock, flags);
 440	tbd_list = card->ip_tbd_list;
 441	card->ip_tbd_list = kmalloc(sizeof(struct list_head), GFP_ATOMIC);
 442	if (!card->ip_tbd_list) {
 443		QETH_CARD_TEXT(card, 0, "silnomem");
 444		card->ip_tbd_list = tbd_list;
 445		spin_unlock_irqrestore(&card->ip_lock, flags);
 446		return;
 447	} else
 448		INIT_LIST_HEAD(card->ip_tbd_list);
 449
 450	while (!list_empty(tbd_list)) {
 451		todo = list_entry(tbd_list->next, struct qeth_ipaddr, entry);
 452		list_del(&todo->entry);
 453		if (todo->type == QETH_IP_TYPE_DEL_ALL_MC) {
 454			__qeth_l3_delete_all_mc(card, &flags);
 455			kfree(todo);
 456			continue;
 457		}
 458		rc = __qeth_l3_ref_ip_on_card(card, todo, &addr);
 459		if (rc == 0) {
 460			/* nothing to be done; only adjusted refcount */
 461			kfree(todo);
 462		} else if (rc == 1) {
 463			/* new entry to be added to on-card list */
 464			spin_unlock_irqrestore(&card->ip_lock, flags);
 465			rc = qeth_l3_register_addr_entry(card, todo);
 466			spin_lock_irqsave(&card->ip_lock, flags);
 467			if (!rc || (rc == IPA_RC_LAN_OFFLINE))
 468				list_add_tail(&todo->entry, &card->ip_list);
 469			else
 470				kfree(todo);
 471		} else if (rc == -1) {
 472			/* on-card entry to be removed */
 473			list_del_init(&addr->entry);
 474			spin_unlock_irqrestore(&card->ip_lock, flags);
 475			rc = qeth_l3_deregister_addr_entry(card, addr);
 476			spin_lock_irqsave(&card->ip_lock, flags);
 477			if (!rc || (rc == IPA_RC_IP_ADDRESS_NOT_DEFINED))
 478				kfree(addr);
 479			else
 480				list_add_tail(&addr->entry, &card->ip_list);
 481			kfree(todo);
 482		}
 483	}
 484	spin_unlock_irqrestore(&card->ip_lock, flags);
 485	kfree(tbd_list);
 486}
 487
 488static void qeth_l3_clear_ip_list(struct qeth_card *card, int recover)
 489{
 490	struct qeth_ipaddr *addr, *tmp;
 491	unsigned long flags;
 492
 493	QETH_CARD_TEXT(card, 4, "clearip");
 494	if (recover && card->options.sniffer)
 495		return;
 496	spin_lock_irqsave(&card->ip_lock, flags);
 497	/* clear todo list */
 498	list_for_each_entry_safe(addr, tmp, card->ip_tbd_list, entry) {
 499		list_del(&addr->entry);
 500		kfree(addr);
 501	}
 502
 503	while (!list_empty(&card->ip_list)) {
 504		addr = list_entry(card->ip_list.next,
 505				  struct qeth_ipaddr, entry);
 506		list_del_init(&addr->entry);
 507		if (!recover || addr->is_multicast) {
 508			kfree(addr);
 509			continue;
 510		}
 511		list_add_tail(&addr->entry, card->ip_tbd_list);
 512	}
 513	spin_unlock_irqrestore(&card->ip_lock, flags);
 514}
 515
 516static int qeth_l3_address_exists_in_list(struct list_head *list,
 517		struct qeth_ipaddr *addr, int same_type)
 518{
 519	struct qeth_ipaddr *tmp;
 520
 521	list_for_each_entry(tmp, list, entry) {
 522		if ((tmp->proto == QETH_PROT_IPV4) &&
 523		    (addr->proto == QETH_PROT_IPV4) &&
 524		    ((same_type && (tmp->type == addr->type)) ||
 525		    (!same_type && (tmp->type != addr->type))) &&
 526		    (tmp->u.a4.addr == addr->u.a4.addr))
 527			return 1;
 528
 529		if ((tmp->proto == QETH_PROT_IPV6) &&
 530		    (addr->proto == QETH_PROT_IPV6) &&
 531		    ((same_type && (tmp->type == addr->type)) ||
 532		    (!same_type && (tmp->type != addr->type))) &&
 533		    (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
 534			    sizeof(struct in6_addr)) == 0))
 535			return 1;
 536
 537	}
 538	return 0;
 539}
 540
 541static int qeth_l3_send_setdelmc(struct qeth_card *card,
 542			struct qeth_ipaddr *addr, int ipacmd)
 543{
 544	int rc;
 545	struct qeth_cmd_buffer *iob;
 546	struct qeth_ipa_cmd *cmd;
 547
 548	QETH_CARD_TEXT(card, 4, "setdelmc");
 549
 550	iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 551	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 552	memcpy(&cmd->data.setdelipm.mac, addr->mac, OSA_ADDR_LEN);
 553	if (addr->proto == QETH_PROT_IPV6)
 554		memcpy(cmd->data.setdelipm.ip6, &addr->u.a6.addr,
 555		       sizeof(struct in6_addr));
 556	else
 557		memcpy(&cmd->data.setdelipm.ip4, &addr->u.a4.addr, 4);
 558
 559	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 560
 561	return rc;
 562}
 563
 564static void qeth_l3_fill_netmask(u8 *netmask, unsigned int len)
 565{
 566	int i, j;
 567	for (i = 0; i < 16; i++) {
 568		j = (len) - (i * 8);
 569		if (j >= 8)
 570			netmask[i] = 0xff;
 571		else if (j > 0)
 572			netmask[i] = (u8)(0xFF00 >> j);
 573		else
 574			netmask[i] = 0;
 575	}
 576}
 577
 578static int qeth_l3_send_setdelip(struct qeth_card *card,
 579		struct qeth_ipaddr *addr, int ipacmd, unsigned int flags)
 580{
 581	int rc;
 582	struct qeth_cmd_buffer *iob;
 583	struct qeth_ipa_cmd *cmd;
 584	__u8 netmask[16];
 585
 586	QETH_CARD_TEXT(card, 4, "setdelip");
 587	QETH_CARD_TEXT_(card, 4, "flags%02X", flags);
 588
 589	iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 590	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 591	if (addr->proto == QETH_PROT_IPV6) {
 592		memcpy(cmd->data.setdelip6.ip_addr, &addr->u.a6.addr,
 593		       sizeof(struct in6_addr));
 594		qeth_l3_fill_netmask(netmask, addr->u.a6.pfxlen);
 595		memcpy(cmd->data.setdelip6.mask, netmask,
 596		       sizeof(struct in6_addr));
 597		cmd->data.setdelip6.flags = flags;
 598	} else {
 599		memcpy(cmd->data.setdelip4.ip_addr, &addr->u.a4.addr, 4);
 600		memcpy(cmd->data.setdelip4.mask, &addr->u.a4.mask, 4);
 601		cmd->data.setdelip4.flags = flags;
 602	}
 603
 604	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 605
 606	return rc;
 607}
 608
 609static int qeth_l3_send_setrouting(struct qeth_card *card,
 610	enum qeth_routing_types type, enum qeth_prot_versions prot)
 611{
 612	int rc;
 613	struct qeth_ipa_cmd *cmd;
 614	struct qeth_cmd_buffer *iob;
 615
 616	QETH_CARD_TEXT(card, 4, "setroutg");
 617	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETRTG, prot);
 618	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 619	cmd->data.setrtg.type = (type);
 620	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 621
 622	return rc;
 623}
 624
 625static void qeth_l3_correct_routing_type(struct qeth_card *card,
 626		enum qeth_routing_types *type, enum qeth_prot_versions prot)
 627{
 628	if (card->info.type == QETH_CARD_TYPE_IQD) {
 629		switch (*type) {
 630		case NO_ROUTER:
 631		case PRIMARY_CONNECTOR:
 632		case SECONDARY_CONNECTOR:
 633		case MULTICAST_ROUTER:
 634			return;
 635		default:
 636			goto out_inval;
 637		}
 638	} else {
 639		switch (*type) {
 640		case NO_ROUTER:
 641		case PRIMARY_ROUTER:
 642		case SECONDARY_ROUTER:
 643			return;
 644		case MULTICAST_ROUTER:
 645			if (qeth_is_ipafunc_supported(card, prot,
 646						      IPA_OSA_MC_ROUTER))
 647				return;
 648		default:
 649			goto out_inval;
 650		}
 651	}
 652out_inval:
 653	*type = NO_ROUTER;
 
 654}
 655
 656int qeth_l3_setrouting_v4(struct qeth_card *card)
 657{
 658	int rc;
 659
 660	QETH_CARD_TEXT(card, 3, "setrtg4");
 661
 662	qeth_l3_correct_routing_type(card, &card->options.route4.type,
 663				  QETH_PROT_IPV4);
 
 
 664
 665	rc = qeth_l3_send_setrouting(card, card->options.route4.type,
 666				  QETH_PROT_IPV4);
 667	if (rc) {
 668		card->options.route4.type = NO_ROUTER;
 669		QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
 670			" on %s. Type set to 'no router'.\n", rc,
 671			QETH_CARD_IFNAME(card));
 672	}
 673	return rc;
 674}
 675
 676int qeth_l3_setrouting_v6(struct qeth_card *card)
 677{
 678	int rc = 0;
 679
 680	QETH_CARD_TEXT(card, 3, "setrtg6");
 681#ifdef CONFIG_QETH_IPV6
 682
 683	if (!qeth_is_supported(card, IPA_IPV6))
 684		return 0;
 685	qeth_l3_correct_routing_type(card, &card->options.route6.type,
 686				  QETH_PROT_IPV6);
 
 
 687
 688	rc = qeth_l3_send_setrouting(card, card->options.route6.type,
 689				  QETH_PROT_IPV6);
 690	if (rc) {
 691		card->options.route6.type = NO_ROUTER;
 692		QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
 693			" on %s. Type set to 'no router'.\n", rc,
 694			QETH_CARD_IFNAME(card));
 695	}
 696#endif
 697	return rc;
 698}
 699
 700/*
 701 * IP address takeover related functions
 702 */
 703static void qeth_l3_clear_ipato_list(struct qeth_card *card)
 704{
 705
 706	struct qeth_ipato_entry *ipatoe, *tmp;
 707	unsigned long flags;
 708
 709	spin_lock_irqsave(&card->ip_lock, flags);
 710	list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 711		list_del(&ipatoe->entry);
 712		kfree(ipatoe);
 713	}
 714	spin_unlock_irqrestore(&card->ip_lock, flags);
 715}
 716
 717int qeth_l3_add_ipato_entry(struct qeth_card *card,
 718				struct qeth_ipato_entry *new)
 719{
 720	struct qeth_ipato_entry *ipatoe;
 721	unsigned long flags;
 722	int rc = 0;
 723
 724	QETH_CARD_TEXT(card, 2, "addipato");
 725	spin_lock_irqsave(&card->ip_lock, flags);
 726	list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 727		if (ipatoe->proto != new->proto)
 728			continue;
 729		if (!memcmp(ipatoe->addr, new->addr,
 730			    (ipatoe->proto == QETH_PROT_IPV4)? 4:16) &&
 731		    (ipatoe->mask_bits == new->mask_bits)) {
 732			rc = -EEXIST;
 733			break;
 734		}
 735	}
 736	if (!rc)
 737		list_add_tail(&new->entry, &card->ipato.entries);
 738
 739	spin_unlock_irqrestore(&card->ip_lock, flags);
 740	return rc;
 741}
 742
 743void qeth_l3_del_ipato_entry(struct qeth_card *card,
 744		enum qeth_prot_versions proto, u8 *addr, int mask_bits)
 745{
 746	struct qeth_ipato_entry *ipatoe, *tmp;
 747	unsigned long flags;
 748
 749	QETH_CARD_TEXT(card, 2, "delipato");
 750	spin_lock_irqsave(&card->ip_lock, flags);
 751	list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 752		if (ipatoe->proto != proto)
 753			continue;
 754		if (!memcmp(ipatoe->addr, addr,
 755			    (proto == QETH_PROT_IPV4)? 4:16) &&
 756		    (ipatoe->mask_bits == mask_bits)) {
 757			list_del(&ipatoe->entry);
 758			kfree(ipatoe);
 759		}
 760	}
 761	spin_unlock_irqrestore(&card->ip_lock, flags);
 762}
 763
 764/*
 765 * VIPA related functions
 766 */
 767int qeth_l3_add_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
 768	      const u8 *addr)
 769{
 770	struct qeth_ipaddr *ipaddr;
 771	unsigned long flags;
 772	int rc = 0;
 773
 774	ipaddr = qeth_l3_get_addr_buffer(proto);
 775	if (ipaddr) {
 776		if (proto == QETH_PROT_IPV4) {
 777			QETH_CARD_TEXT(card, 2, "addvipa4");
 778			memcpy(&ipaddr->u.a4.addr, addr, 4);
 779			ipaddr->u.a4.mask = 0;
 780		} else if (proto == QETH_PROT_IPV6) {
 781			QETH_CARD_TEXT(card, 2, "addvipa6");
 782			memcpy(&ipaddr->u.a6.addr, addr, 16);
 783			ipaddr->u.a6.pfxlen = 0;
 784		}
 785		ipaddr->type = QETH_IP_TYPE_VIPA;
 786		ipaddr->set_flags = QETH_IPA_SETIP_VIPA_FLAG;
 787		ipaddr->del_flags = QETH_IPA_DELIP_VIPA_FLAG;
 788	} else
 789		return -ENOMEM;
 790	spin_lock_irqsave(&card->ip_lock, flags);
 791	if (qeth_l3_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
 792	    qeth_l3_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
 793		rc = -EEXIST;
 794	spin_unlock_irqrestore(&card->ip_lock, flags);
 795	if (rc) {
 
 796		return rc;
 797	}
 798	if (!qeth_l3_add_ip(card, ipaddr))
 799		kfree(ipaddr);
 800	qeth_l3_set_ip_addr_list(card);
 801	return rc;
 802}
 803
 804void qeth_l3_del_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
 805	      const u8 *addr)
 806{
 807	struct qeth_ipaddr *ipaddr;
 808
 809	ipaddr = qeth_l3_get_addr_buffer(proto);
 810	if (ipaddr) {
 811		if (proto == QETH_PROT_IPV4) {
 812			QETH_CARD_TEXT(card, 2, "delvipa4");
 813			memcpy(&ipaddr->u.a4.addr, addr, 4);
 814			ipaddr->u.a4.mask = 0;
 815		} else if (proto == QETH_PROT_IPV6) {
 816			QETH_CARD_TEXT(card, 2, "delvipa6");
 817			memcpy(&ipaddr->u.a6.addr, addr, 16);
 818			ipaddr->u.a6.pfxlen = 0;
 819		}
 820		ipaddr->type = QETH_IP_TYPE_VIPA;
 821	} else
 822		return;
 823	if (!qeth_l3_delete_ip(card, ipaddr))
 824		kfree(ipaddr);
 825	qeth_l3_set_ip_addr_list(card);
 826}
 827
 828/*
 829 * proxy ARP related functions
 830 */
 831int qeth_l3_add_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
 832	      const u8 *addr)
 833{
 834	struct qeth_ipaddr *ipaddr;
 835	unsigned long flags;
 836	int rc = 0;
 837
 838	ipaddr = qeth_l3_get_addr_buffer(proto);
 839	if (ipaddr) {
 840		if (proto == QETH_PROT_IPV4) {
 841			QETH_CARD_TEXT(card, 2, "addrxip4");
 842			memcpy(&ipaddr->u.a4.addr, addr, 4);
 843			ipaddr->u.a4.mask = 0;
 844		} else if (proto == QETH_PROT_IPV6) {
 845			QETH_CARD_TEXT(card, 2, "addrxip6");
 846			memcpy(&ipaddr->u.a6.addr, addr, 16);
 847			ipaddr->u.a6.pfxlen = 0;
 848		}
 849		ipaddr->type = QETH_IP_TYPE_RXIP;
 850		ipaddr->set_flags = QETH_IPA_SETIP_TAKEOVER_FLAG;
 851		ipaddr->del_flags = 0;
 852	} else
 853		return -ENOMEM;
 854	spin_lock_irqsave(&card->ip_lock, flags);
 855	if (qeth_l3_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
 856	    qeth_l3_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
 857		rc = -EEXIST;
 858	spin_unlock_irqrestore(&card->ip_lock, flags);
 859	if (rc) {
 
 860		return rc;
 861	}
 862	if (!qeth_l3_add_ip(card, ipaddr))
 863		kfree(ipaddr);
 864	qeth_l3_set_ip_addr_list(card);
 865	return 0;
 866}
 867
 868void qeth_l3_del_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
 869			const u8 *addr)
 870{
 871	struct qeth_ipaddr *ipaddr;
 872
 873	ipaddr = qeth_l3_get_addr_buffer(proto);
 874	if (ipaddr) {
 875		if (proto == QETH_PROT_IPV4) {
 876			QETH_CARD_TEXT(card, 2, "addrxip4");
 877			memcpy(&ipaddr->u.a4.addr, addr, 4);
 878			ipaddr->u.a4.mask = 0;
 879		} else if (proto == QETH_PROT_IPV6) {
 880			QETH_CARD_TEXT(card, 2, "addrxip6");
 881			memcpy(&ipaddr->u.a6.addr, addr, 16);
 882			ipaddr->u.a6.pfxlen = 0;
 883		}
 884		ipaddr->type = QETH_IP_TYPE_RXIP;
 885	} else
 886		return;
 887	if (!qeth_l3_delete_ip(card, ipaddr))
 888		kfree(ipaddr);
 889	qeth_l3_set_ip_addr_list(card);
 890}
 891
 892static int qeth_l3_register_addr_entry(struct qeth_card *card,
 893				struct qeth_ipaddr *addr)
 894{
 895	char buf[50];
 896	int rc = 0;
 897	int cnt = 3;
 898
 899	if (addr->proto == QETH_PROT_IPV4) {
 900		QETH_CARD_TEXT(card, 2, "setaddr4");
 901		QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 902	} else if (addr->proto == QETH_PROT_IPV6) {
 903		QETH_CARD_TEXT(card, 2, "setaddr6");
 904		QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 905		QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 906	} else {
 907		QETH_CARD_TEXT(card, 2, "setaddr?");
 908		QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 909	}
 910	do {
 911		if (addr->is_multicast)
 912			rc =  qeth_l3_send_setdelmc(card, addr, IPA_CMD_SETIPM);
 913		else
 914			rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_SETIP,
 915					addr->set_flags);
 916		if (rc)
 917			QETH_CARD_TEXT(card, 2, "failed");
 918	} while ((--cnt > 0) && rc);
 919	if (rc) {
 920		QETH_CARD_TEXT(card, 2, "FAILED");
 921		qeth_l3_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
 922		dev_warn(&card->gdev->dev,
 923			"Registering IP address %s failed\n", buf);
 924	}
 925	return rc;
 926}
 927
 928static int qeth_l3_deregister_addr_entry(struct qeth_card *card,
 929						struct qeth_ipaddr *addr)
 930{
 931	int rc = 0;
 932
 933	if (addr->proto == QETH_PROT_IPV4) {
 934		QETH_CARD_TEXT(card, 2, "deladdr4");
 935		QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 936	} else if (addr->proto == QETH_PROT_IPV6) {
 937		QETH_CARD_TEXT(card, 2, "deladdr6");
 938		QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 939		QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 940	} else {
 941		QETH_CARD_TEXT(card, 2, "deladdr?");
 942		QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 943	}
 944	if (addr->is_multicast)
 945		rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_DELIPM);
 946	else
 947		rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_DELIP,
 948					addr->del_flags);
 949	if (rc)
 950		QETH_CARD_TEXT(card, 2, "failed");
 951
 952	return rc;
 953}
 954
 955static inline u8 qeth_l3_get_qeth_hdr_flags4(int cast_type)
 956{
 957	if (cast_type == RTN_MULTICAST)
 958		return QETH_CAST_MULTICAST;
 959	if (cast_type == RTN_BROADCAST)
 960		return QETH_CAST_BROADCAST;
 961	return QETH_CAST_UNICAST;
 962}
 963
 964static inline u8 qeth_l3_get_qeth_hdr_flags6(int cast_type)
 965{
 966	u8 ct = QETH_HDR_PASSTHRU | QETH_HDR_IPV6;
 967	if (cast_type == RTN_MULTICAST)
 968		return ct | QETH_CAST_MULTICAST;
 969	if (cast_type == RTN_ANYCAST)
 970		return ct | QETH_CAST_ANYCAST;
 971	if (cast_type == RTN_BROADCAST)
 972		return ct | QETH_CAST_BROADCAST;
 973	return ct | QETH_CAST_UNICAST;
 974}
 975
 976static int qeth_l3_send_setadp_mode(struct qeth_card *card, __u32 command,
 977					__u32 mode)
 978{
 979	int rc;
 980	struct qeth_cmd_buffer *iob;
 981	struct qeth_ipa_cmd *cmd;
 982
 983	QETH_CARD_TEXT(card, 4, "adpmode");
 984
 985	iob = qeth_get_adapter_cmd(card, command,
 986				   sizeof(struct qeth_ipacmd_setadpparms));
 987	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 988	cmd->data.setadapterparms.data.mode = mode;
 989	rc = qeth_send_ipa_cmd(card, iob, qeth_default_setadapterparms_cb,
 990			       NULL);
 991	return rc;
 992}
 993
 994static int qeth_l3_setadapter_hstr(struct qeth_card *card)
 995{
 996	int rc;
 997
 998	QETH_CARD_TEXT(card, 4, "adphstr");
 999
1000	if (qeth_adp_supported(card, IPA_SETADP_SET_BROADCAST_MODE)) {
1001		rc = qeth_l3_send_setadp_mode(card,
1002					IPA_SETADP_SET_BROADCAST_MODE,
1003					card->options.broadcast_mode);
1004		if (rc)
1005			QETH_DBF_MESSAGE(2, "couldn't set broadcast mode on "
1006				   "device %s: x%x\n",
1007				   CARD_BUS_ID(card), rc);
1008		rc = qeth_l3_send_setadp_mode(card,
1009					IPA_SETADP_ALTER_MAC_ADDRESS,
1010					card->options.macaddr_mode);
1011		if (rc)
1012			QETH_DBF_MESSAGE(2, "couldn't set macaddr mode on "
1013				   "device %s: x%x\n", CARD_BUS_ID(card), rc);
1014		return rc;
1015	}
1016	if (card->options.broadcast_mode == QETH_TR_BROADCAST_LOCAL)
1017		QETH_DBF_MESSAGE(2, "set adapter parameters not available "
1018			   "to set broadcast mode, using ALLRINGS "
1019			   "on device %s:\n", CARD_BUS_ID(card));
1020	if (card->options.macaddr_mode == QETH_TR_MACADDR_CANONICAL)
1021		QETH_DBF_MESSAGE(2, "set adapter parameters not available "
1022			   "to set macaddr mode, using NONCANONICAL "
1023			   "on device %s:\n", CARD_BUS_ID(card));
1024	return 0;
1025}
1026
1027static int qeth_l3_setadapter_parms(struct qeth_card *card)
1028{
1029	int rc;
1030
1031	QETH_DBF_TEXT(SETUP, 2, "setadprm");
1032
1033	if (!qeth_is_supported(card, IPA_SETADAPTERPARMS)) {
1034		dev_info(&card->gdev->dev,
1035			"set adapter parameters not supported.\n");
1036		QETH_DBF_TEXT(SETUP, 2, " notsupp");
1037		return 0;
1038	}
1039	rc = qeth_query_setadapterparms(card);
1040	if (rc) {
1041		QETH_DBF_MESSAGE(2, "%s couldn't set adapter parameters: "
1042			"0x%x\n", dev_name(&card->gdev->dev), rc);
1043		return rc;
1044	}
1045	if (qeth_adp_supported(card, IPA_SETADP_ALTER_MAC_ADDRESS)) {
1046		rc = qeth_setadpparms_change_macaddr(card);
1047		if (rc)
1048			dev_warn(&card->gdev->dev, "Reading the adapter MAC"
1049				" address failed\n");
1050	}
1051
1052	if ((card->info.link_type == QETH_LINK_TYPE_HSTR) ||
1053	    (card->info.link_type == QETH_LINK_TYPE_LANE_TR))
1054		rc = qeth_l3_setadapter_hstr(card);
1055
1056	return rc;
1057}
1058
1059static int qeth_l3_default_setassparms_cb(struct qeth_card *card,
1060			struct qeth_reply *reply, unsigned long data)
1061{
1062	struct qeth_ipa_cmd *cmd;
1063
1064	QETH_CARD_TEXT(card, 4, "defadpcb");
1065
1066	cmd = (struct qeth_ipa_cmd *) data;
1067	if (cmd->hdr.return_code == 0) {
1068		cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
1069		if (cmd->hdr.prot_version == QETH_PROT_IPV4)
1070			card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
1071		if (cmd->hdr.prot_version == QETH_PROT_IPV6)
1072			card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
1073	}
1074	if (cmd->data.setassparms.hdr.assist_no == IPA_INBOUND_CHECKSUM &&
1075	    cmd->data.setassparms.hdr.command_code == IPA_CMD_ASS_START) {
1076		card->info.csum_mask = cmd->data.setassparms.data.flags_32bit;
1077		QETH_CARD_TEXT_(card, 3, "csum:%d", card->info.csum_mask);
1078	}
1079	if (cmd->data.setassparms.hdr.assist_no == IPA_OUTBOUND_CHECKSUM &&
1080	    cmd->data.setassparms.hdr.command_code == IPA_CMD_ASS_START) {
1081		card->info.tx_csum_mask =
1082			cmd->data.setassparms.data.flags_32bit;
1083		QETH_CARD_TEXT_(card, 3, "tcsu:%d", card->info.tx_csum_mask);
1084	}
1085
1086	return 0;
1087}
1088
1089static struct qeth_cmd_buffer *qeth_l3_get_setassparms_cmd(
1090	struct qeth_card *card, enum qeth_ipa_funcs ipa_func, __u16 cmd_code,
1091	__u16 len, enum qeth_prot_versions prot)
1092{
1093	struct qeth_cmd_buffer *iob;
1094	struct qeth_ipa_cmd *cmd;
1095
1096	QETH_CARD_TEXT(card, 4, "getasscm");
1097	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETASSPARMS, prot);
1098
1099	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1100	cmd->data.setassparms.hdr.assist_no = ipa_func;
1101	cmd->data.setassparms.hdr.length = 8 + len;
1102	cmd->data.setassparms.hdr.command_code = cmd_code;
1103	cmd->data.setassparms.hdr.return_code = 0;
1104	cmd->data.setassparms.hdr.seq_no = 0;
1105
1106	return iob;
1107}
1108
1109static int qeth_l3_send_setassparms(struct qeth_card *card,
1110	struct qeth_cmd_buffer *iob, __u16 len, long data,
1111	int (*reply_cb)(struct qeth_card *, struct qeth_reply *,
1112		unsigned long),
1113	void *reply_param)
1114{
1115	int rc;
1116	struct qeth_ipa_cmd *cmd;
1117
1118	QETH_CARD_TEXT(card, 4, "sendassp");
1119
1120	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1121	if (len <= sizeof(__u32))
1122		cmd->data.setassparms.data.flags_32bit = (__u32) data;
1123	else   /* (len > sizeof(__u32)) */
1124		memcpy(&cmd->data.setassparms.data, (void *) data, len);
1125
1126	rc = qeth_send_ipa_cmd(card, iob, reply_cb, reply_param);
1127	return rc;
1128}
1129
1130#ifdef CONFIG_QETH_IPV6
1131static int qeth_l3_send_simple_setassparms_ipv6(struct qeth_card *card,
1132		enum qeth_ipa_funcs ipa_func, __u16 cmd_code)
1133{
1134	int rc;
1135	struct qeth_cmd_buffer *iob;
1136
1137	QETH_CARD_TEXT(card, 4, "simassp6");
1138	iob = qeth_l3_get_setassparms_cmd(card, ipa_func, cmd_code,
1139				       0, QETH_PROT_IPV6);
1140	rc = qeth_l3_send_setassparms(card, iob, 0, 0,
1141				   qeth_l3_default_setassparms_cb, NULL);
1142	return rc;
1143}
1144#endif
1145
1146static int qeth_l3_send_simple_setassparms(struct qeth_card *card,
1147		enum qeth_ipa_funcs ipa_func, __u16 cmd_code, long data)
1148{
1149	int rc;
1150	int length = 0;
1151	struct qeth_cmd_buffer *iob;
1152
1153	QETH_CARD_TEXT(card, 4, "simassp4");
1154	if (data)
1155		length = sizeof(__u32);
1156	iob = qeth_l3_get_setassparms_cmd(card, ipa_func, cmd_code,
1157				       length, QETH_PROT_IPV4);
1158	rc = qeth_l3_send_setassparms(card, iob, length, data,
1159				   qeth_l3_default_setassparms_cb, NULL);
1160	return rc;
1161}
1162
1163static int qeth_l3_start_ipa_arp_processing(struct qeth_card *card)
1164{
1165	int rc;
1166
1167	QETH_CARD_TEXT(card, 3, "ipaarp");
1168
1169	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1170		dev_info(&card->gdev->dev,
1171			"ARP processing not supported on %s!\n",
1172			QETH_CARD_IFNAME(card));
1173		return 0;
1174	}
1175	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
1176					IPA_CMD_ASS_START, 0);
1177	if (rc) {
1178		dev_warn(&card->gdev->dev,
1179			"Starting ARP processing support for %s failed\n",
1180			QETH_CARD_IFNAME(card));
1181	}
1182	return rc;
1183}
1184
1185static int qeth_l3_start_ipa_ip_fragmentation(struct qeth_card *card)
1186{
1187	int rc;
1188
1189	QETH_CARD_TEXT(card, 3, "ipaipfrg");
1190
1191	if (!qeth_is_supported(card, IPA_IP_FRAGMENTATION)) {
1192		dev_info(&card->gdev->dev,
1193			"Hardware IP fragmentation not supported on %s\n",
1194			QETH_CARD_IFNAME(card));
1195		return  -EOPNOTSUPP;
1196	}
1197
1198	rc = qeth_l3_send_simple_setassparms(card, IPA_IP_FRAGMENTATION,
1199					  IPA_CMD_ASS_START, 0);
1200	if (rc) {
1201		dev_warn(&card->gdev->dev,
1202			"Starting IP fragmentation support for %s failed\n",
1203			QETH_CARD_IFNAME(card));
1204	} else
1205		dev_info(&card->gdev->dev,
1206			"Hardware IP fragmentation enabled \n");
1207	return rc;
1208}
1209
1210static int qeth_l3_start_ipa_source_mac(struct qeth_card *card)
1211{
1212	int rc;
1213
1214	QETH_CARD_TEXT(card, 3, "stsrcmac");
1215
1216	if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
1217		dev_info(&card->gdev->dev,
1218			"Inbound source MAC-address not supported on %s\n",
1219			QETH_CARD_IFNAME(card));
1220		return -EOPNOTSUPP;
1221	}
1222
1223	rc = qeth_l3_send_simple_setassparms(card, IPA_SOURCE_MAC,
1224					  IPA_CMD_ASS_START, 0);
1225	if (rc)
1226		dev_warn(&card->gdev->dev,
1227			"Starting source MAC-address support for %s failed\n",
1228			QETH_CARD_IFNAME(card));
1229	return rc;
1230}
1231
1232static int qeth_l3_start_ipa_vlan(struct qeth_card *card)
1233{
1234	int rc = 0;
1235
1236	QETH_CARD_TEXT(card, 3, "strtvlan");
1237
1238	if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
1239		dev_info(&card->gdev->dev,
1240			"VLAN not supported on %s\n", QETH_CARD_IFNAME(card));
1241		return -EOPNOTSUPP;
1242	}
1243
1244	rc = qeth_l3_send_simple_setassparms(card, IPA_VLAN_PRIO,
1245					  IPA_CMD_ASS_START, 0);
1246	if (rc) {
1247		dev_warn(&card->gdev->dev,
1248			"Starting VLAN support for %s failed\n",
1249			QETH_CARD_IFNAME(card));
1250	} else {
1251		dev_info(&card->gdev->dev, "VLAN enabled\n");
1252	}
1253	return rc;
1254}
1255
1256static int qeth_l3_start_ipa_multicast(struct qeth_card *card)
1257{
1258	int rc;
1259
1260	QETH_CARD_TEXT(card, 3, "stmcast");
1261
1262	if (!qeth_is_supported(card, IPA_MULTICASTING)) {
1263		dev_info(&card->gdev->dev,
1264			"Multicast not supported on %s\n",
1265			QETH_CARD_IFNAME(card));
1266		return -EOPNOTSUPP;
1267	}
1268
1269	rc = qeth_l3_send_simple_setassparms(card, IPA_MULTICASTING,
1270					  IPA_CMD_ASS_START, 0);
1271	if (rc) {
1272		dev_warn(&card->gdev->dev,
1273			"Starting multicast support for %s failed\n",
1274			QETH_CARD_IFNAME(card));
1275	} else {
1276		dev_info(&card->gdev->dev, "Multicast enabled\n");
1277		card->dev->flags |= IFF_MULTICAST;
1278	}
1279	return rc;
1280}
1281
1282#ifdef CONFIG_QETH_IPV6
1283static int qeth_l3_softsetup_ipv6(struct qeth_card *card)
1284{
1285	int rc;
1286
1287	QETH_CARD_TEXT(card, 3, "softipv6");
1288
1289	if (card->info.type == QETH_CARD_TYPE_IQD)
1290		goto out;
1291
1292	rc = qeth_query_ipassists(card, QETH_PROT_IPV6);
1293	if (rc) {
1294		dev_err(&card->gdev->dev,
1295			"Activating IPv6 support for %s failed\n",
1296			QETH_CARD_IFNAME(card));
1297		return rc;
1298	}
1299	rc = qeth_l3_send_simple_setassparms(card, IPA_IPV6,
1300					  IPA_CMD_ASS_START, 3);
1301	if (rc) {
1302		dev_err(&card->gdev->dev,
1303			"Activating IPv6 support for %s failed\n",
1304			QETH_CARD_IFNAME(card));
1305		return rc;
1306	}
1307	rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_IPV6,
1308					       IPA_CMD_ASS_START);
1309	if (rc) {
1310		dev_err(&card->gdev->dev,
1311			"Activating IPv6 support for %s failed\n",
1312			 QETH_CARD_IFNAME(card));
1313		return rc;
1314	}
1315	rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_PASSTHRU,
1316					       IPA_CMD_ASS_START);
1317	if (rc) {
1318		dev_warn(&card->gdev->dev,
1319			"Enabling the passthrough mode for %s failed\n",
1320			QETH_CARD_IFNAME(card));
1321		return rc;
1322	}
1323out:
1324	dev_info(&card->gdev->dev, "IPV6 enabled\n");
1325	return 0;
1326}
1327#endif
1328
1329static int qeth_l3_start_ipa_ipv6(struct qeth_card *card)
1330{
1331	int rc = 0;
1332
1333	QETH_CARD_TEXT(card, 3, "strtipv6");
1334
1335	if (!qeth_is_supported(card, IPA_IPV6)) {
1336		dev_info(&card->gdev->dev,
1337			"IPv6 not supported on %s\n", QETH_CARD_IFNAME(card));
1338		return 0;
1339	}
1340#ifdef CONFIG_QETH_IPV6
1341	rc = qeth_l3_softsetup_ipv6(card);
1342#endif
1343	return rc ;
1344}
1345
1346static int qeth_l3_start_ipa_broadcast(struct qeth_card *card)
1347{
1348	int rc;
1349
1350	QETH_CARD_TEXT(card, 3, "stbrdcst");
1351	card->info.broadcast_capable = 0;
1352	if (!qeth_is_supported(card, IPA_FILTERING)) {
1353		dev_info(&card->gdev->dev,
1354			"Broadcast not supported on %s\n",
1355			QETH_CARD_IFNAME(card));
1356		rc = -EOPNOTSUPP;
1357		goto out;
1358	}
1359	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1360					  IPA_CMD_ASS_START, 0);
1361	if (rc) {
1362		dev_warn(&card->gdev->dev, "Enabling broadcast filtering for "
1363			"%s failed\n", QETH_CARD_IFNAME(card));
1364		goto out;
1365	}
1366
1367	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1368					  IPA_CMD_ASS_CONFIGURE, 1);
1369	if (rc) {
1370		dev_warn(&card->gdev->dev,
1371			"Setting up broadcast filtering for %s failed\n",
1372			QETH_CARD_IFNAME(card));
1373		goto out;
1374	}
1375	card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
1376	dev_info(&card->gdev->dev, "Broadcast enabled\n");
1377	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1378					  IPA_CMD_ASS_ENABLE, 1);
1379	if (rc) {
1380		dev_warn(&card->gdev->dev, "Setting up broadcast echo "
1381			"filtering for %s failed\n", QETH_CARD_IFNAME(card));
1382		goto out;
1383	}
1384	card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
1385out:
1386	if (card->info.broadcast_capable)
1387		card->dev->flags |= IFF_BROADCAST;
1388	else
1389		card->dev->flags &= ~IFF_BROADCAST;
1390	return rc;
1391}
1392
1393static int qeth_l3_send_checksum_command(struct qeth_card *card)
1394{
1395	int rc;
1396
1397	rc = qeth_l3_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
1398					  IPA_CMD_ASS_START, 0);
1399	if (rc) {
1400		dev_warn(&card->gdev->dev, "Starting HW checksumming for %s "
1401			"failed, using SW checksumming\n",
1402			QETH_CARD_IFNAME(card));
1403		return rc;
1404	}
1405	rc = qeth_l3_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
1406					  IPA_CMD_ASS_ENABLE,
1407					  card->info.csum_mask);
1408	if (rc) {
1409		dev_warn(&card->gdev->dev, "Enabling HW checksumming for %s "
1410			"failed, using SW checksumming\n",
1411			QETH_CARD_IFNAME(card));
1412		return rc;
1413	}
1414	return 0;
1415}
1416
1417int qeth_l3_set_rx_csum(struct qeth_card *card, int on)
1418{
1419	int rc = 0;
1420
1421	if (on) {
1422		rc = qeth_l3_send_checksum_command(card);
1423		if (rc)
1424			return -EIO;
1425		dev_info(&card->gdev->dev,
1426			"HW Checksumming (inbound) enabled\n");
1427	} else {
1428		rc = qeth_l3_send_simple_setassparms(card,
1429			IPA_INBOUND_CHECKSUM, IPA_CMD_ASS_STOP, 0);
1430		if (rc)
1431			return -EIO;
1432	}
1433
1434	return 0;
1435}
1436
1437static int qeth_l3_start_ipa_checksum(struct qeth_card *card)
1438{
1439	QETH_CARD_TEXT(card, 3, "strtcsum");
1440
1441	if (card->dev->features & NETIF_F_RXCSUM) {
1442		rtnl_lock();
1443		/* force set_features call */
1444		card->dev->features &= ~NETIF_F_RXCSUM;
1445		netdev_update_features(card->dev);
1446		rtnl_unlock();
1447	}
1448	return 0;
1449}
1450
1451static int qeth_l3_start_ipa_tx_checksum(struct qeth_card *card)
1452{
1453	int rc = 0;
1454
1455	if (!qeth_is_supported(card, IPA_OUTBOUND_CHECKSUM))
1456		return rc;
1457	rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_CHECKSUM,
1458			  IPA_CMD_ASS_START, 0);
1459	if (rc)
1460		goto err_out;
1461	rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_CHECKSUM,
1462			  IPA_CMD_ASS_ENABLE, card->info.tx_csum_mask);
1463	if (rc)
1464		goto err_out;
1465	dev_info(&card->gdev->dev, "HW TX Checksumming enabled\n");
1466	return rc;
1467err_out:
1468	dev_warn(&card->gdev->dev, "Enabling HW TX checksumming for %s "
1469		"failed, using SW TX checksumming\n", QETH_CARD_IFNAME(card));
1470	return rc;
1471}
1472
1473static int qeth_l3_start_ipa_tso(struct qeth_card *card)
1474{
1475	int rc;
1476
1477	QETH_CARD_TEXT(card, 3, "sttso");
1478
1479	if (!qeth_is_supported(card, IPA_OUTBOUND_TSO)) {
1480		dev_info(&card->gdev->dev,
1481			"Outbound TSO not supported on %s\n",
1482			QETH_CARD_IFNAME(card));
1483		rc = -EOPNOTSUPP;
1484	} else {
1485		rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_TSO,
1486						IPA_CMD_ASS_START, 0);
1487		if (rc)
1488			dev_warn(&card->gdev->dev, "Starting outbound TCP "
1489				"segmentation offload for %s failed\n",
1490				QETH_CARD_IFNAME(card));
1491		else
1492			dev_info(&card->gdev->dev,
1493				"Outbound TSO enabled\n");
1494	}
1495	if (rc)
1496		card->dev->features &= ~NETIF_F_TSO;
1497	return rc;
1498}
1499
1500static int qeth_l3_start_ipassists(struct qeth_card *card)
1501{
1502	QETH_CARD_TEXT(card, 3, "strtipas");
1503
1504	qeth_set_access_ctrl_online(card);	/* go on*/
 
1505	qeth_l3_start_ipa_arp_processing(card);	/* go on*/
1506	qeth_l3_start_ipa_ip_fragmentation(card);	/* go on*/
1507	qeth_l3_start_ipa_source_mac(card);	/* go on*/
1508	qeth_l3_start_ipa_vlan(card);		/* go on*/
1509	qeth_l3_start_ipa_multicast(card);		/* go on*/
1510	qeth_l3_start_ipa_ipv6(card);		/* go on*/
1511	qeth_l3_start_ipa_broadcast(card);		/* go on*/
1512	qeth_l3_start_ipa_checksum(card);		/* go on*/
1513	qeth_l3_start_ipa_tx_checksum(card);
1514	qeth_l3_start_ipa_tso(card);		/* go on*/
1515	return 0;
1516}
1517
1518static int qeth_l3_iqd_read_initial_mac_cb(struct qeth_card *card,
1519		struct qeth_reply *reply, unsigned long data)
1520{
1521	struct qeth_ipa_cmd *cmd;
1522
1523	cmd = (struct qeth_ipa_cmd *) data;
1524	if (cmd->hdr.return_code == 0)
1525		memcpy(card->dev->dev_addr,
1526			cmd->data.create_destroy_addr.unique_id, ETH_ALEN);
1527	else
1528		random_ether_addr(card->dev->dev_addr);
1529
1530	return 0;
1531}
1532
1533static int qeth_l3_iqd_read_initial_mac(struct qeth_card *card)
1534{
1535	int rc = 0;
1536	struct qeth_cmd_buffer *iob;
1537	struct qeth_ipa_cmd *cmd;
1538
1539	QETH_DBF_TEXT(SETUP, 2, "hsrmac");
1540
1541	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1542				     QETH_PROT_IPV6);
1543	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1544	*((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1545			card->info.unique_id;
1546
1547	rc = qeth_send_ipa_cmd(card, iob, qeth_l3_iqd_read_initial_mac_cb,
1548				NULL);
1549	return rc;
1550}
1551
1552static int qeth_l3_get_unique_id_cb(struct qeth_card *card,
1553		struct qeth_reply *reply, unsigned long data)
1554{
1555	struct qeth_ipa_cmd *cmd;
1556
1557	cmd = (struct qeth_ipa_cmd *) data;
1558	if (cmd->hdr.return_code == 0)
1559		card->info.unique_id = *((__u16 *)
1560				&cmd->data.create_destroy_addr.unique_id[6]);
1561	else {
1562		card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1563					UNIQUE_ID_NOT_BY_CARD;
1564		dev_warn(&card->gdev->dev, "The network adapter failed to "
1565			"generate a unique ID\n");
1566	}
1567	return 0;
1568}
1569
1570static int qeth_l3_get_unique_id(struct qeth_card *card)
1571{
1572	int rc = 0;
1573	struct qeth_cmd_buffer *iob;
1574	struct qeth_ipa_cmd *cmd;
1575
1576	QETH_DBF_TEXT(SETUP, 2, "guniqeid");
1577
1578	if (!qeth_is_supported(card, IPA_IPV6)) {
1579		card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1580					UNIQUE_ID_NOT_BY_CARD;
1581		return 0;
1582	}
1583
1584	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1585				     QETH_PROT_IPV6);
1586	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1587	*((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1588			card->info.unique_id;
1589
1590	rc = qeth_send_ipa_cmd(card, iob, qeth_l3_get_unique_id_cb, NULL);
1591	return rc;
1592}
1593
1594static int
1595qeth_diags_trace_cb(struct qeth_card *card, struct qeth_reply *reply,
1596			    unsigned long data)
1597{
1598	struct qeth_ipa_cmd	   *cmd;
1599	__u16 rc;
1600
1601	QETH_DBF_TEXT(SETUP, 2, "diastrcb");
1602
1603	cmd = (struct qeth_ipa_cmd *)data;
1604	rc = cmd->hdr.return_code;
1605	if (rc)
1606		QETH_CARD_TEXT_(card, 2, "dxter%x", rc);
1607	switch (cmd->data.diagass.action) {
1608	case QETH_DIAGS_CMD_TRACE_QUERY:
1609		break;
1610	case QETH_DIAGS_CMD_TRACE_DISABLE:
1611		switch (rc) {
1612		case 0:
1613		case IPA_RC_INVALID_SUBCMD:
1614			card->info.promisc_mode = SET_PROMISC_MODE_OFF;
1615			dev_info(&card->gdev->dev, "The HiperSockets network "
1616				"traffic analyzer is deactivated\n");
1617			break;
1618		default:
1619			break;
1620		}
1621		break;
1622	case QETH_DIAGS_CMD_TRACE_ENABLE:
1623		switch (rc) {
1624		case 0:
1625			card->info.promisc_mode = SET_PROMISC_MODE_ON;
1626			dev_info(&card->gdev->dev, "The HiperSockets network "
1627				"traffic analyzer is activated\n");
1628			break;
1629		case IPA_RC_HARDWARE_AUTH_ERROR:
1630			dev_warn(&card->gdev->dev, "The device is not "
1631				"authorized to run as a HiperSockets network "
1632				"traffic analyzer\n");
1633			break;
1634		case IPA_RC_TRACE_ALREADY_ACTIVE:
1635			dev_warn(&card->gdev->dev, "A HiperSockets "
1636				"network traffic analyzer is already "
1637				"active in the HiperSockets LAN\n");
1638			break;
1639		default:
1640			break;
1641		}
1642		break;
1643	default:
1644		QETH_DBF_MESSAGE(2, "Unknown sniffer action (0x%04x) on %s\n",
1645			cmd->data.diagass.action, QETH_CARD_IFNAME(card));
1646	}
1647
1648	return 0;
1649}
1650
1651static int
1652qeth_diags_trace(struct qeth_card *card, enum qeth_diags_trace_cmds diags_cmd)
1653{
1654	struct qeth_cmd_buffer *iob;
1655	struct qeth_ipa_cmd    *cmd;
1656
1657	QETH_DBF_TEXT(SETUP, 2, "diagtrac");
1658
1659	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
1660	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1661	cmd->data.diagass.subcmd_len = 16;
1662	cmd->data.diagass.subcmd = QETH_DIAGS_CMD_TRACE;
1663	cmd->data.diagass.type = QETH_DIAGS_TYPE_HIPERSOCKET;
1664	cmd->data.diagass.action = diags_cmd;
1665	return qeth_send_ipa_cmd(card, iob, qeth_diags_trace_cb, NULL);
1666}
1667
1668static void qeth_l3_get_mac_for_ipm(__u32 ipm, char *mac,
1669				struct net_device *dev)
1670{
1671	if (dev->type == ARPHRD_IEEE802_TR)
1672		ip_tr_mc_map(ipm, mac);
1673	else
1674		ip_eth_mc_map(ipm, mac);
1675}
1676
1677static void qeth_l3_add_mc(struct qeth_card *card, struct in_device *in4_dev)
1678{
1679	struct qeth_ipaddr *ipm;
1680	struct ip_mc_list *im4;
1681	char buf[MAX_ADDR_LEN];
1682
1683	QETH_CARD_TEXT(card, 4, "addmc");
1684	for (im4 = rcu_dereference(in4_dev->mc_list); im4 != NULL;
1685	     im4 = rcu_dereference(im4->next_rcu)) {
1686		qeth_l3_get_mac_for_ipm(im4->multiaddr, buf, in4_dev->dev);
1687		ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1688		if (!ipm)
1689			continue;
1690		ipm->u.a4.addr = im4->multiaddr;
1691		memcpy(ipm->mac, buf, OSA_ADDR_LEN);
1692		ipm->is_multicast = 1;
1693		if (!qeth_l3_add_ip(card, ipm))
1694			kfree(ipm);
1695	}
1696}
1697
 
1698static void qeth_l3_add_vlan_mc(struct qeth_card *card)
1699{
1700	struct in_device *in_dev;
1701	u16 vid;
1702
1703	QETH_CARD_TEXT(card, 4, "addmcvl");
1704	if (!qeth_is_supported(card, IPA_FULL_VLAN))
1705		return;
1706
1707	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1708		struct net_device *netdev;
1709
1710		rcu_read_lock();
1711		netdev = __vlan_find_dev_deep(card->dev, vid);
1712		rcu_read_unlock();
1713		if (netdev == NULL ||
1714		    !(netdev->flags & IFF_UP))
1715			continue;
1716		in_dev = in_dev_get(netdev);
1717		if (!in_dev)
1718			continue;
1719		rcu_read_lock();
1720		qeth_l3_add_mc(card, in_dev);
1721		rcu_read_unlock();
1722		in_dev_put(in_dev);
1723	}
1724}
1725
1726static void qeth_l3_add_multicast_ipv4(struct qeth_card *card)
1727{
1728	struct in_device *in4_dev;
1729
1730	QETH_CARD_TEXT(card, 4, "chkmcv4");
1731	in4_dev = in_dev_get(card->dev);
1732	if (in4_dev == NULL)
1733		return;
1734	rcu_read_lock();
 
 
 
1735	qeth_l3_add_mc(card, in4_dev);
1736	qeth_l3_add_vlan_mc(card);
 
1737	rcu_read_unlock();
1738	in_dev_put(in4_dev);
1739}
1740
1741#ifdef CONFIG_QETH_IPV6
1742static void qeth_l3_add_mc6(struct qeth_card *card, struct inet6_dev *in6_dev)
1743{
1744	struct qeth_ipaddr *ipm;
1745	struct ifmcaddr6 *im6;
1746	char buf[MAX_ADDR_LEN];
1747
1748	QETH_CARD_TEXT(card, 4, "addmc6");
1749	for (im6 = in6_dev->mc_list; im6 != NULL; im6 = im6->next) {
1750		ndisc_mc_map(&im6->mca_addr, buf, in6_dev->dev, 0);
1751		ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1752		if (!ipm)
1753			continue;
1754		ipm->is_multicast = 1;
1755		memcpy(ipm->mac, buf, OSA_ADDR_LEN);
1756		memcpy(&ipm->u.a6.addr, &im6->mca_addr.s6_addr,
1757		       sizeof(struct in6_addr));
1758		if (!qeth_l3_add_ip(card, ipm))
1759			kfree(ipm);
1760	}
1761}
1762
 
1763static void qeth_l3_add_vlan_mc6(struct qeth_card *card)
1764{
1765	struct inet6_dev *in_dev;
1766	u16 vid;
1767
1768	QETH_CARD_TEXT(card, 4, "admc6vl");
1769	if (!qeth_is_supported(card, IPA_FULL_VLAN))
1770		return;
1771
1772	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1773		struct net_device *netdev;
1774
1775		netdev = __vlan_find_dev_deep(card->dev, vid);
 
1776		if (netdev == NULL ||
1777		    !(netdev->flags & IFF_UP))
1778			continue;
1779		in_dev = in6_dev_get(netdev);
1780		if (!in_dev)
1781			continue;
1782		read_lock_bh(&in_dev->lock);
1783		qeth_l3_add_mc6(card, in_dev);
1784		read_unlock_bh(&in_dev->lock);
1785		in6_dev_put(in_dev);
1786	}
1787}
1788
1789static void qeth_l3_add_multicast_ipv6(struct qeth_card *card)
1790{
1791	struct inet6_dev *in6_dev;
1792
1793	QETH_CARD_TEXT(card, 4, "chkmcv6");
1794	if (!qeth_is_supported(card, IPA_IPV6))
1795		return ;
1796	in6_dev = in6_dev_get(card->dev);
1797	if (in6_dev == NULL)
1798		return;
 
1799	read_lock_bh(&in6_dev->lock);
1800	qeth_l3_add_mc6(card, in6_dev);
1801	qeth_l3_add_vlan_mc6(card);
1802	read_unlock_bh(&in6_dev->lock);
 
1803	in6_dev_put(in6_dev);
1804}
1805#endif /* CONFIG_QETH_IPV6 */
1806
1807static void qeth_l3_free_vlan_addresses4(struct qeth_card *card,
1808			unsigned short vid)
1809{
1810	struct in_device *in_dev;
1811	struct in_ifaddr *ifa;
1812	struct qeth_ipaddr *addr;
1813	struct net_device *netdev;
1814
1815	QETH_CARD_TEXT(card, 4, "frvaddr4");
1816
1817	netdev = __vlan_find_dev_deep(card->dev, vid);
 
 
1818	in_dev = in_dev_get(netdev);
1819	if (!in_dev)
1820		return;
1821	for (ifa = in_dev->ifa_list; ifa; ifa = ifa->ifa_next) {
1822		addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1823		if (addr) {
1824			addr->u.a4.addr = ifa->ifa_address;
1825			addr->u.a4.mask = ifa->ifa_mask;
1826			addr->type = QETH_IP_TYPE_NORMAL;
1827			if (!qeth_l3_delete_ip(card, addr))
1828				kfree(addr);
1829		}
1830	}
1831	in_dev_put(in_dev);
1832}
1833
1834static void qeth_l3_free_vlan_addresses6(struct qeth_card *card,
1835			unsigned short vid)
1836{
1837#ifdef CONFIG_QETH_IPV6
1838	struct inet6_dev *in6_dev;
1839	struct inet6_ifaddr *ifa;
1840	struct qeth_ipaddr *addr;
1841	struct net_device *netdev;
1842
1843	QETH_CARD_TEXT(card, 4, "frvaddr6");
1844
1845	netdev = __vlan_find_dev_deep(card->dev, vid);
 
 
1846	in6_dev = in6_dev_get(netdev);
1847	if (!in6_dev)
1848		return;
1849	list_for_each_entry(ifa, &in6_dev->addr_list, if_list) {
1850		addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1851		if (addr) {
1852			memcpy(&addr->u.a6.addr, &ifa->addr,
1853			       sizeof(struct in6_addr));
1854			addr->u.a6.pfxlen = ifa->prefix_len;
1855			addr->type = QETH_IP_TYPE_NORMAL;
1856			if (!qeth_l3_delete_ip(card, addr))
1857				kfree(addr);
1858		}
1859	}
1860	in6_dev_put(in6_dev);
1861#endif /* CONFIG_QETH_IPV6 */
1862}
1863
1864static void qeth_l3_free_vlan_addresses(struct qeth_card *card,
1865			unsigned short vid)
1866{
 
1867	qeth_l3_free_vlan_addresses4(card, vid);
1868	qeth_l3_free_vlan_addresses6(card, vid);
 
1869}
1870
1871static void qeth_l3_vlan_rx_add_vid(struct net_device *dev, unsigned short vid)
 
1872{
1873	struct qeth_card *card = dev->ml_priv;
1874
1875	set_bit(vid, card->active_vlans);
1876	return;
1877}
1878
1879static void qeth_l3_vlan_rx_kill_vid(struct net_device *dev, unsigned short vid)
 
1880{
1881	struct qeth_card *card = dev->ml_priv;
1882	unsigned long flags;
1883
1884	QETH_CARD_TEXT_(card, 4, "kid:%d", vid);
1885	if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
1886		QETH_CARD_TEXT(card, 3, "kidREC");
1887		return;
1888	}
1889	spin_lock_irqsave(&card->vlanlock, flags);
1890	/* unregister IP addresses of vlan device */
1891	qeth_l3_free_vlan_addresses(card, vid);
1892	clear_bit(vid, card->active_vlans);
1893	spin_unlock_irqrestore(&card->vlanlock, flags);
1894	qeth_l3_set_multicast_list(card->dev);
 
1895}
1896
1897static inline int qeth_l3_rebuild_skb(struct qeth_card *card,
1898			struct sk_buff *skb, struct qeth_hdr *hdr,
1899			unsigned short *vlan_id)
1900{
1901	__be16 prot;
1902	struct iphdr *ip_hdr;
1903	unsigned char tg_addr[MAX_ADDR_LEN];
1904	int is_vlan = 0;
1905
1906	if (!(hdr->hdr.l3.flags & QETH_HDR_PASSTHRU)) {
1907		prot = htons((hdr->hdr.l3.flags & QETH_HDR_IPV6)? ETH_P_IPV6 :
1908			      ETH_P_IP);
1909		switch (hdr->hdr.l3.flags & QETH_HDR_CAST_MASK) {
1910		case QETH_CAST_MULTICAST:
1911			switch (prot) {
1912#ifdef CONFIG_QETH_IPV6
1913			case __constant_htons(ETH_P_IPV6):
1914				ndisc_mc_map((struct in6_addr *)
1915				     skb->data + 24,
1916				     tg_addr, card->dev, 0);
1917				break;
1918#endif
1919			case __constant_htons(ETH_P_IP):
1920				ip_hdr = (struct iphdr *)skb->data;
1921				(card->dev->type == ARPHRD_IEEE802_TR) ?
1922				ip_tr_mc_map(ip_hdr->daddr, tg_addr):
1923				ip_eth_mc_map(ip_hdr->daddr, tg_addr);
1924				break;
1925			default:
1926				memcpy(tg_addr, card->dev->broadcast,
1927					card->dev->addr_len);
1928			}
1929			card->stats.multicast++;
1930			skb->pkt_type = PACKET_MULTICAST;
1931			break;
1932		case QETH_CAST_BROADCAST:
1933			memcpy(tg_addr, card->dev->broadcast,
1934				card->dev->addr_len);
1935			card->stats.multicast++;
1936			skb->pkt_type = PACKET_BROADCAST;
1937			break;
1938		case QETH_CAST_UNICAST:
1939		case QETH_CAST_ANYCAST:
1940		case QETH_CAST_NOCAST:
1941		default:
1942			if (card->options.sniffer)
1943				skb->pkt_type = PACKET_OTHERHOST;
1944			else
1945				skb->pkt_type = PACKET_HOST;
1946			memcpy(tg_addr, card->dev->dev_addr,
1947				card->dev->addr_len);
1948		}
1949		if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
1950			card->dev->header_ops->create(skb, card->dev, prot,
1951				tg_addr, &hdr->hdr.l3.dest_addr[2],
1952				card->dev->addr_len);
1953		else
1954			card->dev->header_ops->create(skb, card->dev, prot,
1955				tg_addr, "FAKELL", card->dev->addr_len);
1956	}
1957
1958#ifdef CONFIG_TR
1959	if (card->dev->type == ARPHRD_IEEE802_TR)
1960		skb->protocol = tr_type_trans(skb, card->dev);
1961	else
1962#endif
1963		skb->protocol = eth_type_trans(skb, card->dev);
1964
1965	if (hdr->hdr.l3.ext_flags &
1966	    (QETH_HDR_EXT_VLAN_FRAME | QETH_HDR_EXT_INCLUDE_VLAN_TAG)) {
1967		*vlan_id = (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_VLAN_FRAME) ?
1968		 hdr->hdr.l3.vlan_id : *((u16 *)&hdr->hdr.l3.dest_addr[12]);
1969		is_vlan = 1;
1970	}
1971
1972	if (card->dev->features & NETIF_F_RXCSUM) {
1973		if ((hdr->hdr.l3.ext_flags &
1974		    (QETH_HDR_EXT_CSUM_HDR_REQ |
1975		     QETH_HDR_EXT_CSUM_TRANSP_REQ)) ==
1976		    (QETH_HDR_EXT_CSUM_HDR_REQ |
1977		     QETH_HDR_EXT_CSUM_TRANSP_REQ))
1978			skb->ip_summed = CHECKSUM_UNNECESSARY;
1979		else
1980			skb->ip_summed = CHECKSUM_NONE;
1981	} else
1982		skb->ip_summed = CHECKSUM_NONE;
1983
1984	return is_vlan;
1985}
1986
1987static int qeth_l3_process_inbound_buffer(struct qeth_card *card,
1988				int budget, int *done)
1989{
1990	int work_done = 0;
1991	struct sk_buff *skb;
1992	struct qeth_hdr *hdr;
1993	__u16 vlan_tag = 0;
1994	int is_vlan;
1995	unsigned int len;
 
1996
1997	*done = 0;
1998	BUG_ON(!budget);
1999	while (budget) {
2000		skb = qeth_core_get_next_skb(card,
2001			card->qdio.in_q->bufs[card->rx.b_index].buffer,
2002			&card->rx.b_element, &card->rx.e_offset, &hdr);
2003		if (!skb) {
2004			*done = 1;
2005			break;
2006		}
2007		skb->dev = card->dev;
2008		switch (hdr->hdr.l3.id) {
2009		case QETH_HEADER_TYPE_LAYER3:
2010			is_vlan = qeth_l3_rebuild_skb(card, skb, hdr,
 
 
 
 
 
 
 
 
 
 
 
 
 
2011						      &vlan_tag);
2012			len = skb->len;
2013			if (is_vlan && !card->options.sniffer)
2014				__vlan_hwaccel_put_tag(skb, vlan_tag);
2015			napi_gro_receive(&card->napi, skb);
 
 
2016			break;
2017		case QETH_HEADER_TYPE_LAYER2: /* for HiperSockets sniffer */
2018			skb->pkt_type = PACKET_HOST;
2019			skb->protocol = eth_type_trans(skb, skb->dev);
2020			len = skb->len;
2021			netif_receive_skb(skb);
2022			break;
2023		default:
2024			dev_kfree_skb_any(skb);
2025			QETH_CARD_TEXT(card, 3, "inbunkno");
2026			QETH_DBF_HEX(CTRL, 3, hdr, QETH_DBF_CTRL_LEN);
2027			continue;
2028		}
2029		work_done++;
2030		budget--;
2031		card->stats.rx_packets++;
2032		card->stats.rx_bytes += len;
2033	}
2034	return work_done;
2035}
2036
2037static int qeth_l3_poll(struct napi_struct *napi, int budget)
2038{
2039	struct qeth_card *card = container_of(napi, struct qeth_card, napi);
2040	int work_done = 0;
2041	struct qeth_qdio_buffer *buffer;
2042	int done;
2043	int new_budget = budget;
2044
2045	if (card->options.performance_stats) {
2046		card->perf_stats.inbound_cnt++;
2047		card->perf_stats.inbound_start_time = qeth_get_micros();
2048	}
2049
2050	while (1) {
2051		if (!card->rx.b_count) {
2052			card->rx.qdio_err = 0;
2053			card->rx.b_count = qdio_get_next_buffers(
2054				card->data.ccwdev, 0, &card->rx.b_index,
2055				&card->rx.qdio_err);
2056			if (card->rx.b_count <= 0) {
2057				card->rx.b_count = 0;
2058				break;
2059			}
2060			card->rx.b_element =
2061				&card->qdio.in_q->bufs[card->rx.b_index]
2062				.buffer->element[0];
2063			card->rx.e_offset = 0;
2064		}
2065
2066		while (card->rx.b_count) {
2067			buffer = &card->qdio.in_q->bufs[card->rx.b_index];
2068			if (!(card->rx.qdio_err &&
2069			    qeth_check_qdio_errors(card, buffer->buffer,
2070			    card->rx.qdio_err, "qinerr")))
2071				work_done += qeth_l3_process_inbound_buffer(
2072					card, new_budget, &done);
2073			else
2074				done = 1;
2075
2076			if (done) {
2077				if (card->options.performance_stats)
2078					card->perf_stats.bufs_rec++;
2079				qeth_put_buffer_pool_entry(card,
2080					buffer->pool_entry);
2081				qeth_queue_input_buffer(card, card->rx.b_index);
2082				card->rx.b_count--;
2083				if (card->rx.b_count) {
2084					card->rx.b_index =
2085						(card->rx.b_index + 1) %
2086						QDIO_MAX_BUFFERS_PER_Q;
2087					card->rx.b_element =
2088						&card->qdio.in_q
2089						->bufs[card->rx.b_index]
2090						.buffer->element[0];
2091					card->rx.e_offset = 0;
2092				}
2093			}
2094
2095			if (work_done >= budget)
2096				goto out;
2097			else
2098				new_budget = budget - work_done;
2099		}
2100	}
2101
2102	napi_complete(napi);
2103	if (qdio_start_irq(card->data.ccwdev, 0))
2104		napi_schedule(&card->napi);
2105out:
2106	if (card->options.performance_stats)
2107		card->perf_stats.inbound_time += qeth_get_micros() -
2108			card->perf_stats.inbound_start_time;
2109	return work_done;
2110}
2111
2112static int qeth_l3_verify_vlan_dev(struct net_device *dev,
2113			struct qeth_card *card)
2114{
2115	int rc = 0;
2116	u16 vid;
2117
2118	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
2119		struct net_device *netdev;
2120
2121		rcu_read_lock();
2122		netdev = __vlan_find_dev_deep(dev, vid);
 
2123		rcu_read_unlock();
2124		if (netdev == dev) {
2125			rc = QETH_VLAN_CARD;
2126			break;
2127		}
2128	}
2129
2130	if (rc && !(vlan_dev_real_dev(dev)->ml_priv == (void *)card))
2131		return 0;
2132
2133	return rc;
2134}
2135
2136static int qeth_l3_verify_dev(struct net_device *dev)
2137{
2138	struct qeth_card *card;
2139	unsigned long flags;
2140	int rc = 0;
2141
2142	read_lock_irqsave(&qeth_core_card_list.rwlock, flags);
2143	list_for_each_entry(card, &qeth_core_card_list.list, list) {
2144		if (card->dev == dev) {
2145			rc = QETH_REAL_CARD;
2146			break;
2147		}
2148		rc = qeth_l3_verify_vlan_dev(dev, card);
2149		if (rc)
2150			break;
2151	}
2152	read_unlock_irqrestore(&qeth_core_card_list.rwlock, flags);
2153
2154	return rc;
2155}
2156
2157static struct qeth_card *qeth_l3_get_card_from_dev(struct net_device *dev)
2158{
2159	struct qeth_card *card = NULL;
2160	int rc;
2161
2162	rc = qeth_l3_verify_dev(dev);
2163	if (rc == QETH_REAL_CARD)
2164		card = dev->ml_priv;
2165	else if (rc == QETH_VLAN_CARD)
2166		card = vlan_dev_real_dev(dev)->ml_priv;
2167	if (card && card->options.layer2)
2168		card = NULL;
2169	if (card)
2170		QETH_CARD_TEXT_(card, 4, "%d", rc);
2171	return card ;
2172}
2173
2174static int qeth_l3_stop_card(struct qeth_card *card, int recovery_mode)
2175{
2176	int rc = 0;
2177
2178	QETH_DBF_TEXT(SETUP, 2, "stopcard");
2179	QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
2180
2181	qeth_set_allowed_threads(card, 0, 1);
2182	if (card->options.sniffer &&
2183	    (card->info.promisc_mode == SET_PROMISC_MODE_ON))
2184		qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
2185	if (card->read.state == CH_STATE_UP &&
2186	    card->write.state == CH_STATE_UP &&
2187	    (card->state == CARD_STATE_UP)) {
2188		if (recovery_mode)
2189			qeth_l3_stop(card->dev);
2190		else {
2191			rtnl_lock();
2192			dev_close(card->dev);
2193			rtnl_unlock();
2194		}
2195		card->state = CARD_STATE_SOFTSETUP;
2196	}
2197	if (card->state == CARD_STATE_SOFTSETUP) {
2198		qeth_l3_clear_ip_list(card, 1);
2199		qeth_clear_ipacmd_list(card);
2200		card->state = CARD_STATE_HARDSETUP;
2201	}
2202	if (card->state == CARD_STATE_HARDSETUP) {
2203		qeth_qdio_clear_card(card, 0);
2204		qeth_clear_qdio_buffers(card);
2205		qeth_clear_working_pool_list(card);
2206		card->state = CARD_STATE_DOWN;
2207	}
2208	if (card->state == CARD_STATE_DOWN) {
2209		qeth_clear_cmd_buffers(&card->read);
2210		qeth_clear_cmd_buffers(&card->write);
2211	}
2212	return rc;
2213}
2214
2215/*
2216 * test for and Switch promiscuous mode (on or off)
2217 *  either for guestlan or HiperSocket Sniffer
2218 */
2219static void
2220qeth_l3_handle_promisc_mode(struct qeth_card *card)
2221{
2222	struct net_device *dev = card->dev;
2223
2224	if (((dev->flags & IFF_PROMISC) &&
2225	     (card->info.promisc_mode == SET_PROMISC_MODE_ON)) ||
2226	    (!(dev->flags & IFF_PROMISC) &&
2227	     (card->info.promisc_mode == SET_PROMISC_MODE_OFF)))
2228		return;
2229
2230	if (card->info.guestlan) {		/* Guestlan trace */
2231		if (qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
2232			qeth_setadp_promisc_mode(card);
2233	} else if (card->options.sniffer &&	/* HiperSockets trace */
2234		   qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
2235		if (dev->flags & IFF_PROMISC) {
2236			QETH_CARD_TEXT(card, 3, "+promisc");
2237			qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_ENABLE);
2238		} else {
2239			QETH_CARD_TEXT(card, 3, "-promisc");
2240			qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
2241		}
2242	}
2243}
2244
2245static void qeth_l3_set_multicast_list(struct net_device *dev)
2246{
2247	struct qeth_card *card = dev->ml_priv;
2248
2249	QETH_CARD_TEXT(card, 3, "setmulti");
2250	if (qeth_threads_running(card, QETH_RECOVER_THREAD) &&
2251	    (card->state != CARD_STATE_UP))
2252		return;
2253	if (!card->options.sniffer) {
2254		qeth_l3_delete_mc_addresses(card);
2255		qeth_l3_add_multicast_ipv4(card);
2256#ifdef CONFIG_QETH_IPV6
2257		qeth_l3_add_multicast_ipv6(card);
2258#endif
2259		qeth_l3_set_ip_addr_list(card);
2260		if (!qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
2261			return;
2262	}
2263	qeth_l3_handle_promisc_mode(card);
2264}
2265
2266static const char *qeth_l3_arp_get_error_cause(int *rc)
2267{
2268	switch (*rc) {
2269	case QETH_IPA_ARP_RC_FAILED:
2270		*rc = -EIO;
2271		return "operation failed";
2272	case QETH_IPA_ARP_RC_NOTSUPP:
2273		*rc = -EOPNOTSUPP;
2274		return "operation not supported";
2275	case QETH_IPA_ARP_RC_OUT_OF_RANGE:
2276		*rc = -EINVAL;
2277		return "argument out of range";
2278	case QETH_IPA_ARP_RC_Q_NOTSUPP:
2279		*rc = -EOPNOTSUPP;
2280		return "query operation not supported";
2281	case QETH_IPA_ARP_RC_Q_NO_DATA:
2282		*rc = -ENOENT;
2283		return "no query data available";
2284	default:
2285		return "unknown error";
2286	}
2287}
2288
2289static int qeth_l3_arp_set_no_entries(struct qeth_card *card, int no_entries)
2290{
2291	int tmp;
2292	int rc;
2293
2294	QETH_CARD_TEXT(card, 3, "arpstnoe");
2295
2296	/*
2297	 * currently GuestLAN only supports the ARP assist function
2298	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_SET_NO_ENTRIES;
2299	 * thus we say EOPNOTSUPP for this ARP function
2300	 */
2301	if (card->info.guestlan)
2302		return -EOPNOTSUPP;
2303	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2304		return -EOPNOTSUPP;
2305	}
2306	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2307					  IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
2308					  no_entries);
2309	if (rc) {
2310		tmp = rc;
2311		QETH_DBF_MESSAGE(2, "Could not set number of ARP entries on "
2312			"%s: %s (0x%x/%d)\n", QETH_CARD_IFNAME(card),
2313			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2314	}
2315	return rc;
2316}
2317
2318static __u32 get_arp_entry_size(struct qeth_card *card,
2319			struct qeth_arp_query_data *qdata,
2320			struct qeth_arp_entrytype *type, __u8 strip_entries)
2321{
2322	__u32 rc;
2323	__u8 is_hsi;
2324
2325	is_hsi = qdata->reply_bits == 5;
2326	if (type->ip == QETHARP_IP_ADDR_V4) {
2327		QETH_CARD_TEXT(card, 4, "arpev4");
2328		if (strip_entries) {
2329			rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5_short) :
2330				sizeof(struct qeth_arp_qi_entry7_short);
2331		} else {
2332			rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5) :
2333				sizeof(struct qeth_arp_qi_entry7);
2334		}
2335	} else if (type->ip == QETHARP_IP_ADDR_V6) {
2336		QETH_CARD_TEXT(card, 4, "arpev6");
2337		if (strip_entries) {
2338			rc = is_hsi ?
2339				sizeof(struct qeth_arp_qi_entry5_short_ipv6) :
2340				sizeof(struct qeth_arp_qi_entry7_short_ipv6);
2341		} else {
2342			rc = is_hsi ?
2343				sizeof(struct qeth_arp_qi_entry5_ipv6) :
2344				sizeof(struct qeth_arp_qi_entry7_ipv6);
2345		}
2346	} else {
2347		QETH_CARD_TEXT(card, 4, "arpinv");
2348		rc = 0;
2349	}
2350
2351	return rc;
2352}
2353
2354static int arpentry_matches_prot(struct qeth_arp_entrytype *type, __u16 prot)
2355{
2356	return (type->ip == QETHARP_IP_ADDR_V4 && prot == QETH_PROT_IPV4) ||
2357		(type->ip == QETHARP_IP_ADDR_V6 && prot == QETH_PROT_IPV6);
2358}
2359
2360static int qeth_l3_arp_query_cb(struct qeth_card *card,
2361		struct qeth_reply *reply, unsigned long data)
2362{
2363	struct qeth_ipa_cmd *cmd;
2364	struct qeth_arp_query_data *qdata;
2365	struct qeth_arp_query_info *qinfo;
2366	int i;
2367	int e;
2368	int entrybytes_done;
2369	int stripped_bytes;
2370	__u8 do_strip_entries;
2371
2372	QETH_CARD_TEXT(card, 3, "arpquecb");
2373
2374	qinfo = (struct qeth_arp_query_info *) reply->param;
2375	cmd = (struct qeth_ipa_cmd *) data;
2376	QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.prot_version);
2377	if (cmd->hdr.return_code) {
2378		QETH_CARD_TEXT(card, 4, "arpcberr");
2379		QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2380		return 0;
2381	}
2382	if (cmd->data.setassparms.hdr.return_code) {
2383		cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
2384		QETH_CARD_TEXT(card, 4, "setaperr");
2385		QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2386		return 0;
2387	}
2388	qdata = &cmd->data.setassparms.data.query_arp;
2389	QETH_CARD_TEXT_(card, 4, "anoen%i", qdata->no_entries);
2390
2391	do_strip_entries = (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) > 0;
2392	stripped_bytes = do_strip_entries ? QETH_QARP_MEDIASPECIFIC_BYTES : 0;
2393	entrybytes_done = 0;
2394	for (e = 0; e < qdata->no_entries; ++e) {
2395		char *cur_entry;
2396		__u32 esize;
2397		struct qeth_arp_entrytype *etype;
2398
2399		cur_entry = &qdata->data + entrybytes_done;
2400		etype = &((struct qeth_arp_qi_entry5 *) cur_entry)->type;
2401		if (!arpentry_matches_prot(etype, cmd->hdr.prot_version)) {
2402			QETH_CARD_TEXT(card, 4, "pmis");
2403			QETH_CARD_TEXT_(card, 4, "%i", etype->ip);
2404			break;
2405		}
2406		esize = get_arp_entry_size(card, qdata, etype,
2407			do_strip_entries);
2408		QETH_CARD_TEXT_(card, 5, "esz%i", esize);
2409		if (!esize)
2410			break;
2411
2412		if ((qinfo->udata_len - qinfo->udata_offset) < esize) {
2413			QETH_CARD_TEXT_(card, 4, "qaer3%i", -ENOMEM);
2414			cmd->hdr.return_code = -ENOMEM;
2415			goto out_error;
2416		}
2417
2418		memcpy(qinfo->udata + qinfo->udata_offset,
2419			&qdata->data + entrybytes_done + stripped_bytes,
2420			esize);
2421		entrybytes_done += esize + stripped_bytes;
2422		qinfo->udata_offset += esize;
2423		++qinfo->no_entries;
2424	}
2425	/* check if all replies received ... */
2426	if (cmd->data.setassparms.hdr.seq_no <
2427	    cmd->data.setassparms.hdr.number_of_replies)
2428		return 1;
2429	QETH_CARD_TEXT_(card, 4, "nove%i", qinfo->no_entries);
2430	memcpy(qinfo->udata, &qinfo->no_entries, 4);
2431	/* keep STRIP_ENTRIES flag so the user program can distinguish
2432	 * stripped entries from normal ones */
2433	if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
2434		qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
2435	memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET, &qdata->reply_bits, 2);
2436	QETH_CARD_TEXT_(card, 4, "rc%i", 0);
2437	return 0;
2438out_error:
2439	i = 0;
2440	memcpy(qinfo->udata, &i, 4);
2441	return 0;
2442}
2443
2444static int qeth_l3_send_ipa_arp_cmd(struct qeth_card *card,
2445		struct qeth_cmd_buffer *iob, int len,
2446		int (*reply_cb)(struct qeth_card *, struct qeth_reply *,
2447			unsigned long),
2448		void *reply_param)
2449{
2450	QETH_CARD_TEXT(card, 4, "sendarp");
2451
2452	memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
2453	memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
2454	       &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
2455	return qeth_send_control_data(card, IPA_PDU_HEADER_SIZE + len, iob,
2456				      reply_cb, reply_param);
2457}
2458
2459static int qeth_l3_query_arp_cache_info(struct qeth_card *card,
2460	enum qeth_prot_versions prot,
2461	struct qeth_arp_query_info *qinfo)
2462{
2463	struct qeth_cmd_buffer *iob;
2464	struct qeth_ipa_cmd *cmd;
2465	int tmp;
2466	int rc;
2467
2468	QETH_CARD_TEXT_(card, 3, "qarpipv%i", prot);
2469
2470	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2471			IPA_CMD_ASS_ARP_QUERY_INFO,
2472			sizeof(struct qeth_arp_query_data) - sizeof(char),
2473			prot);
2474	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
2475	cmd->data.setassparms.data.query_arp.request_bits = 0x000F;
2476	cmd->data.setassparms.data.query_arp.reply_bits = 0;
2477	cmd->data.setassparms.data.query_arp.no_entries = 0;
2478	rc = qeth_l3_send_ipa_arp_cmd(card, iob,
2479			   QETH_SETASS_BASE_LEN+QETH_ARP_CMD_LEN,
2480			   qeth_l3_arp_query_cb, (void *)qinfo);
2481	if (rc) {
2482		tmp = rc;
2483		QETH_DBF_MESSAGE(2,
2484			"Error while querying ARP cache on %s: %s "
2485			"(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2486			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2487	}
2488
2489	return rc;
2490}
2491
2492static int qeth_l3_arp_query(struct qeth_card *card, char __user *udata)
2493{
2494	struct qeth_arp_query_info qinfo = {0, };
2495	int rc;
2496
2497	QETH_CARD_TEXT(card, 3, "arpquery");
2498
2499	if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
2500			       IPA_ARP_PROCESSING)) {
2501		QETH_CARD_TEXT(card, 3, "arpqnsup");
2502		rc = -EOPNOTSUPP;
2503		goto out;
2504	}
2505	/* get size of userspace buffer and mask_bits -> 6 bytes */
2506	if (copy_from_user(&qinfo, udata, 6)) {
2507		rc = -EFAULT;
2508		goto out;
2509	}
2510	qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
2511	if (!qinfo.udata) {
2512		rc = -ENOMEM;
2513		goto out;
2514	}
2515	qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
2516	rc = qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV4, &qinfo);
2517	if (rc) {
2518		if (copy_to_user(udata, qinfo.udata, 4))
2519			rc = -EFAULT;
2520			goto free_and_out;
2521	} else {
2522#ifdef CONFIG_QETH_IPV6
2523		if (qinfo.mask_bits & QETH_QARP_WITH_IPV6) {
2524			/* fails in case of GuestLAN QDIO mode */
2525			qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV6,
2526				&qinfo);
2527		}
2528#endif
2529		if (copy_to_user(udata, qinfo.udata, qinfo.udata_len)) {
2530			QETH_CARD_TEXT(card, 4, "qactf");
2531			rc = -EFAULT;
2532			goto free_and_out;
2533		}
2534		QETH_CARD_TEXT_(card, 4, "qacts");
2535	}
2536free_and_out:
2537	kfree(qinfo.udata);
2538out:
2539	return rc;
2540}
2541
2542static int qeth_l3_arp_add_entry(struct qeth_card *card,
2543				struct qeth_arp_cache_entry *entry)
2544{
2545	struct qeth_cmd_buffer *iob;
2546	char buf[16];
2547	int tmp;
2548	int rc;
2549
2550	QETH_CARD_TEXT(card, 3, "arpadent");
2551
2552	/*
2553	 * currently GuestLAN only supports the ARP assist function
2554	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_ADD_ENTRY;
2555	 * thus we say EOPNOTSUPP for this ARP function
2556	 */
2557	if (card->info.guestlan)
2558		return -EOPNOTSUPP;
2559	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2560		return -EOPNOTSUPP;
2561	}
2562
2563	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2564				       IPA_CMD_ASS_ARP_ADD_ENTRY,
2565				       sizeof(struct qeth_arp_cache_entry),
2566				       QETH_PROT_IPV4);
2567	rc = qeth_l3_send_setassparms(card, iob,
2568				   sizeof(struct qeth_arp_cache_entry),
2569				   (unsigned long) entry,
2570				   qeth_l3_default_setassparms_cb, NULL);
2571	if (rc) {
2572		tmp = rc;
2573		qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2574		QETH_DBF_MESSAGE(2, "Could not add ARP entry for address %s "
2575			"on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2576			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2577	}
2578	return rc;
2579}
2580
2581static int qeth_l3_arp_remove_entry(struct qeth_card *card,
2582				struct qeth_arp_cache_entry *entry)
2583{
2584	struct qeth_cmd_buffer *iob;
2585	char buf[16] = {0, };
2586	int tmp;
2587	int rc;
2588
2589	QETH_CARD_TEXT(card, 3, "arprment");
2590
2591	/*
2592	 * currently GuestLAN only supports the ARP assist function
2593	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_REMOVE_ENTRY;
2594	 * thus we say EOPNOTSUPP for this ARP function
2595	 */
2596	if (card->info.guestlan)
2597		return -EOPNOTSUPP;
2598	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2599		return -EOPNOTSUPP;
2600	}
2601	memcpy(buf, entry, 12);
2602	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2603				       IPA_CMD_ASS_ARP_REMOVE_ENTRY,
2604				       12,
2605				       QETH_PROT_IPV4);
2606	rc = qeth_l3_send_setassparms(card, iob,
2607				   12, (unsigned long)buf,
2608				   qeth_l3_default_setassparms_cb, NULL);
2609	if (rc) {
2610		tmp = rc;
2611		memset(buf, 0, 16);
2612		qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2613		QETH_DBF_MESSAGE(2, "Could not delete ARP entry for address %s"
2614			" on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2615			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2616	}
2617	return rc;
2618}
2619
2620static int qeth_l3_arp_flush_cache(struct qeth_card *card)
2621{
2622	int rc;
2623	int tmp;
2624
2625	QETH_CARD_TEXT(card, 3, "arpflush");
2626
2627	/*
2628	 * currently GuestLAN only supports the ARP assist function
2629	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_FLUSH_CACHE;
2630	 * thus we say EOPNOTSUPP for this ARP function
2631	*/
2632	if (card->info.guestlan || (card->info.type == QETH_CARD_TYPE_IQD))
2633		return -EOPNOTSUPP;
2634	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2635		return -EOPNOTSUPP;
2636	}
2637	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2638					  IPA_CMD_ASS_ARP_FLUSH_CACHE, 0);
2639	if (rc) {
2640		tmp = rc;
2641		QETH_DBF_MESSAGE(2, "Could not flush ARP cache on %s: %s "
2642			"(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2643			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2644	}
2645	return rc;
2646}
2647
2648static int qeth_l3_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
2649{
2650	struct qeth_card *card = dev->ml_priv;
2651	struct qeth_arp_cache_entry arp_entry;
2652	struct mii_ioctl_data *mii_data;
2653	int rc = 0;
2654
2655	if (!card)
2656		return -ENODEV;
2657
2658	if ((card->state != CARD_STATE_UP) &&
2659		(card->state != CARD_STATE_SOFTSETUP))
2660		return -ENODEV;
2661
2662	switch (cmd) {
2663	case SIOC_QETH_ARP_SET_NO_ENTRIES:
2664		if (!capable(CAP_NET_ADMIN)) {
2665			rc = -EPERM;
2666			break;
2667		}
2668		rc = qeth_l3_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
2669		break;
2670	case SIOC_QETH_ARP_QUERY_INFO:
2671		if (!capable(CAP_NET_ADMIN)) {
2672			rc = -EPERM;
2673			break;
2674		}
2675		rc = qeth_l3_arp_query(card, rq->ifr_ifru.ifru_data);
2676		break;
2677	case SIOC_QETH_ARP_ADD_ENTRY:
2678		if (!capable(CAP_NET_ADMIN)) {
2679			rc = -EPERM;
2680			break;
2681		}
2682		if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2683				   sizeof(struct qeth_arp_cache_entry)))
2684			rc = -EFAULT;
2685		else
2686			rc = qeth_l3_arp_add_entry(card, &arp_entry);
2687		break;
2688	case SIOC_QETH_ARP_REMOVE_ENTRY:
2689		if (!capable(CAP_NET_ADMIN)) {
2690			rc = -EPERM;
2691			break;
2692		}
2693		if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2694				   sizeof(struct qeth_arp_cache_entry)))
2695			rc = -EFAULT;
2696		else
2697			rc = qeth_l3_arp_remove_entry(card, &arp_entry);
2698		break;
2699	case SIOC_QETH_ARP_FLUSH_CACHE:
2700		if (!capable(CAP_NET_ADMIN)) {
2701			rc = -EPERM;
2702			break;
2703		}
2704		rc = qeth_l3_arp_flush_cache(card);
2705		break;
2706	case SIOC_QETH_ADP_SET_SNMP_CONTROL:
2707		rc = qeth_snmp_command(card, rq->ifr_ifru.ifru_data);
2708		break;
2709	case SIOC_QETH_GET_CARD_TYPE:
2710		if ((card->info.type == QETH_CARD_TYPE_OSD ||
2711		     card->info.type == QETH_CARD_TYPE_OSX) &&
2712		    !card->info.guestlan)
2713			return 1;
2714		return 0;
2715		break;
2716	case SIOCGMIIPHY:
2717		mii_data = if_mii(rq);
2718		mii_data->phy_id = 0;
2719		break;
2720	case SIOCGMIIREG:
2721		mii_data = if_mii(rq);
2722		if (mii_data->phy_id != 0)
2723			rc = -EINVAL;
2724		else
2725			mii_data->val_out = qeth_mdio_read(dev,
2726							mii_data->phy_id,
2727							mii_data->reg_num);
2728		break;
 
 
 
2729	default:
2730		rc = -EOPNOTSUPP;
2731	}
2732	if (rc)
2733		QETH_CARD_TEXT_(card, 2, "ioce%d", rc);
2734	return rc;
2735}
2736
2737int inline qeth_l3_get_cast_type(struct qeth_card *card, struct sk_buff *skb)
2738{
2739	int cast_type = RTN_UNSPEC;
2740	struct neighbour *n = NULL;
2741	struct dst_entry *dst;
2742
 
2743	dst = skb_dst(skb);
2744	if (dst)
2745		n = dst_get_neighbour(dst);
2746	if (n) {
2747		cast_type = n->type;
 
 
2748		if ((cast_type == RTN_BROADCAST) ||
2749		    (cast_type == RTN_MULTICAST) ||
2750		    (cast_type == RTN_ANYCAST))
2751			return cast_type;
2752		else
2753			return RTN_UNSPEC;
2754	}
 
 
2755	/* try something else */
2756	if (skb->protocol == ETH_P_IPV6)
2757		return (skb_network_header(skb)[24] == 0xff) ?
2758				RTN_MULTICAST : 0;
2759	else if (skb->protocol == ETH_P_IP)
2760		return ((skb_network_header(skb)[16] & 0xf0) == 0xe0) ?
2761				RTN_MULTICAST : 0;
2762	/* ... */
2763	if (!memcmp(skb->data, skb->dev->broadcast, 6))
2764		return RTN_BROADCAST;
2765	else {
2766		u16 hdr_mac;
2767
2768		hdr_mac = *((u16 *)skb->data);
2769		/* tr multicast? */
2770		switch (card->info.link_type) {
2771		case QETH_LINK_TYPE_HSTR:
2772		case QETH_LINK_TYPE_LANE_TR:
2773			if ((hdr_mac == QETH_TR_MAC_NC) ||
2774			    (hdr_mac == QETH_TR_MAC_C))
2775				return RTN_MULTICAST;
2776			break;
2777		/* eth or so multicast? */
2778		default:
2779		if ((hdr_mac == QETH_ETH_MAC_V4) ||
2780			    (hdr_mac == QETH_ETH_MAC_V6))
2781				return RTN_MULTICAST;
2782		}
2783	}
2784	return cast_type;
2785}
2786
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2787static void qeth_l3_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
2788		struct sk_buff *skb, int ipv, int cast_type)
2789{
2790	struct neighbour *n = NULL;
2791	struct dst_entry *dst;
2792
2793	memset(hdr, 0, sizeof(struct qeth_hdr));
2794	hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
2795	hdr->hdr.l3.ext_flags = 0;
2796
2797	/*
2798	 * before we're going to overwrite this location with next hop ip.
2799	 * v6 uses passthrough, v4 sets the tag in the QDIO header.
2800	 */
2801	if (vlan_tx_tag_present(skb)) {
2802		if ((ipv == 4) || (card->info.type == QETH_CARD_TYPE_IQD))
2803			hdr->hdr.l3.ext_flags = QETH_HDR_EXT_VLAN_FRAME;
2804		else
2805			hdr->hdr.l3.ext_flags = QETH_HDR_EXT_INCLUDE_VLAN_TAG;
2806		hdr->hdr.l3.vlan_id = vlan_tx_tag_get(skb);
2807	}
2808
2809	hdr->hdr.l3.length = skb->len - sizeof(struct qeth_hdr);
 
 
2810	dst = skb_dst(skb);
2811	if (dst)
2812		n = dst_get_neighbour(dst);
2813	if (ipv == 4) {
 
 
 
 
 
 
2814		/* IPv4 */
2815		hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags4(cast_type);
2816		memset(hdr->hdr.l3.dest_addr, 0, 12);
2817		if (n) {
2818			*((u32 *) (&hdr->hdr.l3.dest_addr[12])) =
2819			    *((u32 *) n->primary_key);
2820		} else {
2821			/* fill in destination address used in ip header */
2822			*((u32 *) (&hdr->hdr.l3.dest_addr[12])) =
2823							ip_hdr(skb)->daddr;
2824		}
2825	} else if (ipv == 6) {
 
 
 
 
 
 
2826		/* IPv6 */
2827		hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags6(cast_type);
2828		if (card->info.type == QETH_CARD_TYPE_IQD)
2829			hdr->hdr.l3.flags &= ~QETH_HDR_PASSTHRU;
2830		if (n) {
2831			memcpy(hdr->hdr.l3.dest_addr,
2832			       n->primary_key, 16);
2833		} else {
2834			/* fill in destination address used in ip header */
2835			memcpy(hdr->hdr.l3.dest_addr,
2836			       &ipv6_hdr(skb)->daddr, 16);
2837		}
2838	} else {
2839		/* passthrough */
2840		if ((skb->dev->type == ARPHRD_IEEE802_TR) &&
2841			!memcmp(skb->data + sizeof(struct qeth_hdr) +
2842			sizeof(__u16), skb->dev->broadcast, 6)) {
2843			hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
2844						QETH_HDR_PASSTHRU;
2845		} else if (!memcmp(skb->data + sizeof(struct qeth_hdr),
2846			    skb->dev->broadcast, 6)) {
2847			/* broadcast? */
2848			hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
2849						QETH_HDR_PASSTHRU;
2850		} else {
2851			hdr->hdr.l3.flags = (cast_type == RTN_MULTICAST) ?
2852				QETH_CAST_MULTICAST | QETH_HDR_PASSTHRU :
2853				QETH_CAST_UNICAST | QETH_HDR_PASSTHRU;
2854		}
2855	}
 
2856}
2857
2858static inline void qeth_l3_hdr_csum(struct qeth_card *card,
2859		struct qeth_hdr *hdr, struct sk_buff *skb)
2860{
2861	struct iphdr *iph = ip_hdr(skb);
2862
2863	/* tcph->check contains already the pseudo hdr checksum
2864	 * so just set the header flags
2865	 */
2866	if (iph->protocol == IPPROTO_UDP)
2867		hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_UDP;
2868	hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_CSUM_TRANSP_REQ |
2869		QETH_HDR_EXT_CSUM_HDR_REQ;
2870	iph->check = 0;
2871	if (card->options.performance_stats)
2872		card->perf_stats.tx_csum++;
2873}
2874
2875static void qeth_tso_fill_header(struct qeth_card *card,
2876		struct qeth_hdr *qhdr, struct sk_buff *skb)
2877{
2878	struct qeth_hdr_tso *hdr = (struct qeth_hdr_tso *)qhdr;
2879	struct tcphdr *tcph = tcp_hdr(skb);
2880	struct iphdr *iph = ip_hdr(skb);
2881	struct ipv6hdr *ip6h = ipv6_hdr(skb);
2882
2883	/*fix header to TSO values ...*/
2884	hdr->hdr.hdr.l3.id = QETH_HEADER_TYPE_TSO;
2885	hdr->hdr.hdr.l3.length = skb->len - sizeof(struct qeth_hdr_tso);
2886	/*set values which are fix for the first approach ...*/
2887	hdr->ext.hdr_tot_len = (__u16) sizeof(struct qeth_hdr_ext_tso);
2888	hdr->ext.imb_hdr_no  = 1;
2889	hdr->ext.hdr_type    = 1;
2890	hdr->ext.hdr_version = 1;
2891	hdr->ext.hdr_len     = 28;
2892	/*insert non-fix values */
2893	hdr->ext.mss = skb_shinfo(skb)->gso_size;
2894	hdr->ext.dg_hdr_len = (__u16)(iph->ihl*4 + tcph->doff*4);
2895	hdr->ext.payload_len = (__u16)(skb->len - hdr->ext.dg_hdr_len -
2896				       sizeof(struct qeth_hdr_tso));
2897	tcph->check = 0;
2898	if (skb->protocol == ETH_P_IPV6) {
2899		ip6h->payload_len = 0;
2900		tcph->check = ~csum_ipv6_magic(&ip6h->saddr, &ip6h->daddr,
2901					       0, IPPROTO_TCP, 0);
2902	} else {
2903		/*OSA want us to set these values ...*/
2904		tcph->check = ~csum_tcpudp_magic(iph->saddr, iph->daddr,
2905					 0, IPPROTO_TCP, 0);
2906		iph->tot_len = 0;
2907		iph->check = 0;
2908	}
2909}
2910
2911static inline int qeth_l3_tso_elements(struct sk_buff *skb)
2912{
2913	unsigned long tcpd = (unsigned long)tcp_hdr(skb) +
2914		tcp_hdr(skb)->doff * 4;
2915	int tcpd_len = skb->len - (tcpd - (unsigned long)skb->data);
2916	int elements = PFN_UP(tcpd + tcpd_len - 1) - PFN_DOWN(tcpd);
2917	elements += skb_shinfo(skb)->nr_frags;
 
 
2918	return elements;
2919}
2920
2921static int qeth_l3_hard_start_xmit(struct sk_buff *skb, struct net_device *dev)
2922{
2923	int rc;
2924	u16 *tag;
2925	struct qeth_hdr *hdr = NULL;
2926	int elements_needed = 0;
2927	int elems;
2928	struct qeth_card *card = dev->ml_priv;
2929	struct sk_buff *new_skb = NULL;
2930	int ipv = qeth_get_ip_version(skb);
2931	int cast_type = qeth_l3_get_cast_type(card, skb);
2932	struct qeth_qdio_out_q *queue = card->qdio.out_qs
2933		[qeth_get_priority_queue(card, skb, ipv, cast_type)];
2934	int tx_bytes = skb->len;
2935	bool large_send;
2936	int data_offset = -1;
2937	int nr_frags;
2938
2939	if (((card->info.type == QETH_CARD_TYPE_IQD) && (!ipv)) ||
2940	     card->options.sniffer)
 
 
 
2941			goto tx_drop;
2942
2943	if ((card->state != CARD_STATE_UP) || !card->lan_online) {
2944		card->stats.tx_carrier_errors++;
2945		goto tx_drop;
2946	}
2947
2948	if ((cast_type == RTN_BROADCAST) &&
2949	    (card->info.broadcast_capable == 0))
2950		goto tx_drop;
2951
2952	if (card->options.performance_stats) {
2953		card->perf_stats.outbound_cnt++;
2954		card->perf_stats.outbound_start_time = qeth_get_micros();
2955	}
2956
2957	large_send = skb_is_gso(skb);
2958
2959	if ((card->info.type == QETH_CARD_TYPE_IQD) && (!large_send) &&
2960	    (skb_shinfo(skb)->nr_frags == 0)) {
2961		new_skb = skb;
2962		data_offset = ETH_HLEN;
 
 
 
2963		hdr = kmem_cache_alloc(qeth_core_header_cache, GFP_ATOMIC);
2964		if (!hdr)
2965			goto tx_drop;
2966		elements_needed++;
2967	} else {
2968		/* create a clone with writeable headroom */
2969		new_skb = skb_realloc_headroom(skb, sizeof(struct qeth_hdr_tso)
2970					+ VLAN_HLEN);
2971		if (!new_skb)
2972			goto tx_drop;
2973	}
2974
2975	if (card->info.type == QETH_CARD_TYPE_IQD) {
2976		if (data_offset < 0)
2977			skb_pull(new_skb, ETH_HLEN);
2978	} else {
2979		if (ipv == 4) {
2980			if (card->dev->type == ARPHRD_IEEE802_TR)
2981				skb_pull(new_skb, TR_HLEN);
2982			else
2983				skb_pull(new_skb, ETH_HLEN);
2984		}
2985
2986		if (ipv != 4 && vlan_tx_tag_present(new_skb)) {
2987			skb_push(new_skb, VLAN_HLEN);
2988			skb_copy_to_linear_data(new_skb, new_skb->data + 4, 4);
2989			skb_copy_to_linear_data_offset(new_skb, 4,
2990				new_skb->data + 8, 4);
2991			skb_copy_to_linear_data_offset(new_skb, 8,
2992				new_skb->data + 12, 4);
2993			tag = (u16 *)(new_skb->data + 12);
2994			*tag = __constant_htons(ETH_P_8021Q);
2995			*(tag + 1) = htons(vlan_tx_tag_get(new_skb));
2996			new_skb->vlan_tci = 0;
2997		}
2998	}
2999
3000	netif_stop_queue(dev);
3001
3002	/* fix hardware limitation: as long as we do not have sbal
3003	 * chaining we can not send long frag lists
3004	 */
3005	if (large_send) {
3006		if (qeth_l3_tso_elements(new_skb) + 1 > 16) {
3007			if (skb_linearize(new_skb))
3008				goto tx_drop;
3009			if (card->options.performance_stats)
3010				card->perf_stats.tx_lin++;
3011		}
3012	}
3013
3014	if (large_send && (cast_type == RTN_UNSPEC)) {
3015		hdr = (struct qeth_hdr *)skb_push(new_skb,
3016						sizeof(struct qeth_hdr_tso));
3017		memset(hdr, 0, sizeof(struct qeth_hdr_tso));
3018		qeth_l3_fill_header(card, hdr, new_skb, ipv, cast_type);
3019		qeth_tso_fill_header(card, hdr, new_skb);
3020		elements_needed++;
3021	} else {
3022		if (data_offset < 0) {
3023			hdr = (struct qeth_hdr *)skb_push(new_skb,
3024						sizeof(struct qeth_hdr));
3025			qeth_l3_fill_header(card, hdr, new_skb, ipv,
3026						cast_type);
3027		} else {
3028			qeth_l3_fill_header(card, hdr, new_skb, ipv,
3029						cast_type);
3030			hdr->hdr.l3.length = new_skb->len - data_offset;
 
 
 
 
3031		}
3032
3033		if (skb->ip_summed == CHECKSUM_PARTIAL)
3034			qeth_l3_hdr_csum(card, hdr, new_skb);
3035	}
3036
3037	elems = qeth_get_elements_no(card, (void *)hdr, new_skb,
3038						 elements_needed);
3039	if (!elems) {
3040		if (data_offset >= 0)
3041			kmem_cache_free(qeth_core_header_cache, hdr);
3042		goto tx_drop;
3043	}
3044	elements_needed += elems;
3045	nr_frags = skb_shinfo(new_skb)->nr_frags;
3046
3047	if (card->info.type != QETH_CARD_TYPE_IQD) {
3048		int len;
3049		if (large_send)
3050			len = ((unsigned long)tcp_hdr(new_skb) +
3051				tcp_hdr(new_skb)->doff * 4) -
3052				(unsigned long)new_skb->data;
3053		else
3054			len = sizeof(struct qeth_hdr_layer3);
3055
3056		if (qeth_hdr_chk_and_bounce(new_skb, len))
3057			goto tx_drop;
3058		rc = qeth_do_send_packet(card, queue, new_skb, hdr,
3059					 elements_needed);
3060	} else
3061		rc = qeth_do_send_packet_fast(card, queue, new_skb, hdr,
3062					elements_needed, data_offset, 0);
3063
3064	if (!rc) {
3065		card->stats.tx_packets++;
3066		card->stats.tx_bytes += tx_bytes;
3067		if (new_skb != skb)
3068			dev_kfree_skb_any(skb);
3069		if (card->options.performance_stats) {
3070			if (large_send) {
3071				card->perf_stats.large_send_bytes += tx_bytes;
3072				card->perf_stats.large_send_cnt++;
3073			}
3074			if (nr_frags) {
3075				card->perf_stats.sg_skbs_sent++;
3076				/* nr_frags + skb->data */
3077				card->perf_stats.sg_frags_sent += nr_frags + 1;
3078			}
3079		}
3080		rc = NETDEV_TX_OK;
3081	} else {
3082		if (data_offset >= 0)
3083			kmem_cache_free(qeth_core_header_cache, hdr);
3084
3085		if (rc == -EBUSY) {
3086			if (new_skb != skb)
3087				dev_kfree_skb_any(new_skb);
3088			return NETDEV_TX_BUSY;
3089		} else
3090			goto tx_drop;
3091	}
3092
3093	netif_wake_queue(dev);
3094	if (card->options.performance_stats)
3095		card->perf_stats.outbound_time += qeth_get_micros() -
3096			card->perf_stats.outbound_start_time;
3097	return rc;
3098
3099tx_drop:
3100	card->stats.tx_dropped++;
3101	card->stats.tx_errors++;
3102	if ((new_skb != skb) && new_skb)
3103		dev_kfree_skb_any(new_skb);
3104	dev_kfree_skb_any(skb);
3105	netif_wake_queue(dev);
3106	return NETDEV_TX_OK;
3107}
3108
3109static int __qeth_l3_open(struct net_device *dev)
3110{
3111	struct qeth_card *card = dev->ml_priv;
3112	int rc = 0;
3113
3114	QETH_CARD_TEXT(card, 4, "qethopen");
3115	if (card->state == CARD_STATE_UP)
3116		return rc;
3117	if (card->state != CARD_STATE_SOFTSETUP)
3118		return -ENODEV;
3119	card->data.state = CH_STATE_UP;
3120	card->state = CARD_STATE_UP;
3121	netif_start_queue(dev);
3122
3123	if (qdio_stop_irq(card->data.ccwdev, 0) >= 0) {
3124		napi_enable(&card->napi);
3125		napi_schedule(&card->napi);
3126	} else
3127		rc = -EIO;
3128	return rc;
3129}
3130
3131static int qeth_l3_open(struct net_device *dev)
3132{
3133	struct qeth_card *card = dev->ml_priv;
3134
3135	QETH_CARD_TEXT(card, 5, "qethope_");
3136	if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
3137		QETH_CARD_TEXT(card, 3, "openREC");
3138		return -ERESTARTSYS;
3139	}
3140	return __qeth_l3_open(dev);
3141}
3142
3143static int qeth_l3_stop(struct net_device *dev)
3144{
3145	struct qeth_card *card = dev->ml_priv;
3146
3147	QETH_CARD_TEXT(card, 4, "qethstop");
3148	netif_tx_disable(dev);
3149	if (card->state == CARD_STATE_UP) {
3150		card->state = CARD_STATE_SOFTSETUP;
3151		napi_disable(&card->napi);
3152	}
3153	return 0;
3154}
3155
3156static u32 qeth_l3_fix_features(struct net_device *dev, u32 features)
 
3157{
3158	struct qeth_card *card = dev->ml_priv;
3159
3160	if (!qeth_is_supported(card, IPA_OUTBOUND_CHECKSUM))
3161		features &= ~NETIF_F_IP_CSUM;
3162	if (!qeth_is_supported(card, IPA_OUTBOUND_TSO))
3163		features &= ~NETIF_F_TSO;
3164	if (!qeth_is_supported(card, IPA_INBOUND_CHECKSUM))
3165		features &= ~NETIF_F_RXCSUM;
3166
3167	return features;
3168}
3169
3170static int qeth_l3_set_features(struct net_device *dev, u32 features)
 
3171{
3172	struct qeth_card *card = dev->ml_priv;
3173	u32 changed = dev->features ^ features;
3174	int err;
3175
3176	if (!(changed & NETIF_F_RXCSUM))
3177		return 0;
3178
3179	if (card->state == CARD_STATE_DOWN ||
3180	    card->state == CARD_STATE_RECOVER)
3181		return 0;
3182
3183	err = qeth_l3_set_rx_csum(card, features & NETIF_F_RXCSUM);
3184	if (err)
3185		dev->features = features ^ NETIF_F_RXCSUM;
3186
3187	return err;
3188}
3189
3190static const struct ethtool_ops qeth_l3_ethtool_ops = {
3191	.get_link = ethtool_op_get_link,
3192	.get_strings = qeth_core_get_strings,
3193	.get_ethtool_stats = qeth_core_get_ethtool_stats,
3194	.get_sset_count = qeth_core_get_sset_count,
3195	.get_drvinfo = qeth_core_get_drvinfo,
3196	.get_settings = qeth_core_ethtool_get_settings,
3197};
3198
3199/*
3200 * we need NOARP for IPv4 but we want neighbor solicitation for IPv6. Setting
3201 * NOARP on the netdevice is no option because it also turns off neighbor
3202 * solicitation. For IPv4 we install a neighbor_setup function. We don't want
3203 * arp resolution but we want the hard header (packet socket will work
3204 * e.g. tcpdump)
3205 */
3206static int qeth_l3_neigh_setup_noarp(struct neighbour *n)
3207{
3208	n->nud_state = NUD_NOARP;
3209	memcpy(n->ha, "FAKELL", 6);
3210	n->output = n->ops->connected_output;
3211	return 0;
3212}
3213
3214static int
3215qeth_l3_neigh_setup(struct net_device *dev, struct neigh_parms *np)
3216{
3217	if (np->tbl->family == AF_INET)
3218		np->neigh_setup = qeth_l3_neigh_setup_noarp;
3219
3220	return 0;
3221}
3222
3223static const struct net_device_ops qeth_l3_netdev_ops = {
3224	.ndo_open		= qeth_l3_open,
3225	.ndo_stop		= qeth_l3_stop,
3226	.ndo_get_stats		= qeth_get_stats,
3227	.ndo_start_xmit		= qeth_l3_hard_start_xmit,
3228	.ndo_validate_addr	= eth_validate_addr,
3229	.ndo_set_multicast_list = qeth_l3_set_multicast_list,
3230	.ndo_do_ioctl		= qeth_l3_do_ioctl,
3231	.ndo_change_mtu		= qeth_change_mtu,
3232	.ndo_fix_features	= qeth_l3_fix_features,
3233	.ndo_set_features	= qeth_l3_set_features,
3234	.ndo_vlan_rx_add_vid	= qeth_l3_vlan_rx_add_vid,
3235	.ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
3236	.ndo_tx_timeout		= qeth_tx_timeout,
3237};
3238
3239static const struct net_device_ops qeth_l3_osa_netdev_ops = {
3240	.ndo_open		= qeth_l3_open,
3241	.ndo_stop		= qeth_l3_stop,
3242	.ndo_get_stats		= qeth_get_stats,
3243	.ndo_start_xmit		= qeth_l3_hard_start_xmit,
3244	.ndo_validate_addr	= eth_validate_addr,
3245	.ndo_set_multicast_list = qeth_l3_set_multicast_list,
3246	.ndo_do_ioctl		= qeth_l3_do_ioctl,
3247	.ndo_change_mtu		= qeth_change_mtu,
3248	.ndo_fix_features	= qeth_l3_fix_features,
3249	.ndo_set_features	= qeth_l3_set_features,
3250	.ndo_vlan_rx_add_vid	= qeth_l3_vlan_rx_add_vid,
3251	.ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
3252	.ndo_tx_timeout		= qeth_tx_timeout,
3253	.ndo_neigh_setup	= qeth_l3_neigh_setup,
3254};
3255
3256static int qeth_l3_setup_netdev(struct qeth_card *card)
3257{
3258	if (card->info.type == QETH_CARD_TYPE_OSD ||
3259	    card->info.type == QETH_CARD_TYPE_OSX) {
3260		if ((card->info.link_type == QETH_LINK_TYPE_LANE_TR) ||
3261		    (card->info.link_type == QETH_LINK_TYPE_HSTR)) {
3262#ifdef CONFIG_TR
3263			card->dev = alloc_trdev(0);
3264#endif
3265			if (!card->dev)
3266				return -ENODEV;
3267			card->dev->netdev_ops = &qeth_l3_netdev_ops;
3268		} else {
3269			card->dev = alloc_etherdev(0);
3270			if (!card->dev)
3271				return -ENODEV;
3272			card->dev->netdev_ops = &qeth_l3_osa_netdev_ops;
3273
3274			/*IPv6 address autoconfiguration stuff*/
3275			qeth_l3_get_unique_id(card);
3276			if (!(card->info.unique_id & UNIQUE_ID_NOT_BY_CARD))
3277				card->dev->dev_id = card->info.unique_id &
3278							 0xffff;
3279			if (!card->info.guestlan) {
3280				card->dev->hw_features = NETIF_F_SG |
3281					NETIF_F_RXCSUM | NETIF_F_IP_CSUM |
3282					NETIF_F_TSO;
3283				card->dev->features = NETIF_F_RXCSUM;
3284			}
3285		}
3286	} else if (card->info.type == QETH_CARD_TYPE_IQD) {
3287		card->dev = alloc_netdev(0, "hsi%d", ether_setup);
3288		if (!card->dev)
3289			return -ENODEV;
3290		card->dev->flags |= IFF_NOARP;
3291		card->dev->netdev_ops = &qeth_l3_netdev_ops;
3292		qeth_l3_iqd_read_initial_mac(card);
 
 
3293	} else
3294		return -ENODEV;
3295
3296	card->dev->ml_priv = card;
3297	card->dev->watchdog_timeo = QETH_TX_TIMEOUT;
3298	card->dev->mtu = card->info.initial_mtu;
3299	SET_ETHTOOL_OPS(card->dev, &qeth_l3_ethtool_ops);
3300	card->dev->features |=	NETIF_F_HW_VLAN_TX |
3301				NETIF_F_HW_VLAN_RX |
3302				NETIF_F_HW_VLAN_FILTER;
3303	card->dev->priv_flags &= ~IFF_XMIT_DST_RELEASE;
3304	card->dev->gso_max_size = 15 * PAGE_SIZE;
3305
3306	SET_NETDEV_DEV(card->dev, &card->gdev->dev);
3307	netif_napi_add(card->dev, &card->napi, qeth_l3_poll, QETH_NAPI_WEIGHT);
3308	return register_netdev(card->dev);
3309}
3310
3311static int qeth_l3_probe_device(struct ccwgroup_device *gdev)
3312{
3313	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3314
3315	qeth_l3_create_device_attributes(&gdev->dev);
3316	card->options.layer2 = 0;
3317	card->info.hwtrap = 0;
3318	card->discipline.start_poll = qeth_qdio_start_poll;
3319	card->discipline.input_handler = (qdio_handler_t *)
3320		qeth_qdio_input_handler;
3321	card->discipline.output_handler = (qdio_handler_t *)
3322		qeth_qdio_output_handler;
3323	card->discipline.recover = qeth_l3_recover;
3324	return 0;
3325}
3326
3327static void qeth_l3_remove_device(struct ccwgroup_device *cgdev)
3328{
3329	struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3330
3331	qeth_l3_remove_device_attributes(&cgdev->dev);
3332
3333	qeth_set_allowed_threads(card, 0, 1);
3334	wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3335
3336	if (cgdev->state == CCWGROUP_ONLINE)
3337		qeth_l3_set_offline(cgdev);
3338
3339	if (card->dev) {
3340		unregister_netdev(card->dev);
3341		card->dev = NULL;
3342	}
3343
3344	qeth_l3_clear_ip_list(card, 0);
3345	qeth_l3_clear_ipato_list(card);
3346	return;
3347}
3348
3349static int __qeth_l3_set_online(struct ccwgroup_device *gdev, int recovery_mode)
3350{
3351	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3352	int rc = 0;
3353	enum qeth_card_states recover_flag;
3354
3355	BUG_ON(!card);
3356	mutex_lock(&card->discipline_mutex);
3357	mutex_lock(&card->conf_mutex);
3358	QETH_DBF_TEXT(SETUP, 2, "setonlin");
3359	QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
3360
3361	recover_flag = card->state;
3362	rc = qeth_core_hardsetup_card(card);
3363	if (rc) {
3364		QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
3365		rc = -ENODEV;
3366		goto out_remove;
3367	}
3368
3369	if (!card->dev && qeth_l3_setup_netdev(card)) {
3370		rc = -ENODEV;
3371		goto out_remove;
3372	}
3373
3374	if (qeth_is_diagass_supported(card, QETH_DIAGS_CMD_TRAP)) {
3375		if (card->info.hwtrap &&
3376		    qeth_hw_trap(card, QETH_DIAGS_TRAP_ARM))
3377			card->info.hwtrap = 0;
3378	} else
3379		card->info.hwtrap = 0;
3380
3381	card->state = CARD_STATE_HARDSETUP;
3382	memset(&card->rx, 0, sizeof(struct qeth_rx));
3383	qeth_print_status_message(card);
3384
3385	/* softsetup */
3386	QETH_DBF_TEXT(SETUP, 2, "softsetp");
3387
3388	rc = qeth_send_startlan(card);
3389	if (rc) {
3390		QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
3391		if (rc == 0xe080) {
3392			dev_warn(&card->gdev->dev,
3393				"The LAN is offline\n");
3394			card->lan_online = 0;
3395			goto contin;
3396		}
3397		rc = -ENODEV;
3398		goto out_remove;
3399	} else
3400		card->lan_online = 1;
3401
3402contin:
3403	rc = qeth_l3_setadapter_parms(card);
3404	if (rc)
3405		QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
3406	if (!card->options.sniffer) {
3407		rc = qeth_l3_start_ipassists(card);
3408		if (rc)
3409			QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
 
 
3410		rc = qeth_l3_setrouting_v4(card);
3411		if (rc)
3412			QETH_DBF_TEXT_(SETUP, 2, "4err%d", rc);
3413		rc = qeth_l3_setrouting_v6(card);
3414		if (rc)
3415			QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
3416	}
3417	netif_tx_disable(card->dev);
3418
3419	rc = qeth_init_qdio_queues(card);
3420	if (rc) {
3421		QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
3422		rc = -ENODEV;
3423		goto out_remove;
3424	}
3425	card->state = CARD_STATE_SOFTSETUP;
3426
3427	qeth_set_allowed_threads(card, 0xffffffff, 0);
3428	qeth_l3_set_ip_addr_list(card);
3429	if (card->lan_online)
3430		netif_carrier_on(card->dev);
3431	else
3432		netif_carrier_off(card->dev);
3433	if (recover_flag == CARD_STATE_RECOVER) {
 
3434		if (recovery_mode)
3435			__qeth_l3_open(card->dev);
3436		else {
3437			rtnl_lock();
3438			dev_open(card->dev);
3439			rtnl_unlock();
3440		}
3441		qeth_l3_set_multicast_list(card->dev);
 
3442	}
 
3443	/* let user_space know that device is online */
3444	kobject_uevent(&gdev->dev.kobj, KOBJ_CHANGE);
3445	mutex_unlock(&card->conf_mutex);
3446	mutex_unlock(&card->discipline_mutex);
3447	return 0;
3448out_remove:
3449	qeth_l3_stop_card(card, 0);
3450	ccw_device_set_offline(CARD_DDEV(card));
3451	ccw_device_set_offline(CARD_WDEV(card));
3452	ccw_device_set_offline(CARD_RDEV(card));
 
3453	if (recover_flag == CARD_STATE_RECOVER)
3454		card->state = CARD_STATE_RECOVER;
3455	else
3456		card->state = CARD_STATE_DOWN;
3457	mutex_unlock(&card->conf_mutex);
3458	mutex_unlock(&card->discipline_mutex);
3459	return rc;
3460}
3461
3462static int qeth_l3_set_online(struct ccwgroup_device *gdev)
3463{
3464	return __qeth_l3_set_online(gdev, 0);
3465}
3466
3467static int __qeth_l3_set_offline(struct ccwgroup_device *cgdev,
3468			int recovery_mode)
3469{
3470	struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3471	int rc = 0, rc2 = 0, rc3 = 0;
3472	enum qeth_card_states recover_flag;
3473
3474	mutex_lock(&card->discipline_mutex);
3475	mutex_lock(&card->conf_mutex);
3476	QETH_DBF_TEXT(SETUP, 3, "setoffl");
3477	QETH_DBF_HEX(SETUP, 3, &card, sizeof(void *));
3478
3479	if (card->dev && netif_carrier_ok(card->dev))
3480		netif_carrier_off(card->dev);
3481	recover_flag = card->state;
3482	if ((!recovery_mode && card->info.hwtrap) || card->info.hwtrap == 2) {
3483		qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3484		card->info.hwtrap = 1;
3485	}
3486	qeth_l3_stop_card(card, recovery_mode);
 
 
 
 
 
3487	rc  = ccw_device_set_offline(CARD_DDEV(card));
3488	rc2 = ccw_device_set_offline(CARD_WDEV(card));
3489	rc3 = ccw_device_set_offline(CARD_RDEV(card));
3490	if (!rc)
3491		rc = (rc2) ? rc2 : rc3;
3492	if (rc)
3493		QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
 
3494	if (recover_flag == CARD_STATE_UP)
3495		card->state = CARD_STATE_RECOVER;
3496	/* let user_space know that device is offline */
3497	kobject_uevent(&cgdev->dev.kobj, KOBJ_CHANGE);
3498	mutex_unlock(&card->conf_mutex);
3499	mutex_unlock(&card->discipline_mutex);
3500	return 0;
3501}
3502
3503static int qeth_l3_set_offline(struct ccwgroup_device *cgdev)
3504{
3505	return __qeth_l3_set_offline(cgdev, 0);
3506}
3507
3508static int qeth_l3_recover(void *ptr)
3509{
3510	struct qeth_card *card;
3511	int rc = 0;
3512
3513	card = (struct qeth_card *) ptr;
3514	QETH_CARD_TEXT(card, 2, "recover1");
3515	QETH_CARD_HEX(card, 2, &card, sizeof(void *));
3516	if (!qeth_do_run_thread(card, QETH_RECOVER_THREAD))
3517		return 0;
3518	QETH_CARD_TEXT(card, 2, "recover2");
3519	dev_warn(&card->gdev->dev,
3520		"A recovery process has been started for the device\n");
 
3521	__qeth_l3_set_offline(card->gdev, 1);
3522	rc = __qeth_l3_set_online(card->gdev, 1);
3523	if (!rc)
3524		dev_info(&card->gdev->dev,
3525			"Device successfully recovered!\n");
3526	else {
3527		rtnl_lock();
3528		dev_close(card->dev);
3529		rtnl_unlock();
3530		dev_warn(&card->gdev->dev, "The qeth device driver "
3531			"failed to recover an error on the device\n");
3532	}
 
3533	qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
3534	qeth_clear_thread_running_bit(card, QETH_RECOVER_THREAD);
3535	return 0;
3536}
3537
3538static void qeth_l3_shutdown(struct ccwgroup_device *gdev)
3539{
3540	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
 
3541	if ((gdev->state == CCWGROUP_ONLINE) && card->info.hwtrap)
3542		qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3543	qeth_qdio_clear_card(card, 0);
3544	qeth_clear_qdio_buffers(card);
 
3545}
3546
3547static int qeth_l3_pm_suspend(struct ccwgroup_device *gdev)
3548{
3549	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3550
3551	if (card->dev)
3552		netif_device_detach(card->dev);
3553	qeth_set_allowed_threads(card, 0, 1);
3554	wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3555	if (gdev->state == CCWGROUP_OFFLINE)
3556		return 0;
3557	if (card->state == CARD_STATE_UP) {
3558		if (card->info.hwtrap)
3559			qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3560		__qeth_l3_set_offline(card->gdev, 1);
3561	} else
3562		__qeth_l3_set_offline(card->gdev, 0);
3563	return 0;
3564}
3565
3566static int qeth_l3_pm_resume(struct ccwgroup_device *gdev)
3567{
3568	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3569	int rc = 0;
3570
3571	if (gdev->state == CCWGROUP_OFFLINE)
3572		goto out;
3573
3574	if (card->state == CARD_STATE_RECOVER) {
3575		rc = __qeth_l3_set_online(card->gdev, 1);
3576		if (rc) {
3577			rtnl_lock();
3578			dev_close(card->dev);
3579			rtnl_unlock();
3580		}
3581	} else
3582		rc = __qeth_l3_set_online(card->gdev, 0);
3583out:
3584	qeth_set_allowed_threads(card, 0xffffffff, 0);
3585	if (card->dev)
3586		netif_device_attach(card->dev);
3587	if (rc)
3588		dev_warn(&card->gdev->dev, "The qeth device driver "
3589			"failed to recover an error on the device\n");
3590	return rc;
3591}
3592
3593struct ccwgroup_driver qeth_l3_ccwgroup_driver = {
3594	.probe = qeth_l3_probe_device,
 
 
 
 
 
 
 
 
 
 
 
3595	.remove = qeth_l3_remove_device,
3596	.set_online = qeth_l3_set_online,
3597	.set_offline = qeth_l3_set_offline,
3598	.shutdown = qeth_l3_shutdown,
3599	.freeze = qeth_l3_pm_suspend,
3600	.thaw = qeth_l3_pm_resume,
3601	.restore = qeth_l3_pm_resume,
 
3602};
3603EXPORT_SYMBOL_GPL(qeth_l3_ccwgroup_driver);
3604
3605static int qeth_l3_ip_event(struct notifier_block *this,
3606			    unsigned long event, void *ptr)
3607{
3608	struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
3609	struct net_device *dev = (struct net_device *)ifa->ifa_dev->dev;
3610	struct qeth_ipaddr *addr;
3611	struct qeth_card *card;
3612
3613	if (dev_net(dev) != &init_net)
3614		return NOTIFY_DONE;
3615
3616	card = qeth_l3_get_card_from_dev(dev);
3617	QETH_CARD_TEXT(card, 3, "ipevent");
3618	if (!card)
3619		return NOTIFY_DONE;
 
3620
3621	addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
3622	if (addr != NULL) {
3623		addr->u.a4.addr = ifa->ifa_address;
3624		addr->u.a4.mask = ifa->ifa_mask;
3625		addr->type = QETH_IP_TYPE_NORMAL;
3626	} else
3627		goto out;
3628
3629	switch (event) {
3630	case NETDEV_UP:
3631		if (!qeth_l3_add_ip(card, addr))
3632			kfree(addr);
3633		break;
3634	case NETDEV_DOWN:
3635		if (!qeth_l3_delete_ip(card, addr))
3636			kfree(addr);
3637		break;
3638	default:
3639		break;
3640	}
3641	qeth_l3_set_ip_addr_list(card);
3642out:
3643	return NOTIFY_DONE;
3644}
3645
3646static struct notifier_block qeth_l3_ip_notifier = {
3647	qeth_l3_ip_event,
3648	NULL,
3649};
3650
3651#ifdef CONFIG_QETH_IPV6
3652/**
3653 * IPv6 event handler
3654 */
3655static int qeth_l3_ip6_event(struct notifier_block *this,
3656			     unsigned long event, void *ptr)
3657{
3658	struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
3659	struct net_device *dev = (struct net_device *)ifa->idev->dev;
3660	struct qeth_ipaddr *addr;
3661	struct qeth_card *card;
3662
3663
3664	card = qeth_l3_get_card_from_dev(dev);
3665	if (!card)
3666		return NOTIFY_DONE;
3667	QETH_CARD_TEXT(card, 3, "ip6event");
3668	if (!qeth_is_supported(card, IPA_IPV6))
3669		return NOTIFY_DONE;
3670
3671	addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
3672	if (addr != NULL) {
3673		memcpy(&addr->u.a6.addr, &ifa->addr, sizeof(struct in6_addr));
3674		addr->u.a6.pfxlen = ifa->prefix_len;
3675		addr->type = QETH_IP_TYPE_NORMAL;
3676	} else
3677		goto out;
3678
3679	switch (event) {
3680	case NETDEV_UP:
3681		if (!qeth_l3_add_ip(card, addr))
3682			kfree(addr);
3683		break;
3684	case NETDEV_DOWN:
3685		if (!qeth_l3_delete_ip(card, addr))
3686			kfree(addr);
3687		break;
3688	default:
3689		break;
3690	}
3691	qeth_l3_set_ip_addr_list(card);
3692out:
3693	return NOTIFY_DONE;
3694}
3695
3696static struct notifier_block qeth_l3_ip6_notifier = {
3697	qeth_l3_ip6_event,
3698	NULL,
3699};
3700#endif
3701
3702static int qeth_l3_register_notifiers(void)
3703{
3704	int rc;
3705
3706	QETH_DBF_TEXT(SETUP, 5, "regnotif");
3707	rc = register_inetaddr_notifier(&qeth_l3_ip_notifier);
3708	if (rc)
3709		return rc;
3710#ifdef CONFIG_QETH_IPV6
3711	rc = register_inet6addr_notifier(&qeth_l3_ip6_notifier);
3712	if (rc) {
3713		unregister_inetaddr_notifier(&qeth_l3_ip_notifier);
3714		return rc;
3715	}
3716#else
3717	pr_warning("There is no IPv6 support for the layer 3 discipline\n");
3718#endif
3719	return 0;
3720}
3721
3722static void qeth_l3_unregister_notifiers(void)
3723{
3724
3725	QETH_DBF_TEXT(SETUP, 5, "unregnot");
3726	BUG_ON(unregister_inetaddr_notifier(&qeth_l3_ip_notifier));
3727#ifdef CONFIG_QETH_IPV6
3728	BUG_ON(unregister_inet6addr_notifier(&qeth_l3_ip6_notifier));
3729#endif /* QETH_IPV6 */
3730}
3731
3732static int __init qeth_l3_init(void)
3733{
3734	int rc = 0;
3735
3736	pr_info("register layer 3 discipline\n");
3737	rc = qeth_l3_register_notifiers();
3738	return rc;
3739}
3740
3741static void __exit qeth_l3_exit(void)
3742{
3743	qeth_l3_unregister_notifiers();
3744	pr_info("unregister layer 3 discipline\n");
3745}
3746
3747module_init(qeth_l3_init);
3748module_exit(qeth_l3_exit);
3749MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
3750MODULE_DESCRIPTION("qeth layer 3 discipline");
3751MODULE_LICENSE("GPL");
v3.15
   1/*
 
 
   2 *    Copyright IBM Corp. 2007, 2009
   3 *    Author(s): Utz Bacher <utz.bacher@de.ibm.com>,
   4 *		 Frank Pavlic <fpavlic@de.ibm.com>,
   5 *		 Thomas Spatzier <tspat@de.ibm.com>,
   6 *		 Frank Blaschka <frank.blaschka@de.ibm.com>
   7 */
   8
   9#define KMSG_COMPONENT "qeth"
  10#define pr_fmt(fmt) KMSG_COMPONENT ": " fmt
  11
  12#include <linux/module.h>
  13#include <linux/moduleparam.h>
  14#include <linux/bitops.h>
  15#include <linux/string.h>
  16#include <linux/errno.h>
  17#include <linux/kernel.h>
  18#include <linux/etherdevice.h>
  19#include <linux/mii.h>
  20#include <linux/ip.h>
  21#include <linux/ipv6.h>
  22#include <linux/inetdevice.h>
  23#include <linux/igmp.h>
  24#include <linux/slab.h>
  25#include <linux/if_vlan.h>
  26
  27#include <net/ip.h>
  28#include <net/arp.h>
  29#include <net/route.h>
  30#include <net/ip6_fib.h>
  31#include <net/ip6_checksum.h>
  32#include <net/iucv/af_iucv.h>
  33
  34#include "qeth_l3.h"
  35
  36
  37static int qeth_l3_set_offline(struct ccwgroup_device *);
  38static int qeth_l3_recover(void *);
  39static int qeth_l3_stop(struct net_device *);
  40static void qeth_l3_set_multicast_list(struct net_device *);
  41static int qeth_l3_neigh_setup(struct net_device *, struct neigh_parms *);
  42static int qeth_l3_register_addr_entry(struct qeth_card *,
  43		struct qeth_ipaddr *);
  44static int qeth_l3_deregister_addr_entry(struct qeth_card *,
  45		struct qeth_ipaddr *);
  46static int __qeth_l3_set_online(struct ccwgroup_device *, int);
  47static int __qeth_l3_set_offline(struct ccwgroup_device *, int);
  48
  49static int qeth_l3_isxdigit(char *buf)
  50{
  51	while (*buf) {
  52		if (!isxdigit(*buf++))
  53			return 0;
  54	}
  55	return 1;
  56}
  57
  58void qeth_l3_ipaddr4_to_string(const __u8 *addr, char *buf)
  59{
  60	sprintf(buf, "%i.%i.%i.%i", addr[0], addr[1], addr[2], addr[3]);
  61}
  62
  63int qeth_l3_string_to_ipaddr4(const char *buf, __u8 *addr)
  64{
  65	int count = 0, rc = 0;
  66	int in[4];
  67	char c;
  68
  69	rc = sscanf(buf, "%u.%u.%u.%u%c",
  70		    &in[0], &in[1], &in[2], &in[3], &c);
  71	if (rc != 4 && (rc != 5 || c != '\n'))
  72		return -EINVAL;
  73	for (count = 0; count < 4; count++) {
  74		if (in[count] > 255)
  75			return -EINVAL;
  76		addr[count] = in[count];
  77	}
  78	return 0;
  79}
  80
  81void qeth_l3_ipaddr6_to_string(const __u8 *addr, char *buf)
  82{
  83	sprintf(buf, "%pI6", addr);
  84}
  85
  86int qeth_l3_string_to_ipaddr6(const char *buf, __u8 *addr)
  87{
  88	const char *end, *end_tmp, *start;
  89	__u16 *in;
  90	char num[5];
  91	int num2, cnt, out, found, save_cnt;
  92	unsigned short in_tmp[8] = {0, };
  93
  94	cnt = out = found = save_cnt = num2 = 0;
  95	end = start = buf;
  96	in = (__u16 *) addr;
  97	memset(in, 0, 16);
  98	while (*end) {
  99		end = strchr(start, ':');
 100		if (end == NULL) {
 101			end = buf + strlen(buf);
 102			end_tmp = strchr(start, '\n');
 103			if (end_tmp != NULL)
 104				end = end_tmp;
 105			out = 1;
 106		}
 107		if ((end - start)) {
 108			memset(num, 0, 5);
 109			if ((end - start) > 4)
 110				return -EINVAL;
 111			memcpy(num, start, end - start);
 112			if (!qeth_l3_isxdigit(num))
 113				return -EINVAL;
 114			sscanf(start, "%x", &num2);
 115			if (found)
 116				in_tmp[save_cnt++] = num2;
 117			else
 118				in[cnt++] = num2;
 119			if (out)
 120				break;
 121		} else {
 122			if (found)
 123				return -EINVAL;
 124			found = 1;
 125		}
 126		start = ++end;
 127	}
 128	if (cnt + save_cnt > 8)
 129		return -EINVAL;
 130	cnt = 7;
 131	while (save_cnt)
 132		in[cnt--] = in_tmp[--save_cnt];
 133	return 0;
 134}
 135
 136void qeth_l3_ipaddr_to_string(enum qeth_prot_versions proto, const __u8 *addr,
 137				char *buf)
 138{
 139	if (proto == QETH_PROT_IPV4)
 140		qeth_l3_ipaddr4_to_string(addr, buf);
 141	else if (proto == QETH_PROT_IPV6)
 142		qeth_l3_ipaddr6_to_string(addr, buf);
 143}
 144
 145int qeth_l3_string_to_ipaddr(const char *buf, enum qeth_prot_versions proto,
 146				__u8 *addr)
 147{
 148	if (proto == QETH_PROT_IPV4)
 149		return qeth_l3_string_to_ipaddr4(buf, addr);
 150	else if (proto == QETH_PROT_IPV6)
 151		return qeth_l3_string_to_ipaddr6(buf, addr);
 152	else
 153		return -EINVAL;
 154}
 155
 156static void qeth_l3_convert_addr_to_bits(u8 *addr, u8 *bits, int len)
 157{
 158	int i, j;
 159	u8 octet;
 160
 161	for (i = 0; i < len; ++i) {
 162		octet = addr[i];
 163		for (j = 7; j >= 0; --j) {
 164			bits[i*8 + j] = octet & 1;
 165			octet >>= 1;
 166		}
 167	}
 168}
 169
 170int qeth_l3_is_addr_covered_by_ipato(struct qeth_card *card,
 171						struct qeth_ipaddr *addr)
 172{
 173	struct qeth_ipato_entry *ipatoe;
 174	u8 addr_bits[128] = {0, };
 175	u8 ipatoe_bits[128] = {0, };
 176	int rc = 0;
 177
 178	if (!card->ipato.enabled)
 179		return 0;
 180
 181	qeth_l3_convert_addr_to_bits((u8 *) &addr->u, addr_bits,
 182				  (addr->proto == QETH_PROT_IPV4)? 4:16);
 183	list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 184		if (addr->proto != ipatoe->proto)
 185			continue;
 186		qeth_l3_convert_addr_to_bits(ipatoe->addr, ipatoe_bits,
 187					  (ipatoe->proto == QETH_PROT_IPV4) ?
 188					  4 : 16);
 189		if (addr->proto == QETH_PROT_IPV4)
 190			rc = !memcmp(addr_bits, ipatoe_bits,
 191				     min(32, ipatoe->mask_bits));
 192		else
 193			rc = !memcmp(addr_bits, ipatoe_bits,
 194				     min(128, ipatoe->mask_bits));
 195		if (rc)
 196			break;
 197	}
 198	/* invert? */
 199	if ((addr->proto == QETH_PROT_IPV4) && card->ipato.invert4)
 200		rc = !rc;
 201	else if ((addr->proto == QETH_PROT_IPV6) && card->ipato.invert6)
 202		rc = !rc;
 203
 204	return rc;
 205}
 206
 207/*
 208 * Add IP to be added to todo list. If there is already an "add todo"
 209 * in this list we just incremenent the reference count.
 210 * Returns 0 if we  just incremented reference count.
 211 */
 212static int __qeth_l3_insert_ip_todo(struct qeth_card *card,
 213					struct qeth_ipaddr *addr, int add)
 214{
 215	struct qeth_ipaddr *tmp, *t;
 216	int found = 0;
 217
 218	if (card->options.sniffer)
 219		return 0;
 220	list_for_each_entry_safe(tmp, t, card->ip_tbd_list, entry) {
 221		if ((addr->type == QETH_IP_TYPE_DEL_ALL_MC) &&
 222		    (tmp->type == QETH_IP_TYPE_DEL_ALL_MC))
 223			return 0;
 224		if ((tmp->proto        == QETH_PROT_IPV4)     &&
 225		    (addr->proto       == QETH_PROT_IPV4)     &&
 226		    (tmp->type         == addr->type)         &&
 227		    (tmp->is_multicast == addr->is_multicast) &&
 228		    (tmp->u.a4.addr    == addr->u.a4.addr)    &&
 229		    (tmp->u.a4.mask    == addr->u.a4.mask)) {
 230			found = 1;
 231			break;
 232		}
 233		if ((tmp->proto        == QETH_PROT_IPV6)      &&
 234		    (addr->proto       == QETH_PROT_IPV6)      &&
 235		    (tmp->type         == addr->type)          &&
 236		    (tmp->is_multicast == addr->is_multicast)  &&
 237		    (tmp->u.a6.pfxlen  == addr->u.a6.pfxlen)   &&
 238		    (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
 239			    sizeof(struct in6_addr)) == 0)) {
 240			found = 1;
 241			break;
 242		}
 243	}
 244	if (found) {
 245		if (addr->users != 0)
 246			tmp->users += addr->users;
 247		else
 248			tmp->users += add ? 1 : -1;
 249		if (tmp->users == 0) {
 250			list_del(&tmp->entry);
 251			kfree(tmp);
 252		}
 253		return 0;
 254	} else {
 255		if (addr->type == QETH_IP_TYPE_DEL_ALL_MC)
 256			list_add(&addr->entry, card->ip_tbd_list);
 257		else {
 258			if (addr->users == 0)
 259				addr->users += add ? 1 : -1;
 260			if (add && (addr->type == QETH_IP_TYPE_NORMAL) &&
 261			    qeth_l3_is_addr_covered_by_ipato(card, addr)) {
 262				QETH_CARD_TEXT(card, 2, "tkovaddr");
 263				addr->set_flags |= QETH_IPA_SETIP_TAKEOVER_FLAG;
 264			}
 265			list_add_tail(&addr->entry, card->ip_tbd_list);
 266		}
 267		return 1;
 268	}
 269}
 270
 271int qeth_l3_delete_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
 272{
 273	unsigned long flags;
 274	int rc = 0;
 275
 276	QETH_CARD_TEXT(card, 4, "delip");
 277
 278	if (addr->proto == QETH_PROT_IPV4)
 279		QETH_CARD_HEX(card, 4, &addr->u.a4.addr, 4);
 280	else {
 281		QETH_CARD_HEX(card, 4, &addr->u.a6.addr, 8);
 282		QETH_CARD_HEX(card, 4, ((char *)&addr->u.a6.addr) + 8, 8);
 283	}
 284	spin_lock_irqsave(&card->ip_lock, flags);
 285	rc = __qeth_l3_insert_ip_todo(card, addr, 0);
 286	spin_unlock_irqrestore(&card->ip_lock, flags);
 287	return rc;
 288}
 289
 290int qeth_l3_add_ip(struct qeth_card *card, struct qeth_ipaddr *addr)
 291{
 292	unsigned long flags;
 293	int rc = 0;
 294
 295	QETH_CARD_TEXT(card, 4, "addip");
 296	if (addr->proto == QETH_PROT_IPV4)
 297		QETH_CARD_HEX(card, 4, &addr->u.a4.addr, 4);
 298	else {
 299		QETH_CARD_HEX(card, 4, &addr->u.a6.addr, 8);
 300		QETH_CARD_HEX(card, 4, ((char *)&addr->u.a6.addr) + 8, 8);
 301	}
 302	spin_lock_irqsave(&card->ip_lock, flags);
 303	rc = __qeth_l3_insert_ip_todo(card, addr, 1);
 304	spin_unlock_irqrestore(&card->ip_lock, flags);
 305	return rc;
 306}
 307
 308
 309struct qeth_ipaddr *qeth_l3_get_addr_buffer(
 310				enum qeth_prot_versions prot)
 311{
 312	struct qeth_ipaddr *addr;
 313
 314	addr = kzalloc(sizeof(struct qeth_ipaddr), GFP_ATOMIC);
 315	if (addr == NULL) {
 316		return NULL;
 317	}
 318	addr->type = QETH_IP_TYPE_NORMAL;
 319	addr->proto = prot;
 320	return addr;
 321}
 322
 323static void qeth_l3_delete_mc_addresses(struct qeth_card *card)
 324{
 325	struct qeth_ipaddr *iptodo;
 326	unsigned long flags;
 327
 328	QETH_CARD_TEXT(card, 4, "delmc");
 329	iptodo = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
 330	if (!iptodo) {
 331		QETH_CARD_TEXT(card, 2, "dmcnomem");
 332		return;
 333	}
 334	iptodo->type = QETH_IP_TYPE_DEL_ALL_MC;
 335	spin_lock_irqsave(&card->ip_lock, flags);
 336	if (!__qeth_l3_insert_ip_todo(card, iptodo, 0))
 337		kfree(iptodo);
 338	spin_unlock_irqrestore(&card->ip_lock, flags);
 339}
 340
 341/*
 342 * Add/remove address to/from card's ip list, i.e. try to add or remove
 343 * reference to/from an IP address that is already registered on the card.
 344 * Returns:
 345 *	0  address was on card and its reference count has been adjusted,
 346 *	   but is still > 0, so nothing has to be done
 347 *	   also returns 0 if card was not on card and the todo was to delete
 348 *	   the address -> there is also nothing to be done
 349 *	1  address was not on card and the todo is to add it to the card's ip
 350 *	   list
 351 *	-1 address was on card and its reference count has been decremented
 352 *	   to <= 0 by the todo -> address must be removed from card
 353 */
 354static int __qeth_l3_ref_ip_on_card(struct qeth_card *card,
 355		struct qeth_ipaddr *todo, struct qeth_ipaddr **__addr)
 356{
 357	struct qeth_ipaddr *addr;
 358	int found = 0;
 359
 360	list_for_each_entry(addr, &card->ip_list, entry) {
 361		if ((addr->proto == QETH_PROT_IPV4) &&
 362		    (todo->proto == QETH_PROT_IPV4) &&
 363		    (addr->type == todo->type) &&
 364		    (addr->u.a4.addr == todo->u.a4.addr) &&
 365		    (addr->u.a4.mask == todo->u.a4.mask)) {
 366			found = 1;
 367			break;
 368		}
 369		if ((addr->proto == QETH_PROT_IPV6) &&
 370		    (todo->proto == QETH_PROT_IPV6) &&
 371		    (addr->type == todo->type) &&
 372		    (addr->u.a6.pfxlen == todo->u.a6.pfxlen) &&
 373		    (memcmp(&addr->u.a6.addr, &todo->u.a6.addr,
 374			    sizeof(struct in6_addr)) == 0)) {
 375			found = 1;
 376			break;
 377		}
 378	}
 379	if (found) {
 380		addr->users += todo->users;
 381		if (addr->users <= 0) {
 382			*__addr = addr;
 383			return -1;
 384		} else {
 385			/* for VIPA and RXIP limit refcount to 1 */
 386			if (addr->type != QETH_IP_TYPE_NORMAL)
 387				addr->users = 1;
 388			return 0;
 389		}
 390	}
 391	if (todo->users > 0) {
 392		/* for VIPA and RXIP limit refcount to 1 */
 393		if (todo->type != QETH_IP_TYPE_NORMAL)
 394			todo->users = 1;
 395		return 1;
 396	} else
 397		return 0;
 398}
 399
 400static void __qeth_l3_delete_all_mc(struct qeth_card *card,
 401					unsigned long *flags)
 402{
 403	struct list_head fail_list;
 404	struct qeth_ipaddr *addr, *tmp;
 405	int rc;
 406
 407	INIT_LIST_HEAD(&fail_list);
 408again:
 409	list_for_each_entry_safe(addr, tmp, &card->ip_list, entry) {
 410		if (addr->is_multicast) {
 411			list_del(&addr->entry);
 412			spin_unlock_irqrestore(&card->ip_lock, *flags);
 413			rc = qeth_l3_deregister_addr_entry(card, addr);
 414			spin_lock_irqsave(&card->ip_lock, *flags);
 415			if (!rc || (rc == IPA_RC_MC_ADDR_NOT_FOUND))
 416				kfree(addr);
 417			else
 418				list_add_tail(&addr->entry, &fail_list);
 419			goto again;
 420		}
 421	}
 422	list_splice(&fail_list, &card->ip_list);
 423}
 424
 425void qeth_l3_set_ip_addr_list(struct qeth_card *card)
 426{
 427	struct list_head *tbd_list;
 428	struct qeth_ipaddr *todo, *addr;
 429	unsigned long flags;
 430	int rc;
 431
 432	QETH_CARD_TEXT(card, 2, "sdiplist");
 433	QETH_CARD_HEX(card, 2, &card, sizeof(void *));
 434
 435	if ((card->state != CARD_STATE_UP &&
 436	     card->state != CARD_STATE_SOFTSETUP) || card->options.sniffer) {
 437		return;
 438	}
 439
 440	spin_lock_irqsave(&card->ip_lock, flags);
 441	tbd_list = card->ip_tbd_list;
 442	card->ip_tbd_list = kzalloc(sizeof(struct list_head), GFP_ATOMIC);
 443	if (!card->ip_tbd_list) {
 444		QETH_CARD_TEXT(card, 0, "silnomem");
 445		card->ip_tbd_list = tbd_list;
 446		spin_unlock_irqrestore(&card->ip_lock, flags);
 447		return;
 448	} else
 449		INIT_LIST_HEAD(card->ip_tbd_list);
 450
 451	while (!list_empty(tbd_list)) {
 452		todo = list_entry(tbd_list->next, struct qeth_ipaddr, entry);
 453		list_del(&todo->entry);
 454		if (todo->type == QETH_IP_TYPE_DEL_ALL_MC) {
 455			__qeth_l3_delete_all_mc(card, &flags);
 456			kfree(todo);
 457			continue;
 458		}
 459		rc = __qeth_l3_ref_ip_on_card(card, todo, &addr);
 460		if (rc == 0) {
 461			/* nothing to be done; only adjusted refcount */
 462			kfree(todo);
 463		} else if (rc == 1) {
 464			/* new entry to be added to on-card list */
 465			spin_unlock_irqrestore(&card->ip_lock, flags);
 466			rc = qeth_l3_register_addr_entry(card, todo);
 467			spin_lock_irqsave(&card->ip_lock, flags);
 468			if (!rc || (rc == IPA_RC_LAN_OFFLINE))
 469				list_add_tail(&todo->entry, &card->ip_list);
 470			else
 471				kfree(todo);
 472		} else if (rc == -1) {
 473			/* on-card entry to be removed */
 474			list_del_init(&addr->entry);
 475			spin_unlock_irqrestore(&card->ip_lock, flags);
 476			rc = qeth_l3_deregister_addr_entry(card, addr);
 477			spin_lock_irqsave(&card->ip_lock, flags);
 478			if (!rc || (rc == IPA_RC_IP_ADDRESS_NOT_DEFINED))
 479				kfree(addr);
 480			else
 481				list_add_tail(&addr->entry, &card->ip_list);
 482			kfree(todo);
 483		}
 484	}
 485	spin_unlock_irqrestore(&card->ip_lock, flags);
 486	kfree(tbd_list);
 487}
 488
 489static void qeth_l3_clear_ip_list(struct qeth_card *card, int recover)
 490{
 491	struct qeth_ipaddr *addr, *tmp;
 492	unsigned long flags;
 493
 494	QETH_CARD_TEXT(card, 4, "clearip");
 495	if (recover && card->options.sniffer)
 496		return;
 497	spin_lock_irqsave(&card->ip_lock, flags);
 498	/* clear todo list */
 499	list_for_each_entry_safe(addr, tmp, card->ip_tbd_list, entry) {
 500		list_del(&addr->entry);
 501		kfree(addr);
 502	}
 503
 504	while (!list_empty(&card->ip_list)) {
 505		addr = list_entry(card->ip_list.next,
 506				  struct qeth_ipaddr, entry);
 507		list_del_init(&addr->entry);
 508		if (!recover || addr->is_multicast) {
 509			kfree(addr);
 510			continue;
 511		}
 512		list_add_tail(&addr->entry, card->ip_tbd_list);
 513	}
 514	spin_unlock_irqrestore(&card->ip_lock, flags);
 515}
 516
 517static int qeth_l3_address_exists_in_list(struct list_head *list,
 518		struct qeth_ipaddr *addr, int same_type)
 519{
 520	struct qeth_ipaddr *tmp;
 521
 522	list_for_each_entry(tmp, list, entry) {
 523		if ((tmp->proto == QETH_PROT_IPV4) &&
 524		    (addr->proto == QETH_PROT_IPV4) &&
 525		    ((same_type && (tmp->type == addr->type)) ||
 526		    (!same_type && (tmp->type != addr->type))) &&
 527		    (tmp->u.a4.addr == addr->u.a4.addr))
 528			return 1;
 529
 530		if ((tmp->proto == QETH_PROT_IPV6) &&
 531		    (addr->proto == QETH_PROT_IPV6) &&
 532		    ((same_type && (tmp->type == addr->type)) ||
 533		    (!same_type && (tmp->type != addr->type))) &&
 534		    (memcmp(&tmp->u.a6.addr, &addr->u.a6.addr,
 535			    sizeof(struct in6_addr)) == 0))
 536			return 1;
 537
 538	}
 539	return 0;
 540}
 541
 542static int qeth_l3_send_setdelmc(struct qeth_card *card,
 543			struct qeth_ipaddr *addr, int ipacmd)
 544{
 545	int rc;
 546	struct qeth_cmd_buffer *iob;
 547	struct qeth_ipa_cmd *cmd;
 548
 549	QETH_CARD_TEXT(card, 4, "setdelmc");
 550
 551	iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 552	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 553	memcpy(&cmd->data.setdelipm.mac, addr->mac, OSA_ADDR_LEN);
 554	if (addr->proto == QETH_PROT_IPV6)
 555		memcpy(cmd->data.setdelipm.ip6, &addr->u.a6.addr,
 556		       sizeof(struct in6_addr));
 557	else
 558		memcpy(&cmd->data.setdelipm.ip4, &addr->u.a4.addr, 4);
 559
 560	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 561
 562	return rc;
 563}
 564
 565static void qeth_l3_fill_netmask(u8 *netmask, unsigned int len)
 566{
 567	int i, j;
 568	for (i = 0; i < 16; i++) {
 569		j = (len) - (i * 8);
 570		if (j >= 8)
 571			netmask[i] = 0xff;
 572		else if (j > 0)
 573			netmask[i] = (u8)(0xFF00 >> j);
 574		else
 575			netmask[i] = 0;
 576	}
 577}
 578
 579static int qeth_l3_send_setdelip(struct qeth_card *card,
 580		struct qeth_ipaddr *addr, int ipacmd, unsigned int flags)
 581{
 582	int rc;
 583	struct qeth_cmd_buffer *iob;
 584	struct qeth_ipa_cmd *cmd;
 585	__u8 netmask[16];
 586
 587	QETH_CARD_TEXT(card, 4, "setdelip");
 588	QETH_CARD_TEXT_(card, 4, "flags%02X", flags);
 589
 590	iob = qeth_get_ipacmd_buffer(card, ipacmd, addr->proto);
 591	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 592	if (addr->proto == QETH_PROT_IPV6) {
 593		memcpy(cmd->data.setdelip6.ip_addr, &addr->u.a6.addr,
 594		       sizeof(struct in6_addr));
 595		qeth_l3_fill_netmask(netmask, addr->u.a6.pfxlen);
 596		memcpy(cmd->data.setdelip6.mask, netmask,
 597		       sizeof(struct in6_addr));
 598		cmd->data.setdelip6.flags = flags;
 599	} else {
 600		memcpy(cmd->data.setdelip4.ip_addr, &addr->u.a4.addr, 4);
 601		memcpy(cmd->data.setdelip4.mask, &addr->u.a4.mask, 4);
 602		cmd->data.setdelip4.flags = flags;
 603	}
 604
 605	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 606
 607	return rc;
 608}
 609
 610static int qeth_l3_send_setrouting(struct qeth_card *card,
 611	enum qeth_routing_types type, enum qeth_prot_versions prot)
 612{
 613	int rc;
 614	struct qeth_ipa_cmd *cmd;
 615	struct qeth_cmd_buffer *iob;
 616
 617	QETH_CARD_TEXT(card, 4, "setroutg");
 618	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETRTG, prot);
 619	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
 620	cmd->data.setrtg.type = (type);
 621	rc = qeth_send_ipa_cmd(card, iob, NULL, NULL);
 622
 623	return rc;
 624}
 625
 626static int qeth_l3_correct_routing_type(struct qeth_card *card,
 627		enum qeth_routing_types *type, enum qeth_prot_versions prot)
 628{
 629	if (card->info.type == QETH_CARD_TYPE_IQD) {
 630		switch (*type) {
 631		case NO_ROUTER:
 632		case PRIMARY_CONNECTOR:
 633		case SECONDARY_CONNECTOR:
 634		case MULTICAST_ROUTER:
 635			return 0;
 636		default:
 637			goto out_inval;
 638		}
 639	} else {
 640		switch (*type) {
 641		case NO_ROUTER:
 642		case PRIMARY_ROUTER:
 643		case SECONDARY_ROUTER:
 644			return 0;
 645		case MULTICAST_ROUTER:
 646			if (qeth_is_ipafunc_supported(card, prot,
 647						      IPA_OSA_MC_ROUTER))
 648				return 0;
 649		default:
 650			goto out_inval;
 651		}
 652	}
 653out_inval:
 654	*type = NO_ROUTER;
 655	return -EINVAL;
 656}
 657
 658int qeth_l3_setrouting_v4(struct qeth_card *card)
 659{
 660	int rc;
 661
 662	QETH_CARD_TEXT(card, 3, "setrtg4");
 663
 664	rc = qeth_l3_correct_routing_type(card, &card->options.route4.type,
 665				  QETH_PROT_IPV4);
 666	if (rc)
 667		return rc;
 668
 669	rc = qeth_l3_send_setrouting(card, card->options.route4.type,
 670				  QETH_PROT_IPV4);
 671	if (rc) {
 672		card->options.route4.type = NO_ROUTER;
 673		QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
 674			" on %s. Type set to 'no router'.\n", rc,
 675			QETH_CARD_IFNAME(card));
 676	}
 677	return rc;
 678}
 679
 680int qeth_l3_setrouting_v6(struct qeth_card *card)
 681{
 682	int rc = 0;
 683
 684	QETH_CARD_TEXT(card, 3, "setrtg6");
 685#ifdef CONFIG_QETH_IPV6
 686
 687	if (!qeth_is_supported(card, IPA_IPV6))
 688		return 0;
 689	rc = qeth_l3_correct_routing_type(card, &card->options.route6.type,
 690				  QETH_PROT_IPV6);
 691	if (rc)
 692		return rc;
 693
 694	rc = qeth_l3_send_setrouting(card, card->options.route6.type,
 695				  QETH_PROT_IPV6);
 696	if (rc) {
 697		card->options.route6.type = NO_ROUTER;
 698		QETH_DBF_MESSAGE(2, "Error (0x%04x) while setting routing type"
 699			" on %s. Type set to 'no router'.\n", rc,
 700			QETH_CARD_IFNAME(card));
 701	}
 702#endif
 703	return rc;
 704}
 705
 706/*
 707 * IP address takeover related functions
 708 */
 709static void qeth_l3_clear_ipato_list(struct qeth_card *card)
 710{
 711
 712	struct qeth_ipato_entry *ipatoe, *tmp;
 713	unsigned long flags;
 714
 715	spin_lock_irqsave(&card->ip_lock, flags);
 716	list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 717		list_del(&ipatoe->entry);
 718		kfree(ipatoe);
 719	}
 720	spin_unlock_irqrestore(&card->ip_lock, flags);
 721}
 722
 723int qeth_l3_add_ipato_entry(struct qeth_card *card,
 724				struct qeth_ipato_entry *new)
 725{
 726	struct qeth_ipato_entry *ipatoe;
 727	unsigned long flags;
 728	int rc = 0;
 729
 730	QETH_CARD_TEXT(card, 2, "addipato");
 731	spin_lock_irqsave(&card->ip_lock, flags);
 732	list_for_each_entry(ipatoe, &card->ipato.entries, entry) {
 733		if (ipatoe->proto != new->proto)
 734			continue;
 735		if (!memcmp(ipatoe->addr, new->addr,
 736			    (ipatoe->proto == QETH_PROT_IPV4)? 4:16) &&
 737		    (ipatoe->mask_bits == new->mask_bits)) {
 738			rc = -EEXIST;
 739			break;
 740		}
 741	}
 742	if (!rc)
 743		list_add_tail(&new->entry, &card->ipato.entries);
 744
 745	spin_unlock_irqrestore(&card->ip_lock, flags);
 746	return rc;
 747}
 748
 749void qeth_l3_del_ipato_entry(struct qeth_card *card,
 750		enum qeth_prot_versions proto, u8 *addr, int mask_bits)
 751{
 752	struct qeth_ipato_entry *ipatoe, *tmp;
 753	unsigned long flags;
 754
 755	QETH_CARD_TEXT(card, 2, "delipato");
 756	spin_lock_irqsave(&card->ip_lock, flags);
 757	list_for_each_entry_safe(ipatoe, tmp, &card->ipato.entries, entry) {
 758		if (ipatoe->proto != proto)
 759			continue;
 760		if (!memcmp(ipatoe->addr, addr,
 761			    (proto == QETH_PROT_IPV4)? 4:16) &&
 762		    (ipatoe->mask_bits == mask_bits)) {
 763			list_del(&ipatoe->entry);
 764			kfree(ipatoe);
 765		}
 766	}
 767	spin_unlock_irqrestore(&card->ip_lock, flags);
 768}
 769
 770/*
 771 * VIPA related functions
 772 */
 773int qeth_l3_add_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
 774	      const u8 *addr)
 775{
 776	struct qeth_ipaddr *ipaddr;
 777	unsigned long flags;
 778	int rc = 0;
 779
 780	ipaddr = qeth_l3_get_addr_buffer(proto);
 781	if (ipaddr) {
 782		if (proto == QETH_PROT_IPV4) {
 783			QETH_CARD_TEXT(card, 2, "addvipa4");
 784			memcpy(&ipaddr->u.a4.addr, addr, 4);
 785			ipaddr->u.a4.mask = 0;
 786		} else if (proto == QETH_PROT_IPV6) {
 787			QETH_CARD_TEXT(card, 2, "addvipa6");
 788			memcpy(&ipaddr->u.a6.addr, addr, 16);
 789			ipaddr->u.a6.pfxlen = 0;
 790		}
 791		ipaddr->type = QETH_IP_TYPE_VIPA;
 792		ipaddr->set_flags = QETH_IPA_SETIP_VIPA_FLAG;
 793		ipaddr->del_flags = QETH_IPA_DELIP_VIPA_FLAG;
 794	} else
 795		return -ENOMEM;
 796	spin_lock_irqsave(&card->ip_lock, flags);
 797	if (qeth_l3_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
 798	    qeth_l3_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
 799		rc = -EEXIST;
 800	spin_unlock_irqrestore(&card->ip_lock, flags);
 801	if (rc) {
 802		kfree(ipaddr);
 803		return rc;
 804	}
 805	if (!qeth_l3_add_ip(card, ipaddr))
 806		kfree(ipaddr);
 807	qeth_l3_set_ip_addr_list(card);
 808	return rc;
 809}
 810
 811void qeth_l3_del_vipa(struct qeth_card *card, enum qeth_prot_versions proto,
 812	      const u8 *addr)
 813{
 814	struct qeth_ipaddr *ipaddr;
 815
 816	ipaddr = qeth_l3_get_addr_buffer(proto);
 817	if (ipaddr) {
 818		if (proto == QETH_PROT_IPV4) {
 819			QETH_CARD_TEXT(card, 2, "delvipa4");
 820			memcpy(&ipaddr->u.a4.addr, addr, 4);
 821			ipaddr->u.a4.mask = 0;
 822		} else if (proto == QETH_PROT_IPV6) {
 823			QETH_CARD_TEXT(card, 2, "delvipa6");
 824			memcpy(&ipaddr->u.a6.addr, addr, 16);
 825			ipaddr->u.a6.pfxlen = 0;
 826		}
 827		ipaddr->type = QETH_IP_TYPE_VIPA;
 828	} else
 829		return;
 830	if (!qeth_l3_delete_ip(card, ipaddr))
 831		kfree(ipaddr);
 832	qeth_l3_set_ip_addr_list(card);
 833}
 834
 835/*
 836 * proxy ARP related functions
 837 */
 838int qeth_l3_add_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
 839	      const u8 *addr)
 840{
 841	struct qeth_ipaddr *ipaddr;
 842	unsigned long flags;
 843	int rc = 0;
 844
 845	ipaddr = qeth_l3_get_addr_buffer(proto);
 846	if (ipaddr) {
 847		if (proto == QETH_PROT_IPV4) {
 848			QETH_CARD_TEXT(card, 2, "addrxip4");
 849			memcpy(&ipaddr->u.a4.addr, addr, 4);
 850			ipaddr->u.a4.mask = 0;
 851		} else if (proto == QETH_PROT_IPV6) {
 852			QETH_CARD_TEXT(card, 2, "addrxip6");
 853			memcpy(&ipaddr->u.a6.addr, addr, 16);
 854			ipaddr->u.a6.pfxlen = 0;
 855		}
 856		ipaddr->type = QETH_IP_TYPE_RXIP;
 857		ipaddr->set_flags = QETH_IPA_SETIP_TAKEOVER_FLAG;
 858		ipaddr->del_flags = 0;
 859	} else
 860		return -ENOMEM;
 861	spin_lock_irqsave(&card->ip_lock, flags);
 862	if (qeth_l3_address_exists_in_list(&card->ip_list, ipaddr, 0) ||
 863	    qeth_l3_address_exists_in_list(card->ip_tbd_list, ipaddr, 0))
 864		rc = -EEXIST;
 865	spin_unlock_irqrestore(&card->ip_lock, flags);
 866	if (rc) {
 867		kfree(ipaddr);
 868		return rc;
 869	}
 870	if (!qeth_l3_add_ip(card, ipaddr))
 871		kfree(ipaddr);
 872	qeth_l3_set_ip_addr_list(card);
 873	return 0;
 874}
 875
 876void qeth_l3_del_rxip(struct qeth_card *card, enum qeth_prot_versions proto,
 877			const u8 *addr)
 878{
 879	struct qeth_ipaddr *ipaddr;
 880
 881	ipaddr = qeth_l3_get_addr_buffer(proto);
 882	if (ipaddr) {
 883		if (proto == QETH_PROT_IPV4) {
 884			QETH_CARD_TEXT(card, 2, "addrxip4");
 885			memcpy(&ipaddr->u.a4.addr, addr, 4);
 886			ipaddr->u.a4.mask = 0;
 887		} else if (proto == QETH_PROT_IPV6) {
 888			QETH_CARD_TEXT(card, 2, "addrxip6");
 889			memcpy(&ipaddr->u.a6.addr, addr, 16);
 890			ipaddr->u.a6.pfxlen = 0;
 891		}
 892		ipaddr->type = QETH_IP_TYPE_RXIP;
 893	} else
 894		return;
 895	if (!qeth_l3_delete_ip(card, ipaddr))
 896		kfree(ipaddr);
 897	qeth_l3_set_ip_addr_list(card);
 898}
 899
 900static int qeth_l3_register_addr_entry(struct qeth_card *card,
 901				struct qeth_ipaddr *addr)
 902{
 903	char buf[50];
 904	int rc = 0;
 905	int cnt = 3;
 906
 907	if (addr->proto == QETH_PROT_IPV4) {
 908		QETH_CARD_TEXT(card, 2, "setaddr4");
 909		QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 910	} else if (addr->proto == QETH_PROT_IPV6) {
 911		QETH_CARD_TEXT(card, 2, "setaddr6");
 912		QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 913		QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 914	} else {
 915		QETH_CARD_TEXT(card, 2, "setaddr?");
 916		QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 917	}
 918	do {
 919		if (addr->is_multicast)
 920			rc =  qeth_l3_send_setdelmc(card, addr, IPA_CMD_SETIPM);
 921		else
 922			rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_SETIP,
 923					addr->set_flags);
 924		if (rc)
 925			QETH_CARD_TEXT(card, 2, "failed");
 926	} while ((--cnt > 0) && rc);
 927	if (rc) {
 928		QETH_CARD_TEXT(card, 2, "FAILED");
 929		qeth_l3_ipaddr_to_string(addr->proto, (u8 *)&addr->u, buf);
 930		dev_warn(&card->gdev->dev,
 931			"Registering IP address %s failed\n", buf);
 932	}
 933	return rc;
 934}
 935
 936static int qeth_l3_deregister_addr_entry(struct qeth_card *card,
 937						struct qeth_ipaddr *addr)
 938{
 939	int rc = 0;
 940
 941	if (addr->proto == QETH_PROT_IPV4) {
 942		QETH_CARD_TEXT(card, 2, "deladdr4");
 943		QETH_CARD_HEX(card, 3, &addr->u.a4.addr, sizeof(int));
 944	} else if (addr->proto == QETH_PROT_IPV6) {
 945		QETH_CARD_TEXT(card, 2, "deladdr6");
 946		QETH_CARD_HEX(card, 3, &addr->u.a6.addr, 8);
 947		QETH_CARD_HEX(card, 3, ((char *)&addr->u.a6.addr) + 8, 8);
 948	} else {
 949		QETH_CARD_TEXT(card, 2, "deladdr?");
 950		QETH_CARD_HEX(card, 3, addr, sizeof(struct qeth_ipaddr));
 951	}
 952	if (addr->is_multicast)
 953		rc = qeth_l3_send_setdelmc(card, addr, IPA_CMD_DELIPM);
 954	else
 955		rc = qeth_l3_send_setdelip(card, addr, IPA_CMD_DELIP,
 956					addr->del_flags);
 957	if (rc)
 958		QETH_CARD_TEXT(card, 2, "failed");
 959
 960	return rc;
 961}
 962
 963static inline u8 qeth_l3_get_qeth_hdr_flags4(int cast_type)
 964{
 965	if (cast_type == RTN_MULTICAST)
 966		return QETH_CAST_MULTICAST;
 967	if (cast_type == RTN_BROADCAST)
 968		return QETH_CAST_BROADCAST;
 969	return QETH_CAST_UNICAST;
 970}
 971
 972static inline u8 qeth_l3_get_qeth_hdr_flags6(int cast_type)
 973{
 974	u8 ct = QETH_HDR_PASSTHRU | QETH_HDR_IPV6;
 975	if (cast_type == RTN_MULTICAST)
 976		return ct | QETH_CAST_MULTICAST;
 977	if (cast_type == RTN_ANYCAST)
 978		return ct | QETH_CAST_ANYCAST;
 979	if (cast_type == RTN_BROADCAST)
 980		return ct | QETH_CAST_BROADCAST;
 981	return ct | QETH_CAST_UNICAST;
 982}
 983
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 984static int qeth_l3_setadapter_parms(struct qeth_card *card)
 985{
 986	int rc;
 987
 988	QETH_DBF_TEXT(SETUP, 2, "setadprm");
 989
 990	if (!qeth_is_supported(card, IPA_SETADAPTERPARMS)) {
 991		dev_info(&card->gdev->dev,
 992			"set adapter parameters not supported.\n");
 993		QETH_DBF_TEXT(SETUP, 2, " notsupp");
 994		return 0;
 995	}
 996	rc = qeth_query_setadapterparms(card);
 997	if (rc) {
 998		QETH_DBF_MESSAGE(2, "%s couldn't set adapter parameters: "
 999			"0x%x\n", dev_name(&card->gdev->dev), rc);
1000		return rc;
1001	}
1002	if (qeth_adp_supported(card, IPA_SETADP_ALTER_MAC_ADDRESS)) {
1003		rc = qeth_setadpparms_change_macaddr(card);
1004		if (rc)
1005			dev_warn(&card->gdev->dev, "Reading the adapter MAC"
1006				" address failed\n");
1007	}
1008
 
 
 
 
1009	return rc;
1010}
1011
1012static int qeth_l3_default_setassparms_cb(struct qeth_card *card,
1013			struct qeth_reply *reply, unsigned long data)
1014{
1015	struct qeth_ipa_cmd *cmd;
1016
1017	QETH_CARD_TEXT(card, 4, "defadpcb");
1018
1019	cmd = (struct qeth_ipa_cmd *) data;
1020	if (cmd->hdr.return_code == 0) {
1021		cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
1022		if (cmd->hdr.prot_version == QETH_PROT_IPV4)
1023			card->options.ipa4.enabled_funcs = cmd->hdr.ipa_enabled;
1024		if (cmd->hdr.prot_version == QETH_PROT_IPV6)
1025			card->options.ipa6.enabled_funcs = cmd->hdr.ipa_enabled;
1026	}
1027	if (cmd->data.setassparms.hdr.assist_no == IPA_INBOUND_CHECKSUM &&
1028	    cmd->data.setassparms.hdr.command_code == IPA_CMD_ASS_START) {
1029		card->info.csum_mask = cmd->data.setassparms.data.flags_32bit;
1030		QETH_CARD_TEXT_(card, 3, "csum:%d", card->info.csum_mask);
1031	}
1032	if (cmd->data.setassparms.hdr.assist_no == IPA_OUTBOUND_CHECKSUM &&
1033	    cmd->data.setassparms.hdr.command_code == IPA_CMD_ASS_START) {
1034		card->info.tx_csum_mask =
1035			cmd->data.setassparms.data.flags_32bit;
1036		QETH_CARD_TEXT_(card, 3, "tcsu:%d", card->info.tx_csum_mask);
1037	}
1038
1039	return 0;
1040}
1041
1042static struct qeth_cmd_buffer *qeth_l3_get_setassparms_cmd(
1043	struct qeth_card *card, enum qeth_ipa_funcs ipa_func, __u16 cmd_code,
1044	__u16 len, enum qeth_prot_versions prot)
1045{
1046	struct qeth_cmd_buffer *iob;
1047	struct qeth_ipa_cmd *cmd;
1048
1049	QETH_CARD_TEXT(card, 4, "getasscm");
1050	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SETASSPARMS, prot);
1051
1052	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1053	cmd->data.setassparms.hdr.assist_no = ipa_func;
1054	cmd->data.setassparms.hdr.length = 8 + len;
1055	cmd->data.setassparms.hdr.command_code = cmd_code;
1056	cmd->data.setassparms.hdr.return_code = 0;
1057	cmd->data.setassparms.hdr.seq_no = 0;
1058
1059	return iob;
1060}
1061
1062static int qeth_l3_send_setassparms(struct qeth_card *card,
1063	struct qeth_cmd_buffer *iob, __u16 len, long data,
1064	int (*reply_cb)(struct qeth_card *, struct qeth_reply *,
1065		unsigned long),
1066	void *reply_param)
1067{
1068	int rc;
1069	struct qeth_ipa_cmd *cmd;
1070
1071	QETH_CARD_TEXT(card, 4, "sendassp");
1072
1073	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1074	if (len <= sizeof(__u32))
1075		cmd->data.setassparms.data.flags_32bit = (__u32) data;
1076	else   /* (len > sizeof(__u32)) */
1077		memcpy(&cmd->data.setassparms.data, (void *) data, len);
1078
1079	rc = qeth_send_ipa_cmd(card, iob, reply_cb, reply_param);
1080	return rc;
1081}
1082
1083#ifdef CONFIG_QETH_IPV6
1084static int qeth_l3_send_simple_setassparms_ipv6(struct qeth_card *card,
1085		enum qeth_ipa_funcs ipa_func, __u16 cmd_code)
1086{
1087	int rc;
1088	struct qeth_cmd_buffer *iob;
1089
1090	QETH_CARD_TEXT(card, 4, "simassp6");
1091	iob = qeth_l3_get_setassparms_cmd(card, ipa_func, cmd_code,
1092				       0, QETH_PROT_IPV6);
1093	rc = qeth_l3_send_setassparms(card, iob, 0, 0,
1094				   qeth_l3_default_setassparms_cb, NULL);
1095	return rc;
1096}
1097#endif
1098
1099static int qeth_l3_send_simple_setassparms(struct qeth_card *card,
1100		enum qeth_ipa_funcs ipa_func, __u16 cmd_code, long data)
1101{
1102	int rc;
1103	int length = 0;
1104	struct qeth_cmd_buffer *iob;
1105
1106	QETH_CARD_TEXT(card, 4, "simassp4");
1107	if (data)
1108		length = sizeof(__u32);
1109	iob = qeth_l3_get_setassparms_cmd(card, ipa_func, cmd_code,
1110				       length, QETH_PROT_IPV4);
1111	rc = qeth_l3_send_setassparms(card, iob, length, data,
1112				   qeth_l3_default_setassparms_cb, NULL);
1113	return rc;
1114}
1115
1116static int qeth_l3_start_ipa_arp_processing(struct qeth_card *card)
1117{
1118	int rc;
1119
1120	QETH_CARD_TEXT(card, 3, "ipaarp");
1121
1122	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
1123		dev_info(&card->gdev->dev,
1124			"ARP processing not supported on %s!\n",
1125			QETH_CARD_IFNAME(card));
1126		return 0;
1127	}
1128	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
1129					IPA_CMD_ASS_START, 0);
1130	if (rc) {
1131		dev_warn(&card->gdev->dev,
1132			"Starting ARP processing support for %s failed\n",
1133			QETH_CARD_IFNAME(card));
1134	}
1135	return rc;
1136}
1137
1138static int qeth_l3_start_ipa_ip_fragmentation(struct qeth_card *card)
1139{
1140	int rc;
1141
1142	QETH_CARD_TEXT(card, 3, "ipaipfrg");
1143
1144	if (!qeth_is_supported(card, IPA_IP_FRAGMENTATION)) {
1145		dev_info(&card->gdev->dev,
1146			"Hardware IP fragmentation not supported on %s\n",
1147			QETH_CARD_IFNAME(card));
1148		return  -EOPNOTSUPP;
1149	}
1150
1151	rc = qeth_l3_send_simple_setassparms(card, IPA_IP_FRAGMENTATION,
1152					  IPA_CMD_ASS_START, 0);
1153	if (rc) {
1154		dev_warn(&card->gdev->dev,
1155			"Starting IP fragmentation support for %s failed\n",
1156			QETH_CARD_IFNAME(card));
1157	} else
1158		dev_info(&card->gdev->dev,
1159			"Hardware IP fragmentation enabled \n");
1160	return rc;
1161}
1162
1163static int qeth_l3_start_ipa_source_mac(struct qeth_card *card)
1164{
1165	int rc;
1166
1167	QETH_CARD_TEXT(card, 3, "stsrcmac");
1168
1169	if (!qeth_is_supported(card, IPA_SOURCE_MAC)) {
1170		dev_info(&card->gdev->dev,
1171			"Inbound source MAC-address not supported on %s\n",
1172			QETH_CARD_IFNAME(card));
1173		return -EOPNOTSUPP;
1174	}
1175
1176	rc = qeth_l3_send_simple_setassparms(card, IPA_SOURCE_MAC,
1177					  IPA_CMD_ASS_START, 0);
1178	if (rc)
1179		dev_warn(&card->gdev->dev,
1180			"Starting source MAC-address support for %s failed\n",
1181			QETH_CARD_IFNAME(card));
1182	return rc;
1183}
1184
1185static int qeth_l3_start_ipa_vlan(struct qeth_card *card)
1186{
1187	int rc = 0;
1188
1189	QETH_CARD_TEXT(card, 3, "strtvlan");
1190
1191	if (!qeth_is_supported(card, IPA_FULL_VLAN)) {
1192		dev_info(&card->gdev->dev,
1193			"VLAN not supported on %s\n", QETH_CARD_IFNAME(card));
1194		return -EOPNOTSUPP;
1195	}
1196
1197	rc = qeth_l3_send_simple_setassparms(card, IPA_VLAN_PRIO,
1198					  IPA_CMD_ASS_START, 0);
1199	if (rc) {
1200		dev_warn(&card->gdev->dev,
1201			"Starting VLAN support for %s failed\n",
1202			QETH_CARD_IFNAME(card));
1203	} else {
1204		dev_info(&card->gdev->dev, "VLAN enabled\n");
1205	}
1206	return rc;
1207}
1208
1209static int qeth_l3_start_ipa_multicast(struct qeth_card *card)
1210{
1211	int rc;
1212
1213	QETH_CARD_TEXT(card, 3, "stmcast");
1214
1215	if (!qeth_is_supported(card, IPA_MULTICASTING)) {
1216		dev_info(&card->gdev->dev,
1217			"Multicast not supported on %s\n",
1218			QETH_CARD_IFNAME(card));
1219		return -EOPNOTSUPP;
1220	}
1221
1222	rc = qeth_l3_send_simple_setassparms(card, IPA_MULTICASTING,
1223					  IPA_CMD_ASS_START, 0);
1224	if (rc) {
1225		dev_warn(&card->gdev->dev,
1226			"Starting multicast support for %s failed\n",
1227			QETH_CARD_IFNAME(card));
1228	} else {
1229		dev_info(&card->gdev->dev, "Multicast enabled\n");
1230		card->dev->flags |= IFF_MULTICAST;
1231	}
1232	return rc;
1233}
1234
1235#ifdef CONFIG_QETH_IPV6
1236static int qeth_l3_softsetup_ipv6(struct qeth_card *card)
1237{
1238	int rc;
1239
1240	QETH_CARD_TEXT(card, 3, "softipv6");
1241
1242	if (card->info.type == QETH_CARD_TYPE_IQD)
1243		goto out;
1244
1245	rc = qeth_query_ipassists(card, QETH_PROT_IPV6);
1246	if (rc) {
1247		dev_err(&card->gdev->dev,
1248			"Activating IPv6 support for %s failed\n",
1249			QETH_CARD_IFNAME(card));
1250		return rc;
1251	}
1252	rc = qeth_l3_send_simple_setassparms(card, IPA_IPV6,
1253					  IPA_CMD_ASS_START, 3);
1254	if (rc) {
1255		dev_err(&card->gdev->dev,
1256			"Activating IPv6 support for %s failed\n",
1257			QETH_CARD_IFNAME(card));
1258		return rc;
1259	}
1260	rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_IPV6,
1261					       IPA_CMD_ASS_START);
1262	if (rc) {
1263		dev_err(&card->gdev->dev,
1264			"Activating IPv6 support for %s failed\n",
1265			 QETH_CARD_IFNAME(card));
1266		return rc;
1267	}
1268	rc = qeth_l3_send_simple_setassparms_ipv6(card, IPA_PASSTHRU,
1269					       IPA_CMD_ASS_START);
1270	if (rc) {
1271		dev_warn(&card->gdev->dev,
1272			"Enabling the passthrough mode for %s failed\n",
1273			QETH_CARD_IFNAME(card));
1274		return rc;
1275	}
1276out:
1277	dev_info(&card->gdev->dev, "IPV6 enabled\n");
1278	return 0;
1279}
1280#endif
1281
1282static int qeth_l3_start_ipa_ipv6(struct qeth_card *card)
1283{
1284	int rc = 0;
1285
1286	QETH_CARD_TEXT(card, 3, "strtipv6");
1287
1288	if (!qeth_is_supported(card, IPA_IPV6)) {
1289		dev_info(&card->gdev->dev,
1290			"IPv6 not supported on %s\n", QETH_CARD_IFNAME(card));
1291		return 0;
1292	}
1293#ifdef CONFIG_QETH_IPV6
1294	rc = qeth_l3_softsetup_ipv6(card);
1295#endif
1296	return rc ;
1297}
1298
1299static int qeth_l3_start_ipa_broadcast(struct qeth_card *card)
1300{
1301	int rc;
1302
1303	QETH_CARD_TEXT(card, 3, "stbrdcst");
1304	card->info.broadcast_capable = 0;
1305	if (!qeth_is_supported(card, IPA_FILTERING)) {
1306		dev_info(&card->gdev->dev,
1307			"Broadcast not supported on %s\n",
1308			QETH_CARD_IFNAME(card));
1309		rc = -EOPNOTSUPP;
1310		goto out;
1311	}
1312	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1313					  IPA_CMD_ASS_START, 0);
1314	if (rc) {
1315		dev_warn(&card->gdev->dev, "Enabling broadcast filtering for "
1316			"%s failed\n", QETH_CARD_IFNAME(card));
1317		goto out;
1318	}
1319
1320	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1321					  IPA_CMD_ASS_CONFIGURE, 1);
1322	if (rc) {
1323		dev_warn(&card->gdev->dev,
1324			"Setting up broadcast filtering for %s failed\n",
1325			QETH_CARD_IFNAME(card));
1326		goto out;
1327	}
1328	card->info.broadcast_capable = QETH_BROADCAST_WITH_ECHO;
1329	dev_info(&card->gdev->dev, "Broadcast enabled\n");
1330	rc = qeth_l3_send_simple_setassparms(card, IPA_FILTERING,
1331					  IPA_CMD_ASS_ENABLE, 1);
1332	if (rc) {
1333		dev_warn(&card->gdev->dev, "Setting up broadcast echo "
1334			"filtering for %s failed\n", QETH_CARD_IFNAME(card));
1335		goto out;
1336	}
1337	card->info.broadcast_capable = QETH_BROADCAST_WITHOUT_ECHO;
1338out:
1339	if (card->info.broadcast_capable)
1340		card->dev->flags |= IFF_BROADCAST;
1341	else
1342		card->dev->flags &= ~IFF_BROADCAST;
1343	return rc;
1344}
1345
1346static int qeth_l3_send_checksum_command(struct qeth_card *card)
1347{
1348	int rc;
1349
1350	rc = qeth_l3_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
1351					  IPA_CMD_ASS_START, 0);
1352	if (rc) {
1353		dev_warn(&card->gdev->dev, "Starting HW checksumming for %s "
1354			"failed, using SW checksumming\n",
1355			QETH_CARD_IFNAME(card));
1356		return rc;
1357	}
1358	rc = qeth_l3_send_simple_setassparms(card, IPA_INBOUND_CHECKSUM,
1359					  IPA_CMD_ASS_ENABLE,
1360					  card->info.csum_mask);
1361	if (rc) {
1362		dev_warn(&card->gdev->dev, "Enabling HW checksumming for %s "
1363			"failed, using SW checksumming\n",
1364			QETH_CARD_IFNAME(card));
1365		return rc;
1366	}
1367	return 0;
1368}
1369
1370static int qeth_l3_set_rx_csum(struct qeth_card *card, int on)
1371{
1372	int rc = 0;
1373
1374	if (on) {
1375		rc = qeth_l3_send_checksum_command(card);
1376		if (rc)
1377			return -EIO;
1378		dev_info(&card->gdev->dev,
1379			"HW Checksumming (inbound) enabled\n");
1380	} else {
1381		rc = qeth_l3_send_simple_setassparms(card,
1382			IPA_INBOUND_CHECKSUM, IPA_CMD_ASS_STOP, 0);
1383		if (rc)
1384			return -EIO;
1385	}
1386
1387	return 0;
1388}
1389
1390static int qeth_l3_start_ipa_checksum(struct qeth_card *card)
1391{
1392	QETH_CARD_TEXT(card, 3, "strtcsum");
1393
1394	if (card->dev->features & NETIF_F_RXCSUM) {
1395		rtnl_lock();
1396		/* force set_features call */
1397		card->dev->features &= ~NETIF_F_RXCSUM;
1398		netdev_update_features(card->dev);
1399		rtnl_unlock();
1400	}
1401	return 0;
1402}
1403
1404static int qeth_l3_start_ipa_tx_checksum(struct qeth_card *card)
1405{
1406	int rc = 0;
1407
1408	if (!qeth_is_supported(card, IPA_OUTBOUND_CHECKSUM))
1409		return rc;
1410	rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_CHECKSUM,
1411			  IPA_CMD_ASS_START, 0);
1412	if (rc)
1413		goto err_out;
1414	rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_CHECKSUM,
1415			  IPA_CMD_ASS_ENABLE, card->info.tx_csum_mask);
1416	if (rc)
1417		goto err_out;
1418	dev_info(&card->gdev->dev, "HW TX Checksumming enabled\n");
1419	return rc;
1420err_out:
1421	dev_warn(&card->gdev->dev, "Enabling HW TX checksumming for %s "
1422		"failed, using SW TX checksumming\n", QETH_CARD_IFNAME(card));
1423	return rc;
1424}
1425
1426static int qeth_l3_start_ipa_tso(struct qeth_card *card)
1427{
1428	int rc;
1429
1430	QETH_CARD_TEXT(card, 3, "sttso");
1431
1432	if (!qeth_is_supported(card, IPA_OUTBOUND_TSO)) {
1433		dev_info(&card->gdev->dev,
1434			"Outbound TSO not supported on %s\n",
1435			QETH_CARD_IFNAME(card));
1436		rc = -EOPNOTSUPP;
1437	} else {
1438		rc = qeth_l3_send_simple_setassparms(card, IPA_OUTBOUND_TSO,
1439						IPA_CMD_ASS_START, 0);
1440		if (rc)
1441			dev_warn(&card->gdev->dev, "Starting outbound TCP "
1442				"segmentation offload for %s failed\n",
1443				QETH_CARD_IFNAME(card));
1444		else
1445			dev_info(&card->gdev->dev,
1446				"Outbound TSO enabled\n");
1447	}
1448	if (rc)
1449		card->dev->features &= ~NETIF_F_TSO;
1450	return rc;
1451}
1452
1453static int qeth_l3_start_ipassists(struct qeth_card *card)
1454{
1455	QETH_CARD_TEXT(card, 3, "strtipas");
1456
1457	if (qeth_set_access_ctrl_online(card, 0))
1458		return -EIO;
1459	qeth_l3_start_ipa_arp_processing(card);	/* go on*/
1460	qeth_l3_start_ipa_ip_fragmentation(card);	/* go on*/
1461	qeth_l3_start_ipa_source_mac(card);	/* go on*/
1462	qeth_l3_start_ipa_vlan(card);		/* go on*/
1463	qeth_l3_start_ipa_multicast(card);		/* go on*/
1464	qeth_l3_start_ipa_ipv6(card);		/* go on*/
1465	qeth_l3_start_ipa_broadcast(card);		/* go on*/
1466	qeth_l3_start_ipa_checksum(card);		/* go on*/
1467	qeth_l3_start_ipa_tx_checksum(card);
1468	qeth_l3_start_ipa_tso(card);		/* go on*/
1469	return 0;
1470}
1471
1472static int qeth_l3_iqd_read_initial_mac_cb(struct qeth_card *card,
1473		struct qeth_reply *reply, unsigned long data)
1474{
1475	struct qeth_ipa_cmd *cmd;
1476
1477	cmd = (struct qeth_ipa_cmd *) data;
1478	if (cmd->hdr.return_code == 0)
1479		memcpy(card->dev->dev_addr,
1480			cmd->data.create_destroy_addr.unique_id, ETH_ALEN);
1481	else
1482		eth_random_addr(card->dev->dev_addr);
1483
1484	return 0;
1485}
1486
1487static int qeth_l3_iqd_read_initial_mac(struct qeth_card *card)
1488{
1489	int rc = 0;
1490	struct qeth_cmd_buffer *iob;
1491	struct qeth_ipa_cmd *cmd;
1492
1493	QETH_DBF_TEXT(SETUP, 2, "hsrmac");
1494
1495	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1496				     QETH_PROT_IPV6);
1497	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1498	*((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1499			card->info.unique_id;
1500
1501	rc = qeth_send_ipa_cmd(card, iob, qeth_l3_iqd_read_initial_mac_cb,
1502				NULL);
1503	return rc;
1504}
1505
1506static int qeth_l3_get_unique_id_cb(struct qeth_card *card,
1507		struct qeth_reply *reply, unsigned long data)
1508{
1509	struct qeth_ipa_cmd *cmd;
1510
1511	cmd = (struct qeth_ipa_cmd *) data;
1512	if (cmd->hdr.return_code == 0)
1513		card->info.unique_id = *((__u16 *)
1514				&cmd->data.create_destroy_addr.unique_id[6]);
1515	else {
1516		card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1517					UNIQUE_ID_NOT_BY_CARD;
1518		dev_warn(&card->gdev->dev, "The network adapter failed to "
1519			"generate a unique ID\n");
1520	}
1521	return 0;
1522}
1523
1524static int qeth_l3_get_unique_id(struct qeth_card *card)
1525{
1526	int rc = 0;
1527	struct qeth_cmd_buffer *iob;
1528	struct qeth_ipa_cmd *cmd;
1529
1530	QETH_DBF_TEXT(SETUP, 2, "guniqeid");
1531
1532	if (!qeth_is_supported(card, IPA_IPV6)) {
1533		card->info.unique_id =  UNIQUE_ID_IF_CREATE_ADDR_FAILED |
1534					UNIQUE_ID_NOT_BY_CARD;
1535		return 0;
1536	}
1537
1538	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_CREATE_ADDR,
1539				     QETH_PROT_IPV6);
1540	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1541	*((__u16 *) &cmd->data.create_destroy_addr.unique_id[6]) =
1542			card->info.unique_id;
1543
1544	rc = qeth_send_ipa_cmd(card, iob, qeth_l3_get_unique_id_cb, NULL);
1545	return rc;
1546}
1547
1548static int
1549qeth_diags_trace_cb(struct qeth_card *card, struct qeth_reply *reply,
1550			    unsigned long data)
1551{
1552	struct qeth_ipa_cmd	   *cmd;
1553	__u16 rc;
1554
1555	QETH_DBF_TEXT(SETUP, 2, "diastrcb");
1556
1557	cmd = (struct qeth_ipa_cmd *)data;
1558	rc = cmd->hdr.return_code;
1559	if (rc)
1560		QETH_CARD_TEXT_(card, 2, "dxter%x", rc);
1561	switch (cmd->data.diagass.action) {
1562	case QETH_DIAGS_CMD_TRACE_QUERY:
1563		break;
1564	case QETH_DIAGS_CMD_TRACE_DISABLE:
1565		switch (rc) {
1566		case 0:
1567		case IPA_RC_INVALID_SUBCMD:
1568			card->info.promisc_mode = SET_PROMISC_MODE_OFF;
1569			dev_info(&card->gdev->dev, "The HiperSockets network "
1570				"traffic analyzer is deactivated\n");
1571			break;
1572		default:
1573			break;
1574		}
1575		break;
1576	case QETH_DIAGS_CMD_TRACE_ENABLE:
1577		switch (rc) {
1578		case 0:
1579			card->info.promisc_mode = SET_PROMISC_MODE_ON;
1580			dev_info(&card->gdev->dev, "The HiperSockets network "
1581				"traffic analyzer is activated\n");
1582			break;
1583		case IPA_RC_HARDWARE_AUTH_ERROR:
1584			dev_warn(&card->gdev->dev, "The device is not "
1585				"authorized to run as a HiperSockets network "
1586				"traffic analyzer\n");
1587			break;
1588		case IPA_RC_TRACE_ALREADY_ACTIVE:
1589			dev_warn(&card->gdev->dev, "A HiperSockets "
1590				"network traffic analyzer is already "
1591				"active in the HiperSockets LAN\n");
1592			break;
1593		default:
1594			break;
1595		}
1596		break;
1597	default:
1598		QETH_DBF_MESSAGE(2, "Unknown sniffer action (0x%04x) on %s\n",
1599			cmd->data.diagass.action, QETH_CARD_IFNAME(card));
1600	}
1601
1602	return 0;
1603}
1604
1605static int
1606qeth_diags_trace(struct qeth_card *card, enum qeth_diags_trace_cmds diags_cmd)
1607{
1608	struct qeth_cmd_buffer *iob;
1609	struct qeth_ipa_cmd    *cmd;
1610
1611	QETH_DBF_TEXT(SETUP, 2, "diagtrac");
1612
1613	iob = qeth_get_ipacmd_buffer(card, IPA_CMD_SET_DIAG_ASS, 0);
1614	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
1615	cmd->data.diagass.subcmd_len = 16;
1616	cmd->data.diagass.subcmd = QETH_DIAGS_CMD_TRACE;
1617	cmd->data.diagass.type = QETH_DIAGS_TYPE_HIPERSOCKET;
1618	cmd->data.diagass.action = diags_cmd;
1619	return qeth_send_ipa_cmd(card, iob, qeth_diags_trace_cb, NULL);
1620}
1621
1622static void qeth_l3_get_mac_for_ipm(__u32 ipm, char *mac,
1623				struct net_device *dev)
1624{
1625	ip_eth_mc_map(ipm, mac);
 
 
 
1626}
1627
1628static void qeth_l3_add_mc(struct qeth_card *card, struct in_device *in4_dev)
1629{
1630	struct qeth_ipaddr *ipm;
1631	struct ip_mc_list *im4;
1632	char buf[MAX_ADDR_LEN];
1633
1634	QETH_CARD_TEXT(card, 4, "addmc");
1635	for (im4 = rcu_dereference(in4_dev->mc_list); im4 != NULL;
1636	     im4 = rcu_dereference(im4->next_rcu)) {
1637		qeth_l3_get_mac_for_ipm(im4->multiaddr, buf, in4_dev->dev);
1638		ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1639		if (!ipm)
1640			continue;
1641		ipm->u.a4.addr = im4->multiaddr;
1642		memcpy(ipm->mac, buf, OSA_ADDR_LEN);
1643		ipm->is_multicast = 1;
1644		if (!qeth_l3_add_ip(card, ipm))
1645			kfree(ipm);
1646	}
1647}
1648
1649/* called with rcu_read_lock */
1650static void qeth_l3_add_vlan_mc(struct qeth_card *card)
1651{
1652	struct in_device *in_dev;
1653	u16 vid;
1654
1655	QETH_CARD_TEXT(card, 4, "addmcvl");
1656	if (!qeth_is_supported(card, IPA_FULL_VLAN))
1657		return;
1658
1659	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1660		struct net_device *netdev;
1661
1662		netdev = __vlan_find_dev_deep(card->dev, htons(ETH_P_8021Q),
1663					      vid);
 
1664		if (netdev == NULL ||
1665		    !(netdev->flags & IFF_UP))
1666			continue;
1667		in_dev = __in_dev_get_rcu(netdev);
1668		if (!in_dev)
1669			continue;
 
1670		qeth_l3_add_mc(card, in_dev);
 
 
1671	}
1672}
1673
1674static void qeth_l3_add_multicast_ipv4(struct qeth_card *card)
1675{
1676	struct in_device *in4_dev;
1677
1678	QETH_CARD_TEXT(card, 4, "chkmcv4");
 
 
 
1679	rcu_read_lock();
1680	in4_dev = __in_dev_get_rcu(card->dev);
1681	if (in4_dev == NULL)
1682		goto unlock;
1683	qeth_l3_add_mc(card, in4_dev);
1684	qeth_l3_add_vlan_mc(card);
1685unlock:
1686	rcu_read_unlock();
 
1687}
1688
1689#ifdef CONFIG_QETH_IPV6
1690static void qeth_l3_add_mc6(struct qeth_card *card, struct inet6_dev *in6_dev)
1691{
1692	struct qeth_ipaddr *ipm;
1693	struct ifmcaddr6 *im6;
1694	char buf[MAX_ADDR_LEN];
1695
1696	QETH_CARD_TEXT(card, 4, "addmc6");
1697	for (im6 = in6_dev->mc_list; im6 != NULL; im6 = im6->next) {
1698		ndisc_mc_map(&im6->mca_addr, buf, in6_dev->dev, 0);
1699		ipm = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1700		if (!ipm)
1701			continue;
1702		ipm->is_multicast = 1;
1703		memcpy(ipm->mac, buf, OSA_ADDR_LEN);
1704		memcpy(&ipm->u.a6.addr, &im6->mca_addr.s6_addr,
1705		       sizeof(struct in6_addr));
1706		if (!qeth_l3_add_ip(card, ipm))
1707			kfree(ipm);
1708	}
1709}
1710
1711/* called with rcu_read_lock */
1712static void qeth_l3_add_vlan_mc6(struct qeth_card *card)
1713{
1714	struct inet6_dev *in_dev;
1715	u16 vid;
1716
1717	QETH_CARD_TEXT(card, 4, "admc6vl");
1718	if (!qeth_is_supported(card, IPA_FULL_VLAN))
1719		return;
1720
1721	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
1722		struct net_device *netdev;
1723
1724		netdev = __vlan_find_dev_deep(card->dev, htons(ETH_P_8021Q),
1725					      vid);
1726		if (netdev == NULL ||
1727		    !(netdev->flags & IFF_UP))
1728			continue;
1729		in_dev = in6_dev_get(netdev);
1730		if (!in_dev)
1731			continue;
1732		read_lock_bh(&in_dev->lock);
1733		qeth_l3_add_mc6(card, in_dev);
1734		read_unlock_bh(&in_dev->lock);
1735		in6_dev_put(in_dev);
1736	}
1737}
1738
1739static void qeth_l3_add_multicast_ipv6(struct qeth_card *card)
1740{
1741	struct inet6_dev *in6_dev;
1742
1743	QETH_CARD_TEXT(card, 4, "chkmcv6");
1744	if (!qeth_is_supported(card, IPA_IPV6))
1745		return ;
1746	in6_dev = in6_dev_get(card->dev);
1747	if (in6_dev == NULL)
1748		return;
1749	rcu_read_lock();
1750	read_lock_bh(&in6_dev->lock);
1751	qeth_l3_add_mc6(card, in6_dev);
1752	qeth_l3_add_vlan_mc6(card);
1753	read_unlock_bh(&in6_dev->lock);
1754	rcu_read_unlock();
1755	in6_dev_put(in6_dev);
1756}
1757#endif /* CONFIG_QETH_IPV6 */
1758
1759static void qeth_l3_free_vlan_addresses4(struct qeth_card *card,
1760			unsigned short vid)
1761{
1762	struct in_device *in_dev;
1763	struct in_ifaddr *ifa;
1764	struct qeth_ipaddr *addr;
1765	struct net_device *netdev;
1766
1767	QETH_CARD_TEXT(card, 4, "frvaddr4");
1768
1769	netdev = __vlan_find_dev_deep(card->dev, htons(ETH_P_8021Q), vid);
1770	if (!netdev)
1771		return;
1772	in_dev = in_dev_get(netdev);
1773	if (!in_dev)
1774		return;
1775	for (ifa = in_dev->ifa_list; ifa; ifa = ifa->ifa_next) {
1776		addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
1777		if (addr) {
1778			addr->u.a4.addr = ifa->ifa_address;
1779			addr->u.a4.mask = ifa->ifa_mask;
1780			addr->type = QETH_IP_TYPE_NORMAL;
1781			if (!qeth_l3_delete_ip(card, addr))
1782				kfree(addr);
1783		}
1784	}
1785	in_dev_put(in_dev);
1786}
1787
1788static void qeth_l3_free_vlan_addresses6(struct qeth_card *card,
1789			unsigned short vid)
1790{
1791#ifdef CONFIG_QETH_IPV6
1792	struct inet6_dev *in6_dev;
1793	struct inet6_ifaddr *ifa;
1794	struct qeth_ipaddr *addr;
1795	struct net_device *netdev;
1796
1797	QETH_CARD_TEXT(card, 4, "frvaddr6");
1798
1799	netdev = __vlan_find_dev_deep(card->dev, htons(ETH_P_8021Q), vid);
1800	if (!netdev)
1801		return;
1802	in6_dev = in6_dev_get(netdev);
1803	if (!in6_dev)
1804		return;
1805	list_for_each_entry(ifa, &in6_dev->addr_list, if_list) {
1806		addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
1807		if (addr) {
1808			memcpy(&addr->u.a6.addr, &ifa->addr,
1809			       sizeof(struct in6_addr));
1810			addr->u.a6.pfxlen = ifa->prefix_len;
1811			addr->type = QETH_IP_TYPE_NORMAL;
1812			if (!qeth_l3_delete_ip(card, addr))
1813				kfree(addr);
1814		}
1815	}
1816	in6_dev_put(in6_dev);
1817#endif /* CONFIG_QETH_IPV6 */
1818}
1819
1820static void qeth_l3_free_vlan_addresses(struct qeth_card *card,
1821			unsigned short vid)
1822{
1823	rcu_read_lock();
1824	qeth_l3_free_vlan_addresses4(card, vid);
1825	qeth_l3_free_vlan_addresses6(card, vid);
1826	rcu_read_unlock();
1827}
1828
1829static int qeth_l3_vlan_rx_add_vid(struct net_device *dev,
1830				   __be16 proto, u16 vid)
1831{
1832	struct qeth_card *card = dev->ml_priv;
1833
1834	set_bit(vid, card->active_vlans);
1835	return 0;
1836}
1837
1838static int qeth_l3_vlan_rx_kill_vid(struct net_device *dev,
1839				    __be16 proto, u16 vid)
1840{
1841	struct qeth_card *card = dev->ml_priv;
1842	unsigned long flags;
1843
1844	QETH_CARD_TEXT_(card, 4, "kid:%d", vid);
1845	if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
1846		QETH_CARD_TEXT(card, 3, "kidREC");
1847		return 0;
1848	}
1849	spin_lock_irqsave(&card->vlanlock, flags);
1850	/* unregister IP addresses of vlan device */
1851	qeth_l3_free_vlan_addresses(card, vid);
1852	clear_bit(vid, card->active_vlans);
1853	spin_unlock_irqrestore(&card->vlanlock, flags);
1854	qeth_l3_set_multicast_list(card->dev);
1855	return 0;
1856}
1857
1858static inline int qeth_l3_rebuild_skb(struct qeth_card *card,
1859			struct sk_buff *skb, struct qeth_hdr *hdr,
1860			unsigned short *vlan_id)
1861{
1862	__be16 prot;
1863	struct iphdr *ip_hdr;
1864	unsigned char tg_addr[MAX_ADDR_LEN];
1865	int is_vlan = 0;
1866
1867	if (!(hdr->hdr.l3.flags & QETH_HDR_PASSTHRU)) {
1868		prot = htons((hdr->hdr.l3.flags & QETH_HDR_IPV6)? ETH_P_IPV6 :
1869			      ETH_P_IP);
1870		switch (hdr->hdr.l3.flags & QETH_HDR_CAST_MASK) {
1871		case QETH_CAST_MULTICAST:
1872			switch (prot) {
1873#ifdef CONFIG_QETH_IPV6
1874			case __constant_htons(ETH_P_IPV6):
1875				ndisc_mc_map((struct in6_addr *)
1876				     skb->data + 24,
1877				     tg_addr, card->dev, 0);
1878				break;
1879#endif
1880			case __constant_htons(ETH_P_IP):
1881				ip_hdr = (struct iphdr *)skb->data;
 
 
1882				ip_eth_mc_map(ip_hdr->daddr, tg_addr);
1883				break;
1884			default:
1885				memcpy(tg_addr, card->dev->broadcast,
1886					card->dev->addr_len);
1887			}
1888			card->stats.multicast++;
1889			skb->pkt_type = PACKET_MULTICAST;
1890			break;
1891		case QETH_CAST_BROADCAST:
1892			memcpy(tg_addr, card->dev->broadcast,
1893				card->dev->addr_len);
1894			card->stats.multicast++;
1895			skb->pkt_type = PACKET_BROADCAST;
1896			break;
1897		case QETH_CAST_UNICAST:
1898		case QETH_CAST_ANYCAST:
1899		case QETH_CAST_NOCAST:
1900		default:
1901			if (card->options.sniffer)
1902				skb->pkt_type = PACKET_OTHERHOST;
1903			else
1904				skb->pkt_type = PACKET_HOST;
1905			memcpy(tg_addr, card->dev->dev_addr,
1906				card->dev->addr_len);
1907		}
1908		if (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_SRC_MAC_ADDR)
1909			card->dev->header_ops->create(skb, card->dev, prot,
1910				tg_addr, &hdr->hdr.l3.dest_addr[2],
1911				card->dev->addr_len);
1912		else
1913			card->dev->header_ops->create(skb, card->dev, prot,
1914				tg_addr, "FAKELL", card->dev->addr_len);
1915	}
1916
1917	skb->protocol = eth_type_trans(skb, card->dev);
 
 
 
 
 
1918
1919	if (hdr->hdr.l3.ext_flags &
1920	    (QETH_HDR_EXT_VLAN_FRAME | QETH_HDR_EXT_INCLUDE_VLAN_TAG)) {
1921		*vlan_id = (hdr->hdr.l3.ext_flags & QETH_HDR_EXT_VLAN_FRAME) ?
1922		 hdr->hdr.l3.vlan_id : *((u16 *)&hdr->hdr.l3.dest_addr[12]);
1923		is_vlan = 1;
1924	}
1925
1926	if (card->dev->features & NETIF_F_RXCSUM) {
1927		if ((hdr->hdr.l3.ext_flags &
1928		    (QETH_HDR_EXT_CSUM_HDR_REQ |
1929		     QETH_HDR_EXT_CSUM_TRANSP_REQ)) ==
1930		    (QETH_HDR_EXT_CSUM_HDR_REQ |
1931		     QETH_HDR_EXT_CSUM_TRANSP_REQ))
1932			skb->ip_summed = CHECKSUM_UNNECESSARY;
1933		else
1934			skb->ip_summed = CHECKSUM_NONE;
1935	} else
1936		skb->ip_summed = CHECKSUM_NONE;
1937
1938	return is_vlan;
1939}
1940
1941static int qeth_l3_process_inbound_buffer(struct qeth_card *card,
1942				int budget, int *done)
1943{
1944	int work_done = 0;
1945	struct sk_buff *skb;
1946	struct qeth_hdr *hdr;
1947	__u16 vlan_tag = 0;
1948	int is_vlan;
1949	unsigned int len;
1950	__u16 magic;
1951
1952	*done = 0;
1953	WARN_ON_ONCE(!budget);
1954	while (budget) {
1955		skb = qeth_core_get_next_skb(card,
1956			&card->qdio.in_q->bufs[card->rx.b_index],
1957			&card->rx.b_element, &card->rx.e_offset, &hdr);
1958		if (!skb) {
1959			*done = 1;
1960			break;
1961		}
1962		skb->dev = card->dev;
1963		switch (hdr->hdr.l3.id) {
1964		case QETH_HEADER_TYPE_LAYER3:
1965			magic = *(__u16 *)skb->data;
1966			if ((card->info.type == QETH_CARD_TYPE_IQD) &&
1967			    (magic == ETH_P_AF_IUCV)) {
1968				skb->protocol = ETH_P_AF_IUCV;
1969				skb->pkt_type = PACKET_HOST;
1970				skb->mac_header = NET_SKB_PAD;
1971				skb->dev = card->dev;
1972				len = skb->len;
1973				card->dev->header_ops->create(skb, card->dev, 0,
1974					card->dev->dev_addr, "FAKELL",
1975					card->dev->addr_len);
1976				netif_receive_skb(skb);
1977			} else {
1978				is_vlan = qeth_l3_rebuild_skb(card, skb, hdr,
1979						      &vlan_tag);
1980				len = skb->len;
1981				if (is_vlan && !card->options.sniffer)
1982					__vlan_hwaccel_put_tag(skb,
1983						htons(ETH_P_8021Q), vlan_tag);
1984				napi_gro_receive(&card->napi, skb);
1985			}
1986			break;
1987		case QETH_HEADER_TYPE_LAYER2: /* for HiperSockets sniffer */
1988			skb->pkt_type = PACKET_HOST;
1989			skb->protocol = eth_type_trans(skb, skb->dev);
1990			len = skb->len;
1991			netif_receive_skb(skb);
1992			break;
1993		default:
1994			dev_kfree_skb_any(skb);
1995			QETH_CARD_TEXT(card, 3, "inbunkno");
1996			QETH_DBF_HEX(CTRL, 3, hdr, QETH_DBF_CTRL_LEN);
1997			continue;
1998		}
1999		work_done++;
2000		budget--;
2001		card->stats.rx_packets++;
2002		card->stats.rx_bytes += len;
2003	}
2004	return work_done;
2005}
2006
2007static int qeth_l3_poll(struct napi_struct *napi, int budget)
2008{
2009	struct qeth_card *card = container_of(napi, struct qeth_card, napi);
2010	int work_done = 0;
2011	struct qeth_qdio_buffer *buffer;
2012	int done;
2013	int new_budget = budget;
2014
2015	if (card->options.performance_stats) {
2016		card->perf_stats.inbound_cnt++;
2017		card->perf_stats.inbound_start_time = qeth_get_micros();
2018	}
2019
2020	while (1) {
2021		if (!card->rx.b_count) {
2022			card->rx.qdio_err = 0;
2023			card->rx.b_count = qdio_get_next_buffers(
2024				card->data.ccwdev, 0, &card->rx.b_index,
2025				&card->rx.qdio_err);
2026			if (card->rx.b_count <= 0) {
2027				card->rx.b_count = 0;
2028				break;
2029			}
2030			card->rx.b_element =
2031				&card->qdio.in_q->bufs[card->rx.b_index]
2032				.buffer->element[0];
2033			card->rx.e_offset = 0;
2034		}
2035
2036		while (card->rx.b_count) {
2037			buffer = &card->qdio.in_q->bufs[card->rx.b_index];
2038			if (!(card->rx.qdio_err &&
2039			    qeth_check_qdio_errors(card, buffer->buffer,
2040			    card->rx.qdio_err, "qinerr")))
2041				work_done += qeth_l3_process_inbound_buffer(
2042					card, new_budget, &done);
2043			else
2044				done = 1;
2045
2046			if (done) {
2047				if (card->options.performance_stats)
2048					card->perf_stats.bufs_rec++;
2049				qeth_put_buffer_pool_entry(card,
2050					buffer->pool_entry);
2051				qeth_queue_input_buffer(card, card->rx.b_index);
2052				card->rx.b_count--;
2053				if (card->rx.b_count) {
2054					card->rx.b_index =
2055						(card->rx.b_index + 1) %
2056						QDIO_MAX_BUFFERS_PER_Q;
2057					card->rx.b_element =
2058						&card->qdio.in_q
2059						->bufs[card->rx.b_index]
2060						.buffer->element[0];
2061					card->rx.e_offset = 0;
2062				}
2063			}
2064
2065			if (work_done >= budget)
2066				goto out;
2067			else
2068				new_budget = budget - work_done;
2069		}
2070	}
2071
2072	napi_complete(napi);
2073	if (qdio_start_irq(card->data.ccwdev, 0))
2074		napi_schedule(&card->napi);
2075out:
2076	if (card->options.performance_stats)
2077		card->perf_stats.inbound_time += qeth_get_micros() -
2078			card->perf_stats.inbound_start_time;
2079	return work_done;
2080}
2081
2082static int qeth_l3_verify_vlan_dev(struct net_device *dev,
2083			struct qeth_card *card)
2084{
2085	int rc = 0;
2086	u16 vid;
2087
2088	for_each_set_bit(vid, card->active_vlans, VLAN_N_VID) {
2089		struct net_device *netdev;
2090
2091		rcu_read_lock();
2092		netdev = __vlan_find_dev_deep(card->dev, htons(ETH_P_8021Q),
2093					      vid);
2094		rcu_read_unlock();
2095		if (netdev == dev) {
2096			rc = QETH_VLAN_CARD;
2097			break;
2098		}
2099	}
2100
2101	if (rc && !(vlan_dev_real_dev(dev)->ml_priv == (void *)card))
2102		return 0;
2103
2104	return rc;
2105}
2106
2107static int qeth_l3_verify_dev(struct net_device *dev)
2108{
2109	struct qeth_card *card;
2110	unsigned long flags;
2111	int rc = 0;
2112
2113	read_lock_irqsave(&qeth_core_card_list.rwlock, flags);
2114	list_for_each_entry(card, &qeth_core_card_list.list, list) {
2115		if (card->dev == dev) {
2116			rc = QETH_REAL_CARD;
2117			break;
2118		}
2119		rc = qeth_l3_verify_vlan_dev(dev, card);
2120		if (rc)
2121			break;
2122	}
2123	read_unlock_irqrestore(&qeth_core_card_list.rwlock, flags);
2124
2125	return rc;
2126}
2127
2128static struct qeth_card *qeth_l3_get_card_from_dev(struct net_device *dev)
2129{
2130	struct qeth_card *card = NULL;
2131	int rc;
2132
2133	rc = qeth_l3_verify_dev(dev);
2134	if (rc == QETH_REAL_CARD)
2135		card = dev->ml_priv;
2136	else if (rc == QETH_VLAN_CARD)
2137		card = vlan_dev_real_dev(dev)->ml_priv;
2138	if (card && card->options.layer2)
2139		card = NULL;
2140	if (card)
2141		QETH_CARD_TEXT_(card, 4, "%d", rc);
2142	return card ;
2143}
2144
2145static int qeth_l3_stop_card(struct qeth_card *card, int recovery_mode)
2146{
2147	int rc = 0;
2148
2149	QETH_DBF_TEXT(SETUP, 2, "stopcard");
2150	QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
2151
2152	qeth_set_allowed_threads(card, 0, 1);
2153	if (card->options.sniffer &&
2154	    (card->info.promisc_mode == SET_PROMISC_MODE_ON))
2155		qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
2156	if (card->read.state == CH_STATE_UP &&
2157	    card->write.state == CH_STATE_UP &&
2158	    (card->state == CARD_STATE_UP)) {
2159		if (recovery_mode)
2160			qeth_l3_stop(card->dev);
2161		else {
2162			rtnl_lock();
2163			dev_close(card->dev);
2164			rtnl_unlock();
2165		}
2166		card->state = CARD_STATE_SOFTSETUP;
2167	}
2168	if (card->state == CARD_STATE_SOFTSETUP) {
2169		qeth_l3_clear_ip_list(card, 1);
2170		qeth_clear_ipacmd_list(card);
2171		card->state = CARD_STATE_HARDSETUP;
2172	}
2173	if (card->state == CARD_STATE_HARDSETUP) {
2174		qeth_qdio_clear_card(card, 0);
2175		qeth_clear_qdio_buffers(card);
2176		qeth_clear_working_pool_list(card);
2177		card->state = CARD_STATE_DOWN;
2178	}
2179	if (card->state == CARD_STATE_DOWN) {
2180		qeth_clear_cmd_buffers(&card->read);
2181		qeth_clear_cmd_buffers(&card->write);
2182	}
2183	return rc;
2184}
2185
2186/*
2187 * test for and Switch promiscuous mode (on or off)
2188 *  either for guestlan or HiperSocket Sniffer
2189 */
2190static void
2191qeth_l3_handle_promisc_mode(struct qeth_card *card)
2192{
2193	struct net_device *dev = card->dev;
2194
2195	if (((dev->flags & IFF_PROMISC) &&
2196	     (card->info.promisc_mode == SET_PROMISC_MODE_ON)) ||
2197	    (!(dev->flags & IFF_PROMISC) &&
2198	     (card->info.promisc_mode == SET_PROMISC_MODE_OFF)))
2199		return;
2200
2201	if (card->info.guestlan) {		/* Guestlan trace */
2202		if (qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
2203			qeth_setadp_promisc_mode(card);
2204	} else if (card->options.sniffer &&	/* HiperSockets trace */
2205		   qeth_adp_supported(card, IPA_SETADP_SET_DIAG_ASSIST)) {
2206		if (dev->flags & IFF_PROMISC) {
2207			QETH_CARD_TEXT(card, 3, "+promisc");
2208			qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_ENABLE);
2209		} else {
2210			QETH_CARD_TEXT(card, 3, "-promisc");
2211			qeth_diags_trace(card, QETH_DIAGS_CMD_TRACE_DISABLE);
2212		}
2213	}
2214}
2215
2216static void qeth_l3_set_multicast_list(struct net_device *dev)
2217{
2218	struct qeth_card *card = dev->ml_priv;
2219
2220	QETH_CARD_TEXT(card, 3, "setmulti");
2221	if (qeth_threads_running(card, QETH_RECOVER_THREAD) &&
2222	    (card->state != CARD_STATE_UP))
2223		return;
2224	if (!card->options.sniffer) {
2225		qeth_l3_delete_mc_addresses(card);
2226		qeth_l3_add_multicast_ipv4(card);
2227#ifdef CONFIG_QETH_IPV6
2228		qeth_l3_add_multicast_ipv6(card);
2229#endif
2230		qeth_l3_set_ip_addr_list(card);
2231		if (!qeth_adp_supported(card, IPA_SETADP_SET_PROMISC_MODE))
2232			return;
2233	}
2234	qeth_l3_handle_promisc_mode(card);
2235}
2236
2237static const char *qeth_l3_arp_get_error_cause(int *rc)
2238{
2239	switch (*rc) {
2240	case QETH_IPA_ARP_RC_FAILED:
2241		*rc = -EIO;
2242		return "operation failed";
2243	case QETH_IPA_ARP_RC_NOTSUPP:
2244		*rc = -EOPNOTSUPP;
2245		return "operation not supported";
2246	case QETH_IPA_ARP_RC_OUT_OF_RANGE:
2247		*rc = -EINVAL;
2248		return "argument out of range";
2249	case QETH_IPA_ARP_RC_Q_NOTSUPP:
2250		*rc = -EOPNOTSUPP;
2251		return "query operation not supported";
2252	case QETH_IPA_ARP_RC_Q_NO_DATA:
2253		*rc = -ENOENT;
2254		return "no query data available";
2255	default:
2256		return "unknown error";
2257	}
2258}
2259
2260static int qeth_l3_arp_set_no_entries(struct qeth_card *card, int no_entries)
2261{
2262	int tmp;
2263	int rc;
2264
2265	QETH_CARD_TEXT(card, 3, "arpstnoe");
2266
2267	/*
2268	 * currently GuestLAN only supports the ARP assist function
2269	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_SET_NO_ENTRIES;
2270	 * thus we say EOPNOTSUPP for this ARP function
2271	 */
2272	if (card->info.guestlan)
2273		return -EOPNOTSUPP;
2274	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2275		return -EOPNOTSUPP;
2276	}
2277	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2278					  IPA_CMD_ASS_ARP_SET_NO_ENTRIES,
2279					  no_entries);
2280	if (rc) {
2281		tmp = rc;
2282		QETH_DBF_MESSAGE(2, "Could not set number of ARP entries on "
2283			"%s: %s (0x%x/%d)\n", QETH_CARD_IFNAME(card),
2284			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2285	}
2286	return rc;
2287}
2288
2289static __u32 get_arp_entry_size(struct qeth_card *card,
2290			struct qeth_arp_query_data *qdata,
2291			struct qeth_arp_entrytype *type, __u8 strip_entries)
2292{
2293	__u32 rc;
2294	__u8 is_hsi;
2295
2296	is_hsi = qdata->reply_bits == 5;
2297	if (type->ip == QETHARP_IP_ADDR_V4) {
2298		QETH_CARD_TEXT(card, 4, "arpev4");
2299		if (strip_entries) {
2300			rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5_short) :
2301				sizeof(struct qeth_arp_qi_entry7_short);
2302		} else {
2303			rc = is_hsi ? sizeof(struct qeth_arp_qi_entry5) :
2304				sizeof(struct qeth_arp_qi_entry7);
2305		}
2306	} else if (type->ip == QETHARP_IP_ADDR_V6) {
2307		QETH_CARD_TEXT(card, 4, "arpev6");
2308		if (strip_entries) {
2309			rc = is_hsi ?
2310				sizeof(struct qeth_arp_qi_entry5_short_ipv6) :
2311				sizeof(struct qeth_arp_qi_entry7_short_ipv6);
2312		} else {
2313			rc = is_hsi ?
2314				sizeof(struct qeth_arp_qi_entry5_ipv6) :
2315				sizeof(struct qeth_arp_qi_entry7_ipv6);
2316		}
2317	} else {
2318		QETH_CARD_TEXT(card, 4, "arpinv");
2319		rc = 0;
2320	}
2321
2322	return rc;
2323}
2324
2325static int arpentry_matches_prot(struct qeth_arp_entrytype *type, __u16 prot)
2326{
2327	return (type->ip == QETHARP_IP_ADDR_V4 && prot == QETH_PROT_IPV4) ||
2328		(type->ip == QETHARP_IP_ADDR_V6 && prot == QETH_PROT_IPV6);
2329}
2330
2331static int qeth_l3_arp_query_cb(struct qeth_card *card,
2332		struct qeth_reply *reply, unsigned long data)
2333{
2334	struct qeth_ipa_cmd *cmd;
2335	struct qeth_arp_query_data *qdata;
2336	struct qeth_arp_query_info *qinfo;
2337	int i;
2338	int e;
2339	int entrybytes_done;
2340	int stripped_bytes;
2341	__u8 do_strip_entries;
2342
2343	QETH_CARD_TEXT(card, 3, "arpquecb");
2344
2345	qinfo = (struct qeth_arp_query_info *) reply->param;
2346	cmd = (struct qeth_ipa_cmd *) data;
2347	QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.prot_version);
2348	if (cmd->hdr.return_code) {
2349		QETH_CARD_TEXT(card, 4, "arpcberr");
2350		QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2351		return 0;
2352	}
2353	if (cmd->data.setassparms.hdr.return_code) {
2354		cmd->hdr.return_code = cmd->data.setassparms.hdr.return_code;
2355		QETH_CARD_TEXT(card, 4, "setaperr");
2356		QETH_CARD_TEXT_(card, 4, "%i", cmd->hdr.return_code);
2357		return 0;
2358	}
2359	qdata = &cmd->data.setassparms.data.query_arp;
2360	QETH_CARD_TEXT_(card, 4, "anoen%i", qdata->no_entries);
2361
2362	do_strip_entries = (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES) > 0;
2363	stripped_bytes = do_strip_entries ? QETH_QARP_MEDIASPECIFIC_BYTES : 0;
2364	entrybytes_done = 0;
2365	for (e = 0; e < qdata->no_entries; ++e) {
2366		char *cur_entry;
2367		__u32 esize;
2368		struct qeth_arp_entrytype *etype;
2369
2370		cur_entry = &qdata->data + entrybytes_done;
2371		etype = &((struct qeth_arp_qi_entry5 *) cur_entry)->type;
2372		if (!arpentry_matches_prot(etype, cmd->hdr.prot_version)) {
2373			QETH_CARD_TEXT(card, 4, "pmis");
2374			QETH_CARD_TEXT_(card, 4, "%i", etype->ip);
2375			break;
2376		}
2377		esize = get_arp_entry_size(card, qdata, etype,
2378			do_strip_entries);
2379		QETH_CARD_TEXT_(card, 5, "esz%i", esize);
2380		if (!esize)
2381			break;
2382
2383		if ((qinfo->udata_len - qinfo->udata_offset) < esize) {
2384			QETH_CARD_TEXT_(card, 4, "qaer3%i", -ENOMEM);
2385			cmd->hdr.return_code = IPA_RC_ENOMEM;
2386			goto out_error;
2387		}
2388
2389		memcpy(qinfo->udata + qinfo->udata_offset,
2390			&qdata->data + entrybytes_done + stripped_bytes,
2391			esize);
2392		entrybytes_done += esize + stripped_bytes;
2393		qinfo->udata_offset += esize;
2394		++qinfo->no_entries;
2395	}
2396	/* check if all replies received ... */
2397	if (cmd->data.setassparms.hdr.seq_no <
2398	    cmd->data.setassparms.hdr.number_of_replies)
2399		return 1;
2400	QETH_CARD_TEXT_(card, 4, "nove%i", qinfo->no_entries);
2401	memcpy(qinfo->udata, &qinfo->no_entries, 4);
2402	/* keep STRIP_ENTRIES flag so the user program can distinguish
2403	 * stripped entries from normal ones */
2404	if (qinfo->mask_bits & QETH_QARP_STRIP_ENTRIES)
2405		qdata->reply_bits |= QETH_QARP_STRIP_ENTRIES;
2406	memcpy(qinfo->udata + QETH_QARP_MASK_OFFSET, &qdata->reply_bits, 2);
2407	QETH_CARD_TEXT_(card, 4, "rc%i", 0);
2408	return 0;
2409out_error:
2410	i = 0;
2411	memcpy(qinfo->udata, &i, 4);
2412	return 0;
2413}
2414
2415static int qeth_l3_send_ipa_arp_cmd(struct qeth_card *card,
2416		struct qeth_cmd_buffer *iob, int len,
2417		int (*reply_cb)(struct qeth_card *, struct qeth_reply *,
2418			unsigned long),
2419		void *reply_param)
2420{
2421	QETH_CARD_TEXT(card, 4, "sendarp");
2422
2423	memcpy(iob->data, IPA_PDU_HEADER, IPA_PDU_HEADER_SIZE);
2424	memcpy(QETH_IPA_CMD_DEST_ADDR(iob->data),
2425	       &card->token.ulp_connection_r, QETH_MPC_TOKEN_LENGTH);
2426	return qeth_send_control_data(card, IPA_PDU_HEADER_SIZE + len, iob,
2427				      reply_cb, reply_param);
2428}
2429
2430static int qeth_l3_query_arp_cache_info(struct qeth_card *card,
2431	enum qeth_prot_versions prot,
2432	struct qeth_arp_query_info *qinfo)
2433{
2434	struct qeth_cmd_buffer *iob;
2435	struct qeth_ipa_cmd *cmd;
2436	int tmp;
2437	int rc;
2438
2439	QETH_CARD_TEXT_(card, 3, "qarpipv%i", prot);
2440
2441	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2442			IPA_CMD_ASS_ARP_QUERY_INFO,
2443			sizeof(struct qeth_arp_query_data) - sizeof(char),
2444			prot);
2445	cmd = (struct qeth_ipa_cmd *)(iob->data+IPA_PDU_HEADER_SIZE);
2446	cmd->data.setassparms.data.query_arp.request_bits = 0x000F;
2447	cmd->data.setassparms.data.query_arp.reply_bits = 0;
2448	cmd->data.setassparms.data.query_arp.no_entries = 0;
2449	rc = qeth_l3_send_ipa_arp_cmd(card, iob,
2450			   QETH_SETASS_BASE_LEN+QETH_ARP_CMD_LEN,
2451			   qeth_l3_arp_query_cb, (void *)qinfo);
2452	if (rc) {
2453		tmp = rc;
2454		QETH_DBF_MESSAGE(2,
2455			"Error while querying ARP cache on %s: %s "
2456			"(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2457			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2458	}
2459
2460	return rc;
2461}
2462
2463static int qeth_l3_arp_query(struct qeth_card *card, char __user *udata)
2464{
2465	struct qeth_arp_query_info qinfo = {0, };
2466	int rc;
2467
2468	QETH_CARD_TEXT(card, 3, "arpquery");
2469
2470	if (!qeth_is_supported(card,/*IPA_QUERY_ARP_ADDR_INFO*/
2471			       IPA_ARP_PROCESSING)) {
2472		QETH_CARD_TEXT(card, 3, "arpqnsup");
2473		rc = -EOPNOTSUPP;
2474		goto out;
2475	}
2476	/* get size of userspace buffer and mask_bits -> 6 bytes */
2477	if (copy_from_user(&qinfo, udata, 6)) {
2478		rc = -EFAULT;
2479		goto out;
2480	}
2481	qinfo.udata = kzalloc(qinfo.udata_len, GFP_KERNEL);
2482	if (!qinfo.udata) {
2483		rc = -ENOMEM;
2484		goto out;
2485	}
2486	qinfo.udata_offset = QETH_QARP_ENTRIES_OFFSET;
2487	rc = qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV4, &qinfo);
2488	if (rc) {
2489		if (copy_to_user(udata, qinfo.udata, 4))
2490			rc = -EFAULT;
2491			goto free_and_out;
2492	} else {
2493#ifdef CONFIG_QETH_IPV6
2494		if (qinfo.mask_bits & QETH_QARP_WITH_IPV6) {
2495			/* fails in case of GuestLAN QDIO mode */
2496			qeth_l3_query_arp_cache_info(card, QETH_PROT_IPV6,
2497				&qinfo);
2498		}
2499#endif
2500		if (copy_to_user(udata, qinfo.udata, qinfo.udata_len)) {
2501			QETH_CARD_TEXT(card, 4, "qactf");
2502			rc = -EFAULT;
2503			goto free_and_out;
2504		}
2505		QETH_CARD_TEXT_(card, 4, "qacts");
2506	}
2507free_and_out:
2508	kfree(qinfo.udata);
2509out:
2510	return rc;
2511}
2512
2513static int qeth_l3_arp_add_entry(struct qeth_card *card,
2514				struct qeth_arp_cache_entry *entry)
2515{
2516	struct qeth_cmd_buffer *iob;
2517	char buf[16];
2518	int tmp;
2519	int rc;
2520
2521	QETH_CARD_TEXT(card, 3, "arpadent");
2522
2523	/*
2524	 * currently GuestLAN only supports the ARP assist function
2525	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_ADD_ENTRY;
2526	 * thus we say EOPNOTSUPP for this ARP function
2527	 */
2528	if (card->info.guestlan)
2529		return -EOPNOTSUPP;
2530	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2531		return -EOPNOTSUPP;
2532	}
2533
2534	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2535				       IPA_CMD_ASS_ARP_ADD_ENTRY,
2536				       sizeof(struct qeth_arp_cache_entry),
2537				       QETH_PROT_IPV4);
2538	rc = qeth_l3_send_setassparms(card, iob,
2539				   sizeof(struct qeth_arp_cache_entry),
2540				   (unsigned long) entry,
2541				   qeth_l3_default_setassparms_cb, NULL);
2542	if (rc) {
2543		tmp = rc;
2544		qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2545		QETH_DBF_MESSAGE(2, "Could not add ARP entry for address %s "
2546			"on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2547			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2548	}
2549	return rc;
2550}
2551
2552static int qeth_l3_arp_remove_entry(struct qeth_card *card,
2553				struct qeth_arp_cache_entry *entry)
2554{
2555	struct qeth_cmd_buffer *iob;
2556	char buf[16] = {0, };
2557	int tmp;
2558	int rc;
2559
2560	QETH_CARD_TEXT(card, 3, "arprment");
2561
2562	/*
2563	 * currently GuestLAN only supports the ARP assist function
2564	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_REMOVE_ENTRY;
2565	 * thus we say EOPNOTSUPP for this ARP function
2566	 */
2567	if (card->info.guestlan)
2568		return -EOPNOTSUPP;
2569	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2570		return -EOPNOTSUPP;
2571	}
2572	memcpy(buf, entry, 12);
2573	iob = qeth_l3_get_setassparms_cmd(card, IPA_ARP_PROCESSING,
2574				       IPA_CMD_ASS_ARP_REMOVE_ENTRY,
2575				       12,
2576				       QETH_PROT_IPV4);
2577	rc = qeth_l3_send_setassparms(card, iob,
2578				   12, (unsigned long)buf,
2579				   qeth_l3_default_setassparms_cb, NULL);
2580	if (rc) {
2581		tmp = rc;
2582		memset(buf, 0, 16);
2583		qeth_l3_ipaddr4_to_string((u8 *)entry->ipaddr, buf);
2584		QETH_DBF_MESSAGE(2, "Could not delete ARP entry for address %s"
2585			" on %s: %s (0x%x/%d)\n", buf, QETH_CARD_IFNAME(card),
2586			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2587	}
2588	return rc;
2589}
2590
2591static int qeth_l3_arp_flush_cache(struct qeth_card *card)
2592{
2593	int rc;
2594	int tmp;
2595
2596	QETH_CARD_TEXT(card, 3, "arpflush");
2597
2598	/*
2599	 * currently GuestLAN only supports the ARP assist function
2600	 * IPA_CMD_ASS_ARP_QUERY_INFO, but not IPA_CMD_ASS_ARP_FLUSH_CACHE;
2601	 * thus we say EOPNOTSUPP for this ARP function
2602	*/
2603	if (card->info.guestlan || (card->info.type == QETH_CARD_TYPE_IQD))
2604		return -EOPNOTSUPP;
2605	if (!qeth_is_supported(card, IPA_ARP_PROCESSING)) {
2606		return -EOPNOTSUPP;
2607	}
2608	rc = qeth_l3_send_simple_setassparms(card, IPA_ARP_PROCESSING,
2609					  IPA_CMD_ASS_ARP_FLUSH_CACHE, 0);
2610	if (rc) {
2611		tmp = rc;
2612		QETH_DBF_MESSAGE(2, "Could not flush ARP cache on %s: %s "
2613			"(0x%x/%d)\n", QETH_CARD_IFNAME(card),
2614			qeth_l3_arp_get_error_cause(&rc), tmp, tmp);
2615	}
2616	return rc;
2617}
2618
2619static int qeth_l3_do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
2620{
2621	struct qeth_card *card = dev->ml_priv;
2622	struct qeth_arp_cache_entry arp_entry;
2623	struct mii_ioctl_data *mii_data;
2624	int rc = 0;
2625
2626	if (!card)
2627		return -ENODEV;
2628
2629	if ((card->state != CARD_STATE_UP) &&
2630		(card->state != CARD_STATE_SOFTSETUP))
2631		return -ENODEV;
2632
2633	switch (cmd) {
2634	case SIOC_QETH_ARP_SET_NO_ENTRIES:
2635		if (!capable(CAP_NET_ADMIN)) {
2636			rc = -EPERM;
2637			break;
2638		}
2639		rc = qeth_l3_arp_set_no_entries(card, rq->ifr_ifru.ifru_ivalue);
2640		break;
2641	case SIOC_QETH_ARP_QUERY_INFO:
2642		if (!capable(CAP_NET_ADMIN)) {
2643			rc = -EPERM;
2644			break;
2645		}
2646		rc = qeth_l3_arp_query(card, rq->ifr_ifru.ifru_data);
2647		break;
2648	case SIOC_QETH_ARP_ADD_ENTRY:
2649		if (!capable(CAP_NET_ADMIN)) {
2650			rc = -EPERM;
2651			break;
2652		}
2653		if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2654				   sizeof(struct qeth_arp_cache_entry)))
2655			rc = -EFAULT;
2656		else
2657			rc = qeth_l3_arp_add_entry(card, &arp_entry);
2658		break;
2659	case SIOC_QETH_ARP_REMOVE_ENTRY:
2660		if (!capable(CAP_NET_ADMIN)) {
2661			rc = -EPERM;
2662			break;
2663		}
2664		if (copy_from_user(&arp_entry, rq->ifr_ifru.ifru_data,
2665				   sizeof(struct qeth_arp_cache_entry)))
2666			rc = -EFAULT;
2667		else
2668			rc = qeth_l3_arp_remove_entry(card, &arp_entry);
2669		break;
2670	case SIOC_QETH_ARP_FLUSH_CACHE:
2671		if (!capable(CAP_NET_ADMIN)) {
2672			rc = -EPERM;
2673			break;
2674		}
2675		rc = qeth_l3_arp_flush_cache(card);
2676		break;
2677	case SIOC_QETH_ADP_SET_SNMP_CONTROL:
2678		rc = qeth_snmp_command(card, rq->ifr_ifru.ifru_data);
2679		break;
2680	case SIOC_QETH_GET_CARD_TYPE:
2681		if ((card->info.type == QETH_CARD_TYPE_OSD ||
2682		     card->info.type == QETH_CARD_TYPE_OSX) &&
2683		    !card->info.guestlan)
2684			return 1;
2685		return 0;
2686		break;
2687	case SIOCGMIIPHY:
2688		mii_data = if_mii(rq);
2689		mii_data->phy_id = 0;
2690		break;
2691	case SIOCGMIIREG:
2692		mii_data = if_mii(rq);
2693		if (mii_data->phy_id != 0)
2694			rc = -EINVAL;
2695		else
2696			mii_data->val_out = qeth_mdio_read(dev,
2697							mii_data->phy_id,
2698							mii_data->reg_num);
2699		break;
2700	case SIOC_QETH_QUERY_OAT:
2701		rc = qeth_query_oat_command(card, rq->ifr_ifru.ifru_data);
2702		break;
2703	default:
2704		rc = -EOPNOTSUPP;
2705	}
2706	if (rc)
2707		QETH_CARD_TEXT_(card, 2, "ioce%d", rc);
2708	return rc;
2709}
2710
2711int inline qeth_l3_get_cast_type(struct qeth_card *card, struct sk_buff *skb)
2712{
2713	int cast_type = RTN_UNSPEC;
2714	struct neighbour *n = NULL;
2715	struct dst_entry *dst;
2716
2717	rcu_read_lock();
2718	dst = skb_dst(skb);
2719	if (dst)
2720		n = dst_neigh_lookup_skb(dst, skb);
2721	if (n) {
2722		cast_type = n->type;
2723		rcu_read_unlock();
2724		neigh_release(n);
2725		if ((cast_type == RTN_BROADCAST) ||
2726		    (cast_type == RTN_MULTICAST) ||
2727		    (cast_type == RTN_ANYCAST))
2728			return cast_type;
2729		else
2730			return RTN_UNSPEC;
2731	}
2732	rcu_read_unlock();
2733
2734	/* try something else */
2735	if (skb->protocol == ETH_P_IPV6)
2736		return (skb_network_header(skb)[24] == 0xff) ?
2737				RTN_MULTICAST : 0;
2738	else if (skb->protocol == ETH_P_IP)
2739		return ((skb_network_header(skb)[16] & 0xf0) == 0xe0) ?
2740				RTN_MULTICAST : 0;
2741	/* ... */
2742	if (!memcmp(skb->data, skb->dev->broadcast, 6))
2743		return RTN_BROADCAST;
2744	else {
2745		u16 hdr_mac;
2746
2747		hdr_mac = *((u16 *)skb->data);
2748		/* tr multicast? */
2749		switch (card->info.link_type) {
2750		case QETH_LINK_TYPE_HSTR:
2751		case QETH_LINK_TYPE_LANE_TR:
2752			if ((hdr_mac == QETH_TR_MAC_NC) ||
2753			    (hdr_mac == QETH_TR_MAC_C))
2754				return RTN_MULTICAST;
2755			break;
2756		/* eth or so multicast? */
2757		default:
2758		if ((hdr_mac == QETH_ETH_MAC_V4) ||
2759			    (hdr_mac == QETH_ETH_MAC_V6))
2760				return RTN_MULTICAST;
2761		}
2762	}
2763	return cast_type;
2764}
2765
2766static void qeth_l3_fill_af_iucv_hdr(struct qeth_card *card,
2767		struct qeth_hdr *hdr, struct sk_buff *skb)
2768{
2769	char daddr[16];
2770	struct af_iucv_trans_hdr *iucv_hdr;
2771
2772	skb_pull(skb, 14);
2773	card->dev->header_ops->create(skb, card->dev, 0,
2774				      card->dev->dev_addr, card->dev->dev_addr,
2775				      card->dev->addr_len);
2776	skb_pull(skb, 14);
2777	iucv_hdr = (struct af_iucv_trans_hdr *)skb->data;
2778	memset(hdr, 0, sizeof(struct qeth_hdr));
2779	hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
2780	hdr->hdr.l3.ext_flags = 0;
2781	hdr->hdr.l3.length = skb->len;
2782	hdr->hdr.l3.flags = QETH_HDR_IPV6 | QETH_CAST_UNICAST;
2783	memset(daddr, 0, sizeof(daddr));
2784	daddr[0] = 0xfe;
2785	daddr[1] = 0x80;
2786	memcpy(&daddr[8], iucv_hdr->destUserID, 8);
2787	memcpy(hdr->hdr.l3.dest_addr, daddr, 16);
2788}
2789
2790static void qeth_l3_fill_header(struct qeth_card *card, struct qeth_hdr *hdr,
2791		struct sk_buff *skb, int ipv, int cast_type)
2792{
 
2793	struct dst_entry *dst;
2794
2795	memset(hdr, 0, sizeof(struct qeth_hdr));
2796	hdr->hdr.l3.id = QETH_HEADER_TYPE_LAYER3;
2797	hdr->hdr.l3.ext_flags = 0;
2798
2799	/*
2800	 * before we're going to overwrite this location with next hop ip.
2801	 * v6 uses passthrough, v4 sets the tag in the QDIO header.
2802	 */
2803	if (vlan_tx_tag_present(skb)) {
2804		if ((ipv == 4) || (card->info.type == QETH_CARD_TYPE_IQD))
2805			hdr->hdr.l3.ext_flags = QETH_HDR_EXT_VLAN_FRAME;
2806		else
2807			hdr->hdr.l3.ext_flags = QETH_HDR_EXT_INCLUDE_VLAN_TAG;
2808		hdr->hdr.l3.vlan_id = vlan_tx_tag_get(skb);
2809	}
2810
2811	hdr->hdr.l3.length = skb->len - sizeof(struct qeth_hdr);
2812
2813	rcu_read_lock();
2814	dst = skb_dst(skb);
 
 
2815	if (ipv == 4) {
2816		struct rtable *rt = (struct rtable *) dst;
2817		__be32 *pkey = &ip_hdr(skb)->daddr;
2818
2819		if (rt->rt_gateway)
2820			pkey = &rt->rt_gateway;
2821
2822		/* IPv4 */
2823		hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags4(cast_type);
2824		memset(hdr->hdr.l3.dest_addr, 0, 12);
2825		*((__be32 *) (&hdr->hdr.l3.dest_addr[12])) = *pkey;
 
 
 
 
 
 
 
2826	} else if (ipv == 6) {
2827		struct rt6_info *rt = (struct rt6_info *) dst;
2828		struct in6_addr *pkey = &ipv6_hdr(skb)->daddr;
2829
2830		if (!ipv6_addr_any(&rt->rt6i_gateway))
2831			pkey = &rt->rt6i_gateway;
2832
2833		/* IPv6 */
2834		hdr->hdr.l3.flags = qeth_l3_get_qeth_hdr_flags6(cast_type);
2835		if (card->info.type == QETH_CARD_TYPE_IQD)
2836			hdr->hdr.l3.flags &= ~QETH_HDR_PASSTHRU;
2837		memcpy(hdr->hdr.l3.dest_addr, pkey, 16);
 
 
 
 
 
 
 
2838	} else {
2839		if (!memcmp(skb->data + sizeof(struct qeth_hdr),
 
 
 
 
 
 
2840			    skb->dev->broadcast, 6)) {
2841			/* broadcast? */
2842			hdr->hdr.l3.flags = QETH_CAST_BROADCAST |
2843						QETH_HDR_PASSTHRU;
2844		} else {
2845			hdr->hdr.l3.flags = (cast_type == RTN_MULTICAST) ?
2846				QETH_CAST_MULTICAST | QETH_HDR_PASSTHRU :
2847				QETH_CAST_UNICAST | QETH_HDR_PASSTHRU;
2848		}
2849	}
2850	rcu_read_unlock();
2851}
2852
2853static inline void qeth_l3_hdr_csum(struct qeth_card *card,
2854		struct qeth_hdr *hdr, struct sk_buff *skb)
2855{
2856	struct iphdr *iph = ip_hdr(skb);
2857
2858	/* tcph->check contains already the pseudo hdr checksum
2859	 * so just set the header flags
2860	 */
2861	if (iph->protocol == IPPROTO_UDP)
2862		hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_UDP;
2863	hdr->hdr.l3.ext_flags |= QETH_HDR_EXT_CSUM_TRANSP_REQ |
2864		QETH_HDR_EXT_CSUM_HDR_REQ;
2865	iph->check = 0;
2866	if (card->options.performance_stats)
2867		card->perf_stats.tx_csum++;
2868}
2869
2870static void qeth_tso_fill_header(struct qeth_card *card,
2871		struct qeth_hdr *qhdr, struct sk_buff *skb)
2872{
2873	struct qeth_hdr_tso *hdr = (struct qeth_hdr_tso *)qhdr;
2874	struct tcphdr *tcph = tcp_hdr(skb);
2875	struct iphdr *iph = ip_hdr(skb);
2876	struct ipv6hdr *ip6h = ipv6_hdr(skb);
2877
2878	/*fix header to TSO values ...*/
2879	hdr->hdr.hdr.l3.id = QETH_HEADER_TYPE_TSO;
2880	hdr->hdr.hdr.l3.length = skb->len - sizeof(struct qeth_hdr_tso);
2881	/*set values which are fix for the first approach ...*/
2882	hdr->ext.hdr_tot_len = (__u16) sizeof(struct qeth_hdr_ext_tso);
2883	hdr->ext.imb_hdr_no  = 1;
2884	hdr->ext.hdr_type    = 1;
2885	hdr->ext.hdr_version = 1;
2886	hdr->ext.hdr_len     = 28;
2887	/*insert non-fix values */
2888	hdr->ext.mss = skb_shinfo(skb)->gso_size;
2889	hdr->ext.dg_hdr_len = (__u16)(iph->ihl*4 + tcph->doff*4);
2890	hdr->ext.payload_len = (__u16)(skb->len - hdr->ext.dg_hdr_len -
2891				       sizeof(struct qeth_hdr_tso));
2892	tcph->check = 0;
2893	if (skb->protocol == ETH_P_IPV6) {
2894		ip6h->payload_len = 0;
2895		tcph->check = ~csum_ipv6_magic(&ip6h->saddr, &ip6h->daddr,
2896					       0, IPPROTO_TCP, 0);
2897	} else {
2898		/*OSA want us to set these values ...*/
2899		tcph->check = ~csum_tcpudp_magic(iph->saddr, iph->daddr,
2900					 0, IPPROTO_TCP, 0);
2901		iph->tot_len = 0;
2902		iph->check = 0;
2903	}
2904}
2905
2906static inline int qeth_l3_tso_elements(struct sk_buff *skb)
2907{
2908	unsigned long tcpd = (unsigned long)tcp_hdr(skb) +
2909		tcp_hdr(skb)->doff * 4;
2910	int tcpd_len = skb->len - (tcpd - (unsigned long)skb->data);
2911	int elements = PFN_UP(tcpd + tcpd_len - 1) - PFN_DOWN(tcpd);
2912
2913	elements += qeth_get_elements_for_frags(skb);
2914
2915	return elements;
2916}
2917
2918static int qeth_l3_hard_start_xmit(struct sk_buff *skb, struct net_device *dev)
2919{
2920	int rc;
2921	u16 *tag;
2922	struct qeth_hdr *hdr = NULL;
2923	int elements_needed = 0;
2924	int elems;
2925	struct qeth_card *card = dev->ml_priv;
2926	struct sk_buff *new_skb = NULL;
2927	int ipv = qeth_get_ip_version(skb);
2928	int cast_type = qeth_l3_get_cast_type(card, skb);
2929	struct qeth_qdio_out_q *queue = card->qdio.out_qs
2930		[qeth_get_priority_queue(card, skb, ipv, cast_type)];
2931	int tx_bytes = skb->len;
2932	bool large_send;
2933	int data_offset = -1;
2934	int nr_frags;
2935
2936	if (((card->info.type == QETH_CARD_TYPE_IQD) &&
2937	     (((card->options.cq != QETH_CQ_ENABLED) && !ipv) ||
2938	      ((card->options.cq == QETH_CQ_ENABLED) &&
2939	       (skb->protocol != ETH_P_AF_IUCV)))) ||
2940	    card->options.sniffer)
2941			goto tx_drop;
2942
2943	if ((card->state != CARD_STATE_UP) || !card->lan_online) {
2944		card->stats.tx_carrier_errors++;
2945		goto tx_drop;
2946	}
2947
2948	if ((cast_type == RTN_BROADCAST) &&
2949	    (card->info.broadcast_capable == 0))
2950		goto tx_drop;
2951
2952	if (card->options.performance_stats) {
2953		card->perf_stats.outbound_cnt++;
2954		card->perf_stats.outbound_start_time = qeth_get_micros();
2955	}
2956
2957	large_send = skb_is_gso(skb);
2958
2959	if ((card->info.type == QETH_CARD_TYPE_IQD) && (!large_send) &&
2960	    (skb_shinfo(skb)->nr_frags == 0)) {
2961		new_skb = skb;
2962		if (new_skb->protocol == ETH_P_AF_IUCV)
2963			data_offset = 0;
2964		else
2965			data_offset = ETH_HLEN;
2966		hdr = kmem_cache_alloc(qeth_core_header_cache, GFP_ATOMIC);
2967		if (!hdr)
2968			goto tx_drop;
2969		elements_needed++;
2970	} else {
2971		/* create a clone with writeable headroom */
2972		new_skb = skb_realloc_headroom(skb, sizeof(struct qeth_hdr_tso)
2973					+ VLAN_HLEN);
2974		if (!new_skb)
2975			goto tx_drop;
2976	}
2977
2978	if (card->info.type == QETH_CARD_TYPE_IQD) {
2979		if (data_offset < 0)
2980			skb_pull(new_skb, ETH_HLEN);
2981	} else {
2982		if (ipv == 4) {
2983			skb_pull(new_skb, ETH_HLEN);
 
 
 
2984		}
2985
2986		if (ipv != 4 && vlan_tx_tag_present(new_skb)) {
2987			skb_push(new_skb, VLAN_HLEN);
2988			skb_copy_to_linear_data(new_skb, new_skb->data + 4, 4);
2989			skb_copy_to_linear_data_offset(new_skb, 4,
2990				new_skb->data + 8, 4);
2991			skb_copy_to_linear_data_offset(new_skb, 8,
2992				new_skb->data + 12, 4);
2993			tag = (u16 *)(new_skb->data + 12);
2994			*tag = __constant_htons(ETH_P_8021Q);
2995			*(tag + 1) = htons(vlan_tx_tag_get(new_skb));
 
2996		}
2997	}
2998
2999	netif_stop_queue(dev);
3000
3001	/* fix hardware limitation: as long as we do not have sbal
3002	 * chaining we can not send long frag lists
3003	 */
3004	if (large_send) {
3005		if (qeth_l3_tso_elements(new_skb) + 1 > 16) {
3006			if (skb_linearize(new_skb))
3007				goto tx_drop;
3008			if (card->options.performance_stats)
3009				card->perf_stats.tx_lin++;
3010		}
3011	}
3012
3013	if (large_send && (cast_type == RTN_UNSPEC)) {
3014		hdr = (struct qeth_hdr *)skb_push(new_skb,
3015						sizeof(struct qeth_hdr_tso));
3016		memset(hdr, 0, sizeof(struct qeth_hdr_tso));
3017		qeth_l3_fill_header(card, hdr, new_skb, ipv, cast_type);
3018		qeth_tso_fill_header(card, hdr, new_skb);
3019		elements_needed++;
3020	} else {
3021		if (data_offset < 0) {
3022			hdr = (struct qeth_hdr *)skb_push(new_skb,
3023						sizeof(struct qeth_hdr));
3024			qeth_l3_fill_header(card, hdr, new_skb, ipv,
3025						cast_type);
3026		} else {
3027			if (new_skb->protocol == ETH_P_AF_IUCV)
3028				qeth_l3_fill_af_iucv_hdr(card, hdr, new_skb);
3029			else {
3030				qeth_l3_fill_header(card, hdr, new_skb, ipv,
3031							cast_type);
3032				hdr->hdr.l3.length = new_skb->len - data_offset;
3033			}
3034		}
3035
3036		if (skb->ip_summed == CHECKSUM_PARTIAL)
3037			qeth_l3_hdr_csum(card, hdr, new_skb);
3038	}
3039
3040	elems = qeth_get_elements_no(card, new_skb, elements_needed);
 
3041	if (!elems) {
3042		if (data_offset >= 0)
3043			kmem_cache_free(qeth_core_header_cache, hdr);
3044		goto tx_drop;
3045	}
3046	elements_needed += elems;
3047	nr_frags = skb_shinfo(new_skb)->nr_frags;
3048
3049	if (card->info.type != QETH_CARD_TYPE_IQD) {
3050		int len;
3051		if (large_send)
3052			len = ((unsigned long)tcp_hdr(new_skb) +
3053				tcp_hdr(new_skb)->doff * 4) -
3054				(unsigned long)new_skb->data;
3055		else
3056			len = sizeof(struct qeth_hdr_layer3);
3057
3058		if (qeth_hdr_chk_and_bounce(new_skb, &hdr, len))
3059			goto tx_drop;
3060		rc = qeth_do_send_packet(card, queue, new_skb, hdr,
3061					 elements_needed);
3062	} else
3063		rc = qeth_do_send_packet_fast(card, queue, new_skb, hdr,
3064					elements_needed, data_offset, 0);
3065
3066	if (!rc) {
3067		card->stats.tx_packets++;
3068		card->stats.tx_bytes += tx_bytes;
3069		if (new_skb != skb)
3070			dev_kfree_skb_any(skb);
3071		if (card->options.performance_stats) {
3072			if (large_send) {
3073				card->perf_stats.large_send_bytes += tx_bytes;
3074				card->perf_stats.large_send_cnt++;
3075			}
3076			if (nr_frags) {
3077				card->perf_stats.sg_skbs_sent++;
3078				/* nr_frags + skb->data */
3079				card->perf_stats.sg_frags_sent += nr_frags + 1;
3080			}
3081		}
3082		rc = NETDEV_TX_OK;
3083	} else {
3084		if (data_offset >= 0)
3085			kmem_cache_free(qeth_core_header_cache, hdr);
3086
3087		if (rc == -EBUSY) {
3088			if (new_skb != skb)
3089				dev_kfree_skb_any(new_skb);
3090			return NETDEV_TX_BUSY;
3091		} else
3092			goto tx_drop;
3093	}
3094
3095	netif_wake_queue(dev);
3096	if (card->options.performance_stats)
3097		card->perf_stats.outbound_time += qeth_get_micros() -
3098			card->perf_stats.outbound_start_time;
3099	return rc;
3100
3101tx_drop:
3102	card->stats.tx_dropped++;
3103	card->stats.tx_errors++;
3104	if ((new_skb != skb) && new_skb)
3105		dev_kfree_skb_any(new_skb);
3106	dev_kfree_skb_any(skb);
3107	netif_wake_queue(dev);
3108	return NETDEV_TX_OK;
3109}
3110
3111static int __qeth_l3_open(struct net_device *dev)
3112{
3113	struct qeth_card *card = dev->ml_priv;
3114	int rc = 0;
3115
3116	QETH_CARD_TEXT(card, 4, "qethopen");
3117	if (card->state == CARD_STATE_UP)
3118		return rc;
3119	if (card->state != CARD_STATE_SOFTSETUP)
3120		return -ENODEV;
3121	card->data.state = CH_STATE_UP;
3122	card->state = CARD_STATE_UP;
3123	netif_start_queue(dev);
3124
3125	if (qdio_stop_irq(card->data.ccwdev, 0) >= 0) {
3126		napi_enable(&card->napi);
3127		napi_schedule(&card->napi);
3128	} else
3129		rc = -EIO;
3130	return rc;
3131}
3132
3133static int qeth_l3_open(struct net_device *dev)
3134{
3135	struct qeth_card *card = dev->ml_priv;
3136
3137	QETH_CARD_TEXT(card, 5, "qethope_");
3138	if (qeth_wait_for_threads(card, QETH_RECOVER_THREAD)) {
3139		QETH_CARD_TEXT(card, 3, "openREC");
3140		return -ERESTARTSYS;
3141	}
3142	return __qeth_l3_open(dev);
3143}
3144
3145static int qeth_l3_stop(struct net_device *dev)
3146{
3147	struct qeth_card *card = dev->ml_priv;
3148
3149	QETH_CARD_TEXT(card, 4, "qethstop");
3150	netif_tx_disable(dev);
3151	if (card->state == CARD_STATE_UP) {
3152		card->state = CARD_STATE_SOFTSETUP;
3153		napi_disable(&card->napi);
3154	}
3155	return 0;
3156}
3157
3158static netdev_features_t qeth_l3_fix_features(struct net_device *dev,
3159	netdev_features_t features)
3160{
3161	struct qeth_card *card = dev->ml_priv;
3162
3163	if (!qeth_is_supported(card, IPA_OUTBOUND_CHECKSUM))
3164		features &= ~NETIF_F_IP_CSUM;
3165	if (!qeth_is_supported(card, IPA_OUTBOUND_TSO))
3166		features &= ~NETIF_F_TSO;
3167	if (!qeth_is_supported(card, IPA_INBOUND_CHECKSUM))
3168		features &= ~NETIF_F_RXCSUM;
3169
3170	return features;
3171}
3172
3173static int qeth_l3_set_features(struct net_device *dev,
3174	netdev_features_t features)
3175{
3176	struct qeth_card *card = dev->ml_priv;
3177	u32 changed = dev->features ^ features;
3178	int err;
3179
3180	if (!(changed & NETIF_F_RXCSUM))
3181		return 0;
3182
3183	if (card->state == CARD_STATE_DOWN ||
3184	    card->state == CARD_STATE_RECOVER)
3185		return 0;
3186
3187	err = qeth_l3_set_rx_csum(card, features & NETIF_F_RXCSUM);
3188	if (err)
3189		dev->features = features ^ NETIF_F_RXCSUM;
3190
3191	return err;
3192}
3193
3194static const struct ethtool_ops qeth_l3_ethtool_ops = {
3195	.get_link = ethtool_op_get_link,
3196	.get_strings = qeth_core_get_strings,
3197	.get_ethtool_stats = qeth_core_get_ethtool_stats,
3198	.get_sset_count = qeth_core_get_sset_count,
3199	.get_drvinfo = qeth_core_get_drvinfo,
3200	.get_settings = qeth_core_ethtool_get_settings,
3201};
3202
3203/*
3204 * we need NOARP for IPv4 but we want neighbor solicitation for IPv6. Setting
3205 * NOARP on the netdevice is no option because it also turns off neighbor
3206 * solicitation. For IPv4 we install a neighbor_setup function. We don't want
3207 * arp resolution but we want the hard header (packet socket will work
3208 * e.g. tcpdump)
3209 */
3210static int qeth_l3_neigh_setup_noarp(struct neighbour *n)
3211{
3212	n->nud_state = NUD_NOARP;
3213	memcpy(n->ha, "FAKELL", 6);
3214	n->output = n->ops->connected_output;
3215	return 0;
3216}
3217
3218static int
3219qeth_l3_neigh_setup(struct net_device *dev, struct neigh_parms *np)
3220{
3221	if (np->tbl->family == AF_INET)
3222		np->neigh_setup = qeth_l3_neigh_setup_noarp;
3223
3224	return 0;
3225}
3226
3227static const struct net_device_ops qeth_l3_netdev_ops = {
3228	.ndo_open		= qeth_l3_open,
3229	.ndo_stop		= qeth_l3_stop,
3230	.ndo_get_stats		= qeth_get_stats,
3231	.ndo_start_xmit		= qeth_l3_hard_start_xmit,
3232	.ndo_validate_addr	= eth_validate_addr,
3233	.ndo_set_rx_mode	= qeth_l3_set_multicast_list,
3234	.ndo_do_ioctl		= qeth_l3_do_ioctl,
3235	.ndo_change_mtu		= qeth_change_mtu,
3236	.ndo_fix_features	= qeth_l3_fix_features,
3237	.ndo_set_features	= qeth_l3_set_features,
3238	.ndo_vlan_rx_add_vid	= qeth_l3_vlan_rx_add_vid,
3239	.ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
3240	.ndo_tx_timeout		= qeth_tx_timeout,
3241};
3242
3243static const struct net_device_ops qeth_l3_osa_netdev_ops = {
3244	.ndo_open		= qeth_l3_open,
3245	.ndo_stop		= qeth_l3_stop,
3246	.ndo_get_stats		= qeth_get_stats,
3247	.ndo_start_xmit		= qeth_l3_hard_start_xmit,
3248	.ndo_validate_addr	= eth_validate_addr,
3249	.ndo_set_rx_mode	= qeth_l3_set_multicast_list,
3250	.ndo_do_ioctl		= qeth_l3_do_ioctl,
3251	.ndo_change_mtu		= qeth_change_mtu,
3252	.ndo_fix_features	= qeth_l3_fix_features,
3253	.ndo_set_features	= qeth_l3_set_features,
3254	.ndo_vlan_rx_add_vid	= qeth_l3_vlan_rx_add_vid,
3255	.ndo_vlan_rx_kill_vid   = qeth_l3_vlan_rx_kill_vid,
3256	.ndo_tx_timeout		= qeth_tx_timeout,
3257	.ndo_neigh_setup	= qeth_l3_neigh_setup,
3258};
3259
3260static int qeth_l3_setup_netdev(struct qeth_card *card)
3261{
3262	if (card->info.type == QETH_CARD_TYPE_OSD ||
3263	    card->info.type == QETH_CARD_TYPE_OSX) {
3264		if ((card->info.link_type == QETH_LINK_TYPE_LANE_TR) ||
3265		    (card->info.link_type == QETH_LINK_TYPE_HSTR)) {
3266			pr_info("qeth_l3: ignoring TR device\n");
3267			return -ENODEV;
 
 
 
 
3268		} else {
3269			card->dev = alloc_etherdev(0);
3270			if (!card->dev)
3271				return -ENODEV;
3272			card->dev->netdev_ops = &qeth_l3_osa_netdev_ops;
3273
3274			/*IPv6 address autoconfiguration stuff*/
3275			qeth_l3_get_unique_id(card);
3276			if (!(card->info.unique_id & UNIQUE_ID_NOT_BY_CARD))
3277				card->dev->dev_id = card->info.unique_id &
3278							 0xffff;
3279			if (!card->info.guestlan) {
3280				card->dev->hw_features = NETIF_F_SG |
3281					NETIF_F_RXCSUM | NETIF_F_IP_CSUM |
3282					NETIF_F_TSO;
3283				card->dev->features = NETIF_F_RXCSUM;
3284			}
3285		}
3286	} else if (card->info.type == QETH_CARD_TYPE_IQD) {
3287		card->dev = alloc_netdev(0, "hsi%d", ether_setup);
3288		if (!card->dev)
3289			return -ENODEV;
3290		card->dev->flags |= IFF_NOARP;
3291		card->dev->netdev_ops = &qeth_l3_netdev_ops;
3292		qeth_l3_iqd_read_initial_mac(card);
3293		if (card->options.hsuid[0])
3294			memcpy(card->dev->perm_addr, card->options.hsuid, 9);
3295	} else
3296		return -ENODEV;
3297
3298	card->dev->ml_priv = card;
3299	card->dev->watchdog_timeo = QETH_TX_TIMEOUT;
3300	card->dev->mtu = card->info.initial_mtu;
3301	SET_ETHTOOL_OPS(card->dev, &qeth_l3_ethtool_ops);
3302	card->dev->features |=	NETIF_F_HW_VLAN_CTAG_TX |
3303				NETIF_F_HW_VLAN_CTAG_RX |
3304				NETIF_F_HW_VLAN_CTAG_FILTER;
3305	card->dev->priv_flags &= ~IFF_XMIT_DST_RELEASE;
3306	card->dev->gso_max_size = 15 * PAGE_SIZE;
3307
3308	SET_NETDEV_DEV(card->dev, &card->gdev->dev);
3309	netif_napi_add(card->dev, &card->napi, qeth_l3_poll, QETH_NAPI_WEIGHT);
3310	return register_netdev(card->dev);
3311}
3312
3313static int qeth_l3_probe_device(struct ccwgroup_device *gdev)
3314{
3315	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3316
3317	qeth_l3_create_device_attributes(&gdev->dev);
3318	card->options.layer2 = 0;
3319	card->info.hwtrap = 0;
 
 
 
 
 
 
3320	return 0;
3321}
3322
3323static void qeth_l3_remove_device(struct ccwgroup_device *cgdev)
3324{
3325	struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3326
3327	qeth_l3_remove_device_attributes(&cgdev->dev);
3328
3329	qeth_set_allowed_threads(card, 0, 1);
3330	wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3331
3332	if (cgdev->state == CCWGROUP_ONLINE)
3333		qeth_l3_set_offline(cgdev);
3334
3335	if (card->dev) {
3336		unregister_netdev(card->dev);
3337		card->dev = NULL;
3338	}
3339
3340	qeth_l3_clear_ip_list(card, 0);
3341	qeth_l3_clear_ipato_list(card);
3342	return;
3343}
3344
3345static int __qeth_l3_set_online(struct ccwgroup_device *gdev, int recovery_mode)
3346{
3347	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3348	int rc = 0;
3349	enum qeth_card_states recover_flag;
3350
 
3351	mutex_lock(&card->discipline_mutex);
3352	mutex_lock(&card->conf_mutex);
3353	QETH_DBF_TEXT(SETUP, 2, "setonlin");
3354	QETH_DBF_HEX(SETUP, 2, &card, sizeof(void *));
3355
3356	recover_flag = card->state;
3357	rc = qeth_core_hardsetup_card(card);
3358	if (rc) {
3359		QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
3360		rc = -ENODEV;
3361		goto out_remove;
3362	}
3363
3364	if (!card->dev && qeth_l3_setup_netdev(card)) {
3365		rc = -ENODEV;
3366		goto out_remove;
3367	}
3368
3369	if (qeth_is_diagass_supported(card, QETH_DIAGS_CMD_TRAP)) {
3370		if (card->info.hwtrap &&
3371		    qeth_hw_trap(card, QETH_DIAGS_TRAP_ARM))
3372			card->info.hwtrap = 0;
3373	} else
3374		card->info.hwtrap = 0;
3375
3376	card->state = CARD_STATE_HARDSETUP;
3377	memset(&card->rx, 0, sizeof(struct qeth_rx));
3378	qeth_print_status_message(card);
3379
3380	/* softsetup */
3381	QETH_DBF_TEXT(SETUP, 2, "softsetp");
3382
3383	rc = qeth_send_startlan(card);
3384	if (rc) {
3385		QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
3386		if (rc == 0xe080) {
3387			dev_warn(&card->gdev->dev,
3388				"The LAN is offline\n");
3389			card->lan_online = 0;
3390			goto contin;
3391		}
3392		rc = -ENODEV;
3393		goto out_remove;
3394	} else
3395		card->lan_online = 1;
3396
3397contin:
3398	rc = qeth_l3_setadapter_parms(card);
3399	if (rc)
3400		QETH_DBF_TEXT_(SETUP, 2, "2err%d", rc);
3401	if (!card->options.sniffer) {
3402		rc = qeth_l3_start_ipassists(card);
3403		if (rc) {
3404			QETH_DBF_TEXT_(SETUP, 2, "3err%d", rc);
3405			goto out_remove;
3406		}
3407		rc = qeth_l3_setrouting_v4(card);
3408		if (rc)
3409			QETH_DBF_TEXT_(SETUP, 2, "4err%d", rc);
3410		rc = qeth_l3_setrouting_v6(card);
3411		if (rc)
3412			QETH_DBF_TEXT_(SETUP, 2, "5err%d", rc);
3413	}
3414	netif_tx_disable(card->dev);
3415
3416	rc = qeth_init_qdio_queues(card);
3417	if (rc) {
3418		QETH_DBF_TEXT_(SETUP, 2, "6err%d", rc);
3419		rc = -ENODEV;
3420		goto out_remove;
3421	}
3422	card->state = CARD_STATE_SOFTSETUP;
3423
3424	qeth_set_allowed_threads(card, 0xffffffff, 0);
3425	qeth_l3_set_ip_addr_list(card);
3426	if (card->lan_online)
3427		netif_carrier_on(card->dev);
3428	else
3429		netif_carrier_off(card->dev);
3430	if (recover_flag == CARD_STATE_RECOVER) {
3431		rtnl_lock();
3432		if (recovery_mode)
3433			__qeth_l3_open(card->dev);
3434		else
 
3435			dev_open(card->dev);
 
 
3436		qeth_l3_set_multicast_list(card->dev);
3437		rtnl_unlock();
3438	}
3439	qeth_trace_features(card);
3440	/* let user_space know that device is online */
3441	kobject_uevent(&gdev->dev.kobj, KOBJ_CHANGE);
3442	mutex_unlock(&card->conf_mutex);
3443	mutex_unlock(&card->discipline_mutex);
3444	return 0;
3445out_remove:
3446	qeth_l3_stop_card(card, 0);
3447	ccw_device_set_offline(CARD_DDEV(card));
3448	ccw_device_set_offline(CARD_WDEV(card));
3449	ccw_device_set_offline(CARD_RDEV(card));
3450	qdio_free(CARD_DDEV(card));
3451	if (recover_flag == CARD_STATE_RECOVER)
3452		card->state = CARD_STATE_RECOVER;
3453	else
3454		card->state = CARD_STATE_DOWN;
3455	mutex_unlock(&card->conf_mutex);
3456	mutex_unlock(&card->discipline_mutex);
3457	return rc;
3458}
3459
3460static int qeth_l3_set_online(struct ccwgroup_device *gdev)
3461{
3462	return __qeth_l3_set_online(gdev, 0);
3463}
3464
3465static int __qeth_l3_set_offline(struct ccwgroup_device *cgdev,
3466			int recovery_mode)
3467{
3468	struct qeth_card *card = dev_get_drvdata(&cgdev->dev);
3469	int rc = 0, rc2 = 0, rc3 = 0;
3470	enum qeth_card_states recover_flag;
3471
3472	mutex_lock(&card->discipline_mutex);
3473	mutex_lock(&card->conf_mutex);
3474	QETH_DBF_TEXT(SETUP, 3, "setoffl");
3475	QETH_DBF_HEX(SETUP, 3, &card, sizeof(void *));
3476
3477	if (card->dev && netif_carrier_ok(card->dev))
3478		netif_carrier_off(card->dev);
3479	recover_flag = card->state;
3480	if ((!recovery_mode && card->info.hwtrap) || card->info.hwtrap == 2) {
3481		qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3482		card->info.hwtrap = 1;
3483	}
3484	qeth_l3_stop_card(card, recovery_mode);
3485	if ((card->options.cq == QETH_CQ_ENABLED) && card->dev) {
3486		rtnl_lock();
3487		call_netdevice_notifiers(NETDEV_REBOOT, card->dev);
3488		rtnl_unlock();
3489	}
3490	rc  = ccw_device_set_offline(CARD_DDEV(card));
3491	rc2 = ccw_device_set_offline(CARD_WDEV(card));
3492	rc3 = ccw_device_set_offline(CARD_RDEV(card));
3493	if (!rc)
3494		rc = (rc2) ? rc2 : rc3;
3495	if (rc)
3496		QETH_DBF_TEXT_(SETUP, 2, "1err%d", rc);
3497	qdio_free(CARD_DDEV(card));
3498	if (recover_flag == CARD_STATE_UP)
3499		card->state = CARD_STATE_RECOVER;
3500	/* let user_space know that device is offline */
3501	kobject_uevent(&cgdev->dev.kobj, KOBJ_CHANGE);
3502	mutex_unlock(&card->conf_mutex);
3503	mutex_unlock(&card->discipline_mutex);
3504	return 0;
3505}
3506
3507static int qeth_l3_set_offline(struct ccwgroup_device *cgdev)
3508{
3509	return __qeth_l3_set_offline(cgdev, 0);
3510}
3511
3512static int qeth_l3_recover(void *ptr)
3513{
3514	struct qeth_card *card;
3515	int rc = 0;
3516
3517	card = (struct qeth_card *) ptr;
3518	QETH_CARD_TEXT(card, 2, "recover1");
3519	QETH_CARD_HEX(card, 2, &card, sizeof(void *));
3520	if (!qeth_do_run_thread(card, QETH_RECOVER_THREAD))
3521		return 0;
3522	QETH_CARD_TEXT(card, 2, "recover2");
3523	dev_warn(&card->gdev->dev,
3524		"A recovery process has been started for the device\n");
3525	qeth_set_recovery_task(card);
3526	__qeth_l3_set_offline(card->gdev, 1);
3527	rc = __qeth_l3_set_online(card->gdev, 1);
3528	if (!rc)
3529		dev_info(&card->gdev->dev,
3530			"Device successfully recovered!\n");
3531	else {
3532		qeth_close_dev(card);
 
 
3533		dev_warn(&card->gdev->dev, "The qeth device driver "
3534				"failed to recover an error on the device\n");
3535	}
3536	qeth_clear_recovery_task(card);
3537	qeth_clear_thread_start_bit(card, QETH_RECOVER_THREAD);
3538	qeth_clear_thread_running_bit(card, QETH_RECOVER_THREAD);
3539	return 0;
3540}
3541
3542static void qeth_l3_shutdown(struct ccwgroup_device *gdev)
3543{
3544	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3545	qeth_set_allowed_threads(card, 0, 1);
3546	if ((gdev->state == CCWGROUP_ONLINE) && card->info.hwtrap)
3547		qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3548	qeth_qdio_clear_card(card, 0);
3549	qeth_clear_qdio_buffers(card);
3550	qdio_free(CARD_DDEV(card));
3551}
3552
3553static int qeth_l3_pm_suspend(struct ccwgroup_device *gdev)
3554{
3555	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3556
3557	if (card->dev)
3558		netif_device_detach(card->dev);
3559	qeth_set_allowed_threads(card, 0, 1);
3560	wait_event(card->wait_q, qeth_threads_running(card, 0xffffffff) == 0);
3561	if (gdev->state == CCWGROUP_OFFLINE)
3562		return 0;
3563	if (card->state == CARD_STATE_UP) {
3564		if (card->info.hwtrap)
3565			qeth_hw_trap(card, QETH_DIAGS_TRAP_DISARM);
3566		__qeth_l3_set_offline(card->gdev, 1);
3567	} else
3568		__qeth_l3_set_offline(card->gdev, 0);
3569	return 0;
3570}
3571
3572static int qeth_l3_pm_resume(struct ccwgroup_device *gdev)
3573{
3574	struct qeth_card *card = dev_get_drvdata(&gdev->dev);
3575	int rc = 0;
3576
3577	if (gdev->state == CCWGROUP_OFFLINE)
3578		goto out;
3579
3580	if (card->state == CARD_STATE_RECOVER) {
3581		rc = __qeth_l3_set_online(card->gdev, 1);
3582		if (rc) {
3583			rtnl_lock();
3584			dev_close(card->dev);
3585			rtnl_unlock();
3586		}
3587	} else
3588		rc = __qeth_l3_set_online(card->gdev, 0);
3589out:
3590	qeth_set_allowed_threads(card, 0xffffffff, 0);
3591	if (card->dev)
3592		netif_device_attach(card->dev);
3593	if (rc)
3594		dev_warn(&card->gdev->dev, "The qeth device driver "
3595			"failed to recover an error on the device\n");
3596	return rc;
3597}
3598
3599/* Returns zero if the command is successfully "consumed" */
3600static int qeth_l3_control_event(struct qeth_card *card,
3601					struct qeth_ipa_cmd *cmd)
3602{
3603	return 1;
3604}
3605
3606struct qeth_discipline qeth_l3_discipline = {
3607	.start_poll = qeth_qdio_start_poll,
3608	.input_handler = (qdio_handler_t *) qeth_qdio_input_handler,
3609	.output_handler = (qdio_handler_t *) qeth_qdio_output_handler,
3610	.recover = qeth_l3_recover,
3611	.setup = qeth_l3_probe_device,
3612	.remove = qeth_l3_remove_device,
3613	.set_online = qeth_l3_set_online,
3614	.set_offline = qeth_l3_set_offline,
3615	.shutdown = qeth_l3_shutdown,
3616	.freeze = qeth_l3_pm_suspend,
3617	.thaw = qeth_l3_pm_resume,
3618	.restore = qeth_l3_pm_resume,
3619	.control_event_handler = qeth_l3_control_event,
3620};
3621EXPORT_SYMBOL_GPL(qeth_l3_discipline);
3622
3623static int qeth_l3_ip_event(struct notifier_block *this,
3624			    unsigned long event, void *ptr)
3625{
3626	struct in_ifaddr *ifa = (struct in_ifaddr *)ptr;
3627	struct net_device *dev = (struct net_device *)ifa->ifa_dev->dev;
3628	struct qeth_ipaddr *addr;
3629	struct qeth_card *card;
3630
3631	if (dev_net(dev) != &init_net)
3632		return NOTIFY_DONE;
3633
3634	card = qeth_l3_get_card_from_dev(dev);
 
3635	if (!card)
3636		return NOTIFY_DONE;
3637	QETH_CARD_TEXT(card, 3, "ipevent");
3638
3639	addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV4);
3640	if (addr != NULL) {
3641		addr->u.a4.addr = ifa->ifa_address;
3642		addr->u.a4.mask = ifa->ifa_mask;
3643		addr->type = QETH_IP_TYPE_NORMAL;
3644	} else
3645		goto out;
3646
3647	switch (event) {
3648	case NETDEV_UP:
3649		if (!qeth_l3_add_ip(card, addr))
3650			kfree(addr);
3651		break;
3652	case NETDEV_DOWN:
3653		if (!qeth_l3_delete_ip(card, addr))
3654			kfree(addr);
3655		break;
3656	default:
3657		break;
3658	}
3659	qeth_l3_set_ip_addr_list(card);
3660out:
3661	return NOTIFY_DONE;
3662}
3663
3664static struct notifier_block qeth_l3_ip_notifier = {
3665	qeth_l3_ip_event,
3666	NULL,
3667};
3668
3669#ifdef CONFIG_QETH_IPV6
3670/**
3671 * IPv6 event handler
3672 */
3673static int qeth_l3_ip6_event(struct notifier_block *this,
3674			     unsigned long event, void *ptr)
3675{
3676	struct inet6_ifaddr *ifa = (struct inet6_ifaddr *)ptr;
3677	struct net_device *dev = (struct net_device *)ifa->idev->dev;
3678	struct qeth_ipaddr *addr;
3679	struct qeth_card *card;
3680
 
3681	card = qeth_l3_get_card_from_dev(dev);
3682	if (!card)
3683		return NOTIFY_DONE;
3684	QETH_CARD_TEXT(card, 3, "ip6event");
3685	if (!qeth_is_supported(card, IPA_IPV6))
3686		return NOTIFY_DONE;
3687
3688	addr = qeth_l3_get_addr_buffer(QETH_PROT_IPV6);
3689	if (addr != NULL) {
3690		memcpy(&addr->u.a6.addr, &ifa->addr, sizeof(struct in6_addr));
3691		addr->u.a6.pfxlen = ifa->prefix_len;
3692		addr->type = QETH_IP_TYPE_NORMAL;
3693	} else
3694		goto out;
3695
3696	switch (event) {
3697	case NETDEV_UP:
3698		if (!qeth_l3_add_ip(card, addr))
3699			kfree(addr);
3700		break;
3701	case NETDEV_DOWN:
3702		if (!qeth_l3_delete_ip(card, addr))
3703			kfree(addr);
3704		break;
3705	default:
3706		break;
3707	}
3708	qeth_l3_set_ip_addr_list(card);
3709out:
3710	return NOTIFY_DONE;
3711}
3712
3713static struct notifier_block qeth_l3_ip6_notifier = {
3714	qeth_l3_ip6_event,
3715	NULL,
3716};
3717#endif
3718
3719static int qeth_l3_register_notifiers(void)
3720{
3721	int rc;
3722
3723	QETH_DBF_TEXT(SETUP, 5, "regnotif");
3724	rc = register_inetaddr_notifier(&qeth_l3_ip_notifier);
3725	if (rc)
3726		return rc;
3727#ifdef CONFIG_QETH_IPV6
3728	rc = register_inet6addr_notifier(&qeth_l3_ip6_notifier);
3729	if (rc) {
3730		unregister_inetaddr_notifier(&qeth_l3_ip_notifier);
3731		return rc;
3732	}
3733#else
3734	pr_warning("There is no IPv6 support for the layer 3 discipline\n");
3735#endif
3736	return 0;
3737}
3738
3739static void qeth_l3_unregister_notifiers(void)
3740{
3741
3742	QETH_DBF_TEXT(SETUP, 5, "unregnot");
3743	WARN_ON(unregister_inetaddr_notifier(&qeth_l3_ip_notifier));
3744#ifdef CONFIG_QETH_IPV6
3745	WARN_ON(unregister_inet6addr_notifier(&qeth_l3_ip6_notifier));
3746#endif /* QETH_IPV6 */
3747}
3748
3749static int __init qeth_l3_init(void)
3750{
3751	int rc = 0;
3752
3753	pr_info("register layer 3 discipline\n");
3754	rc = qeth_l3_register_notifiers();
3755	return rc;
3756}
3757
3758static void __exit qeth_l3_exit(void)
3759{
3760	qeth_l3_unregister_notifiers();
3761	pr_info("unregister layer 3 discipline\n");
3762}
3763
3764module_init(qeth_l3_init);
3765module_exit(qeth_l3_exit);
3766MODULE_AUTHOR("Frank Blaschka <frank.blaschka@de.ibm.com>");
3767MODULE_DESCRIPTION("qeth layer 3 discipline");
3768MODULE_LICENSE("GPL");