crypto: talitos - Preempt overflow interrupts
[safe/jmp/linux-2.6] / drivers / crypto / talitos.c
1 /*
2  * talitos - Freescale Integrated Security Engine (SEC) device driver
3  *
4  * Copyright (c) 2008 Freescale Semiconductor, Inc.
5  *
6  * Scatterlist Crypto API glue code copied from files with the following:
7  * Copyright (c) 2006-2007 Herbert Xu <herbert@gondor.apana.org.au>
8  *
9  * Crypto algorithm registration code copied from hifn driver:
10  * 2007+ Copyright (c) Evgeniy Polyakov <johnpol@2ka.mipt.ru>
11  * All rights reserved.
12  *
13  * This program is free software; you can redistribute it and/or modify
14  * it under the terms of the GNU General Public License as published by
15  * the Free Software Foundation; either version 2 of the License, or
16  * (at your option) any later version.
17  *
18  * This program is distributed in the hope that it will be useful,
19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21  * GNU General Public License for more details.
22  *
23  * You should have received a copy of the GNU General Public License
24  * along with this program; if not, write to the Free Software
25  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
26  */
27
28 #include <linux/kernel.h>
29 #include <linux/module.h>
30 #include <linux/mod_devicetable.h>
31 #include <linux/device.h>
32 #include <linux/interrupt.h>
33 #include <linux/crypto.h>
34 #include <linux/hw_random.h>
35 #include <linux/of_platform.h>
36 #include <linux/dma-mapping.h>
37 #include <linux/io.h>
38 #include <linux/spinlock.h>
39 #include <linux/rtnetlink.h>
40
41 #include <crypto/algapi.h>
42 #include <crypto/aes.h>
43 #include <crypto/des.h>
44 #include <crypto/sha.h>
45 #include <crypto/aead.h>
46 #include <crypto/authenc.h>
47
48 #include "talitos.h"
49
50 #define TALITOS_TIMEOUT 100000
51 #define TALITOS_MAX_DATA_LEN 65535
52
53 #define DESC_TYPE(desc_hdr) ((be32_to_cpu(desc_hdr) >> 3) & 0x1f)
54 #define PRIMARY_EU(desc_hdr) ((be32_to_cpu(desc_hdr) >> 28) & 0xf)
55 #define SECONDARY_EU(desc_hdr) ((be32_to_cpu(desc_hdr) >> 16) & 0xf)
56
57 /* descriptor pointer entry */
58 struct talitos_ptr {
59         __be16 len;     /* length */
60         u8 j_extent;    /* jump to sg link table and/or extent */
61         u8 eptr;        /* extended address */
62         __be32 ptr;     /* address */
63 };
64
65 /* descriptor */
66 struct talitos_desc {
67         __be32 hdr;                     /* header high bits */
68         __be32 hdr_lo;                  /* header low bits */
69         struct talitos_ptr ptr[7];      /* ptr/len pair array */
70 };
71
72 /**
73  * talitos_request - descriptor submission request
74  * @desc: descriptor pointer (kernel virtual)
75  * @dma_desc: descriptor's physical bus address
76  * @callback: whom to call when descriptor processing is done
77  * @context: caller context (optional)
78  */
79 struct talitos_request {
80         struct talitos_desc *desc;
81         dma_addr_t dma_desc;
82         void (*callback) (struct device *dev, struct talitos_desc *desc,
83                           void *context, int error);
84         void *context;
85 };
86
87 struct talitos_private {
88         struct device *dev;
89         struct of_device *ofdev;
90         void __iomem *reg;
91         int irq;
92
93         /* SEC version geometry (from device tree node) */
94         unsigned int num_channels;
95         unsigned int chfifo_len;
96         unsigned int exec_units;
97         unsigned int desc_types;
98
99         /* next channel to be assigned next incoming descriptor */
100         atomic_t last_chan;
101
102         /* per-channel number of requests pending in channel h/w fifo */
103         atomic_t *submit_count;
104
105         /* per-channel request fifo */
106         struct talitos_request **fifo;
107
108         /*
109          * length of the request fifo
110          * fifo_len is chfifo_len rounded up to next power of 2
111          * so we can use bitwise ops to wrap
112          */
113         unsigned int fifo_len;
114
115         /* per-channel index to next free descriptor request */
116         int *head;
117
118         /* per-channel index to next in-progress/done descriptor request */
119         int *tail;
120
121         /* per-channel request submission (head) and release (tail) locks */
122         spinlock_t *head_lock;
123         spinlock_t *tail_lock;
124
125         /* request callback tasklet */
126         struct tasklet_struct done_task;
127         struct tasklet_struct error_task;
128
129         /* list of registered algorithms */
130         struct list_head alg_list;
131
132         /* hwrng device */
133         struct hwrng rng;
134 };
135
136 /*
137  * map virtual single (contiguous) pointer to h/w descriptor pointer
138  */
139 static void map_single_talitos_ptr(struct device *dev,
140                                    struct talitos_ptr *talitos_ptr,
141                                    unsigned short len, void *data,
142                                    unsigned char extent,
143                                    enum dma_data_direction dir)
144 {
145         talitos_ptr->len = cpu_to_be16(len);
146         talitos_ptr->ptr = cpu_to_be32(dma_map_single(dev, data, len, dir));
147         talitos_ptr->j_extent = extent;
148 }
149
150 /*
151  * unmap bus single (contiguous) h/w descriptor pointer
152  */
153 static void unmap_single_talitos_ptr(struct device *dev,
154                                      struct talitos_ptr *talitos_ptr,
155                                      enum dma_data_direction dir)
156 {
157         dma_unmap_single(dev, be32_to_cpu(talitos_ptr->ptr),
158                          be16_to_cpu(talitos_ptr->len), dir);
159 }
160
161 static int reset_channel(struct device *dev, int ch)
162 {
163         struct talitos_private *priv = dev_get_drvdata(dev);
164         unsigned int timeout = TALITOS_TIMEOUT;
165
166         setbits32(priv->reg + TALITOS_CCCR(ch), TALITOS_CCCR_RESET);
167
168         while ((in_be32(priv->reg + TALITOS_CCCR(ch)) & TALITOS_CCCR_RESET)
169                && --timeout)
170                 cpu_relax();
171
172         if (timeout == 0) {
173                 dev_err(dev, "failed to reset channel %d\n", ch);
174                 return -EIO;
175         }
176
177         /* set done writeback and IRQ */
178         setbits32(priv->reg + TALITOS_CCCR_LO(ch), TALITOS_CCCR_LO_CDWE |
179                   TALITOS_CCCR_LO_CDIE);
180
181         return 0;
182 }
183
184 static int reset_device(struct device *dev)
185 {
186         struct talitos_private *priv = dev_get_drvdata(dev);
187         unsigned int timeout = TALITOS_TIMEOUT;
188
189         setbits32(priv->reg + TALITOS_MCR, TALITOS_MCR_SWR);
190
191         while ((in_be32(priv->reg + TALITOS_MCR) & TALITOS_MCR_SWR)
192                && --timeout)
193                 cpu_relax();
194
195         if (timeout == 0) {
196                 dev_err(dev, "failed to reset device\n");
197                 return -EIO;
198         }
199
200         return 0;
201 }
202
203 /*
204  * Reset and initialize the device
205  */
206 static int init_device(struct device *dev)
207 {
208         struct talitos_private *priv = dev_get_drvdata(dev);
209         int ch, err;
210
211         /*
212          * Master reset
213          * errata documentation: warning: certain SEC interrupts
214          * are not fully cleared by writing the MCR:SWR bit,
215          * set bit twice to completely reset
216          */
217         err = reset_device(dev);
218         if (err)
219                 return err;
220
221         err = reset_device(dev);
222         if (err)
223                 return err;
224
225         /* reset channels */
226         for (ch = 0; ch < priv->num_channels; ch++) {
227                 err = reset_channel(dev, ch);
228                 if (err)
229                         return err;
230         }
231
232         /* enable channel done and error interrupts */
233         setbits32(priv->reg + TALITOS_IMR, TALITOS_IMR_INIT);
234         setbits32(priv->reg + TALITOS_IMR_LO, TALITOS_IMR_LO_INIT);
235
236         return 0;
237 }
238
239 /**
240  * talitos_submit - submits a descriptor to the device for processing
241  * @dev:        the SEC device to be used
242  * @desc:       the descriptor to be processed by the device
243  * @callback:   whom to call when processing is complete
244  * @context:    a handle for use by caller (optional)
245  *
246  * desc must contain valid dma-mapped (bus physical) address pointers.
247  * callback must check err and feedback in descriptor header
248  * for device processing status.
249  */
250 static int talitos_submit(struct device *dev, struct talitos_desc *desc,
251                           void (*callback)(struct device *dev,
252                                            struct talitos_desc *desc,
253                                            void *context, int error),
254                           void *context)
255 {
256         struct talitos_private *priv = dev_get_drvdata(dev);
257         struct talitos_request *request;
258         unsigned long flags, ch;
259         int head;
260
261         /* select done notification */
262         desc->hdr |= DESC_HDR_DONE_NOTIFY;
263
264         /* emulate SEC's round-robin channel fifo polling scheme */
265         ch = atomic_inc_return(&priv->last_chan) & (priv->num_channels - 1);
266
267         spin_lock_irqsave(&priv->head_lock[ch], flags);
268
269         if (!atomic_inc_not_zero(&priv->submit_count[ch])) {
270                 /* h/w fifo is full */
271                 spin_unlock_irqrestore(&priv->head_lock[ch], flags);
272                 return -EAGAIN;
273         }
274
275         head = priv->head[ch];
276         request = &priv->fifo[ch][head];
277
278         /* map descriptor and save caller data */
279         request->dma_desc = dma_map_single(dev, desc, sizeof(*desc),
280                                            DMA_BIDIRECTIONAL);
281         request->callback = callback;
282         request->context = context;
283
284         /* increment fifo head */
285         priv->head[ch] = (priv->head[ch] + 1) & (priv->fifo_len - 1);
286
287         smp_wmb();
288         request->desc = desc;
289
290         /* GO! */
291         wmb();
292         out_be32(priv->reg + TALITOS_FF_LO(ch), request->dma_desc);
293
294         spin_unlock_irqrestore(&priv->head_lock[ch], flags);
295
296         return -EINPROGRESS;
297 }
298
299 /*
300  * process what was done, notify callback of error if not
301  */
302 static void flush_channel(struct device *dev, int ch, int error, int reset_ch)
303 {
304         struct talitos_private *priv = dev_get_drvdata(dev);
305         struct talitos_request *request, saved_req;
306         unsigned long flags;
307         int tail, status;
308
309         spin_lock_irqsave(&priv->tail_lock[ch], flags);
310
311         tail = priv->tail[ch];
312         while (priv->fifo[ch][tail].desc) {
313                 request = &priv->fifo[ch][tail];
314
315                 /* descriptors with their done bits set don't get the error */
316                 rmb();
317                 if ((request->desc->hdr & DESC_HDR_DONE) == DESC_HDR_DONE)
318                         status = 0;
319                 else
320                         if (!error)
321                                 break;
322                         else
323                                 status = error;
324
325                 dma_unmap_single(dev, request->dma_desc,
326                         sizeof(struct talitos_desc), DMA_BIDIRECTIONAL);
327
328                 /* copy entries so we can call callback outside lock */
329                 saved_req.desc = request->desc;
330                 saved_req.callback = request->callback;
331                 saved_req.context = request->context;
332
333                 /* release request entry in fifo */
334                 smp_wmb();
335                 request->desc = NULL;
336
337                 /* increment fifo tail */
338                 priv->tail[ch] = (tail + 1) & (priv->fifo_len - 1);
339
340                 spin_unlock_irqrestore(&priv->tail_lock[ch], flags);
341
342                 atomic_dec(&priv->submit_count[ch]);
343
344                 saved_req.callback(dev, saved_req.desc, saved_req.context,
345                                    status);
346                 /* channel may resume processing in single desc error case */
347                 if (error && !reset_ch && status == error)
348                         return;
349                 spin_lock_irqsave(&priv->tail_lock[ch], flags);
350                 tail = priv->tail[ch];
351         }
352
353         spin_unlock_irqrestore(&priv->tail_lock[ch], flags);
354 }
355
356 /*
357  * process completed requests for channels that have done status
358  */
359 static void talitos_done(unsigned long data)
360 {
361         struct device *dev = (struct device *)data;
362         struct talitos_private *priv = dev_get_drvdata(dev);
363         int ch;
364
365         for (ch = 0; ch < priv->num_channels; ch++)
366                 flush_channel(dev, ch, 0, 0);
367 }
368
369 /*
370  * locate current (offending) descriptor
371  */
372 static struct talitos_desc *current_desc(struct device *dev, int ch)
373 {
374         struct talitos_private *priv = dev_get_drvdata(dev);
375         int tail = priv->tail[ch];
376         dma_addr_t cur_desc;
377
378         cur_desc = in_be32(priv->reg + TALITOS_CDPR_LO(ch));
379
380         while (priv->fifo[ch][tail].dma_desc != cur_desc) {
381                 tail = (tail + 1) & (priv->fifo_len - 1);
382                 if (tail == priv->tail[ch]) {
383                         dev_err(dev, "couldn't locate current descriptor\n");
384                         return NULL;
385                 }
386         }
387
388         return priv->fifo[ch][tail].desc;
389 }
390
391 /*
392  * user diagnostics; report root cause of error based on execution unit status
393  */
394 static void report_eu_error(struct device *dev, int ch, struct talitos_desc *desc)
395 {
396         struct talitos_private *priv = dev_get_drvdata(dev);
397         int i;
398
399         switch (desc->hdr & DESC_HDR_SEL0_MASK) {
400         case DESC_HDR_SEL0_AFEU:
401                 dev_err(dev, "AFEUISR 0x%08x_%08x\n",
402                         in_be32(priv->reg + TALITOS_AFEUISR),
403                         in_be32(priv->reg + TALITOS_AFEUISR_LO));
404                 break;
405         case DESC_HDR_SEL0_DEU:
406                 dev_err(dev, "DEUISR 0x%08x_%08x\n",
407                         in_be32(priv->reg + TALITOS_DEUISR),
408                         in_be32(priv->reg + TALITOS_DEUISR_LO));
409                 break;
410         case DESC_HDR_SEL0_MDEUA:
411         case DESC_HDR_SEL0_MDEUB:
412                 dev_err(dev, "MDEUISR 0x%08x_%08x\n",
413                         in_be32(priv->reg + TALITOS_MDEUISR),
414                         in_be32(priv->reg + TALITOS_MDEUISR_LO));
415                 break;
416         case DESC_HDR_SEL0_RNG:
417                 dev_err(dev, "RNGUISR 0x%08x_%08x\n",
418                         in_be32(priv->reg + TALITOS_RNGUISR),
419                         in_be32(priv->reg + TALITOS_RNGUISR_LO));
420                 break;
421         case DESC_HDR_SEL0_PKEU:
422                 dev_err(dev, "PKEUISR 0x%08x_%08x\n",
423                         in_be32(priv->reg + TALITOS_PKEUISR),
424                         in_be32(priv->reg + TALITOS_PKEUISR_LO));
425                 break;
426         case DESC_HDR_SEL0_AESU:
427                 dev_err(dev, "AESUISR 0x%08x_%08x\n",
428                         in_be32(priv->reg + TALITOS_AESUISR),
429                         in_be32(priv->reg + TALITOS_AESUISR_LO));
430                 break;
431         case DESC_HDR_SEL0_CRCU:
432                 dev_err(dev, "CRCUISR 0x%08x_%08x\n",
433                         in_be32(priv->reg + TALITOS_CRCUISR),
434                         in_be32(priv->reg + TALITOS_CRCUISR_LO));
435                 break;
436         case DESC_HDR_SEL0_KEU:
437                 dev_err(dev, "KEUISR 0x%08x_%08x\n",
438                         in_be32(priv->reg + TALITOS_KEUISR),
439                         in_be32(priv->reg + TALITOS_KEUISR_LO));
440                 break;
441         }
442
443         switch (desc->hdr & DESC_HDR_SEL1_MASK) {
444         case DESC_HDR_SEL1_MDEUA:
445         case DESC_HDR_SEL1_MDEUB:
446                 dev_err(dev, "MDEUISR 0x%08x_%08x\n",
447                         in_be32(priv->reg + TALITOS_MDEUISR),
448                         in_be32(priv->reg + TALITOS_MDEUISR_LO));
449                 break;
450         case DESC_HDR_SEL1_CRCU:
451                 dev_err(dev, "CRCUISR 0x%08x_%08x\n",
452                         in_be32(priv->reg + TALITOS_CRCUISR),
453                         in_be32(priv->reg + TALITOS_CRCUISR_LO));
454                 break;
455         }
456
457         for (i = 0; i < 8; i++)
458                 dev_err(dev, "DESCBUF 0x%08x_%08x\n",
459                         in_be32(priv->reg + TALITOS_DESCBUF(ch) + 8*i),
460                         in_be32(priv->reg + TALITOS_DESCBUF_LO(ch) + 8*i));
461 }
462
463 /*
464  * recover from error interrupts
465  */
466 static void talitos_error(unsigned long data)
467 {
468         struct device *dev = (struct device *)data;
469         struct talitos_private *priv = dev_get_drvdata(dev);
470         unsigned int timeout = TALITOS_TIMEOUT;
471         int ch, error, reset_dev = 0, reset_ch = 0;
472         u32 isr, isr_lo, v, v_lo;
473
474         isr = in_be32(priv->reg + TALITOS_ISR);
475         isr_lo = in_be32(priv->reg + TALITOS_ISR_LO);
476
477         for (ch = 0; ch < priv->num_channels; ch++) {
478                 /* skip channels without errors */
479                 if (!(isr & (1 << (ch * 2 + 1))))
480                         continue;
481
482                 error = -EINVAL;
483
484                 v = in_be32(priv->reg + TALITOS_CCPSR(ch));
485                 v_lo = in_be32(priv->reg + TALITOS_CCPSR_LO(ch));
486
487                 if (v_lo & TALITOS_CCPSR_LO_DOF) {
488                         dev_err(dev, "double fetch fifo overflow error\n");
489                         error = -EAGAIN;
490                         reset_ch = 1;
491                 }
492                 if (v_lo & TALITOS_CCPSR_LO_SOF) {
493                         /* h/w dropped descriptor */
494                         dev_err(dev, "single fetch fifo overflow error\n");
495                         error = -EAGAIN;
496                 }
497                 if (v_lo & TALITOS_CCPSR_LO_MDTE)
498                         dev_err(dev, "master data transfer error\n");
499                 if (v_lo & TALITOS_CCPSR_LO_SGDLZ)
500                         dev_err(dev, "s/g data length zero error\n");
501                 if (v_lo & TALITOS_CCPSR_LO_FPZ)
502                         dev_err(dev, "fetch pointer zero error\n");
503                 if (v_lo & TALITOS_CCPSR_LO_IDH)
504                         dev_err(dev, "illegal descriptor header error\n");
505                 if (v_lo & TALITOS_CCPSR_LO_IEU)
506                         dev_err(dev, "invalid execution unit error\n");
507                 if (v_lo & TALITOS_CCPSR_LO_EU)
508                         report_eu_error(dev, ch, current_desc(dev, ch));
509                 if (v_lo & TALITOS_CCPSR_LO_GB)
510                         dev_err(dev, "gather boundary error\n");
511                 if (v_lo & TALITOS_CCPSR_LO_GRL)
512                         dev_err(dev, "gather return/length error\n");
513                 if (v_lo & TALITOS_CCPSR_LO_SB)
514                         dev_err(dev, "scatter boundary error\n");
515                 if (v_lo & TALITOS_CCPSR_LO_SRL)
516                         dev_err(dev, "scatter return/length error\n");
517
518                 flush_channel(dev, ch, error, reset_ch);
519
520                 if (reset_ch) {
521                         reset_channel(dev, ch);
522                 } else {
523                         setbits32(priv->reg + TALITOS_CCCR(ch),
524                                   TALITOS_CCCR_CONT);
525                         setbits32(priv->reg + TALITOS_CCCR_LO(ch), 0);
526                         while ((in_be32(priv->reg + TALITOS_CCCR(ch)) &
527                                TALITOS_CCCR_CONT) && --timeout)
528                                 cpu_relax();
529                         if (timeout == 0) {
530                                 dev_err(dev, "failed to restart channel %d\n",
531                                         ch);
532                                 reset_dev = 1;
533                         }
534                 }
535         }
536         if (reset_dev || isr & ~TALITOS_ISR_CHERR || isr_lo) {
537                 dev_err(dev, "done overflow, internal time out, or rngu error: "
538                         "ISR 0x%08x_%08x\n", isr, isr_lo);
539
540                 /* purge request queues */
541                 for (ch = 0; ch < priv->num_channels; ch++)
542                         flush_channel(dev, ch, -EIO, 1);
543
544                 /* reset and reinitialize the device */
545                 init_device(dev);
546         }
547 }
548
549 static irqreturn_t talitos_interrupt(int irq, void *data)
550 {
551         struct device *dev = data;
552         struct talitos_private *priv = dev_get_drvdata(dev);
553         u32 isr, isr_lo;
554
555         isr = in_be32(priv->reg + TALITOS_ISR);
556         isr_lo = in_be32(priv->reg + TALITOS_ISR_LO);
557
558         /* ack */
559         out_be32(priv->reg + TALITOS_ICR, isr);
560         out_be32(priv->reg + TALITOS_ICR_LO, isr_lo);
561
562         if (unlikely((isr & ~TALITOS_ISR_CHDONE) || isr_lo))
563                 talitos_error((unsigned long)data);
564         else
565                 if (likely(isr & TALITOS_ISR_CHDONE))
566                         tasklet_schedule(&priv->done_task);
567
568         return (isr || isr_lo) ? IRQ_HANDLED : IRQ_NONE;
569 }
570
571 /*
572  * hwrng
573  */
574 static int talitos_rng_data_present(struct hwrng *rng, int wait)
575 {
576         struct device *dev = (struct device *)rng->priv;
577         struct talitos_private *priv = dev_get_drvdata(dev);
578         u32 ofl;
579         int i;
580
581         for (i = 0; i < 20; i++) {
582                 ofl = in_be32(priv->reg + TALITOS_RNGUSR_LO) &
583                       TALITOS_RNGUSR_LO_OFL;
584                 if (ofl || !wait)
585                         break;
586                 udelay(10);
587         }
588
589         return !!ofl;
590 }
591
592 static int talitos_rng_data_read(struct hwrng *rng, u32 *data)
593 {
594         struct device *dev = (struct device *)rng->priv;
595         struct talitos_private *priv = dev_get_drvdata(dev);
596
597         /* rng fifo requires 64-bit accesses */
598         *data = in_be32(priv->reg + TALITOS_RNGU_FIFO);
599         *data = in_be32(priv->reg + TALITOS_RNGU_FIFO_LO);
600
601         return sizeof(u32);
602 }
603
604 static int talitos_rng_init(struct hwrng *rng)
605 {
606         struct device *dev = (struct device *)rng->priv;
607         struct talitos_private *priv = dev_get_drvdata(dev);
608         unsigned int timeout = TALITOS_TIMEOUT;
609
610         setbits32(priv->reg + TALITOS_RNGURCR_LO, TALITOS_RNGURCR_LO_SR);
611         while (!(in_be32(priv->reg + TALITOS_RNGUSR_LO) & TALITOS_RNGUSR_LO_RD)
612                && --timeout)
613                 cpu_relax();
614         if (timeout == 0) {
615                 dev_err(dev, "failed to reset rng hw\n");
616                 return -ENODEV;
617         }
618
619         /* start generating */
620         setbits32(priv->reg + TALITOS_RNGUDSR_LO, 0);
621
622         return 0;
623 }
624
625 static int talitos_register_rng(struct device *dev)
626 {
627         struct talitos_private *priv = dev_get_drvdata(dev);
628
629         priv->rng.name          = dev_driver_string(dev),
630         priv->rng.init          = talitos_rng_init,
631         priv->rng.data_present  = talitos_rng_data_present,
632         priv->rng.data_read     = talitos_rng_data_read,
633         priv->rng.priv          = (unsigned long)dev;
634
635         return hwrng_register(&priv->rng);
636 }
637
638 static void talitos_unregister_rng(struct device *dev)
639 {
640         struct talitos_private *priv = dev_get_drvdata(dev);
641
642         hwrng_unregister(&priv->rng);
643 }
644
645 /*
646  * crypto alg
647  */
648 #define TALITOS_CRA_PRIORITY            3000
649 #define TALITOS_MAX_KEY_SIZE            64
650 #define TALITOS_MAX_IV_LENGTH           16 /* max of AES_BLOCK_SIZE, DES3_EDE_BLOCK_SIZE */
651
652 #define MD5_DIGEST_SIZE   16
653
654 struct talitos_ctx {
655         struct device *dev;
656         __be32 desc_hdr_template;
657         u8 key[TALITOS_MAX_KEY_SIZE];
658         u8 iv[TALITOS_MAX_IV_LENGTH];
659         unsigned int keylen;
660         unsigned int enckeylen;
661         unsigned int authkeylen;
662         unsigned int authsize;
663 };
664
665 static int aead_authenc_setauthsize(struct crypto_aead *authenc,
666                                                  unsigned int authsize)
667 {
668         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
669
670         ctx->authsize = authsize;
671
672         return 0;
673 }
674
675 static int aead_authenc_setkey(struct crypto_aead *authenc,
676                                             const u8 *key, unsigned int keylen)
677 {
678         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
679         struct rtattr *rta = (void *)key;
680         struct crypto_authenc_key_param *param;
681         unsigned int authkeylen;
682         unsigned int enckeylen;
683
684         if (!RTA_OK(rta, keylen))
685                 goto badkey;
686
687         if (rta->rta_type != CRYPTO_AUTHENC_KEYA_PARAM)
688                 goto badkey;
689
690         if (RTA_PAYLOAD(rta) < sizeof(*param))
691                 goto badkey;
692
693         param = RTA_DATA(rta);
694         enckeylen = be32_to_cpu(param->enckeylen);
695
696         key += RTA_ALIGN(rta->rta_len);
697         keylen -= RTA_ALIGN(rta->rta_len);
698
699         if (keylen < enckeylen)
700                 goto badkey;
701
702         authkeylen = keylen - enckeylen;
703
704         if (keylen > TALITOS_MAX_KEY_SIZE)
705                 goto badkey;
706
707         memcpy(&ctx->key, key, keylen);
708
709         ctx->keylen = keylen;
710         ctx->enckeylen = enckeylen;
711         ctx->authkeylen = authkeylen;
712
713         return 0;
714
715 badkey:
716         crypto_aead_set_flags(authenc, CRYPTO_TFM_RES_BAD_KEY_LEN);
717         return -EINVAL;
718 }
719
720 /*
721  * ipsec_esp_edesc - s/w-extended ipsec_esp descriptor
722  * @src_nents: number of segments in input scatterlist
723  * @dst_nents: number of segments in output scatterlist
724  * @dma_len: length of dma mapped link_tbl space
725  * @dma_link_tbl: bus physical address of link_tbl
726  * @desc: h/w descriptor
727  * @link_tbl: input and output h/w link tables (if {src,dst}_nents > 1)
728  *
729  * if decrypting (with authcheck), or either one of src_nents or dst_nents
730  * is greater than 1, an integrity check value is concatenated to the end
731  * of link_tbl data
732  */
733 struct ipsec_esp_edesc {
734         int src_nents;
735         int dst_nents;
736         int dma_len;
737         dma_addr_t dma_link_tbl;
738         struct talitos_desc desc;
739         struct talitos_ptr link_tbl[0];
740 };
741
742 static void ipsec_esp_unmap(struct device *dev,
743                             struct ipsec_esp_edesc *edesc,
744                             struct aead_request *areq)
745 {
746         unmap_single_talitos_ptr(dev, &edesc->desc.ptr[6], DMA_FROM_DEVICE);
747         unmap_single_talitos_ptr(dev, &edesc->desc.ptr[3], DMA_TO_DEVICE);
748         unmap_single_talitos_ptr(dev, &edesc->desc.ptr[2], DMA_TO_DEVICE);
749         unmap_single_talitos_ptr(dev, &edesc->desc.ptr[0], DMA_TO_DEVICE);
750
751         dma_unmap_sg(dev, areq->assoc, 1, DMA_TO_DEVICE);
752
753         if (areq->src != areq->dst) {
754                 dma_unmap_sg(dev, areq->src, edesc->src_nents ? : 1,
755                              DMA_TO_DEVICE);
756                 dma_unmap_sg(dev, areq->dst, edesc->dst_nents ? : 1,
757                              DMA_FROM_DEVICE);
758         } else {
759                 dma_unmap_sg(dev, areq->src, edesc->src_nents ? : 1,
760                              DMA_BIDIRECTIONAL);
761         }
762
763         if (edesc->dma_len)
764                 dma_unmap_single(dev, edesc->dma_link_tbl, edesc->dma_len,
765                                  DMA_BIDIRECTIONAL);
766 }
767
768 /*
769  * ipsec_esp descriptor callbacks
770  */
771 static void ipsec_esp_encrypt_done(struct device *dev,
772                                    struct talitos_desc *desc, void *context,
773                                    int err)
774 {
775         struct aead_request *areq = context;
776         struct ipsec_esp_edesc *edesc =
777                  container_of(desc, struct ipsec_esp_edesc, desc);
778         struct crypto_aead *authenc = crypto_aead_reqtfm(areq);
779         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
780         struct scatterlist *sg;
781         void *icvdata;
782
783         ipsec_esp_unmap(dev, edesc, areq);
784
785         /* copy the generated ICV to dst */
786         if (edesc->dma_len) {
787                 icvdata = &edesc->link_tbl[edesc->src_nents +
788                                            edesc->dst_nents + 1];
789                 sg = sg_last(areq->dst, edesc->dst_nents);
790                 memcpy((char *)sg_virt(sg) + sg->length - ctx->authsize,
791                        icvdata, ctx->authsize);
792         }
793
794         kfree(edesc);
795
796         aead_request_complete(areq, err);
797 }
798
799 static void ipsec_esp_decrypt_done(struct device *dev,
800                                    struct talitos_desc *desc, void *context,
801                                    int err)
802 {
803         struct aead_request *req = context;
804         struct ipsec_esp_edesc *edesc =
805                  container_of(desc, struct ipsec_esp_edesc, desc);
806         struct crypto_aead *authenc = crypto_aead_reqtfm(req);
807         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
808         struct scatterlist *sg;
809         void *icvdata;
810
811         ipsec_esp_unmap(dev, edesc, req);
812
813         if (!err) {
814                 /* auth check */
815                 if (edesc->dma_len)
816                         icvdata = &edesc->link_tbl[edesc->src_nents +
817                                                    edesc->dst_nents + 1];
818                 else
819                         icvdata = &edesc->link_tbl[0];
820
821                 sg = sg_last(req->dst, edesc->dst_nents ? : 1);
822                 err = memcmp(icvdata, (char *)sg_virt(sg) + sg->length -
823                              ctx->authsize, ctx->authsize) ? -EBADMSG : 0;
824         }
825
826         kfree(edesc);
827
828         aead_request_complete(req, err);
829 }
830
831 /*
832  * convert scatterlist to SEC h/w link table format
833  * stop at cryptlen bytes
834  */
835 static int sg_to_link_tbl(struct scatterlist *sg, int sg_count,
836                            int cryptlen, struct talitos_ptr *link_tbl_ptr)
837 {
838         int n_sg = sg_count;
839
840         while (n_sg--) {
841                 link_tbl_ptr->ptr = cpu_to_be32(sg_dma_address(sg));
842                 link_tbl_ptr->len = cpu_to_be16(sg_dma_len(sg));
843                 link_tbl_ptr->j_extent = 0;
844                 link_tbl_ptr++;
845                 cryptlen -= sg_dma_len(sg);
846                 sg = sg_next(sg);
847         }
848
849         /* adjust (decrease) last one (or two) entry's len to cryptlen */
850         link_tbl_ptr--;
851         while (link_tbl_ptr->len <= (-cryptlen)) {
852                 /* Empty this entry, and move to previous one */
853                 cryptlen += be16_to_cpu(link_tbl_ptr->len);
854                 link_tbl_ptr->len = 0;
855                 sg_count--;
856                 link_tbl_ptr--;
857         }
858         link_tbl_ptr->len = cpu_to_be16(be16_to_cpu(link_tbl_ptr->len)
859                                         + cryptlen);
860
861         /* tag end of link table */
862         link_tbl_ptr->j_extent = DESC_PTR_LNKTBL_RETURN;
863
864         return sg_count;
865 }
866
867 /*
868  * fill in and submit ipsec_esp descriptor
869  */
870 static int ipsec_esp(struct ipsec_esp_edesc *edesc, struct aead_request *areq,
871                      u8 *giv, u64 seq,
872                      void (*callback) (struct device *dev,
873                                        struct talitos_desc *desc,
874                                        void *context, int error))
875 {
876         struct crypto_aead *aead = crypto_aead_reqtfm(areq);
877         struct talitos_ctx *ctx = crypto_aead_ctx(aead);
878         struct device *dev = ctx->dev;
879         struct talitos_desc *desc = &edesc->desc;
880         unsigned int cryptlen = areq->cryptlen;
881         unsigned int authsize = ctx->authsize;
882         unsigned int ivsize;
883         int sg_count;
884
885         /* hmac key */
886         map_single_talitos_ptr(dev, &desc->ptr[0], ctx->authkeylen, &ctx->key,
887                                0, DMA_TO_DEVICE);
888         /* hmac data */
889         map_single_talitos_ptr(dev, &desc->ptr[1], sg_virt(areq->src) -
890                                sg_virt(areq->assoc), sg_virt(areq->assoc), 0,
891                                DMA_TO_DEVICE);
892         /* cipher iv */
893         ivsize = crypto_aead_ivsize(aead);
894         map_single_talitos_ptr(dev, &desc->ptr[2], ivsize, giv ?: areq->iv, 0,
895                                DMA_TO_DEVICE);
896
897         /* cipher key */
898         map_single_talitos_ptr(dev, &desc->ptr[3], ctx->enckeylen,
899                                (char *)&ctx->key + ctx->authkeylen, 0,
900                                DMA_TO_DEVICE);
901
902         /*
903          * cipher in
904          * map and adjust cipher len to aead request cryptlen.
905          * extent is bytes of HMAC postpended to ciphertext,
906          * typically 12 for ipsec
907          */
908         desc->ptr[4].len = cpu_to_be16(cryptlen);
909         desc->ptr[4].j_extent = authsize;
910
911         if (areq->src == areq->dst)
912                 sg_count = dma_map_sg(dev, areq->src, edesc->src_nents ? : 1,
913                                       DMA_BIDIRECTIONAL);
914         else
915                 sg_count = dma_map_sg(dev, areq->src, edesc->src_nents ? : 1,
916                                       DMA_TO_DEVICE);
917
918         if (sg_count == 1) {
919                 desc->ptr[4].ptr = cpu_to_be32(sg_dma_address(areq->src));
920         } else {
921                 sg_count = sg_to_link_tbl(areq->src, sg_count, cryptlen,
922                                           &edesc->link_tbl[0]);
923                 if (sg_count > 1) {
924                         desc->ptr[4].j_extent |= DESC_PTR_LNKTBL_JUMP;
925                         desc->ptr[4].ptr = cpu_to_be32(edesc->dma_link_tbl);
926                         dma_sync_single_for_device(ctx->dev, edesc->dma_link_tbl,
927                                                    edesc->dma_len, DMA_BIDIRECTIONAL);
928                 } else {
929                         /* Only one segment now, so no link tbl needed */
930                         desc->ptr[4].ptr = cpu_to_be32(sg_dma_address(areq->src));
931                 }
932         }
933
934         /* cipher out */
935         desc->ptr[5].len = cpu_to_be16(cryptlen);
936         desc->ptr[5].j_extent = authsize;
937
938         if (areq->src != areq->dst) {
939                 sg_count = dma_map_sg(dev, areq->dst, edesc->dst_nents ? : 1,
940                                       DMA_FROM_DEVICE);
941         }
942
943         if (sg_count == 1) {
944                 desc->ptr[5].ptr = cpu_to_be32(sg_dma_address(areq->dst));
945         } else {
946                 struct talitos_ptr *link_tbl_ptr =
947                         &edesc->link_tbl[edesc->src_nents];
948                 struct scatterlist *sg;
949
950                 desc->ptr[5].ptr = cpu_to_be32((struct talitos_ptr *)
951                                                edesc->dma_link_tbl +
952                                                edesc->src_nents);
953                 if (areq->src == areq->dst) {
954                         memcpy(link_tbl_ptr, &edesc->link_tbl[0],
955                                edesc->src_nents * sizeof(struct talitos_ptr));
956                 } else {
957                         sg_count = sg_to_link_tbl(areq->dst, sg_count, cryptlen,
958                                                   link_tbl_ptr);
959                 }
960                 link_tbl_ptr += sg_count - 1;
961
962                 /* handle case where sg_last contains the ICV exclusively */
963                 sg = sg_last(areq->dst, edesc->dst_nents);
964                 if (sg->length == ctx->authsize)
965                         link_tbl_ptr--;
966
967                 link_tbl_ptr->j_extent = 0;
968                 link_tbl_ptr++;
969                 link_tbl_ptr->j_extent = DESC_PTR_LNKTBL_RETURN;
970                 link_tbl_ptr->len = cpu_to_be16(authsize);
971
972                 /* icv data follows link tables */
973                 link_tbl_ptr->ptr = cpu_to_be32((struct talitos_ptr *)
974                                                 edesc->dma_link_tbl +
975                                                 edesc->src_nents +
976                                                 edesc->dst_nents + 1);
977
978                 desc->ptr[5].j_extent |= DESC_PTR_LNKTBL_JUMP;
979                 dma_sync_single_for_device(ctx->dev, edesc->dma_link_tbl,
980                                            edesc->dma_len, DMA_BIDIRECTIONAL);
981         }
982
983         /* iv out */
984         map_single_talitos_ptr(dev, &desc->ptr[6], ivsize, ctx->iv, 0,
985                                DMA_FROM_DEVICE);
986
987         return talitos_submit(dev, desc, callback, areq);
988 }
989
990
991 /*
992  * derive number of elements in scatterlist
993  */
994 static int sg_count(struct scatterlist *sg_list, int nbytes)
995 {
996         struct scatterlist *sg = sg_list;
997         int sg_nents = 0;
998
999         while (nbytes) {
1000                 sg_nents++;
1001                 nbytes -= sg->length;
1002                 sg = sg_next(sg);
1003         }
1004
1005         return sg_nents;
1006 }
1007
1008 /*
1009  * allocate and map the ipsec_esp extended descriptor
1010  */
1011 static struct ipsec_esp_edesc *ipsec_esp_edesc_alloc(struct aead_request *areq,
1012                                                      int icv_stashing)
1013 {
1014         struct crypto_aead *authenc = crypto_aead_reqtfm(areq);
1015         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
1016         struct ipsec_esp_edesc *edesc;
1017         int src_nents, dst_nents, alloc_len, dma_len;
1018
1019         if (areq->cryptlen + ctx->authsize > TALITOS_MAX_DATA_LEN) {
1020                 dev_err(ctx->dev, "cryptlen exceeds h/w max limit\n");
1021                 return ERR_PTR(-EINVAL);
1022         }
1023
1024         src_nents = sg_count(areq->src, areq->cryptlen + ctx->authsize);
1025         src_nents = (src_nents == 1) ? 0 : src_nents;
1026
1027         if (areq->dst == areq->src) {
1028                 dst_nents = src_nents;
1029         } else {
1030                 dst_nents = sg_count(areq->dst, areq->cryptlen + ctx->authsize);
1031                 dst_nents = (dst_nents == 1) ? 0 : dst_nents;
1032         }
1033
1034         /*
1035          * allocate space for base edesc plus the link tables,
1036          * allowing for a separate entry for the generated ICV (+ 1),
1037          * and the ICV data itself
1038          */
1039         alloc_len = sizeof(struct ipsec_esp_edesc);
1040         if (src_nents || dst_nents) {
1041                 dma_len = (src_nents + dst_nents + 1) *
1042                                  sizeof(struct talitos_ptr) + ctx->authsize;
1043                 alloc_len += dma_len;
1044         } else {
1045                 dma_len = 0;
1046                 alloc_len += icv_stashing ? ctx->authsize : 0;
1047         }
1048
1049         edesc = kmalloc(alloc_len, GFP_DMA);
1050         if (!edesc) {
1051                 dev_err(ctx->dev, "could not allocate edescriptor\n");
1052                 return ERR_PTR(-ENOMEM);
1053         }
1054
1055         edesc->src_nents = src_nents;
1056         edesc->dst_nents = dst_nents;
1057         edesc->dma_len = dma_len;
1058         edesc->dma_link_tbl = dma_map_single(ctx->dev, &edesc->link_tbl[0],
1059                                              edesc->dma_len, DMA_BIDIRECTIONAL);
1060
1061         return edesc;
1062 }
1063
1064 static int aead_authenc_encrypt(struct aead_request *req)
1065 {
1066         struct crypto_aead *authenc = crypto_aead_reqtfm(req);
1067         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
1068         struct ipsec_esp_edesc *edesc;
1069
1070         /* allocate extended descriptor */
1071         edesc = ipsec_esp_edesc_alloc(req, 0);
1072         if (IS_ERR(edesc))
1073                 return PTR_ERR(edesc);
1074
1075         /* set encrypt */
1076         edesc->desc.hdr = ctx->desc_hdr_template | DESC_HDR_MODE0_ENCRYPT;
1077
1078         return ipsec_esp(edesc, req, NULL, 0, ipsec_esp_encrypt_done);
1079 }
1080
1081 static int aead_authenc_decrypt(struct aead_request *req)
1082 {
1083         struct crypto_aead *authenc = crypto_aead_reqtfm(req);
1084         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
1085         unsigned int authsize = ctx->authsize;
1086         struct ipsec_esp_edesc *edesc;
1087         struct scatterlist *sg;
1088         void *icvdata;
1089
1090         req->cryptlen -= authsize;
1091
1092         /* allocate extended descriptor */
1093         edesc = ipsec_esp_edesc_alloc(req, 1);
1094         if (IS_ERR(edesc))
1095                 return PTR_ERR(edesc);
1096
1097         /* stash incoming ICV for later cmp with ICV generated by the h/w */
1098         if (edesc->dma_len)
1099                 icvdata = &edesc->link_tbl[edesc->src_nents +
1100                                            edesc->dst_nents + 1];
1101         else
1102                 icvdata = &edesc->link_tbl[0];
1103
1104         sg = sg_last(req->src, edesc->src_nents ? : 1);
1105
1106         memcpy(icvdata, (char *)sg_virt(sg) + sg->length - ctx->authsize,
1107                ctx->authsize);
1108
1109         /* decrypt */
1110         edesc->desc.hdr = ctx->desc_hdr_template | DESC_HDR_DIR_INBOUND;
1111
1112         return ipsec_esp(edesc, req, NULL, 0, ipsec_esp_decrypt_done);
1113 }
1114
1115 static int aead_authenc_givencrypt(
1116         struct aead_givcrypt_request *req)
1117 {
1118         struct aead_request *areq = &req->areq;
1119         struct crypto_aead *authenc = crypto_aead_reqtfm(areq);
1120         struct talitos_ctx *ctx = crypto_aead_ctx(authenc);
1121         struct ipsec_esp_edesc *edesc;
1122
1123         /* allocate extended descriptor */
1124         edesc = ipsec_esp_edesc_alloc(areq, 0);
1125         if (IS_ERR(edesc))
1126                 return PTR_ERR(edesc);
1127
1128         /* set encrypt */
1129         edesc->desc.hdr = ctx->desc_hdr_template | DESC_HDR_MODE0_ENCRYPT;
1130
1131         memcpy(req->giv, ctx->iv, crypto_aead_ivsize(authenc));
1132
1133         return ipsec_esp(edesc, areq, req->giv, req->seq,
1134                          ipsec_esp_encrypt_done);
1135 }
1136
1137 struct talitos_alg_template {
1138         char name[CRYPTO_MAX_ALG_NAME];
1139         char driver_name[CRYPTO_MAX_ALG_NAME];
1140         unsigned int blocksize;
1141         struct aead_alg aead;
1142         struct device *dev;
1143         __be32 desc_hdr_template;
1144 };
1145
1146 static struct talitos_alg_template driver_algs[] = {
1147         /* single-pass ipsec_esp descriptor */
1148         {
1149                 .name = "authenc(hmac(sha1),cbc(aes))",
1150                 .driver_name = "authenc-hmac-sha1-cbc-aes-talitos",
1151                 .blocksize = AES_BLOCK_SIZE,
1152                 .aead = {
1153                         .setkey = aead_authenc_setkey,
1154                         .setauthsize = aead_authenc_setauthsize,
1155                         .encrypt = aead_authenc_encrypt,
1156                         .decrypt = aead_authenc_decrypt,
1157                         .givencrypt = aead_authenc_givencrypt,
1158                         .geniv = "<built-in>",
1159                         .ivsize = AES_BLOCK_SIZE,
1160                         .maxauthsize = SHA1_DIGEST_SIZE,
1161                         },
1162                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1163                                      DESC_HDR_SEL0_AESU |
1164                                      DESC_HDR_MODE0_AESU_CBC |
1165                                      DESC_HDR_SEL1_MDEUA |
1166                                      DESC_HDR_MODE1_MDEU_INIT |
1167                                      DESC_HDR_MODE1_MDEU_PAD |
1168                                      DESC_HDR_MODE1_MDEU_SHA1_HMAC,
1169         },
1170         {
1171                 .name = "authenc(hmac(sha1),cbc(des3_ede))",
1172                 .driver_name = "authenc-hmac-sha1-cbc-3des-talitos",
1173                 .blocksize = DES3_EDE_BLOCK_SIZE,
1174                 .aead = {
1175                         .setkey = aead_authenc_setkey,
1176                         .setauthsize = aead_authenc_setauthsize,
1177                         .encrypt = aead_authenc_encrypt,
1178                         .decrypt = aead_authenc_decrypt,
1179                         .givencrypt = aead_authenc_givencrypt,
1180                         .geniv = "<built-in>",
1181                         .ivsize = DES3_EDE_BLOCK_SIZE,
1182                         .maxauthsize = SHA1_DIGEST_SIZE,
1183                         },
1184                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1185                                      DESC_HDR_SEL0_DEU |
1186                                      DESC_HDR_MODE0_DEU_CBC |
1187                                      DESC_HDR_MODE0_DEU_3DES |
1188                                      DESC_HDR_SEL1_MDEUA |
1189                                      DESC_HDR_MODE1_MDEU_INIT |
1190                                      DESC_HDR_MODE1_MDEU_PAD |
1191                                      DESC_HDR_MODE1_MDEU_SHA1_HMAC,
1192         },
1193         {
1194                 .name = "authenc(hmac(sha256),cbc(aes))",
1195                 .driver_name = "authenc-hmac-sha256-cbc-aes-talitos",
1196                 .blocksize = AES_BLOCK_SIZE,
1197                 .aead = {
1198                         .setkey = aead_authenc_setkey,
1199                         .setauthsize = aead_authenc_setauthsize,
1200                         .encrypt = aead_authenc_encrypt,
1201                         .decrypt = aead_authenc_decrypt,
1202                         .givencrypt = aead_authenc_givencrypt,
1203                         .geniv = "<built-in>",
1204                         .ivsize = AES_BLOCK_SIZE,
1205                         .maxauthsize = SHA256_DIGEST_SIZE,
1206                         },
1207                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1208                                      DESC_HDR_SEL0_AESU |
1209                                      DESC_HDR_MODE0_AESU_CBC |
1210                                      DESC_HDR_SEL1_MDEUA |
1211                                      DESC_HDR_MODE1_MDEU_INIT |
1212                                      DESC_HDR_MODE1_MDEU_PAD |
1213                                      DESC_HDR_MODE1_MDEU_SHA256_HMAC,
1214         },
1215         {
1216                 .name = "authenc(hmac(sha256),cbc(des3_ede))",
1217                 .driver_name = "authenc-hmac-sha256-cbc-3des-talitos",
1218                 .blocksize = DES3_EDE_BLOCK_SIZE,
1219                 .aead = {
1220                         .setkey = aead_authenc_setkey,
1221                         .setauthsize = aead_authenc_setauthsize,
1222                         .encrypt = aead_authenc_encrypt,
1223                         .decrypt = aead_authenc_decrypt,
1224                         .givencrypt = aead_authenc_givencrypt,
1225                         .geniv = "<built-in>",
1226                         .ivsize = DES3_EDE_BLOCK_SIZE,
1227                         .maxauthsize = SHA256_DIGEST_SIZE,
1228                         },
1229                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1230                                      DESC_HDR_SEL0_DEU |
1231                                      DESC_HDR_MODE0_DEU_CBC |
1232                                      DESC_HDR_MODE0_DEU_3DES |
1233                                      DESC_HDR_SEL1_MDEUA |
1234                                      DESC_HDR_MODE1_MDEU_INIT |
1235                                      DESC_HDR_MODE1_MDEU_PAD |
1236                                      DESC_HDR_MODE1_MDEU_SHA256_HMAC,
1237         },
1238         {
1239                 .name = "authenc(hmac(md5),cbc(aes))",
1240                 .driver_name = "authenc-hmac-md5-cbc-aes-talitos",
1241                 .blocksize = AES_BLOCK_SIZE,
1242                 .aead = {
1243                         .setkey = aead_authenc_setkey,
1244                         .setauthsize = aead_authenc_setauthsize,
1245                         .encrypt = aead_authenc_encrypt,
1246                         .decrypt = aead_authenc_decrypt,
1247                         .givencrypt = aead_authenc_givencrypt,
1248                         .geniv = "<built-in>",
1249                         .ivsize = AES_BLOCK_SIZE,
1250                         .maxauthsize = MD5_DIGEST_SIZE,
1251                         },
1252                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1253                                      DESC_HDR_SEL0_AESU |
1254                                      DESC_HDR_MODE0_AESU_CBC |
1255                                      DESC_HDR_SEL1_MDEUA |
1256                                      DESC_HDR_MODE1_MDEU_INIT |
1257                                      DESC_HDR_MODE1_MDEU_PAD |
1258                                      DESC_HDR_MODE1_MDEU_MD5_HMAC,
1259         },
1260         {
1261                 .name = "authenc(hmac(md5),cbc(des3_ede))",
1262                 .driver_name = "authenc-hmac-md5-cbc-3des-talitos",
1263                 .blocksize = DES3_EDE_BLOCK_SIZE,
1264                 .aead = {
1265                         .setkey = aead_authenc_setkey,
1266                         .setauthsize = aead_authenc_setauthsize,
1267                         .encrypt = aead_authenc_encrypt,
1268                         .decrypt = aead_authenc_decrypt,
1269                         .givencrypt = aead_authenc_givencrypt,
1270                         .geniv = "<built-in>",
1271                         .ivsize = DES3_EDE_BLOCK_SIZE,
1272                         .maxauthsize = MD5_DIGEST_SIZE,
1273                         },
1274                 .desc_hdr_template = DESC_HDR_TYPE_IPSEC_ESP |
1275                                      DESC_HDR_SEL0_DEU |
1276                                      DESC_HDR_MODE0_DEU_CBC |
1277                                      DESC_HDR_MODE0_DEU_3DES |
1278                                      DESC_HDR_SEL1_MDEUA |
1279                                      DESC_HDR_MODE1_MDEU_INIT |
1280                                      DESC_HDR_MODE1_MDEU_PAD |
1281                                      DESC_HDR_MODE1_MDEU_MD5_HMAC,
1282         }
1283 };
1284
1285 struct talitos_crypto_alg {
1286         struct list_head entry;
1287         struct device *dev;
1288         __be32 desc_hdr_template;
1289         struct crypto_alg crypto_alg;
1290 };
1291
1292 static int talitos_cra_init(struct crypto_tfm *tfm)
1293 {
1294         struct crypto_alg *alg = tfm->__crt_alg;
1295         struct talitos_crypto_alg *talitos_alg =
1296                  container_of(alg, struct talitos_crypto_alg, crypto_alg);
1297         struct talitos_ctx *ctx = crypto_tfm_ctx(tfm);
1298
1299         /* update context with ptr to dev */
1300         ctx->dev = talitos_alg->dev;
1301         /* copy descriptor header template value */
1302         ctx->desc_hdr_template = talitos_alg->desc_hdr_template;
1303
1304         /* random first IV */
1305         get_random_bytes(ctx->iv, TALITOS_MAX_IV_LENGTH);
1306
1307         return 0;
1308 }
1309
1310 /*
1311  * given the alg's descriptor header template, determine whether descriptor
1312  * type and primary/secondary execution units required match the hw
1313  * capabilities description provided in the device tree node.
1314  */
1315 static int hw_supports(struct device *dev, __be32 desc_hdr_template)
1316 {
1317         struct talitos_private *priv = dev_get_drvdata(dev);
1318         int ret;
1319
1320         ret = (1 << DESC_TYPE(desc_hdr_template) & priv->desc_types) &&
1321               (1 << PRIMARY_EU(desc_hdr_template) & priv->exec_units);
1322
1323         if (SECONDARY_EU(desc_hdr_template))
1324                 ret = ret && (1 << SECONDARY_EU(desc_hdr_template)
1325                               & priv->exec_units);
1326
1327         return ret;
1328 }
1329
1330 static int __devexit talitos_remove(struct of_device *ofdev)
1331 {
1332         struct device *dev = &ofdev->dev;
1333         struct talitos_private *priv = dev_get_drvdata(dev);
1334         struct talitos_crypto_alg *t_alg, *n;
1335         int i;
1336
1337         list_for_each_entry_safe(t_alg, n, &priv->alg_list, entry) {
1338                 crypto_unregister_alg(&t_alg->crypto_alg);
1339                 list_del(&t_alg->entry);
1340                 kfree(t_alg);
1341         }
1342
1343         if (hw_supports(dev, DESC_HDR_SEL0_RNG))
1344                 talitos_unregister_rng(dev);
1345
1346         kfree(priv->submit_count);
1347         kfree(priv->tail);
1348         kfree(priv->head);
1349
1350         if (priv->fifo)
1351                 for (i = 0; i < priv->num_channels; i++)
1352                         kfree(priv->fifo[i]);
1353
1354         kfree(priv->fifo);
1355         kfree(priv->head_lock);
1356         kfree(priv->tail_lock);
1357
1358         if (priv->irq != NO_IRQ) {
1359                 free_irq(priv->irq, dev);
1360                 irq_dispose_mapping(priv->irq);
1361         }
1362
1363         tasklet_kill(&priv->done_task);
1364         tasklet_kill(&priv->error_task);
1365
1366         iounmap(priv->reg);
1367
1368         dev_set_drvdata(dev, NULL);
1369
1370         kfree(priv);
1371
1372         return 0;
1373 }
1374
1375 static struct talitos_crypto_alg *talitos_alg_alloc(struct device *dev,
1376                                                     struct talitos_alg_template
1377                                                            *template)
1378 {
1379         struct talitos_crypto_alg *t_alg;
1380         struct crypto_alg *alg;
1381
1382         t_alg = kzalloc(sizeof(struct talitos_crypto_alg), GFP_KERNEL);
1383         if (!t_alg)
1384                 return ERR_PTR(-ENOMEM);
1385
1386         alg = &t_alg->crypto_alg;
1387
1388         snprintf(alg->cra_name, CRYPTO_MAX_ALG_NAME, "%s", template->name);
1389         snprintf(alg->cra_driver_name, CRYPTO_MAX_ALG_NAME, "%s",
1390                  template->driver_name);
1391         alg->cra_module = THIS_MODULE;
1392         alg->cra_init = talitos_cra_init;
1393         alg->cra_priority = TALITOS_CRA_PRIORITY;
1394         alg->cra_flags = CRYPTO_ALG_TYPE_AEAD | CRYPTO_ALG_ASYNC;
1395         alg->cra_blocksize = template->blocksize;
1396         alg->cra_alignmask = 0;
1397         alg->cra_type = &crypto_aead_type;
1398         alg->cra_ctxsize = sizeof(struct talitos_ctx);
1399         alg->cra_u.aead = template->aead;
1400
1401         t_alg->desc_hdr_template = template->desc_hdr_template;
1402         t_alg->dev = dev;
1403
1404         return t_alg;
1405 }
1406
1407 static int talitos_probe(struct of_device *ofdev,
1408                          const struct of_device_id *match)
1409 {
1410         struct device *dev = &ofdev->dev;
1411         struct device_node *np = ofdev->node;
1412         struct talitos_private *priv;
1413         const unsigned int *prop;
1414         int i, err;
1415
1416         priv = kzalloc(sizeof(struct talitos_private), GFP_KERNEL);
1417         if (!priv)
1418                 return -ENOMEM;
1419
1420         dev_set_drvdata(dev, priv);
1421
1422         priv->ofdev = ofdev;
1423
1424         tasklet_init(&priv->done_task, talitos_done, (unsigned long)dev);
1425         tasklet_init(&priv->error_task, talitos_error, (unsigned long)dev);
1426
1427         priv->irq = irq_of_parse_and_map(np, 0);
1428
1429         if (priv->irq == NO_IRQ) {
1430                 dev_err(dev, "failed to map irq\n");
1431                 err = -EINVAL;
1432                 goto err_out;
1433         }
1434
1435         /* get the irq line */
1436         err = request_irq(priv->irq, talitos_interrupt, 0,
1437                           dev_driver_string(dev), dev);
1438         if (err) {
1439                 dev_err(dev, "failed to request irq %d\n", priv->irq);
1440                 irq_dispose_mapping(priv->irq);
1441                 priv->irq = NO_IRQ;
1442                 goto err_out;
1443         }
1444
1445         priv->reg = of_iomap(np, 0);
1446         if (!priv->reg) {
1447                 dev_err(dev, "failed to of_iomap\n");
1448                 err = -ENOMEM;
1449                 goto err_out;
1450         }
1451
1452         /* get SEC version capabilities from device tree */
1453         prop = of_get_property(np, "fsl,num-channels", NULL);
1454         if (prop)
1455                 priv->num_channels = *prop;
1456
1457         prop = of_get_property(np, "fsl,channel-fifo-len", NULL);
1458         if (prop)
1459                 priv->chfifo_len = *prop;
1460
1461         prop = of_get_property(np, "fsl,exec-units-mask", NULL);
1462         if (prop)
1463                 priv->exec_units = *prop;
1464
1465         prop = of_get_property(np, "fsl,descriptor-types-mask", NULL);
1466         if (prop)
1467                 priv->desc_types = *prop;
1468
1469         if (!is_power_of_2(priv->num_channels) || !priv->chfifo_len ||
1470             !priv->exec_units || !priv->desc_types) {
1471                 dev_err(dev, "invalid property data in device tree node\n");
1472                 err = -EINVAL;
1473                 goto err_out;
1474         }
1475
1476         priv->head_lock = kmalloc(sizeof(spinlock_t) * priv->num_channels,
1477                                   GFP_KERNEL);
1478         priv->tail_lock = kmalloc(sizeof(spinlock_t) * priv->num_channels,
1479                                   GFP_KERNEL);
1480         if (!priv->head_lock || !priv->tail_lock) {
1481                 dev_err(dev, "failed to allocate fifo locks\n");
1482                 err = -ENOMEM;
1483                 goto err_out;
1484         }
1485
1486         for (i = 0; i < priv->num_channels; i++) {
1487                 spin_lock_init(&priv->head_lock[i]);
1488                 spin_lock_init(&priv->tail_lock[i]);
1489         }
1490
1491         priv->fifo = kmalloc(sizeof(struct talitos_request *) *
1492                              priv->num_channels, GFP_KERNEL);
1493         if (!priv->fifo) {
1494                 dev_err(dev, "failed to allocate request fifo\n");
1495                 err = -ENOMEM;
1496                 goto err_out;
1497         }
1498
1499         priv->fifo_len = roundup_pow_of_two(priv->chfifo_len);
1500
1501         for (i = 0; i < priv->num_channels; i++) {
1502                 priv->fifo[i] = kzalloc(sizeof(struct talitos_request) *
1503                                         priv->fifo_len, GFP_KERNEL);
1504                 if (!priv->fifo[i]) {
1505                         dev_err(dev, "failed to allocate request fifo %d\n", i);
1506                         err = -ENOMEM;
1507                         goto err_out;
1508                 }
1509         }
1510
1511         priv->submit_count = kmalloc(sizeof(int) * priv->num_channels,
1512                                      GFP_KERNEL);
1513         if (!priv->submit_count) {
1514                 dev_err(dev, "failed to allocate fifo submit count space\n");
1515                 err = -ENOMEM;
1516                 goto err_out;
1517         }
1518         for (i = 0; i < priv->num_channels; i++)
1519                 atomic_set(&priv->submit_count[i], -priv->chfifo_len);
1520
1521         priv->head = kzalloc(sizeof(int) * priv->num_channels, GFP_KERNEL);
1522         priv->tail = kzalloc(sizeof(int) * priv->num_channels, GFP_KERNEL);
1523         if (!priv->head || !priv->tail) {
1524                 dev_err(dev, "failed to allocate request index space\n");
1525                 err = -ENOMEM;
1526                 goto err_out;
1527         }
1528
1529         /* reset and initialize the h/w */
1530         err = init_device(dev);
1531         if (err) {
1532                 dev_err(dev, "failed to initialize device\n");
1533                 goto err_out;
1534         }
1535
1536         /* register the RNG, if available */
1537         if (hw_supports(dev, DESC_HDR_SEL0_RNG)) {
1538                 err = talitos_register_rng(dev);
1539                 if (err) {
1540                         dev_err(dev, "failed to register hwrng: %d\n", err);
1541                         goto err_out;
1542                 } else
1543                         dev_info(dev, "hwrng\n");
1544         }
1545
1546         /* register crypto algorithms the device supports */
1547         INIT_LIST_HEAD(&priv->alg_list);
1548
1549         for (i = 0; i < ARRAY_SIZE(driver_algs); i++) {
1550                 if (hw_supports(dev, driver_algs[i].desc_hdr_template)) {
1551                         struct talitos_crypto_alg *t_alg;
1552
1553                         t_alg = talitos_alg_alloc(dev, &driver_algs[i]);
1554                         if (IS_ERR(t_alg)) {
1555                                 err = PTR_ERR(t_alg);
1556                                 goto err_out;
1557                         }
1558
1559                         err = crypto_register_alg(&t_alg->crypto_alg);
1560                         if (err) {
1561                                 dev_err(dev, "%s alg registration failed\n",
1562                                         t_alg->crypto_alg.cra_driver_name);
1563                                 kfree(t_alg);
1564                         } else {
1565                                 list_add_tail(&t_alg->entry, &priv->alg_list);
1566                                 dev_info(dev, "%s\n",
1567                                          t_alg->crypto_alg.cra_driver_name);
1568                         }
1569                 }
1570         }
1571
1572         return 0;
1573
1574 err_out:
1575         talitos_remove(ofdev);
1576
1577         return err;
1578 }
1579
1580 static struct of_device_id talitos_match[] = {
1581         {
1582                 .compatible = "fsl,sec2.0",
1583         },
1584         {},
1585 };
1586 MODULE_DEVICE_TABLE(of, talitos_match);
1587
1588 static struct of_platform_driver talitos_driver = {
1589         .name = "talitos",
1590         .match_table = talitos_match,
1591         .probe = talitos_probe,
1592         .remove = __devexit_p(talitos_remove),
1593 };
1594
1595 static int __init talitos_init(void)
1596 {
1597         return of_register_platform_driver(&talitos_driver);
1598 }
1599 module_init(talitos_init);
1600
1601 static void __exit talitos_exit(void)
1602 {
1603         of_unregister_platform_driver(&talitos_driver);
1604 }
1605 module_exit(talitos_exit);
1606
1607 MODULE_LICENSE("GPL");
1608 MODULE_AUTHOR("Kim Phillips <kim.phillips@freescale.com>");
1609 MODULE_DESCRIPTION("Freescale integrated security engine (SEC) driver");