Skip to main content
  • Home
  • login
  • Browse the archive

    swh mirror partner logo
swh logo
SoftwareHeritage
Software
Heritage
Mirror
Features
  • Search

  • Downloads

  • Save code now

  • Add forge now

  • Help

Revision dfeab0689f69c0b4bd3480ffd37a9cacc2f17d9c authored by Ralf S. Engelschall on 21 December 1998, 11:00:56 UTC, committed by Ralf S. Engelschall on 21 December 1998, 11:00:56 UTC
Import of old SSLeay release: SSLeay 0.9.1b (unreleased)
1 parent 58964a4
  • Files
  • Changes
  • 2f74e0c
  • /
  • perl
  • /
  • cipher.pl
Raw File
Cook and download a directory from the Software Heritage Vault

You have requested the cooking of the directory with identifier None into a standard tar.gz archive.

Are you sure you want to continue ?

Download a directory from the Software Heritage Vault

You have requested the download of the directory with identifier None as a standard tar.gz archive.

Are you sure you want to continue ?

Cook and download a revision from the Software Heritage Vault

You have requested the cooking of the history heading to revision with identifier swh:1:rev:dfeab0689f69c0b4bd3480ffd37a9cacc2f17d9c into a bare git archive.

Are you sure you want to continue ?

Download a revision from the Software Heritage Vault

You have requested the download of the history heading to revision with identifier swh:1:rev:dfeab0689f69c0b4bd3480ffd37a9cacc2f17d9c as a bare git archive.

Are you sure you want to continue ?

Invalid Email !

The provided email is not well-formed.

Download link has expired

The requested archive is no longer available for download from the Software Heritage Vault.

Do you want to cook it again ?

Permalinks

To reference or cite the objects present in the Software Heritage archive, permalinks based on SoftWare Hash IDentifiers (SWHIDs) must be used.
Select below a type of object currently browsed in order to display its associated SWHID and permalink.

  • revision
  • content
revision badge
swh:1:rev:dfeab0689f69c0b4bd3480ffd37a9cacc2f17d9c
content badge Iframe embedding
swh:1:cnt:efc712fdf58bb3134ee8db89b47a5d51a5da2b99
cipher.pl
#!/usr/local/bin/perl

use ExtUtils::testlib;

use SSLeay;

$md=SSLeay::MD::new("md5");

foreach (@SSLeay::Cipher::names)
	{
	($c=SSLeay::Cipher::new($_)) ||
		die "'$_' is an unknown cipher algorithm\n";


	$data="012345678abcdefghijklmnopqrstuvwxyz";
	$c->init("01234567abcdefghABCDEFGH","zyxwvut",1);

	$in =$c->update(substr($data, 0, 5));
	$in.=$c->update(substr($data, 5,10));
	$in.=$c->update(substr($data,15,1));
	$in.=$c->update(substr($data,16));

	$in.=$c->final();

	$c->init("01234567abcdefghABCDEFGH","zyxwvut",0);
	$out=$c->update($in);
	$out.=$c->final();

	($out eq $data) || die "decrypt for $_ failed:$!\n";

	$md->init();
	$md->update($in);
	$digest=$md->final();

	print unpack("H*",$digest);
	printf " %2d %2d %2d %s\n", $c->key_length(), $c->iv_length(),
		$c->block_size(), $c->name();
	}

The diff you're trying to view is too large. Only the first 1000 changed files have been loaded.
Showing with 0 additions and 0 deletions (0 / 0 diffs computed)
swh spinner

Computing file changes ...

ENEA — Copyright (C), ENEA. License: GNU AGPLv3+.
Legal notes  ::  JavaScript license information ::  Web API

back to top