Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Fortran

Idiom #310 Fill array with random bytes

Fill the byte array a with randomly generated bytes.

use, intrinsic:: iso_fortran_env, only: int8
  real, dimension(100) :: b
  integer(int8), dimension(100) :: a
  call random_number(b)
  a = b*256 - 128

Fortran has no "byte" type per se, but it has (if supported) an integer type with 8 bits, which has the kind from iso_fortran_env. The intrinsic subroutine random_number returns random numbers in the range of [0..1[.
import "crypto/rand"
_, err := rand.Read(a)

The package crypto/rand is secure (but slower than math/rand)
New implementation...
< > ⌨
programming-idioms.org 
  real, dimension(100) :: b
  integer(int8), dimension(100) :: a
  call random_number(b)
  a = b*256 - 128
_, err := rand.Read(a)
new Random().nextBytes(a);
for b in a do b := random(256);
my $s = random_bytes( $number_of_bytes );
my @a = split //, $s;
my $n = 20;

my $bytestring;
foreach my $i (0 .. $n*8 - 1) {
    vec($bytestring, $i, 1) = rand(2);
}


a[:] = random.randbytes(len(a))
a = random.randbytes(N)
a = SecureRandom.random_bytes(a.length)
let mut rng = rand::thread_rng();
rng.fill(&mut a);