annotate lib/arcfour.c @ 40057:b06060465f09

maint: Run 'make update-copyright'
author Paul Eggert <eggert@cs.ucla.edu>
date Tue, 01 Jan 2019 00:25:11 +0100
parents 10eb9086bea0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
1 /* arcfour.c --- The arcfour stream cipher
40057
b06060465f09 maint: Run 'make update-copyright'
Paul Eggert <eggert@cs.ucla.edu>
parents: 19484
diff changeset
2 * Copyright (C) 2000-2003, 2005-2006, 2009-2019 Free Software Foundation, Inc.
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
3 *
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
4 * This file is free software; you can redistribute it and/or modify
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
5 * it under the terms of the GNU General Public License as published
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
6 * by the Free Software Foundation; either version 2, or (at your
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
7 * option) any later version.
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
8 *
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
9 * This file is distributed in the hope that it will be useful, but
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
10 * WITHOUT ANY WARRANTY; without even the implied warranty of
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
12 * General Public License for more details.
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
13 *
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
14 * You should have received a copy of the GNU General Public License
19190
9759915b2aca all: prefer https: URLs
Paul Eggert <eggert@cs.ucla.edu>
parents: 18626
diff changeset
15 * along with this file; if not, see <https://www.gnu.org/licenses/>.
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
16 *
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
17 */
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
18
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
19 /* Code from Libgcrypt adapted for gnulib by Simon Josefsson. */
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
20
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
21 /*
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
22 * For a description of the algorithm, see:
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
23 * Bruce Schneier: Applied Cryptography. John Wiley & Sons, 1996.
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
24 * ISBN 0-471-11709-9. Pages 397 ff.
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
25 */
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
26
7584
a88f85e4728f * lib/arcfour.c: Assume config.h.
Eric Blake <ebb9@byu.net>
parents: 6423
diff changeset
27 #include <config.h>
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
28
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
29 #include "arcfour.h"
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
30
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
31 void
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
32 arcfour_stream (arcfour_context * context, const char *inbuf, char *outbuf,
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 7584
diff changeset
33 size_t length)
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
34 {
6423
4e611c25a13f Fix arcfour module.
Simon Josefsson <simon@josefsson.org>
parents: 6377
diff changeset
35 uint8_t i = context->idx_i;
4e611c25a13f Fix arcfour module.
Simon Josefsson <simon@josefsson.org>
parents: 6377
diff changeset
36 uint8_t j = context->idx_j;
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
37 char *sbox = context->sbox;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
38
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
39 for (; length > 0; length--)
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
40 {
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
41 char t;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
42
6423
4e611c25a13f Fix arcfour module.
Simon Josefsson <simon@josefsson.org>
parents: 6377
diff changeset
43 i++;
4e611c25a13f Fix arcfour module.
Simon Josefsson <simon@josefsson.org>
parents: 6377
diff changeset
44 j += sbox[i];
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
45 t = sbox[i];
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
46 sbox[i] = sbox[j];
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
47 sbox[j] = t;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
48 *outbuf++ = (*inbuf++
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 7584
diff changeset
49 ^ sbox[(0U + sbox[i] + sbox[j]) % ARCFOUR_SBOX_SIZE]);
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
50 }
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
51
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
52 context->idx_i = i;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
53 context->idx_j = j;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
54 }
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
55
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
56 void
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
57 arcfour_setkey (arcfour_context * context, const char *key, size_t keylen)
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
58 {
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
59 size_t i, j, k;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
60 char *sbox = context->sbox;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
61
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
62 context->idx_i = context->idx_j = 0;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
63 for (i = 0; i < ARCFOUR_SBOX_SIZE; i++)
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
64 sbox[i] = i;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
65 for (i = j = k = 0; i < ARCFOUR_SBOX_SIZE; i++)
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
66 {
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
67 char t;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
68 j = (j + sbox[i] + key[k]) % ARCFOUR_SBOX_SIZE;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
69 t = sbox[i];
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
70 sbox[i] = sbox[j];
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
71 sbox[j] = t;
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
72 if (++k == keylen)
12421
e8d2c6fc33ad Use spaces for indentation, not tabs.
Bruno Haible <bruno@clisp.org>
parents: 7584
diff changeset
73 k = 0;
6377
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
74 }
da7777b11fa2 Add arcfour module.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
75 }