Quelle  ps3_gelic_wireless.c   Sprache: C

// SPDX-License-Identifier: GPL-2.0-only
/*
 *  PS3 gelic network driver.
 *
 * Copyright (C) 2007 Sony Computer Entertainment Inc.
 * Copyright 2007 Sony Corporation
 */
#undef DEBUG

#include <linux/kernel.h>
#include <linux/module.h>
#include <linux/slab.h>

#include <linux/etherdevice.h>
#include <linux/ethtool.h>
#include <linux/if_vlan.h>

#include <linux/in.h>
#include <linux/ip.h>
#include <linux/tcp.h>
#include <linux/wireless.h>
#include <linux/ieee80211.h>
#include <linux/if_arp.h>
#include <linux/ctype.h>
#include <linux/string.h>
#include <net/iw_handler.h>

#include <linux/dma-mapping.h>
#include <net/checksum.h>
#include <asm/firmware.h>
#include <asm/ps3.h>
#include <asm/lv1call.h>

#include "ps3_gelic_net.h"
#include "ps3_gelic_wireless.h"


static int gelic_wl_start_scan(struct gelic_wl_info *wl, int always_scan,
          u8 *essid, size_t essid_len);
static int gelic_wl_try_associate(struct net_device *netdev);

/*
 * tables
 */

/* 802.11b/g channel to freq in MHz */
static const int channel_freq[] = {
 2412, 2417, 2422, 2427, 2432,
 2437, 2442, 2447, 2452, 2457,
 2462, 2467, 2472, 2484
};
#define NUM_CHANNELS ARRAY_SIZE(channel_freq)

/* in bps */
static const int bitrate_list[] = {
   1000000,
   2000000,
   5500000,
  11000000,
   6000000,
   9000000,
  12000000,
  18000000,
  24000000,
  36000000,
  48000000,
  54000000
};
#define NUM_BITRATES ARRAY_SIZE(bitrate_list)

/*
 * wpa2 support requires the hypervisor version 2.0 or later
 */
static inline int wpa2_capable(void)
{
 return 0 <= ps3_compare_firmware_version(2, 0, 0);
}

static inline int precise_ie(void)
{
 return 0 <= ps3_compare_firmware_version(2, 2, 0);
}
/*
 * post_eurus_cmd helpers
 */
struct eurus_cmd_arg_info {
 int pre_arg; /* command requires arg1, arg2 at POST COMMAND */
 int post_arg; /* command requires arg1, arg2 at GET_RESULT */
};

static const struct eurus_cmd_arg_info cmd_info[GELIC_EURUS_CMD_MAX_INDEX] = {
 [GELIC_EURUS_CMD_SET_COMMON_CFG] = { .pre_arg = 1},
 [GELIC_EURUS_CMD_SET_WEP_CFG]    = { .pre_arg = 1},
 [GELIC_EURUS_CMD_SET_WPA_CFG]    = { .pre_arg = 1},
 [GELIC_EURUS_CMD_GET_COMMON_CFG] = { .post_arg = 1},
 [GELIC_EURUS_CMD_GET_WEP_CFG]    = { .post_arg = 1},
 [GELIC_EURUS_CMD_GET_WPA_CFG]    = { .post_arg = 1},
 [GELIC_EURUS_CMD_GET_RSSI_CFG]   = { .post_arg = 1},
 [GELIC_EURUS_CMD_START_SCAN]     = { .pre_arg = 1},
 [GELIC_EURUS_CMD_GET_SCAN]       = { .post_arg = 1},
};

#ifdef DEBUG
static const char *cmdstr(enum gelic_eurus_command ix)
{
 switch (ix) {
 case GELIC_EURUS_CMD_ASSOC:
  return "ASSOC";
 case GELIC_EURUS_CMD_DISASSOC:
  return "DISASSOC";
 case GELIC_EURUS_CMD_START_SCAN:
  return "SCAN";
 case GELIC_EURUS_CMD_GET_SCAN:
  return "GET SCAN";
 case GELIC_EURUS_CMD_SET_COMMON_CFG:
  return "SET_COMMON_CFG";
 case GELIC_EURUS_CMD_GET_COMMON_CFG:
  return "GET_COMMON_CFG";
 case GELIC_EURUS_CMD_SET_WEP_CFG:
  return "SET_WEP_CFG";
 case GELIC_EURUS_CMD_GET_WEP_CFG:
  return "GET_WEP_CFG";
 case GELIC_EURUS_CMD_SET_WPA_CFG:
  return "SET_WPA_CFG";
 case GELIC_EURUS_CMD_GET_WPA_CFG:
  return "GET_WPA_CFG";
 case GELIC_EURUS_CMD_GET_RSSI_CFG:
  return "GET_RSSI";
 default:
  break;
 }
 return "";
};
#else
static inline const char *cmdstr(enum gelic_eurus_command ix)
{
 return "";
}
#endif

/* synchronously do eurus commands */
static void gelic_eurus_sync_cmd_worker(struct work_struct *work)
{
 struct gelic_eurus_cmd *cmd;
 struct gelic_card *card;
 struct gelic_wl_info *wl;

 u64 arg1, arg2;

 pr_debug("%s: <-\n", __func__);
 cmd = container_of(work, struct gelic_eurus_cmd, work);
 BUG_ON(cmd_info[cmd->cmd].pre_arg &&
        cmd_info[cmd->cmd].post_arg);
 wl = cmd->wl;
 card = port_to_card(wl_port(wl));

 if (cmd_info[cmd->cmd].pre_arg) {
  arg1 = (cmd->buffer) ?
   ps3_mm_phys_to_lpar(__pa(cmd->buffer)) :
   0;
  arg2 = cmd->buf_size;
 } else {
  arg1 = 0;
  arg2 = 0;
 }
 init_completion(&wl->cmd_done_intr);
 pr_debug("%s: cmd='%s' start\n", __func__, cmdstr(cmd->cmd));
 cmd->status = lv1_net_control(bus_id(card), dev_id(card),
          GELIC_LV1_POST_WLAN_CMD,
          cmd->cmd, arg1, arg2,
          &cmd->tag, &cmd->size);
 if (cmd->status) {
  complete(&cmd->done);
  pr_info("%s: cmd issue failed\n", __func__);
  return;
 }

 wait_for_completion(&wl->cmd_done_intr);

 if (cmd_info[cmd->cmd].post_arg) {
  arg1 = ps3_mm_phys_to_lpar(__pa(cmd->buffer));
  arg2 = cmd->buf_size;
 } else {
  arg1 = 0;
  arg2 = 0;
 }

 cmd->status = lv1_net_control(bus_id(card), dev_id(card),
          GELIC_LV1_GET_WLAN_CMD_RESULT,
          cmd->tag, arg1, arg2,
          &cmd->cmd_status, &cmd->size);
#ifdef DEBUG
 if (cmd->status || cmd->cmd_status) {
 pr_debug("%s: cmd done tag=%#lx arg1=%#lx, arg2=%#lx\n", __func__,
   cmd->tag, arg1, arg2);
 pr_debug("%s: cmd done status=%#x cmd_status=%#lx size=%#lx\n",
   __func__, cmd->status, cmd->cmd_status, cmd->size);
 }
#endif
 complete(&cmd->done);
 pr_debug("%s: cmd='%s' done\n", __func__, cmdstr(cmd->cmd));
}

static struct gelic_eurus_cmd *gelic_eurus_sync_cmd(struct gelic_wl_info *wl,
          unsigned int eurus_cmd,
          void *buffer,
          unsigned int buf_size)
{
 struct gelic_eurus_cmd *cmd;

 /* allocate cmd */
 cmd = kzalloc(sizeof(*cmd), GFP_KERNEL);
 if (!cmd)
  return NULL;

 /* initialize members */
 cmd->cmd = eurus_cmd;
 cmd->buffer = buffer;
 cmd->buf_size = buf_size;
 cmd->wl = wl;
 INIT_WORK(&cmd->work, gelic_eurus_sync_cmd_worker);
 init_completion(&cmd->done);
 queue_work(wl->eurus_cmd_queue, &cmd->work);

 /* wait for command completion */
 wait_for_completion(&cmd->done);

 return cmd;
}

static u32 gelic_wl_get_link(struct net_device *netdev)
{
 struct gelic_wl_info *wl = port_wl(netdev_port(netdev));
 u32 ret;

 pr_debug("%s: <-\n", __func__);
 mutex_lock(&wl->assoc_stat_lock);
 if (wl->assoc_stat == GELIC_WL_ASSOC_STAT_ASSOCIATED)
  ret = 1;
 else
  ret = 0;
 mutex_unlock(&wl->assoc_stat_lock);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

static void gelic_wl_send_iwap_event(struct gelic_wl_info *wl, u8 *bssid)
{
 union iwreq_data data;

 memset(&data, 0, sizeof(data));
 if (bssid)
  memcpy(data.ap_addr.sa_data, bssid, ETH_ALEN);
 data.ap_addr.sa_family = ARPHRD_ETHER;
 wireless_send_event(port_to_netdev(wl_port(wl)), SIOCGIWAP,
       &data, NULL);
}

/*
 * wireless extension handlers and helpers
 */

/* SIOGIWNAME */
static int gelic_wl_get_name(struct net_device *dev,
        struct iw_request_info *info,
        union iwreq_data *iwreq, char *extra)
{
 strcpy(iwreq->name, "IEEE 802.11bg");
 return 0;
}

static void gelic_wl_get_ch_info(struct gelic_wl_info *wl)
{
 struct gelic_card *card = port_to_card(wl_port(wl));
 u64 ch_info_raw, tmp;
 int status;

 if (!test_and_set_bit(GELIC_WL_STAT_CH_INFO, &wl->stat)) {
  status = lv1_net_control(bus_id(card), dev_id(card),
      GELIC_LV1_GET_CHANNEL, 0, 0, 0,
      &ch_info_raw,
      &tmp);
  /* some fw versions may return error */
  if (status) {
   if (status != LV1_NO_ENTRY)
    pr_info("%s: available ch unknown\n", __func__);
   wl->ch_info = 0x07ff;/* 11 ch */
  } else
   /* 16 bits of MSB has available channels */
   wl->ch_info = ch_info_raw >> 48;
 }
}

/* SIOGIWRANGE */
static int gelic_wl_get_range(struct net_device *netdev,
         struct iw_request_info *info,
         union iwreq_data *iwreq, char *extra)
{
 struct iw_point *point = &iwreq->data;
 struct iw_range *range = (struct iw_range *)extra;
 struct gelic_wl_info *wl = port_wl(netdev_port(netdev));
 unsigned int i, chs;

 pr_debug("%s: <-\n", __func__);
 point->length = sizeof(struct iw_range);
 memset(range, 0, sizeof(struct iw_range));

 range->we_version_compiled = WIRELESS_EXT;
 range->we_version_source = 22;

 /* available channels and frequencies */
 gelic_wl_get_ch_info(wl);

 for (i = 0, chs = 0;
      i < NUM_CHANNELS && chs < IW_MAX_FREQUENCIES; i++)
  if (wl->ch_info & (1 << i)) {
   range->freq[chs].i = i + 1;
   range->freq[chs].m = channel_freq[i];
   range->freq[chs].e = 6;
   chs++;
  }
 range->num_frequency = chs;
 range->old_num_frequency = chs;
 range->num_channels = chs;
 range->old_num_channels = chs;

 /* bitrates */
 for (i = 0; i < NUM_BITRATES; i++)
  range->bitrate[i] = bitrate_list[i];
 range->num_bitrates = i;

 /* signal levels */
 range->max_qual.qual = 100; /* relative value */
 range->max_qual.level = 100;
 range->avg_qual.qual = 50;
 range->avg_qual.level = 50;
 range->sensitivity = 0;

 /* Event capability */
 IW_EVENT_CAPA_SET_KERNEL(range->event_capa);
 IW_EVENT_CAPA_SET(range->event_capa, SIOCGIWAP);
 IW_EVENT_CAPA_SET(range->event_capa, SIOCGIWSCAN);

 /* encryption capability */
 range->enc_capa = IW_ENC_CAPA_WPA |
  IW_ENC_CAPA_CIPHER_TKIP | IW_ENC_CAPA_CIPHER_CCMP |
  IW_ENC_CAPA_4WAY_HANDSHAKE;
 if (wpa2_capable())
  range->enc_capa |= IW_ENC_CAPA_WPA2;
 range->encoding_size[0] = 5; /* 40bit WEP */
 range->encoding_size[1] = 13; /* 104bit WEP */
 range->encoding_size[2] = 32; /* WPA-PSK */
 range->num_encoding_sizes = 3;
 range->max_encoding_tokens = GELIC_WEP_KEYS;

 /* scan capability */
 range->scan_capa = IW_SCAN_CAPA_ESSID;

 pr_debug("%s: ->\n", __func__);
 return 0;

}

/* SIOC{G,S}IWSCAN */
static int gelic_wl_set_scan(struct net_device *netdev,
      struct iw_request_info *info,
      union iwreq_data *wrqu, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct iw_scan_req *req;
 u8 *essid = NULL;
 size_t essid_len = 0;

 if (wrqu->data.length == sizeof(struct iw_scan_req) &&
     wrqu->data.flags & IW_SCAN_THIS_ESSID) {
  req = (struct iw_scan_req*)extra;
  essid = req->essid;
  essid_len = req->essid_len;
  pr_debug("%s: ESSID scan =%s\n", __func__, essid);
 }
 return gelic_wl_start_scan(wl, 1, essid, essid_len);
}

#define OUI_LEN 3
static const u8 rsn_oui[OUI_LEN] = { 0x00, 0x0f, 0xac };
static const u8 wpa_oui[OUI_LEN] = { 0x00, 0x50, 0xf2 };

/*
 * synthesize WPA/RSN IE data
 * See WiFi WPA specification and IEEE 802.11-2007 7.3.2.25
 * for the format
 */
static size_t gelic_wl_synthesize_ie(u8 *buf,
         struct gelic_eurus_scan_info *scan)
{

 const u8 *oui_header;
 u8 *start = buf;
 int rsn;
 int ccmp;

 pr_debug("%s: <- sec=%16x\n", __func__, scan->security);
 switch (be16_to_cpu(scan->security) & GELIC_EURUS_SCAN_SEC_MASK) {
 case GELIC_EURUS_SCAN_SEC_WPA:
  rsn = 0;
  break;
 case GELIC_EURUS_SCAN_SEC_WPA2:
  rsn = 1;
  break;
 default:
  /* WEP or none.  No IE returned */
  return 0;
 }

 switch (be16_to_cpu(scan->security) & GELIC_EURUS_SCAN_SEC_WPA_MASK) {
 case GELIC_EURUS_SCAN_SEC_WPA_TKIP:
  ccmp = 0;
  break;
 case GELIC_EURUS_SCAN_SEC_WPA_AES:
  ccmp = 1;
  break;
 default:
  if (rsn) {
   ccmp = 1;
   pr_info("%s: no cipher info. defaulted to CCMP\n",
    __func__);
  } else {
   ccmp = 0;
   pr_info("%s: no cipher info. defaulted to TKIP\n",
    __func__);
  }
 }

 if (rsn)
  oui_header = rsn_oui;
 else
  oui_header = wpa_oui;

 /* element id */
 if (rsn)
  *buf++ = WLAN_EID_RSN;
 else
  *buf++ = WLAN_EID_VENDOR_SPECIFIC;

 /* length filed; set later */
 buf++;

 /* wpa special header */
 if (!rsn) {
  memcpy(buf, wpa_oui, OUI_LEN);
  buf += OUI_LEN;
  *buf++ = 0x01;
 }

 /* version */
 *buf++ = 0x01; /* version 1.0 */
 *buf++ = 0x00;

 /* group cipher */
 memcpy(buf, oui_header, OUI_LEN);
 buf += OUI_LEN;

 if (ccmp)
  *buf++ = 0x04; /* CCMP */
 else
  *buf++ = 0x02; /* TKIP */

 /* pairwise key count always 1 */
 *buf++ = 0x01;
 *buf++ = 0x00;

 /* pairwise key suit */
 memcpy(buf, oui_header, OUI_LEN);
 buf += OUI_LEN;
 if (ccmp)
  *buf++ = 0x04; /* CCMP */
 else
  *buf++ = 0x02; /* TKIP */

 /* AKM count is 1 */
 *buf++ = 0x01;
 *buf++ = 0x00;

 /* AKM suite is assumed as PSK*/
 memcpy(buf, oui_header, OUI_LEN);
 buf += OUI_LEN;
 *buf++ = 0x02; /* PSK */

 /* RSN capabilities is 0 */
 *buf++ = 0x00;
 *buf++ = 0x00;

 /* set length field */
 start[1] = (buf - start - 2);

 pr_debug("%s: ->\n", __func__);
 return buf - start;
}

struct ie_item {
 u8 *data;
 u8 len;
};

struct ie_info {
 struct ie_item wpa;
 struct ie_item rsn;
};

static void gelic_wl_parse_ie(u8 *data, size_t len,
         struct ie_info *ie_info)
{
 size_t data_left = len;
 u8 *pos = data;
 u8 item_len;
 u8 item_id;

 pr_debug("%s: data=%p len=%ld\n", __func__,
   data, len);
 memset(ie_info, 0, sizeof(struct ie_info));

 while (2 <= data_left) {
  item_id = *pos++;
  item_len = *pos++;
  data_left -= 2;

  if (data_left < item_len)
   break;

  switch (item_id) {
  case WLAN_EID_VENDOR_SPECIFIC:
   if ((OUI_LEN + 1 <= item_len) &&
       !memcmp(pos, wpa_oui, OUI_LEN) &&
       pos[OUI_LEN] == 0x01) {
    ie_info->wpa.data = pos - 2;
    ie_info->wpa.len = item_len + 2;
   }
   break;
  case WLAN_EID_RSN:
   ie_info->rsn.data = pos - 2;
   /* length includes the header */
   ie_info->rsn.len = item_len + 2;
   break;
  default:
   pr_debug("%s: ignore %#x,%d\n", __func__,
     item_id, item_len);
   break;
  }
  pos += item_len;
  data_left -= item_len;
 }
 pr_debug("%s: wpa=%p,%d wpa2=%p,%d\n", __func__,
   ie_info->wpa.data, ie_info->wpa.len,
   ie_info->rsn.data, ie_info->rsn.len);
}


/*
 * translate the scan informations from hypervisor to a
 * independent format
 */
static char *gelic_wl_translate_scan(struct net_device *netdev,
         struct iw_request_info *info,
         char *ev,
         char *stop,
         struct gelic_wl_scan_info *network)
{
 struct iw_event iwe;
 struct gelic_eurus_scan_info *scan = network->hwinfo;
 char *tmp;
 u8 rate;
 unsigned int i, j, len;
 u8 buf[64]; /* arbitrary size large enough */

 pr_debug("%s: <-\n", __func__);

 /* first entry should be AP's mac address */
 iwe.cmd = SIOCGIWAP;
 iwe.u.ap_addr.sa_family = ARPHRD_ETHER;
 memcpy(iwe.u.ap_addr.sa_data, &scan->bssid[2], ETH_ALEN);
 ev = iwe_stream_add_event(info, ev, stop, &iwe, IW_EV_ADDR_LEN);

 /* ESSID */
 iwe.cmd = SIOCGIWESSID;
 iwe.u.data.flags = 1;
 iwe.u.data.length = strnlen(scan->essid, 32);
 ev = iwe_stream_add_point(info, ev, stop, &iwe, scan->essid);

 /* FREQUENCY */
 iwe.cmd = SIOCGIWFREQ;
 iwe.u.freq.m = be16_to_cpu(scan->channel);
 iwe.u.freq.e = 0; /* table value in MHz */
 iwe.u.freq.i = 0;
 ev = iwe_stream_add_event(info, ev, stop, &iwe, IW_EV_FREQ_LEN);

 /* RATES */
 iwe.cmd = SIOCGIWRATE;
 iwe.u.bitrate.fixed = iwe.u.bitrate.disabled = 0;
 /* to stuff multiple values in one event */
 tmp = ev + iwe_stream_lcp_len(info);
 /* put them in ascendant order (older is first) */
 i = 0;
 j = 0;
 pr_debug("%s: rates=%d rate=%d\n", __func__,
   network->rate_len, network->rate_ext_len);
 while (i < network->rate_len) {
  if (j < network->rate_ext_len &&
      ((scan->ext_rate[j] & 0x7f) < (scan->rate[i] & 0x7f)))
      rate = scan->ext_rate[j++] & 0x7f;
  else
      rate = scan->rate[i++] & 0x7f;
  iwe.u.bitrate.value = rate * 500000; /* 500kbps unit */
  tmp = iwe_stream_add_value(info, ev, tmp, stop, &iwe,
        IW_EV_PARAM_LEN);
 }
 while (j < network->rate_ext_len) {
  iwe.u.bitrate.value = (scan->ext_rate[j++] & 0x7f) * 500000;
  tmp = iwe_stream_add_value(info, ev, tmp, stop, &iwe,
        IW_EV_PARAM_LEN);
 }
 /* Check if we added any rate */
 if (iwe_stream_lcp_len(info) < (tmp - ev))
  ev = tmp;

 /* ENCODE */
 iwe.cmd = SIOCGIWENCODE;
 if (be16_to_cpu(scan->capability) & WLAN_CAPABILITY_PRIVACY)
  iwe.u.data.flags = IW_ENCODE_ENABLED | IW_ENCODE_NOKEY;
 else
  iwe.u.data.flags = IW_ENCODE_DISABLED;
 iwe.u.data.length = 0;
 ev = iwe_stream_add_point(info, ev, stop, &iwe, scan->essid);

 /* MODE */
 iwe.cmd = SIOCGIWMODE;
 if (be16_to_cpu(scan->capability) &
     (WLAN_CAPABILITY_ESS | WLAN_CAPABILITY_IBSS)) {
  if (be16_to_cpu(scan->capability) & WLAN_CAPABILITY_ESS)
   iwe.u.mode = IW_MODE_MASTER;
  else
   iwe.u.mode = IW_MODE_ADHOC;
  ev = iwe_stream_add_event(info, ev, stop, &iwe, IW_EV_UINT_LEN);
 }

 /* QUAL */
 iwe.cmd = IWEVQUAL;
 iwe.u.qual.updated  = IW_QUAL_ALL_UPDATED |
   IW_QUAL_QUAL_INVALID | IW_QUAL_NOISE_INVALID;
 iwe.u.qual.level = be16_to_cpu(scan->rssi);
 iwe.u.qual.qual = be16_to_cpu(scan->rssi);
 iwe.u.qual.noise = 0;
 ev  = iwe_stream_add_event(info, ev, stop, &iwe, IW_EV_QUAL_LEN);

 /* RSN */
 memset(&iwe, 0, sizeof(iwe));
 if (be16_to_cpu(scan->size) <= sizeof(*scan)) {
  /* If wpa[2] capable station, synthesize IE and put it */
  len = gelic_wl_synthesize_ie(buf, scan);
  if (len) {
   iwe.cmd = IWEVGENIE;
   iwe.u.data.length = len;
   ev = iwe_stream_add_point(info, ev, stop, &iwe, buf);
  }
 } else {
  /* this scan info has IE data */
  struct ie_info ie_info;
  size_t data_len;

  data_len = be16_to_cpu(scan->size) - sizeof(*scan);

  gelic_wl_parse_ie(scan->elements, data_len, &ie_info);

  if (ie_info.wpa.len && (ie_info.wpa.len <= sizeof(buf))) {
   memcpy(buf, ie_info.wpa.data, ie_info.wpa.len);
   iwe.cmd = IWEVGENIE;
   iwe.u.data.length = ie_info.wpa.len;
   ev = iwe_stream_add_point(info, ev, stop, &iwe, buf);
  }

  if (ie_info.rsn.len && (ie_info.rsn.len <= sizeof(buf))) {
   memset(&iwe, 0, sizeof(iwe));
   memcpy(buf, ie_info.rsn.data, ie_info.rsn.len);
   iwe.cmd = IWEVGENIE;
   iwe.u.data.length = ie_info.rsn.len;
   ev = iwe_stream_add_point(info, ev, stop, &iwe, buf);
  }
 }

 pr_debug("%s: ->\n", __func__);
 return ev;
}


static int gelic_wl_get_scan(struct net_device *netdev,
        struct iw_request_info *info,
        union iwreq_data *wrqu, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct gelic_wl_scan_info *scan_info;
 char *ev = extra;
 char *stop = ev + wrqu->data.length;
 int ret = 0;
 unsigned long this_time = jiffies;

 pr_debug("%s: <-\n", __func__);
 if (mutex_lock_interruptible(&wl->scan_lock))
  return -EAGAIN;

 switch (wl->scan_stat) {
 case GELIC_WL_SCAN_STAT_SCANNING:
  /* If a scan in progress, caller should call me again */
  ret = -EAGAIN;
  goto out;
 case GELIC_WL_SCAN_STAT_INIT:
  /* last scan request failed or never issued */
  ret = -ENODEV;
  goto out;
 case GELIC_WL_SCAN_STAT_GOT_LIST:
  /* ok, use current list */
  break;
 }

 list_for_each_entry(scan_info, &wl->network_list, list) {
  if (wl->scan_age == 0 ||
      time_after(scan_info->last_scanned + wl->scan_age,
          this_time))
   ev = gelic_wl_translate_scan(netdev, info,
           ev, stop,
           scan_info);
  else
   pr_debug("%s:entry too old\n", __func__);

  if (stop - ev <= IW_EV_ADDR_LEN) {
   ret = -E2BIG;
   goto out;
  }
 }

 wrqu->data.length = ev - extra;
 wrqu->data.flags = 0;
out:
 mutex_unlock(&wl->scan_lock);
 pr_debug("%s: -> %d %d\n", __func__, ret, wrqu->data.length);
 return ret;
}

#ifdef DEBUG
static void scan_list_dump(struct gelic_wl_info *wl)
{
 struct gelic_wl_scan_info *scan_info;
 int i;

 i = 0;
 list_for_each_entry(scan_info, &wl->network_list, list) {
  pr_debug("%s: item %d\n", __func__, i++);
  pr_debug("valid=%d eurusindex=%d last=%lx\n",
    scan_info->valid, scan_info->eurus_index,
    scan_info->last_scanned);
  pr_debug("r_len=%d r_ext_len=%d essid_len=%d\n",
    scan_info->rate_len, scan_info->rate_ext_len,
    scan_info->essid_len);
  /* -- */
  pr_debug("bssid=%pM\n", &scan_info->hwinfo->bssid[2]);
  pr_debug("essid=%s\n", scan_info->hwinfo->essid);
 }
}
#endif

static int gelic_wl_set_auth(struct net_device *netdev,
        struct iw_request_info *info,
        union iwreq_data *data, char *extra)
{
 struct iw_param *param = &data->param;
 struct gelic_wl_info *wl = port_wl(netdev_port(netdev));
 unsigned long irqflag;
 int ret = 0;

 pr_debug("%s: <- %d\n", __func__, param->flags & IW_AUTH_INDEX);
 spin_lock_irqsave(&wl->lock, irqflag);
 switch (param->flags & IW_AUTH_INDEX) {
 case IW_AUTH_WPA_VERSION:
  if (param->value & IW_AUTH_WPA_VERSION_DISABLED) {
   pr_debug("%s: NO WPA selected\n", __func__);
   wl->wpa_level = GELIC_WL_WPA_LEVEL_NONE;
   wl->group_cipher_method = GELIC_WL_CIPHER_WEP;
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_WEP;
  }
  if (param->value & IW_AUTH_WPA_VERSION_WPA) {
   pr_debug("%s: WPA version 1 selected\n", __func__);
   wl->wpa_level = GELIC_WL_WPA_LEVEL_WPA;
   wl->group_cipher_method = GELIC_WL_CIPHER_TKIP;
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_TKIP;
   wl->auth_method = GELIC_EURUS_AUTH_OPEN;
  }
  if (param->value & IW_AUTH_WPA_VERSION_WPA2) {
   /*
 * As the hypervisor may not tell the cipher
 * information of the AP if it is WPA2,
 * you will not decide suitable cipher from
 * its beacon.
 * You should have knowledge about the AP's
 * cipher information in other method prior to
 * the association.
 */
   if (!precise_ie())
    pr_info("%s: WPA2 may not work\n", __func__);
   if (wpa2_capable()) {
    wl->wpa_level = GELIC_WL_WPA_LEVEL_WPA2;
    wl->group_cipher_method = GELIC_WL_CIPHER_AES;
    wl->pairwise_cipher_method =
     GELIC_WL_CIPHER_AES;
    wl->auth_method = GELIC_EURUS_AUTH_OPEN;
   } else
    ret = -EINVAL;
  }
  break;

 case IW_AUTH_CIPHER_PAIRWISE:
  if (param->value &
      (IW_AUTH_CIPHER_WEP104 | IW_AUTH_CIPHER_WEP40)) {
   pr_debug("%s: WEP selected\n", __func__);
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_WEP;
  }
  if (param->value & IW_AUTH_CIPHER_TKIP) {
   pr_debug("%s: TKIP selected\n", __func__);
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_TKIP;
  }
  if (param->value & IW_AUTH_CIPHER_CCMP) {
   pr_debug("%s: CCMP selected\n", __func__);
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_AES;
  }
  if (param->value & IW_AUTH_CIPHER_NONE) {
   pr_debug("%s: no auth selected\n", __func__);
   wl->pairwise_cipher_method = GELIC_WL_CIPHER_NONE;
  }
  break;
 case IW_AUTH_CIPHER_GROUP:
  if (param->value &
      (IW_AUTH_CIPHER_WEP104 | IW_AUTH_CIPHER_WEP40)) {
   pr_debug("%s: WEP selected\n", __func__);
   wl->group_cipher_method = GELIC_WL_CIPHER_WEP;
  }
  if (param->value & IW_AUTH_CIPHER_TKIP) {
   pr_debug("%s: TKIP selected\n", __func__);
   wl->group_cipher_method = GELIC_WL_CIPHER_TKIP;
  }
  if (param->value & IW_AUTH_CIPHER_CCMP) {
   pr_debug("%s: CCMP selected\n", __func__);
   wl->group_cipher_method = GELIC_WL_CIPHER_AES;
  }
  if (param->value & IW_AUTH_CIPHER_NONE) {
   pr_debug("%s: no auth selected\n", __func__);
   wl->group_cipher_method = GELIC_WL_CIPHER_NONE;
  }
  break;
 case IW_AUTH_80211_AUTH_ALG:
  if (param->value & IW_AUTH_ALG_SHARED_KEY) {
   pr_debug("%s: shared key specified\n", __func__);
   wl->auth_method = GELIC_EURUS_AUTH_SHARED;
  } else if (param->value & IW_AUTH_ALG_OPEN_SYSTEM) {
   pr_debug("%s: open system specified\n", __func__);
   wl->auth_method = GELIC_EURUS_AUTH_OPEN;
  } else
   ret = -EINVAL;
  break;

 case IW_AUTH_WPA_ENABLED:
  if (param->value) {
   pr_debug("%s: WPA enabled\n", __func__);
   wl->wpa_level = GELIC_WL_WPA_LEVEL_WPA;
  } else {
   pr_debug("%s: WPA disabled\n", __func__);
   wl->wpa_level = GELIC_WL_WPA_LEVEL_NONE;
  }
  break;

 case IW_AUTH_KEY_MGMT:
  if (param->value & IW_AUTH_KEY_MGMT_PSK)
   break;
  fallthrough;
 default:
  ret = -EOPNOTSUPP;
  break;
 }

 if (!ret)
  set_bit(GELIC_WL_STAT_CONFIGURED, &wl->stat);

 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: -> %d\n", __func__, ret);
 return ret;
}

static int gelic_wl_get_auth(struct net_device *netdev,
        struct iw_request_info *info,
        union iwreq_data *iwreq, char *extra)
{
 struct iw_param *param = &iwreq->param;
 struct gelic_wl_info *wl = port_wl(netdev_port(netdev));
 unsigned long irqflag;
 int ret = 0;

 pr_debug("%s: <- %d\n", __func__, param->flags & IW_AUTH_INDEX);
 spin_lock_irqsave(&wl->lock, irqflag);
 switch (param->flags & IW_AUTH_INDEX) {
 case IW_AUTH_WPA_VERSION:
  switch (wl->wpa_level) {
  case GELIC_WL_WPA_LEVEL_WPA:
   param->value |= IW_AUTH_WPA_VERSION_WPA;
   break;
  case GELIC_WL_WPA_LEVEL_WPA2:
   param->value |= IW_AUTH_WPA_VERSION_WPA2;
   break;
  default:
   param->value |= IW_AUTH_WPA_VERSION_DISABLED;
  }
  break;

 case IW_AUTH_80211_AUTH_ALG:
  if (wl->auth_method == GELIC_EURUS_AUTH_SHARED)
   param->value = IW_AUTH_ALG_SHARED_KEY;
  else if (wl->auth_method == GELIC_EURUS_AUTH_OPEN)
   param->value = IW_AUTH_ALG_OPEN_SYSTEM;
  break;

 case IW_AUTH_WPA_ENABLED:
  switch (wl->wpa_level) {
  case GELIC_WL_WPA_LEVEL_WPA:
  case GELIC_WL_WPA_LEVEL_WPA2:
   param->value = 1;
   break;
  default:
   param->value = 0;
   break;
  }
  break;
 default:
  ret = -EOPNOTSUPP;
 }

 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: -> %d\n", __func__, ret);
 return ret;
}

/* SIOC{S,G}IWESSID */
static int gelic_wl_set_essid(struct net_device *netdev,
         struct iw_request_info *info,
         union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 unsigned long irqflag;

 pr_debug("%s: <- l=%d f=%d\n", __func__,
   data->essid.length, data->essid.flags);
 if (IW_ESSID_MAX_SIZE < data->essid.length)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (data->essid.flags) {
  wl->essid_len = data->essid.length;
  memcpy(wl->essid, extra, wl->essid_len);
  pr_debug("%s: essid = '%s'\n", __func__, extra);
  set_bit(GELIC_WL_STAT_ESSID_SET, &wl->stat);
 } else {
  pr_debug("%s: ESSID any\n", __func__);
  clear_bit(GELIC_WL_STAT_ESSID_SET, &wl->stat);
 }
 set_bit(GELIC_WL_STAT_CONFIGURED, &wl->stat);
 spin_unlock_irqrestore(&wl->lock, irqflag);


 gelic_wl_try_associate(netdev); /* FIXME */
 pr_debug("%s: ->\n", __func__);
 return 0;
}

static int gelic_wl_get_essid(struct net_device *netdev,
         struct iw_request_info *info,
         union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 unsigned long irqflag;

 pr_debug("%s: <-\n", __func__);
 mutex_lock(&wl->assoc_stat_lock);
 spin_lock_irqsave(&wl->lock, irqflag);
 if (test_bit(GELIC_WL_STAT_ESSID_SET, &wl->stat) ||
     wl->assoc_stat == GELIC_WL_ASSOC_STAT_ASSOCIATED) {
  memcpy(extra, wl->essid, wl->essid_len);
  data->essid.length = wl->essid_len;
  data->essid.flags = 1;
 } else
  data->essid.flags = 0;

 mutex_unlock(&wl->assoc_stat_lock);
 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: -> len=%d\n", __func__, data->essid.length);

 return 0;
}

/* SIO{S,G}IWENCODE */
static int gelic_wl_set_encode(struct net_device *netdev,
          struct iw_request_info *info,
          union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct iw_point *enc = &data->encoding;
 __u16 flags;
 unsigned long irqflag;
 int key_index, index_specified;
 int ret = 0;

 pr_debug("%s: <-\n", __func__);
 flags = enc->flags & IW_ENCODE_FLAGS;
 key_index = enc->flags & IW_ENCODE_INDEX;

 pr_debug("%s: key_index = %d\n", __func__, key_index);
 pr_debug("%s: key_len = %d\n", __func__, enc->length);
 pr_debug("%s: flag=%x\n", __func__, enc->flags & IW_ENCODE_FLAGS);

 if (GELIC_WEP_KEYS < key_index)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (key_index) {
  index_specified = 1;
  key_index--;
 } else {
  index_specified = 0;
  key_index = wl->current_key;
 }

 if (flags & IW_ENCODE_NOKEY) {
  /* if just IW_ENCODE_NOKEY, change current key index */
  if (!flags && index_specified) {
   wl->current_key = key_index;
   goto done;
  }

  if (flags & IW_ENCODE_DISABLED) {
   if (!index_specified) {
    /* disable encryption */
    wl->group_cipher_method = GELIC_WL_CIPHER_NONE;
    wl->pairwise_cipher_method =
     GELIC_WL_CIPHER_NONE;
    /* invalidate all key */
    wl->key_enabled = 0;
   } else
    clear_bit(key_index, &wl->key_enabled);
  }

  if (flags & IW_ENCODE_OPEN)
   wl->auth_method = GELIC_EURUS_AUTH_OPEN;
  if (flags & IW_ENCODE_RESTRICTED) {
   pr_info("%s: shared key mode enabled\n", __func__);
   wl->auth_method = GELIC_EURUS_AUTH_SHARED;
  }
 } else {
  if (IW_ENCODING_TOKEN_MAX < enc->length) {
   ret = -EINVAL;
   goto done;
  }
  wl->key_len[key_index] = enc->length;
  memcpy(wl->key[key_index], extra, enc->length);
  set_bit(key_index, &wl->key_enabled);
  wl->pairwise_cipher_method = GELIC_WL_CIPHER_WEP;
  wl->group_cipher_method = GELIC_WL_CIPHER_WEP;
 }
 set_bit(GELIC_WL_STAT_CONFIGURED, &wl->stat);
done:
 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

static int gelic_wl_get_encode(struct net_device *netdev,
          struct iw_request_info *info,
          union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct iw_point *enc = &data->encoding;
 unsigned long irqflag;
 unsigned int key_index;
 int ret = 0;

 pr_debug("%s: <-\n", __func__);
 key_index = enc->flags & IW_ENCODE_INDEX;
 pr_debug("%s: flag=%#x point=%p len=%d extra=%p\n", __func__,
   enc->flags, enc->pointer, enc->length, extra);
 if (GELIC_WEP_KEYS < key_index)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (key_index)
  key_index--;
 else
  key_index = wl->current_key;

 if (wl->group_cipher_method == GELIC_WL_CIPHER_WEP) {
  switch (wl->auth_method) {
  case GELIC_EURUS_AUTH_OPEN:
   enc->flags = IW_ENCODE_OPEN;
   break;
  case GELIC_EURUS_AUTH_SHARED:
   enc->flags = IW_ENCODE_RESTRICTED;
   break;
  }
 } else
  enc->flags = IW_ENCODE_DISABLED;

 if (test_bit(key_index, &wl->key_enabled)) {
  if (enc->length < wl->key_len[key_index]) {
   ret = -EINVAL;
   goto done;
  }
  enc->length = wl->key_len[key_index];
  memcpy(extra, wl->key[key_index], wl->key_len[key_index]);
 } else {
  enc->length = 0;
  enc->flags |= IW_ENCODE_NOKEY;
 }
 enc->flags |= key_index + 1;
 pr_debug("%s: -> flag=%x len=%d\n", __func__,
   enc->flags, enc->length);

done:
 spin_unlock_irqrestore(&wl->lock, irqflag);
 return ret;
}

/* SIOC{S,G}IWAP */
static int gelic_wl_set_ap(struct net_device *netdev,
      struct iw_request_info *info,
      union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 unsigned long irqflag;

 pr_debug("%s: <-\n", __func__);
 if (data->ap_addr.sa_family != ARPHRD_ETHER)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (is_valid_ether_addr(data->ap_addr.sa_data)) {
  memcpy(wl->bssid, data->ap_addr.sa_data,
         ETH_ALEN);
  set_bit(GELIC_WL_STAT_BSSID_SET, &wl->stat);
  set_bit(GELIC_WL_STAT_CONFIGURED, &wl->stat);
  pr_debug("%s: bss=%pM\n", __func__, wl->bssid);
 } else {
  pr_debug("%s: clear bssid\n", __func__);
  clear_bit(GELIC_WL_STAT_BSSID_SET, &wl->stat);
  eth_zero_addr(wl->bssid);
 }
 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: ->\n", __func__);
 return 0;
}

static int gelic_wl_get_ap(struct net_device *netdev,
      struct iw_request_info *info,
      union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 unsigned long irqflag;

 pr_debug("%s: <-\n", __func__);
 mutex_lock(&wl->assoc_stat_lock);
 spin_lock_irqsave(&wl->lock, irqflag);
 if (wl->assoc_stat == GELIC_WL_ASSOC_STAT_ASSOCIATED) {
  data->ap_addr.sa_family = ARPHRD_ETHER;
  memcpy(data->ap_addr.sa_data, wl->active_bssid,
         ETH_ALEN);
 } else
  eth_zero_addr(data->ap_addr.sa_data);

 spin_unlock_irqrestore(&wl->lock, irqflag);
 mutex_unlock(&wl->assoc_stat_lock);
 pr_debug("%s: ->\n", __func__);
 return 0;
}

/* SIOC{S,G}IWENCODEEXT */
static int gelic_wl_set_encodeext(struct net_device *netdev,
      struct iw_request_info *info,
      union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct iw_point *enc = &data->encoding;
 struct iw_encode_ext *ext = (struct iw_encode_ext *)extra;
 __u16 alg;
 __u16 flags;
 unsigned long irqflag;
 int key_index;
 int ret = 0;

 pr_debug("%s: <-\n", __func__);
 flags = enc->flags & IW_ENCODE_FLAGS;
 alg = ext->alg;
 key_index = enc->flags & IW_ENCODE_INDEX;

 pr_debug("%s: key_index = %d\n", __func__, key_index);
 pr_debug("%s: key_len = %d\n", __func__, enc->length);
 pr_debug("%s: flag=%x\n", __func__, enc->flags & IW_ENCODE_FLAGS);
 pr_debug("%s: ext_flag=%x\n", __func__, ext->ext_flags);
 pr_debug("%s: ext_key_len=%x\n", __func__, ext->key_len);

 if (GELIC_WEP_KEYS < key_index)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (key_index)
  key_index--;
 else
  key_index = wl->current_key;

 if (!enc->length && (ext->ext_flags & IW_ENCODE_EXT_SET_TX_KEY)) {
  /* request to change default key index */
  pr_debug("%s: request to change default key to %d\n",
    __func__, key_index);
  wl->current_key = key_index;
  goto done;
 }

 if (alg == IW_ENCODE_ALG_NONE || (flags & IW_ENCODE_DISABLED)) {
  pr_debug("%s: alg disabled\n", __func__);
  wl->wpa_level = GELIC_WL_WPA_LEVEL_NONE;
  wl->group_cipher_method = GELIC_WL_CIPHER_NONE;
  wl->pairwise_cipher_method = GELIC_WL_CIPHER_NONE;
  wl->auth_method = GELIC_EURUS_AUTH_OPEN; /* should be open */
 } else if (alg == IW_ENCODE_ALG_WEP) {
  pr_debug("%s: WEP requested\n", __func__);
  if (flags & IW_ENCODE_OPEN) {
   pr_debug("%s: open key mode\n", __func__);
   wl->auth_method = GELIC_EURUS_AUTH_OPEN;
  }
  if (flags & IW_ENCODE_RESTRICTED) {
   pr_debug("%s: shared key mode\n", __func__);
   wl->auth_method = GELIC_EURUS_AUTH_SHARED;
  }
  if (IW_ENCODING_TOKEN_MAX < ext->key_len) {
   pr_info("%s: key is too long %d\n", __func__,
    ext->key_len);
   ret = -EINVAL;
   goto done;
  }
  /* OK, update the key */
  wl->key_len[key_index] = ext->key_len;
  memset(wl->key[key_index], 0, IW_ENCODING_TOKEN_MAX);
  memcpy(wl->key[key_index], ext->key, ext->key_len);
  set_bit(key_index, &wl->key_enabled);
  /* remember wep info changed */
  set_bit(GELIC_WL_STAT_CONFIGURED, &wl->stat);
 } else if (alg == IW_ENCODE_ALG_PMK) {
  if (ext->key_len != WPA_PSK_LEN) {
   pr_err("%s: PSK length wrong %d\n", __func__,
          ext->key_len);
   ret = -EINVAL;
   goto done;
  }
  memset(wl->psk, 0, sizeof(wl->psk));
  memcpy(wl->psk, ext->key, ext->key_len);
  wl->psk_len = ext->key_len;
  wl->psk_type = GELIC_EURUS_WPA_PSK_BIN;
  /* remember PSK configured */
  set_bit(GELIC_WL_STAT_WPA_PSK_SET, &wl->stat);
 }
done:
 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

static int gelic_wl_get_encodeext(struct net_device *netdev,
      struct iw_request_info *info,
      union iwreq_data *data, char *extra)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct iw_point *enc = &data->encoding;
 struct iw_encode_ext *ext = (struct iw_encode_ext *)extra;
 unsigned long irqflag;
 int key_index;
 int ret = 0;
 int max_key_len;

 pr_debug("%s: <-\n", __func__);

 max_key_len = enc->length - sizeof(struct iw_encode_ext);
 if (max_key_len < 0)
  return -EINVAL;
 key_index = enc->flags & IW_ENCODE_INDEX;

 pr_debug("%s: key_index = %d\n", __func__, key_index);
 pr_debug("%s: key_len = %d\n", __func__, enc->length);
 pr_debug("%s: flag=%x\n", __func__, enc->flags & IW_ENCODE_FLAGS);

 if (GELIC_WEP_KEYS < key_index)
  return -EINVAL;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (key_index)
  key_index--;
 else
  key_index = wl->current_key;

 memset(ext, 0, sizeof(struct iw_encode_ext));
 switch (wl->group_cipher_method) {
 case GELIC_WL_CIPHER_WEP:
  ext->alg = IW_ENCODE_ALG_WEP;
  enc->flags |= IW_ENCODE_ENABLED;
  break;
 case GELIC_WL_CIPHER_TKIP:
  ext->alg = IW_ENCODE_ALG_TKIP;
  enc->flags |= IW_ENCODE_ENABLED;
  break;
 case GELIC_WL_CIPHER_AES:
  ext->alg = IW_ENCODE_ALG_CCMP;
  enc->flags |= IW_ENCODE_ENABLED;
  break;
 case GELIC_WL_CIPHER_NONE:
 default:
  ext->alg = IW_ENCODE_ALG_NONE;
  enc->flags |= IW_ENCODE_NOKEY;
  break;
 }

 if (!(enc->flags & IW_ENCODE_NOKEY)) {
  if (max_key_len < wl->key_len[key_index]) {
   ret = -E2BIG;
   goto out;
  }
  if (test_bit(key_index, &wl->key_enabled))
   memcpy(ext->key, wl->key[key_index],
          wl->key_len[key_index]);
  else
   pr_debug("%s: disabled key requested ix=%d\n",
     __func__, key_index);
 }
out:
 spin_unlock_irqrestore(&wl->lock, irqflag);
 pr_debug("%s: ->\n", __func__);
 return ret;
}
/* SIOC{S,G}IWMODE */
static int gelic_wl_set_mode(struct net_device *netdev,
        struct iw_request_info *info,
        union iwreq_data *data, char *extra)
{
 __u32 mode = data->mode;
 int ret;

 pr_debug("%s: <-\n", __func__);
 if (mode == IW_MODE_INFRA)
  ret = 0;
 else
  ret = -EOPNOTSUPP;
 pr_debug("%s: -> %d\n", __func__, ret);
 return ret;
}

static int gelic_wl_get_mode(struct net_device *netdev,
        struct iw_request_info *info,
        union iwreq_data *data, char *extra)
{
 __u32 *mode = &data->mode;
 pr_debug("%s: <-\n", __func__);
 *mode = IW_MODE_INFRA;
 pr_debug("%s: ->\n", __func__);
 return 0;
}

/* SIOCGIWNICKN */
static int gelic_wl_get_nick(struct net_device *net_dev,
      struct iw_request_info *info,
      union iwreq_data *data, char *extra)
{
 strcpy(extra, "gelic_wl");
 data->data.length = strlen(extra);
 data->data.flags = 1;
 return 0;
}


/* --- */

static struct iw_statistics *gelic_wl_get_wireless_stats(
 struct net_device *netdev)
{

 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 struct gelic_eurus_cmd *cmd;
 struct iw_statistics *is;
 struct gelic_eurus_rssi_info *rssi;
 void *buf;

 pr_debug("%s: <-\n", __func__);

 buf = (void *)__get_free_page(GFP_KERNEL);
 if (!buf)
  return NULL;

 is = &wl->iwstat;
 memset(is, 0, sizeof(*is));
 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_GET_RSSI_CFG,
       buf, sizeof(*rssi));
 if (cmd && !cmd->status && !cmd->cmd_status) {
  rssi = buf;
  is->qual.level = be16_to_cpu(rssi->rssi);
  is->qual.updated = IW_QUAL_LEVEL_UPDATED |
   IW_QUAL_QUAL_INVALID | IW_QUAL_NOISE_INVALID;
 } else
  /* not associated */
  is->qual.updated = IW_QUAL_ALL_INVALID;

 kfree(cmd);
 free_page((unsigned long)buf);
 pr_debug("%s: ->\n", __func__);
 return is;
}

/*
 *  scanning helpers
 */
static int gelic_wl_start_scan(struct gelic_wl_info *wl, int always_scan,
          u8 *essid, size_t essid_len)
{
 struct gelic_eurus_cmd *cmd;
 int ret = 0;
 void *buf = NULL;
 size_t len;

 pr_debug("%s: <- always=%d\n", __func__, always_scan);
 if (mutex_lock_interruptible(&wl->scan_lock))
  return -ERESTARTSYS;

 /*
 * If already a scan in progress, do not trigger more
 */
 if (wl->scan_stat == GELIC_WL_SCAN_STAT_SCANNING) {
  pr_debug("%s: scanning now\n", __func__);
  goto out;
 }

 init_completion(&wl->scan_done);
 /*
 * If we have already a bss list, don't try to get new
 * unless we are doing an ESSID scan
 */
 if ((!essid_len && !always_scan)
     && wl->scan_stat == GELIC_WL_SCAN_STAT_GOT_LIST) {
  pr_debug("%s: already has the list\n", __func__);
  complete(&wl->scan_done);
  goto out;
 }

 /* ESSID scan ? */
 if (essid_len && essid) {
  buf = (void *)__get_free_page(GFP_KERNEL);
  if (!buf) {
   ret = -ENOMEM;
   goto out;
  }
  len = IW_ESSID_MAX_SIZE; /* hypervisor always requires 32 */
  memset(buf, 0, len);
  memcpy(buf, essid, essid_len);
  pr_debug("%s: essid scan='%s'\n", __func__, (char *)buf);
 } else
  len = 0;

 /*
 * issue start scan request
 */
 wl->scan_stat = GELIC_WL_SCAN_STAT_SCANNING;
 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_START_SCAN,
       buf, len);
 if (!cmd || cmd->status || cmd->cmd_status) {
  wl->scan_stat = GELIC_WL_SCAN_STAT_INIT;
  complete(&wl->scan_done);
  ret = -ENOMEM;
  goto out;
 }
 kfree(cmd);
out:
 free_page((unsigned long)buf);
 mutex_unlock(&wl->scan_lock);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

/*
 * retrieve scan result from the chip (hypervisor)
 * this function is invoked by schedule work.
 */
static void gelic_wl_scan_complete_event(struct gelic_wl_info *wl)
{
 struct gelic_eurus_cmd *cmd = NULL;
 struct gelic_wl_scan_info *target, *tmp;
 struct gelic_wl_scan_info *oldest = NULL;
 struct gelic_eurus_scan_info *scan_info;
 unsigned int scan_info_size;
 union iwreq_data data;
 unsigned long this_time = jiffies;
 unsigned int data_len, i, found, r;
 void *buf;

 pr_debug("%s:start\n", __func__);
 mutex_lock(&wl->scan_lock);

 buf = (void *)__get_free_page(GFP_KERNEL);
 if (!buf) {
  pr_info("%s: scan buffer alloc failed\n", __func__);
  goto out;
 }

 if (wl->scan_stat != GELIC_WL_SCAN_STAT_SCANNING) {
  /*
 * stop() may be called while scanning, ignore result
 */
  pr_debug("%s: scan complete when stat != scanning(%d)\n",
    __func__, wl->scan_stat);
  goto out;
 }

 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_GET_SCAN,
       buf, PAGE_SIZE);
 if (!cmd || cmd->status || cmd->cmd_status) {
  wl->scan_stat = GELIC_WL_SCAN_STAT_INIT;
  pr_info("%s:cmd failed\n", __func__);
  kfree(cmd);
  goto out;
 }
 data_len = cmd->size;
 pr_debug("%s: data_len = %d\n", __func__, data_len);
 kfree(cmd);

 /* OK, bss list retrieved */
 wl->scan_stat = GELIC_WL_SCAN_STAT_GOT_LIST;

 /* mark all entries are old */
 list_for_each_entry_safe(target, tmp, &wl->network_list, list) {
  target->valid = 0;
  /* expire too old entries */
  if (time_before(target->last_scanned + wl->scan_age,
    this_time)) {
   kfree(target->hwinfo);
   target->hwinfo = NULL;
   list_move_tail(&target->list, &wl->network_free_list);
  }
 }

 /* put them in the network_list */
 for (i = 0, scan_info_size = 0, scan_info = buf;
      scan_info_size < data_len;
      i++, scan_info_size += be16_to_cpu(scan_info->size),
      scan_info = (void *)scan_info + be16_to_cpu(scan_info->size)) {
  pr_debug("%s:size=%d bssid=%pM scan_info=%p\n", __func__,
    be16_to_cpu(scan_info->size),
    &scan_info->bssid[2], scan_info);

  /*
 * The wireless firmware may return invalid channel 0 and/or
 * invalid rate if the AP emits zero length SSID ie. As this
 * scan information is useless, ignore it
 */
  if (!be16_to_cpu(scan_info->channel) || !scan_info->rate[0]) {
   pr_debug("%s: invalid scan info\n", __func__);
   continue;
  }

  found = 0;
  oldest = NULL;
  list_for_each_entry(target, &wl->network_list, list) {
   if (ether_addr_equal(&target->hwinfo->bssid[2],
          &scan_info->bssid[2])) {
    found = 1;
    pr_debug("%s: same BBS found scanned list\n",
      __func__);
    break;
   }
   if (!oldest ||
       (target->last_scanned < oldest->last_scanned))
    oldest = target;
  }

  if (!found) {
   /* not found in the list */
   if (list_empty(&wl->network_free_list)) {
    /* expire oldest */
    target = oldest;
   } else {
    target = list_entry(wl->network_free_list.next,
          struct gelic_wl_scan_info,
          list);
   }
  }

  /* update the item */
  target->last_scanned = this_time;
  target->valid = 1;
  target->eurus_index = i;
  kfree(target->hwinfo);
  target->hwinfo = kmemdup(scan_info,
      be16_to_cpu(scan_info->size),
      GFP_KERNEL);
  if (!target->hwinfo)
   continue;

  /* copy hw scan info */
  target->essid_len = strnlen(scan_info->essid,
         sizeof(scan_info->essid));
  target->rate_len = 0;
  for (r = 0; r < 12; r++)
   if (scan_info->rate[r])
    target->rate_len++;
  if (8 < target->rate_len)
   pr_info("%s: AP returns %d rates\n", __func__,
    target->rate_len);
  target->rate_ext_len = 0;
  for (r = 0; r < 16; r++)
   if (scan_info->ext_rate[r])
    target->rate_ext_len++;
  list_move_tail(&target->list, &wl->network_list);
 }
 memset(&data, 0, sizeof(data));
 wireless_send_event(port_to_netdev(wl_port(wl)), SIOCGIWSCAN, &data,
       NULL);
out:
 free_page((unsigned long)buf);
 complete(&wl->scan_done);
 mutex_unlock(&wl->scan_lock);
 pr_debug("%s:end\n", __func__);
}

/*
 * Select an appropriate bss from current scan list regarding
 * current settings from userspace.
 * The caller must hold wl->scan_lock,
 * and on the state of wl->scan_state == GELIC_WL_SCAN_GOT_LIST
 */
static void update_best(struct gelic_wl_scan_info **best,
   struct gelic_wl_scan_info *candid,
   int *best_weight,
   int *weight)
{
 if (*best_weight < ++(*weight)) {
  *best_weight = *weight;
  *best = candid;
 }
}

static
struct gelic_wl_scan_info *gelic_wl_find_best_bss(struct gelic_wl_info *wl)
{
 struct gelic_wl_scan_info *scan_info;
 struct gelic_wl_scan_info *best_bss;
 int weight, best_weight;
 u16 security;

 pr_debug("%s: <-\n", __func__);

 best_bss = NULL;
 best_weight = 0;

 list_for_each_entry(scan_info, &wl->network_list, list) {
  pr_debug("%s: station %p\n", __func__, scan_info);

  if (!scan_info->valid) {
   pr_debug("%s: station invalid\n", __func__);
   continue;
  }

  /* If bss specified, check it only */
  if (test_bit(GELIC_WL_STAT_BSSID_SET, &wl->stat)) {
   if (ether_addr_equal(&scan_info->hwinfo->bssid[2],
          wl->bssid)) {
    best_bss = scan_info;
    pr_debug("%s: bssid matched\n", __func__);
    break;
   } else {
    pr_debug("%s: bssid unmatched\n", __func__);
    continue;
   }
  }

  weight = 0;

  /* security */
  security = be16_to_cpu(scan_info->hwinfo->security) &
   GELIC_EURUS_SCAN_SEC_MASK;
  if (wl->wpa_level == GELIC_WL_WPA_LEVEL_WPA2) {
   if (security == GELIC_EURUS_SCAN_SEC_WPA2)
    update_best(&best_bss, scan_info,
         &best_weight, &weight);
   else
    continue;
  } else if (wl->wpa_level == GELIC_WL_WPA_LEVEL_WPA) {
   if (security == GELIC_EURUS_SCAN_SEC_WPA)
    update_best(&best_bss, scan_info,
         &best_weight, &weight);
   else
    continue;
  } else if (wl->wpa_level == GELIC_WL_WPA_LEVEL_NONE &&
      wl->group_cipher_method == GELIC_WL_CIPHER_WEP) {
   if (security == GELIC_EURUS_SCAN_SEC_WEP)
    update_best(&best_bss, scan_info,
         &best_weight, &weight);
   else
    continue;
  }

  /* If ESSID is set, check it */
  if (test_bit(GELIC_WL_STAT_ESSID_SET, &wl->stat)) {
   if ((scan_info->essid_len == wl->essid_len) &&
       !strncmp(wl->essid,
         scan_info->hwinfo->essid,
         scan_info->essid_len))
    update_best(&best_bss, scan_info,
         &best_weight, &weight);
   else
    continue;
  }
 }

#ifdef DEBUG
 pr_debug("%s: -> bss=%p\n", __func__, best_bss);
 if (best_bss) {
  pr_debug("%s:addr=%pM\n", __func__,
    &best_bss->hwinfo->bssid[2]);
 }
#endif
 return best_bss;
}

/*
 * Setup WEP configuration to the chip
 * The caller must hold wl->scan_lock,
 * and on the state of wl->scan_state == GELIC_WL_SCAN_GOT_LIST
 */
static int gelic_wl_do_wep_setup(struct gelic_wl_info *wl)
{
 unsigned int i;
 struct gelic_eurus_wep_cfg *wep;
 struct gelic_eurus_cmd *cmd;
 int wep104 = 0;
 int have_key = 0;
 int ret = 0;

 pr_debug("%s: <-\n", __func__);
 /* we can assume no one should uses the buffer */
 wep = (struct gelic_eurus_wep_cfg *)__get_free_page(GFP_KERNEL);
 if (!wep)
  return -ENOMEM;

 memset(wep, 0, sizeof(*wep));

 if (wl->group_cipher_method == GELIC_WL_CIPHER_WEP) {
  pr_debug("%s: WEP mode\n", __func__);
  for (i = 0; i < GELIC_WEP_KEYS; i++) {
   if (!test_bit(i, &wl->key_enabled))
    continue;

   pr_debug("%s: key#%d enabled\n", __func__, i);
   have_key = 1;
   if (wl->key_len[i] == 13)
    wep104 = 1;
   else if (wl->key_len[i] != 5) {
    pr_info("%s: wrong wep key[%d]=%d\n",
     __func__, i, wl->key_len[i]);
    ret = -EINVAL;
    goto out;
   }
   memcpy(wep->key[i], wl->key[i], wl->key_len[i]);
  }

  if (!have_key) {
   pr_info("%s: all wep key disabled\n", __func__);
   ret = -EINVAL;
   goto out;
  }

  if (wep104) {
   pr_debug("%s: 104bit key\n", __func__);
   wep->security = cpu_to_be16(GELIC_EURUS_WEP_SEC_104BIT);
  } else {
   pr_debug("%s: 40bit key\n", __func__);
   wep->security = cpu_to_be16(GELIC_EURUS_WEP_SEC_40BIT);
  }
 } else {
  pr_debug("%s: NO encryption\n", __func__);
  wep->security = cpu_to_be16(GELIC_EURUS_WEP_SEC_NONE);
 }

 /* issue wep setup */
 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_SET_WEP_CFG,
       wep, sizeof(*wep));
 if (!cmd)
  ret = -ENOMEM;
 else if (cmd->status || cmd->cmd_status)
  ret = -ENXIO;

 kfree(cmd);
out:
 free_page((unsigned long)wep);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

#ifdef DEBUG
static const char *wpasecstr(enum gelic_eurus_wpa_security sec)
{
 switch (sec) {
 case GELIC_EURUS_WPA_SEC_NONE:
  return "NONE";
 case GELIC_EURUS_WPA_SEC_WPA_TKIP_TKIP:
  return "WPA_TKIP_TKIP";
 case GELIC_EURUS_WPA_SEC_WPA_TKIP_AES:
  return "WPA_TKIP_AES";
 case GELIC_EURUS_WPA_SEC_WPA_AES_AES:
  return "WPA_AES_AES";
 case GELIC_EURUS_WPA_SEC_WPA2_TKIP_TKIP:
  return "WPA2_TKIP_TKIP";
 case GELIC_EURUS_WPA_SEC_WPA2_TKIP_AES:
  return "WPA2_TKIP_AES";
 case GELIC_EURUS_WPA_SEC_WPA2_AES_AES:
  return "WPA2_AES_AES";
 }
 return "";
};
#endif

static int gelic_wl_do_wpa_setup(struct gelic_wl_info *wl)
{
 struct gelic_eurus_wpa_cfg *wpa;
 struct gelic_eurus_cmd *cmd;
 u16 security;
 int ret = 0;

 pr_debug("%s: <-\n", __func__);
 /* we can assume no one should uses the buffer */
 wpa = (struct gelic_eurus_wpa_cfg *)__get_free_page(GFP_KERNEL);
 if (!wpa)
  return -ENOMEM;

 memset(wpa, 0, sizeof(*wpa));

 if (!test_bit(GELIC_WL_STAT_WPA_PSK_SET, &wl->stat))
  pr_info("%s: PSK not configured yet\n", __func__);

 /* copy key */
 memcpy(wpa->psk, wl->psk, wl->psk_len);

 /* set security level */
 if (wl->wpa_level == GELIC_WL_WPA_LEVEL_WPA2) {
  if (wl->group_cipher_method == GELIC_WL_CIPHER_AES) {
   security = GELIC_EURUS_WPA_SEC_WPA2_AES_AES;
  } else {
   if (wl->pairwise_cipher_method == GELIC_WL_CIPHER_AES &&
       precise_ie())
    security = GELIC_EURUS_WPA_SEC_WPA2_TKIP_AES;
   else
    security = GELIC_EURUS_WPA_SEC_WPA2_TKIP_TKIP;
  }
 } else {
  if (wl->group_cipher_method == GELIC_WL_CIPHER_AES) {
   security = GELIC_EURUS_WPA_SEC_WPA_AES_AES;
  } else {
   if (wl->pairwise_cipher_method == GELIC_WL_CIPHER_AES &&
       precise_ie())
    security = GELIC_EURUS_WPA_SEC_WPA_TKIP_AES;
   else
    security = GELIC_EURUS_WPA_SEC_WPA_TKIP_TKIP;
  }
 }
 wpa->security = cpu_to_be16(security);

 /* PSK type */
 wpa->psk_type = cpu_to_be16(wl->psk_type);
#ifdef DEBUG
 pr_debug("%s: sec=%s psktype=%s\n", __func__,
   wpasecstr(wpa->security),
   (wpa->psk_type == GELIC_EURUS_WPA_PSK_BIN) ?
   "BIN" : "passphrase");
#if 0
 /*
 * don't enable here if you plan to submit
 * the debug log because this dumps your precious
 * passphrase/key.
 */
 pr_debug("%s: psk=%s\n", __func__,
   (wpa->psk_type == GELIC_EURUS_WPA_PSK_BIN) ?
   "N/A" : wpa->psk);
#endif
#endif
 /* issue wpa setup */
 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_SET_WPA_CFG,
       wpa, sizeof(*wpa));
 if (!cmd)
  ret = -ENOMEM;
 else if (cmd->status || cmd->cmd_status)
  ret = -ENXIO;
 kfree(cmd);
 free_page((unsigned long)wpa);
 pr_debug("%s: --> %d\n", __func__, ret);
 return ret;
}

/*
 * Start association. caller must hold assoc_stat_lock
 */
static int gelic_wl_associate_bss(struct gelic_wl_info *wl,
      struct gelic_wl_scan_info *bss)
{
 struct gelic_eurus_cmd *cmd;
 struct gelic_eurus_common_cfg *common;
 int ret = 0;
 unsigned long rc;

 pr_debug("%s: <-\n", __func__);

 /* do common config */
 common = (struct gelic_eurus_common_cfg *)__get_free_page(GFP_KERNEL);
 if (!common)
  return -ENOMEM;

 memset(common, 0, sizeof(*common));
 common->bss_type = cpu_to_be16(GELIC_EURUS_BSS_INFRA);
 common->op_mode = cpu_to_be16(GELIC_EURUS_OPMODE_11BG);

 common->scan_index = cpu_to_be16(bss->eurus_index);
 switch (wl->auth_method) {
 case GELIC_EURUS_AUTH_OPEN:
  common->auth_method = cpu_to_be16(GELIC_EURUS_AUTH_OPEN);
  break;
 case GELIC_EURUS_AUTH_SHARED:
  common->auth_method = cpu_to_be16(GELIC_EURUS_AUTH_SHARED);
  break;
 }

#ifdef DEBUG
 scan_list_dump(wl);
#endif
 pr_debug("%s: common cfg index=%d bsstype=%d auth=%d\n", __func__,
   be16_to_cpu(common->scan_index),
   be16_to_cpu(common->bss_type),
   be16_to_cpu(common->auth_method));

 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_SET_COMMON_CFG,
       common, sizeof(*common));
 if (!cmd || cmd->status || cmd->cmd_status) {
  ret = -ENOMEM;
  kfree(cmd);
  goto out;
 }
 kfree(cmd);

 /* WEP/WPA */
 switch (wl->wpa_level) {
 case GELIC_WL_WPA_LEVEL_NONE:
  /* If WEP or no security, setup WEP config */
  ret = gelic_wl_do_wep_setup(wl);
  break;
 case GELIC_WL_WPA_LEVEL_WPA:
 case GELIC_WL_WPA_LEVEL_WPA2:
  ret = gelic_wl_do_wpa_setup(wl);
  break;
 }

 if (ret) {
  pr_debug("%s: WEP/WPA setup failed %d\n", __func__,
    ret);
  ret = -EPERM;
  gelic_wl_send_iwap_event(wl, NULL);
  goto out;
 }

 /* start association */
 init_completion(&wl->assoc_done);
 wl->assoc_stat = GELIC_WL_ASSOC_STAT_ASSOCIATING;
 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_ASSOC,
       NULL, 0);
 if (!cmd || cmd->status || cmd->cmd_status) {
  pr_debug("%s: assoc request failed\n", __func__);
  wl->assoc_stat = GELIC_WL_ASSOC_STAT_DISCONN;
  kfree(cmd);
  ret = -ENOMEM;
  gelic_wl_send_iwap_event(wl, NULL);
  goto out;
 }
 kfree(cmd);

 /* wait for connected event */
 rc = wait_for_completion_timeout(&wl->assoc_done, HZ * 4);/*FIXME*/

 if (!rc) {
  /* timeouted.  Maybe key or cyrpt mode is wrong */
  pr_info("%s: connect timeout\n", __func__);
  cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_DISASSOC,
        NULL, 0);
  kfree(cmd);
  wl->assoc_stat = GELIC_WL_ASSOC_STAT_DISCONN;
  gelic_wl_send_iwap_event(wl, NULL);
  ret = -ENXIO;
 } else {
  wl->assoc_stat = GELIC_WL_ASSOC_STAT_ASSOCIATED;
  /* copy bssid */
  memcpy(wl->active_bssid, &bss->hwinfo->bssid[2], ETH_ALEN);

  /* send connect event */
  gelic_wl_send_iwap_event(wl, wl->active_bssid);
  pr_info("%s: connected\n", __func__);
 }
out:
 free_page((unsigned long)common);
 pr_debug("%s: ->\n", __func__);
 return ret;
}

/*
 * connected event
 */
static void gelic_wl_connected_event(struct gelic_wl_info *wl,
         u64 event)
{
 u64 desired_event = 0;

 switch (wl->wpa_level) {
 case GELIC_WL_WPA_LEVEL_NONE:
  desired_event = GELIC_LV1_WL_EVENT_CONNECTED;
  break;
 case GELIC_WL_WPA_LEVEL_WPA:
 case GELIC_WL_WPA_LEVEL_WPA2:
  desired_event = GELIC_LV1_WL_EVENT_WPA_CONNECTED;
  break;
 }

 if (desired_event == event) {
  pr_debug("%s: completed\n", __func__);
  complete(&wl->assoc_done);
  netif_carrier_on(port_to_netdev(wl_port(wl)));
 } else
  pr_debug("%s: event %#llx under wpa\n",
     __func__, event);
}

/*
 * disconnect event
 */
static void gelic_wl_disconnect_event(struct gelic_wl_info *wl,
          u64 event)
{
 struct gelic_eurus_cmd *cmd;
 int lock;

 /*
 * If we fall here in the middle of association,
 * associate_bss() should be waiting for complation of
 * wl->assoc_done.
 * As it waits with timeout, just leave assoc_done
 * uncompleted, then it terminates with timeout
 */
 if (!mutex_trylock(&wl->assoc_stat_lock)) {
  pr_debug("%s: already locked\n", __func__);
  lock = 0;
 } else {
  pr_debug("%s: obtain lock\n", __func__);
  lock = 1;
 }

 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_DISASSOC, NULL, 0);
 kfree(cmd);

 /* send disconnected event to the supplicant */
 if (wl->assoc_stat == GELIC_WL_ASSOC_STAT_ASSOCIATED)
  gelic_wl_send_iwap_event(wl, NULL);

 wl->assoc_stat = GELIC_WL_ASSOC_STAT_DISCONN;
 netif_carrier_off(port_to_netdev(wl_port(wl)));

 if (lock)
  mutex_unlock(&wl->assoc_stat_lock);
}
/*
 * event worker
 */
#ifdef DEBUG
static const char *eventstr(enum gelic_lv1_wl_event event)
{
 static char buf[32];
 char *ret;
 if (event & GELIC_LV1_WL_EVENT_DEVICE_READY)
  ret = "EURUS_READY";
 else if (event & GELIC_LV1_WL_EVENT_SCAN_COMPLETED)
  ret = "SCAN_COMPLETED";
 else if (event & GELIC_LV1_WL_EVENT_DEAUTH)
  ret = "DEAUTH";
 else if (event & GELIC_LV1_WL_EVENT_BEACON_LOST)
  ret = "BEACON_LOST";
 else if (event & GELIC_LV1_WL_EVENT_CONNECTED)
  ret = "CONNECTED";
 else if (event & GELIC_LV1_WL_EVENT_WPA_CONNECTED)
  ret = "WPA_CONNECTED";
 else if (event & GELIC_LV1_WL_EVENT_WPA_ERROR)
  ret = "WPA_ERROR";
 else {
  sprintf(buf, "Unknown(%#x)", event);
  ret = buf;
 }
 return ret;
}
#else
static const char *eventstr(enum gelic_lv1_wl_event event)
{
 return NULL;
}
#endif
static void gelic_wl_event_worker(struct work_struct *work)
{
 struct gelic_wl_info *wl;
 struct gelic_port *port;
 u64 event, tmp;
 int status;

 pr_debug("%s:start\n", __func__);
 wl = container_of(work, struct gelic_wl_info, event_work.work);
 port = wl_port(wl);
 while (1) {
  status = lv1_net_control(bus_id(port->card), dev_id(port->card),
      GELIC_LV1_GET_WLAN_EVENT, 0, 0, 0,
      &event, &tmp);
  if (status) {
   if (status != LV1_NO_ENTRY)
    pr_debug("%s:wlan event failed %d\n",
      __func__, status);
   /* got all events */
   pr_debug("%s:end\n", __func__);
   return;
  }
  pr_debug("%s: event=%s\n", __func__, eventstr(event));
  switch (event) {
  case GELIC_LV1_WL_EVENT_SCAN_COMPLETED:
   gelic_wl_scan_complete_event(wl);
   break;
  case GELIC_LV1_WL_EVENT_BEACON_LOST:
  case GELIC_LV1_WL_EVENT_DEAUTH:
   gelic_wl_disconnect_event(wl, event);
   break;
  case GELIC_LV1_WL_EVENT_CONNECTED:
  case GELIC_LV1_WL_EVENT_WPA_CONNECTED:
   gelic_wl_connected_event(wl, event);
   break;
  default:
   break;
  }
 } /* while */
}
/*
 * association worker
 */
static void gelic_wl_assoc_worker(struct work_struct *work)
{
 struct gelic_wl_info *wl;

 struct gelic_wl_scan_info *best_bss;
 int ret;
 unsigned long irqflag;
 u8 *essid;
 size_t essid_len;

 wl = container_of(work, struct gelic_wl_info, assoc_work.work);

 mutex_lock(&wl->assoc_stat_lock);

 if (wl->assoc_stat != GELIC_WL_ASSOC_STAT_DISCONN)
  goto out;

 spin_lock_irqsave(&wl->lock, irqflag);
 if (test_bit(GELIC_WL_STAT_ESSID_SET, &wl->stat)) {
  pr_debug("%s: assoc ESSID configured %s\n", __func__,
    wl->essid);
  essid = wl->essid;
  essid_len = wl->essid_len;
 } else {
  essid = NULL;
  essid_len = 0;
 }
 spin_unlock_irqrestore(&wl->lock, irqflag);

 ret = gelic_wl_start_scan(wl, 0, essid, essid_len);
 if (ret == -ERESTARTSYS) {
  pr_debug("%s: scan start failed association\n", __func__);
  schedule_delayed_work(&wl->assoc_work, HZ/10); /*FIXME*/
  goto out;
 } else if (ret) {
  pr_info("%s: scan prerequisite failed\n", __func__);
  goto out;
 }

 /*
 * Wait for bss scan completion
 * If we have scan list already, gelic_wl_start_scan()
 * returns OK and raises the complete.  Thus,
 * it's ok to wait unconditionally here
 */
 wait_for_completion(&wl->scan_done);

 pr_debug("%s: scan done\n", __func__);
 mutex_lock(&wl->scan_lock);
 if (wl->scan_stat != GELIC_WL_SCAN_STAT_GOT_LIST) {
  gelic_wl_send_iwap_event(wl, NULL);
  pr_info("%s: no scan list. association failed\n", __func__);
  goto scan_lock_out;
 }

 /* find best matching bss */
 best_bss = gelic_wl_find_best_bss(wl);
 if (!best_bss) {
  gelic_wl_send_iwap_event(wl, NULL);
  pr_info("%s: no bss matched. association failed\n", __func__);
  goto scan_lock_out;
 }

 /* ok, do association */
 ret = gelic_wl_associate_bss(wl, best_bss);
 if (ret)
  pr_info("%s: association failed %d\n", __func__, ret);
scan_lock_out:
 mutex_unlock(&wl->scan_lock);
out:
 mutex_unlock(&wl->assoc_stat_lock);
}
/*
 * Interrupt handler
 * Called from the ethernet interrupt handler
 * Processes wireless specific virtual interrupts only
 */
void gelic_wl_interrupt(struct net_device *netdev, u64 status)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));

 if (status & GELIC_CARD_WLAN_COMMAND_COMPLETED) {
  pr_debug("%s:cmd complete\n", __func__);
  complete(&wl->cmd_done_intr);
 }

 if (status & GELIC_CARD_WLAN_EVENT_RECEIVED) {
  pr_debug("%s:event received\n", __func__);
  queue_delayed_work(wl->event_queue, &wl->event_work, 0);
 }
}

/*
 * driver helpers
 */
static const iw_handler gelic_wl_wext_handler[] =
{
 IW_HANDLER(SIOCGIWNAME, gelic_wl_get_name),
 IW_HANDLER(SIOCGIWRANGE, gelic_wl_get_range),
 IW_HANDLER(SIOCSIWSCAN, gelic_wl_set_scan),
 IW_HANDLER(SIOCGIWSCAN, gelic_wl_get_scan),
 IW_HANDLER(SIOCSIWAUTH, gelic_wl_set_auth),
 IW_HANDLER(SIOCGIWAUTH, gelic_wl_get_auth),
 IW_HANDLER(SIOCSIWESSID, gelic_wl_set_essid),
 IW_HANDLER(SIOCGIWESSID, gelic_wl_get_essid),
 IW_HANDLER(SIOCSIWENCODE, gelic_wl_set_encode),
 IW_HANDLER(SIOCGIWENCODE, gelic_wl_get_encode),
 IW_HANDLER(SIOCSIWAP, gelic_wl_set_ap),
 IW_HANDLER(SIOCGIWAP, gelic_wl_get_ap),
 IW_HANDLER(SIOCSIWENCODEEXT, gelic_wl_set_encodeext),
 IW_HANDLER(SIOCGIWENCODEEXT, gelic_wl_get_encodeext),
 IW_HANDLER(SIOCSIWMODE, gelic_wl_set_mode),
 IW_HANDLER(SIOCGIWMODE, gelic_wl_get_mode),
 IW_HANDLER(SIOCGIWNICKN, gelic_wl_get_nick),
};

static const struct iw_handler_def gelic_wl_wext_handler_def = {
 .num_standard  = ARRAY_SIZE(gelic_wl_wext_handler),
 .standard  = gelic_wl_wext_handler,
 .get_wireless_stats = gelic_wl_get_wireless_stats,
};

static struct net_device *gelic_wl_alloc(struct gelic_card *card)
{
 struct net_device *netdev;
 struct gelic_port *port;
 struct gelic_wl_info *wl;
 unsigned int i;

 pr_debug("%s:start\n", __func__);
 netdev = alloc_etherdev(sizeof(struct gelic_port) +
    sizeof(struct gelic_wl_info));
 pr_debug("%s: netdev =%p card=%p\n", __func__, netdev, card);
 if (!netdev)
  return NULL;

 strcpy(netdev->name, "wlan%d");

 port = netdev_priv(netdev);
 port->netdev = netdev;
 port->card = card;
 port->type = GELIC_PORT_WIRELESS;

 wl = port_wl(port);
 pr_debug("%s: wl=%p port=%p\n", __func__, wl, port);

 /* allocate scan list */
 wl->networks = kcalloc(GELIC_WL_BSS_MAX_ENT,
          sizeof(struct gelic_wl_scan_info),
          GFP_KERNEL);

 if (!wl->networks)
  goto fail_bss;

 wl->eurus_cmd_queue = create_singlethread_workqueue("gelic_cmd");
 if (!wl->eurus_cmd_queue)
  goto fail_cmd_workqueue;

 wl->event_queue = create_singlethread_workqueue("gelic_event");
 if (!wl->event_queue)
  goto fail_event_workqueue;

 INIT_LIST_HEAD(&wl->network_free_list);
 INIT_LIST_HEAD(&wl->network_list);
 for (i = 0; i < GELIC_WL_BSS_MAX_ENT; i++)
  list_add_tail(&wl->networks[i].list,
         &wl->network_free_list);
 init_completion(&wl->cmd_done_intr);

 INIT_DELAYED_WORK(&wl->event_work, gelic_wl_event_worker);
 INIT_DELAYED_WORK(&wl->assoc_work, gelic_wl_assoc_worker);
 mutex_init(&wl->scan_lock);
 mutex_init(&wl->assoc_stat_lock);

 init_completion(&wl->scan_done);
 /* for the case that no scan request is issued and stop() is called */
 complete(&wl->scan_done);

 spin_lock_init(&wl->lock);

 wl->scan_age = 5*HZ; /* FIXME */

 /* buffer for receiving scanned list etc */
 BUILD_BUG_ON(PAGE_SIZE <
       sizeof(struct gelic_eurus_scan_info) *
       GELIC_EURUS_MAX_SCAN);
 pr_debug("%s:end\n", __func__);
 return netdev;

fail_event_workqueue:
 destroy_workqueue(wl->eurus_cmd_queue);
fail_cmd_workqueue:
 kfree(wl->networks);
fail_bss:
 free_netdev(netdev);
 pr_debug("%s:end error\n", __func__);
 return NULL;

}

static void gelic_wl_free(struct gelic_wl_info *wl)
{
 struct gelic_wl_scan_info *scan_info;
 unsigned int i;

 pr_debug("%s: <-\n", __func__);

 pr_debug("%s: destroy queues\n", __func__);
 destroy_workqueue(wl->eurus_cmd_queue);
 destroy_workqueue(wl->event_queue);

 scan_info = wl->networks;
 for (i = 0; i < GELIC_WL_BSS_MAX_ENT; i++, scan_info++)
  kfree(scan_info->hwinfo);
 kfree(wl->networks);

 free_netdev(port_to_netdev(wl_port(wl)));

 pr_debug("%s: ->\n", __func__);
}

static int gelic_wl_try_associate(struct net_device *netdev)
{
 struct gelic_wl_info *wl = port_wl(netdev_priv(netdev));
 int ret = -1;
 unsigned int i;

 pr_debug("%s: <-\n", __func__);

 /* check constraits for start association */
 /* for no access restriction AP */
 if (wl->group_cipher_method == GELIC_WL_CIPHER_NONE) {
  if (test_bit(GELIC_WL_STAT_CONFIGURED,
        &wl->stat))
   goto do_associate;
  else {
   pr_debug("%s: no wep, not configured\n", __func__);
   return ret;
  }
 }

 /* for WEP, one of four keys should be set */
 if (wl->group_cipher_method == GELIC_WL_CIPHER_WEP) {
  /* one of keys set */
  for (i = 0; i < GELIC_WEP_KEYS; i++) {
   if (test_bit(i, &wl->key_enabled))
       goto do_associate;
  }
  pr_debug("%s: WEP, but no key specified\n", __func__);
  return ret;
 }

 /* for WPA[2], psk should be set */
 if ((wl->group_cipher_method == GELIC_WL_CIPHER_TKIP) ||
     (wl->group_cipher_method == GELIC_WL_CIPHER_AES)) {
  if (test_bit(GELIC_WL_STAT_WPA_PSK_SET,
        &wl->stat))
   goto do_associate;
  else {
   pr_debug("%s: AES/TKIP, but PSK not configured\n",
     __func__);
   return ret;
  }
 }

do_associate:
 ret = schedule_delayed_work(&wl->assoc_work, 0);
 pr_debug("%s: start association work %d\n", __func__, ret);
 return ret;
}

/*
 * netdev handlers
 */
static int gelic_wl_open(struct net_device *netdev)
{
 struct gelic_card *card = netdev_card(netdev);

 pr_debug("%s:->%p\n", __func__, netdev);

 gelic_card_up(card);

 /* try to associate */
 gelic_wl_try_associate(netdev);

 netif_start_queue(netdev);

 pr_debug("%s:<-\n", __func__);
 return 0;
}

/*
 * reset state machine
 */
static int gelic_wl_reset_state(struct gelic_wl_info *wl)
{
 struct gelic_wl_scan_info *target;
 struct gelic_wl_scan_info *tmp;

 /* empty scan list */
 list_for_each_entry_safe(target, tmp, &wl->network_list, list) {
  list_move_tail(&target->list, &wl->network_free_list);
 }
 wl->scan_stat = GELIC_WL_SCAN_STAT_INIT;

 /* clear configuration */
 wl->auth_method = GELIC_EURUS_AUTH_OPEN;
 wl->group_cipher_method = GELIC_WL_CIPHER_NONE;
 wl->pairwise_cipher_method = GELIC_WL_CIPHER_NONE;
 wl->wpa_level = GELIC_WL_WPA_LEVEL_NONE;

 wl->key_enabled = 0;
 wl->current_key = 0;

 wl->psk_type = GELIC_EURUS_WPA_PSK_PASSPHRASE;
 wl->psk_len = 0;

 wl->essid_len = 0;
 memset(wl->essid, 0, sizeof(wl->essid));
 memset(wl->bssid, 0, sizeof(wl->bssid));
 memset(wl->active_bssid, 0, sizeof(wl->active_bssid));

 wl->assoc_stat = GELIC_WL_ASSOC_STAT_DISCONN;

 memset(&wl->iwstat, 0, sizeof(wl->iwstat));
 /* all status bit clear */
 wl->stat = 0;
 return 0;
}

/*
 * Tell eurus to terminate association
 */
static void gelic_wl_disconnect(struct net_device *netdev)
{
 struct gelic_port *port = netdev_priv(netdev);
 struct gelic_wl_info *wl = port_wl(port);
 struct gelic_eurus_cmd *cmd;

 /*
 * If scann process is running on chip,
 * further requests will be rejected
 */
 if (wl->scan_stat == GELIC_WL_SCAN_STAT_SCANNING)
  wait_for_completion_timeout(&wl->scan_done, HZ);

 cmd = gelic_eurus_sync_cmd(wl, GELIC_EURUS_CMD_DISASSOC, NULL, 0);
 kfree(cmd);
 gelic_wl_send_iwap_event(wl, NULL);
};

static int gelic_wl_stop(struct net_device *netdev)
{
--> --------------------

--> maximum size reached

--> --------------------