File: random128binary.c

package info (click to toggle)
courier 0.47-4sarge5
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 32,680 kB
  • ctags: 12,265
  • sloc: ansic: 164,045; cpp: 23,863; sh: 19,569; perl: 7,225; makefile: 4,192; yacc: 316; sed: 16
file content (40 lines) | stat: -rw-r--r-- 719 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
/*
** Copyright 2002 Double Precision, Inc.
** See COPYING for distribution information.
*/

#if	HAVE_CONFIG_H
#include	"config.h"
#endif

#if	HAVE_UNISTD_H
#include	<unistd.h>
#endif
#include	<ctype.h>
#include	<string.h>
#include	"random128.h"

static const char rcsid[]="$Id: random128binary.c,v 1.1 2002/07/01 03:17:05 mrsam Exp $";

static int nyb(char c)
{
	static const char xdigit[]="0123456789ABCDEF";

	const char *p=strchr(xdigit, c);

	if (p)
		return (p-xdigit);
	return 0;
}

void random128_binary(random128binbuf *bytes)
{
	char randombuf[ 128 / 8 * 2 + 1];
	char *p;
	int i;

	strcpy(randombuf, random128());

	for (i=0; i<128/8; i++)
		(*bytes)[i]=(nyb(randombuf[i*2]) << 4) | nyb(randombuf[i*2+1]);
}