/* -*-c-*-
*
- * $Id: rc4.c,v 1.2 1999/12/10 23:27:35 mdw Exp $
+ * $Id: rc4.c,v 1.3 1999/12/13 15:34:01 mdw Exp $
*
* The alleged RC4 stream cipher
*
/*----- Revision history --------------------------------------------------*
*
* $Log: rc4.c,v $
+ * Revision 1.3 1999/12/13 15:34:01 mdw
+ * Add support for seeding from a generic pseudorandom source.
+ *
* Revision 1.2 1999/12/10 23:27:35 mdw
* Generic cipher and RNG interfaces.
*
case GRAND_SEEDINT:
case GRAND_SEEDUINT32:
case GRAND_SEEDBLOCK:
+ case GRAND_SEEDRAND:
rc = 1;
break;
default:
size_t sz = va_arg(ap, size_t);
rc4_init(&g->rc4, p, sz);
} break;
+ case GRAND_SEEDRAND: {
+ grand *rr = va_arg(ap, grand *);
+ octet buf[16];
+ rr->ops->fill(rr, buf, sizeof(buf));
+ rc4_init(&g->rc4, buf, sizeof(buf));
+ } break;
+ default:
+ GRAND_BADOP;
+ break;
}
va_end(ap);