drivers/net/wireless/wl12xx/wl1251_tx.c

   1 /*
   2  * This file is part of wl1251
   3  *
   4  * Copyright (c) 1998-2007 Texas Instruments Incorporated
   5  * Copyright (C) 2008 Nokia Corporation
   6  *
   7  * Contact: Kalle Valo <kalle.valo@nokia.com>
   8  *
   9  * This program is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU General Public License
  11  * version 2 as published by the Free Software Foundation.
  12  *
  13  * This program is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
  21  * 02110-1301 USA
  22  *
  23  */
  24
  25 #include <linux/kernel.h>
  26 #include <linux/module.h>
  27
  28 #include "wl1251.h"
  29 #include "reg.h"
  30 #include "wl1251_tx.h"
  31 #include "wl1251_ps.h"
  32 #include "wl1251_io.h"
  33
  34 static bool wl1251_tx_double_buffer_busy(struct wl1251 *wl, u32 data_out_count)
  35 {
  36         int used, data_in_count;
  37
  38         data_in_count = wl->data_in_count;
  39
  40         if (data_in_count < data_out_count)
  41                 /* data_in_count has wrapped */
  42                 data_in_count += TX_STATUS_DATA_OUT_COUNT_MASK + 1;
  43
  44         used = data_in_count - data_out_count;
  45
  46         WARN_ON(used < 0);
  47         WARN_ON(used > DP_TX_PACKET_RING_CHUNK_NUM);
  48
  49         if (used >= DP_TX_PACKET_RING_CHUNK_NUM)
  50                 return true;
  51         else
  52                 return false;
  53 }
  54
  55 static int wl1251_tx_path_status(struct wl1251 *wl)
  56 {
  57         u32 status, addr, data_out_count;
  58         bool busy;
  59
  60         addr = wl->data_path->tx_control_addr;
  61         status = wl1251_mem_read32(wl, addr);
  62         data_out_count = status & TX_STATUS_DATA_OUT_COUNT_MASK;
  63         busy = wl1251_tx_double_buffer_busy(wl, data_out_count);
  64
  65         if (busy)
  66                 return -EBUSY;
  67
  68         return 0;
  69 }
  70
  71 static int wl1251_tx_id(struct wl1251 *wl, struct sk_buff *skb)
  72 {
  73         int i;
  74
  75         for (i = 0; i < FW_TX_CMPLT_BLOCK_SIZE; i++)
  76                 if (wl->tx_frames[i] == NULL) {
  77                         wl->tx_frames[i] = skb;
  78                         return i;
  79                 }
  80
  81         return -EBUSY;
  82 }
  83
  84 static void wl1251_tx_control(struct tx_double_buffer_desc *tx_hdr,
  85                               struct ieee80211_tx_info *control, u16 fc)
  86 {
  87         *(u16 *)&tx_hdr->control = 0;
  88
  89         tx_hdr->control.rate_policy = 0;
  90
  91         /* 802.11 packets */
  92         tx_hdr->control.packet_type = 0;
  93
  94         if (control->flags & IEEE80211_TX_CTL_NO_ACK)
  95                 tx_hdr->control.ack_policy = 1;
  96
  97         tx_hdr->control.tx_complete = 1;
  98
  99         if ((fc & IEEE80211_FTYPE_DATA) &&
 100             ((fc & IEEE80211_STYPE_QOS_DATA) ||
 101              (fc & IEEE80211_STYPE_QOS_NULLFUNC)))
 102                 tx_hdr->control.qos = 1;
 103 }
 104
 105 /* RSN + MIC = 8 + 8 = 16 bytes (worst case - AES). */
 106 #define MAX_MSDU_SECURITY_LENGTH      16
 107 #define MAX_MPDU_SECURITY_LENGTH      16
 108 #define WLAN_QOS_HDR_LEN              26
 109 #define MAX_MPDU_HEADER_AND_SECURITY  (MAX_MPDU_SECURITY_LENGTH + \
 110                                        WLAN_QOS_HDR_LEN)
 111 #define HW_BLOCK_SIZE                 252
 112 static void wl1251_tx_frag_block_num(struct tx_double_buffer_desc *tx_hdr)
 113 {
 114         u16 payload_len, frag_threshold, mem_blocks;
 115         u16 num_mpdus, mem_blocks_per_frag;
 116
 117         frag_threshold = IEEE80211_MAX_FRAG_THRESHOLD;
 118         tx_hdr->frag_threshold = cpu_to_le16(frag_threshold);
 119
 120         payload_len = tx_hdr->length + MAX_MSDU_SECURITY_LENGTH;
 121
 122         if (payload_len > frag_threshold) {
 123                 mem_blocks_per_frag =
 124                         ((frag_threshold + MAX_MPDU_HEADER_AND_SECURITY) /
 125                          HW_BLOCK_SIZE) + 1;
 126                 num_mpdus = payload_len / frag_threshold;
 127                 mem_blocks = num_mpdus * mem_blocks_per_frag;
 128                 payload_len -= num_mpdus * frag_threshold;
 129                 num_mpdus++;
 130
 131         } else {
 132                 mem_blocks_per_frag = 0;
 133                 mem_blocks = 0;
 134                 num_mpdus = 1;
 135         }
 136
 137         mem_blocks += (payload_len / HW_BLOCK_SIZE) + 1;
 138
 139         if (num_mpdus > 1)
 140                 mem_blocks += min(num_mpdus, mem_blocks_per_frag);
 141
 142         tx_hdr->num_mem_blocks = mem_blocks;
 143 }
 144
 145 static int wl1251_tx_fill_hdr(struct wl1251 *wl, struct sk_buff *skb,
 146                               struct ieee80211_tx_info *control)
 147 {
 148         struct tx_double_buffer_desc *tx_hdr;
 149         struct ieee80211_rate *rate;
 150         int id;
 151         u16 fc;
 152
 153         if (!skb)
 154                 return -EINVAL;
 155
 156         id = wl1251_tx_id(wl, skb);
 157         if (id < 0)
 158                 return id;
 159
 160         fc = *(u16 *)skb->data;
 161         tx_hdr = (struct tx_double_buffer_desc *) skb_push(skb,
 162                                                            sizeof(*tx_hdr));
 163
 164         tx_hdr->length = cpu_to_le16(skb->len - sizeof(*tx_hdr));
 165         rate = ieee80211_get_tx_rate(wl->hw, control);
 166         tx_hdr->rate = cpu_to_le16(rate->hw_value);
 167         tx_hdr->expiry_time = cpu_to_le32(1 << 16);
 168         tx_hdr->id = id;
 169
 170         /* FIXME: how to get the correct queue id? */
 171         tx_hdr->xmit_queue = 0;
 172
 173         wl1251_tx_control(tx_hdr, control, fc);
 174         wl1251_tx_frag_block_num(tx_hdr);
 175
 176         return 0;
 177 }
 178
 179 /* We copy the packet to the target */
 180 static int wl1251_tx_send_packet(struct wl1251 *wl, struct sk_buff *skb,
 181                                  struct ieee80211_tx_info *control)
 182 {
 183         struct tx_double_buffer_desc *tx_hdr;
 184         int len;
 185         u32 addr;
 186
 187         if (!skb)
 188                 return -EINVAL;
 189
 190         tx_hdr = (struct tx_double_buffer_desc *) skb->data;
 191
 192         if (control->control.hw_key &&
 193             control->control.hw_key->alg == ALG_TKIP) {
 194                 int hdrlen;
 195                 u16 fc;
 196                 u8 *pos;
 197
 198                 fc = *(u16 *)(skb->data + sizeof(*tx_hdr));
 199                 tx_hdr->length += WL1251_TKIP_IV_SPACE;
 200
 201                 hdrlen = ieee80211_hdrlen(fc);
 202
 203                 pos = skb_push(skb, WL1251_TKIP_IV_SPACE);
 204                 memmove(pos, pos + WL1251_TKIP_IV_SPACE,
 205                         sizeof(*tx_hdr) + hdrlen);
 206         }
 207
 208         /* Revisit. This is a workaround for getting non-aligned packets.
 209            This happens at least with EAPOL packets from the user space.
 210            Our DMA requires packets to be aligned on a 4-byte boundary.
 211         */
 212         if (unlikely((long)skb->data & 0x03)) {
 213                 int offset = (4 - (long)skb->data) & 0x03;
 214                 wl1251_debug(DEBUG_TX, "skb offset %d", offset);
 215
 216                 /* check whether the current skb can be used */
 217                 if (!skb_cloned(skb) && (skb_tailroom(skb) >= offset)) {
 218                         unsigned char *src = skb->data;
 219
 220                         /* align the buffer on a 4-byte boundary */
 221                         skb_reserve(skb, offset);
 222                         memmove(skb->data, src, skb->len);
 223                 } else {
 224                         wl1251_info("No handler, fixme!");
 225                         return -EINVAL;
 226                 }
 227         }
 228
 229         /* Our skb->data at this point includes the HW header */
 230         len = WL1251_TX_ALIGN(skb->len);
 231
 232         if (wl->data_in_count & 0x1)
 233                 addr = wl->data_path->tx_packet_ring_addr +
 234                         wl->data_path->tx_packet_ring_chunk_size;
 235         else
 236                 addr = wl->data_path->tx_packet_ring_addr;
 237
 238         wl1251_mem_write(wl, addr, skb->data, len);
 239
 240         wl1251_debug(DEBUG_TX, "tx id %u skb 0x%p payload %u rate 0x%x",
 241                      tx_hdr->id, skb, tx_hdr->length, tx_hdr->rate);
 242
 243         return 0;
 244 }
 245
 246 static void wl1251_tx_trigger(struct wl1251 *wl)
 247 {
 248         u32 data, addr;
 249
 250         if (wl->data_in_count & 0x1) {
 251                 addr = ACX_REG_INTERRUPT_TRIG_H;
 252                 data = INTR_TRIG_TX_PROC1;
 253         } else {
 254                 addr = ACX_REG_INTERRUPT_TRIG;
 255                 data = INTR_TRIG_TX_PROC0;
 256         }
 257
 258         wl1251_reg_write32(wl, addr, data);
 259
 260         /* Bumping data in */
 261         wl->data_in_count = (wl->data_in_count + 1) &
 262                 TX_STATUS_DATA_OUT_COUNT_MASK;
 263 }
 264
 265 /* caller must hold wl->mutex */
 266 static int wl1251_tx_frame(struct wl1251 *wl, struct sk_buff *skb)
 267 {
 268         struct ieee80211_tx_info *info;
 269         int ret = 0;
 270         u8 idx;
 271
 272         info = IEEE80211_SKB_CB(skb);
 273
 274         if (info->control.hw_key) {
 275                 idx = info->control.hw_key->hw_key_idx;
 276                 if (unlikely(wl->default_key != idx)) {
 277                         ret = wl1251_acx_default_key(wl, idx);
 278                         if (ret < 0)
 279                                 return ret;
 280                 }
 281         }
 282
 283         ret = wl1251_tx_path_status(wl);
 284         if (ret < 0)
 285                 return ret;
 286
 287         ret = wl1251_tx_fill_hdr(wl, skb, info);
 288         if (ret < 0)
 289                 return ret;
 290
 291         ret = wl1251_tx_send_packet(wl, skb, info);
 292         if (ret < 0)
 293                 return ret;
 294
 295         wl1251_tx_trigger(wl);
 296
 297         return ret;
 298 }
 299
 300 void wl1251_tx_work(struct work_struct *work)
 301 {
 302         struct wl1251 *wl = container_of(work, struct wl1251, tx_work);
 303         struct sk_buff *skb;
 304         bool woken_up = false;
 305         int ret;
 306
 307         mutex_lock(&wl->mutex);
 308
 309         if (unlikely(wl->state == WL1251_STATE_OFF))
 310                 goto out;
 311
 312         while ((skb = skb_dequeue(&wl->tx_queue))) {
 313                 if (!woken_up) {
 314                         ret = wl1251_ps_elp_wakeup(wl);
 315                         if (ret < 0)
 316                                 goto out;
 317                         woken_up = true;
 318                 }
 319
 320                 ret = wl1251_tx_frame(wl, skb);
 321                 if (ret == -EBUSY) {
 322                         /* firmware buffer is full, stop queues */
 323                         wl1251_debug(DEBUG_TX, "tx_work: fw buffer full, "
 324                                      "stop queues");
 325                         ieee80211_stop_queues(wl->hw);
 326                         wl->tx_queue_stopped = true;
 327                         skb_queue_head(&wl->tx_queue, skb);
 328                         goto out;
 329                 } else if (ret < 0) {
 330                         dev_kfree_skb(skb);
 331                         goto out;
 332                 }
 333         }
 334
 335 out:
 336         if (woken_up)
 337                 wl1251_ps_elp_sleep(wl);
 338
 339         mutex_unlock(&wl->mutex);
 340 }
 341
 342 static const char *wl1251_tx_parse_status(u8 status)
 343 {
 344         /* 8 bit status field, one character per bit plus null */
 345         static char buf[9];
 346         int i = 0;
 347
 348         memset(buf, 0, sizeof(buf));
 349
 350         if (status & TX_DMA_ERROR)
 351                 buf[i++] = 'm';
 352         if (status & TX_DISABLED)
 353                 buf[i++] = 'd';
 354         if (status & TX_RETRY_EXCEEDED)
 355                 buf[i++] = 'r';
 356         if (status & TX_TIMEOUT)
 357                 buf[i++] = 't';
 358         if (status & TX_KEY_NOT_FOUND)
 359                 buf[i++] = 'k';
 360         if (status & TX_ENCRYPT_FAIL)
 361                 buf[i++] = 'e';
 362         if (status & TX_UNAVAILABLE_PRIORITY)
 363                 buf[i++] = 'p';
 364
 365         /* bit 0 is unused apparently */
 366
 367         return buf;
 368 }
 369
 370 static void wl1251_tx_packet_cb(struct wl1251 *wl,
 371                                 struct tx_result *result)
 372 {
 373         struct ieee80211_tx_info *info;
 374         struct sk_buff *skb;
 375         int hdrlen, ret;
 376         u8 *frame;
 377
 378         skb = wl->tx_frames[result->id];
 379         if (skb == NULL) {
 380                 wl1251_error("SKB for packet %d is NULL", result->id);
 381                 return;
 382         }
 383
 384         info = IEEE80211_SKB_CB(skb);
 385
 386         if (!(info->flags & IEEE80211_TX_CTL_NO_ACK) &&
 387             (result->status == TX_SUCCESS))
 388                 info->flags |= IEEE80211_TX_STAT_ACK;
 389
 390         info->status.rates[0].count = result->ack_failures + 1;
 391         wl->stats.retry_count += result->ack_failures;
 392
 393         /*
 394          * We have to remove our private TX header before pushing
 395          * the skb back to mac80211.
 396          */
 397         frame = skb_pull(skb, sizeof(struct tx_double_buffer_desc));
 398         if (info->control.hw_key &&
 399             info->control.hw_key->alg == ALG_TKIP) {
 400                 hdrlen = ieee80211_get_hdrlen_from_skb(skb);
 401                 memmove(frame + WL1251_TKIP_IV_SPACE, frame, hdrlen);
 402                 skb_pull(skb, WL1251_TKIP_IV_SPACE);
 403         }
 404
 405         wl1251_debug(DEBUG_TX, "tx status id %u skb 0x%p failures %u rate 0x%x"
 406                      " status 0x%x (%s)",
 407                      result->id, skb, result->ack_failures, result->rate,
 408                      result->status, wl1251_tx_parse_status(result->status));
 409
 410
 411         ieee80211_tx_status(wl->hw, skb);
 412
 413         wl->tx_frames[result->id] = NULL;
 414
 415         if (wl->tx_queue_stopped) {
 416                 wl1251_debug(DEBUG_TX, "cb: queue was stopped");
 417
 418                 skb = skb_dequeue(&wl->tx_queue);
 419
 420                 /* The skb can be NULL because tx_work might have been
 421                    scheduled before the queue was stopped making the
 422                    queue empty */
 423
 424                 if (skb) {
 425                         ret = wl1251_tx_frame(wl, skb);
 426                         if (ret == -EBUSY) {
 427                                 /* firmware buffer is still full */
 428                                 wl1251_debug(DEBUG_TX, "cb: fw buffer "
 429                                              "still full");
 430                                 skb_queue_head(&wl->tx_queue, skb);
 431                                 return;
 432                         } else if (ret < 0) {
 433                                 dev_kfree_skb(skb);
 434                                 return;
 435                         }
 436                 }
 437
 438                 wl1251_debug(DEBUG_TX, "cb: waking queues");
 439                 ieee80211_wake_queues(wl->hw);
 440                 wl->tx_queue_stopped = false;
 441         }
 442 }
 443
 444 /* Called upon reception of a TX complete interrupt */
 445 void wl1251_tx_complete(struct wl1251 *wl)
 446 {
 447         int i, result_index, num_complete = 0;
 448         struct tx_result result[FW_TX_CMPLT_BLOCK_SIZE], *result_ptr;
 449
 450         if (unlikely(wl->state != WL1251_STATE_ON))
 451                 return;
 452
 453         /* First we read the result */
 454         wl1251_mem_read(wl, wl->data_path->tx_complete_addr,
 455                             result, sizeof(result));
 456
 457         result_index = wl->next_tx_complete;
 458
 459         for (i = 0; i < ARRAY_SIZE(result); i++) {
 460                 result_ptr = &result[result_index];
 461
 462                 if (result_ptr->done_1 == 1 &&
 463                     result_ptr->done_2 == 1) {
 464                         wl1251_tx_packet_cb(wl, result_ptr);
 465
 466                         result_ptr->done_1 = 0;
 467                         result_ptr->done_2 = 0;
 468
 469                         result_index = (result_index + 1) &
 470                                 (FW_TX_CMPLT_BLOCK_SIZE - 1);
 471                         num_complete++;
 472                 } else {
 473                         break;
 474                 }
 475         }
 476
 477         /* Every completed frame needs to be acknowledged */
 478         if (num_complete) {
 479                 /*
 480                  * If we've wrapped, we have to clear
 481                  * the results in 2 steps.
 482                  */
 483                 if (result_index > wl->next_tx_complete) {
 484                         /* Only 1 write is needed */
 485                         wl1251_mem_write(wl,
 486                                          wl->data_path->tx_complete_addr +
 487                                          (wl->next_tx_complete *
 488                                           sizeof(struct tx_result)),
 489                                          &result[wl->next_tx_complete],
 490                                          num_complete *
 491                                          sizeof(struct tx_result));
 492
 493
 494                 } else if (result_index < wl->next_tx_complete) {
 495                         /* 2 writes are needed */
 496                         wl1251_mem_write(wl,
 497                                          wl->data_path->tx_complete_addr +
 498                                          (wl->next_tx_complete *
 499                                           sizeof(struct tx_result)),
 500                                          &result[wl->next_tx_complete],
 501                                          (FW_TX_CMPLT_BLOCK_SIZE -
 502                                           wl->next_tx_complete) *
 503                                          sizeof(struct tx_result));
 504
 505                         wl1251_mem_write(wl,
 506                                          wl->data_path->tx_complete_addr,
 507                                          result,
 508                                          (num_complete -
 509                                           FW_TX_CMPLT_BLOCK_SIZE +
 510                                           wl->next_tx_complete) *
 511                                          sizeof(struct tx_result));
 512
 513                 } else {
 514                         /* We have to write the whole array */
 515                         wl1251_mem_write(wl,
 516                                          wl->data_path->tx_complete_addr,
 517                                          result,
 518                                          FW_TX_CMPLT_BLOCK_SIZE *
 519                                          sizeof(struct tx_result));
 520                 }
 521
 522         }
 523
 524         wl->next_tx_complete = result_index;
 525 }
 526
 527 /* caller must hold wl->mutex */
 528 void wl1251_tx_flush(struct wl1251 *wl)
 529 {
 530         int i;
 531         struct sk_buff *skb;
 532         struct ieee80211_tx_info *info;
 533
 534         /* TX failure */
 535 /*      control->flags = 0; FIXME */
 536
 537         while ((skb = skb_dequeue(&wl->tx_queue))) {
 538                 info = IEEE80211_SKB_CB(skb);
 539
 540                 wl1251_debug(DEBUG_TX, "flushing skb 0x%p", skb);
 541
 542                 if (!(info->flags & IEEE80211_TX_CTL_REQ_TX_STATUS))
 543                                 continue;
 544
 545                 ieee80211_tx_status(wl->hw, skb);
 546         }
 547
 548         for (i = 0; i < FW_TX_CMPLT_BLOCK_SIZE; i++)
 549                 if (wl->tx_frames[i] != NULL) {
 550                         skb = wl->tx_frames[i];
 551                         info = IEEE80211_SKB_CB(skb);
 552
 553                         if (!(info->flags & IEEE80211_TX_CTL_REQ_TX_STATUS))
 554                                 continue;
 555
 556                         ieee80211_tx_status(wl->hw, skb);
 557                         wl->tx_frames[i] = NULL;
 558                 }
 559 }