<commit_before>#!/usr/bin/env perl
#
# ====================================================================
# Written by <NAME> <<EMAIL>> for the OpenSSL
# project. Rights for redistribution and usage in source and binary
# forms are granted according to the OpenSSL license.
# ====================================================================
#
# Version 1.0.
#
# aes-*-cbc benchmarks are improved by 50% [compared to gcc 3.3.2 on
# Opteron 240 CPU] plus all the bells-n-whistles from 32-bit version
# [you'll notice a lot of resemblance], such as compressed S-boxs
# and prefetch of these tables in CBC mode, as well as avoiding L1
# cache aliasing between stack frame and key schedule and already
# mentioned tables.
#
# ECB performance is 15.6 cycles per processed byte for 128-bit key.

$output=shift;
open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output";

$code=".text\n";
<commit_msg>Commentary section update.<commit_after>#!/usr/bin/env perl
#
# ====================================================================
# Written by <NAME> <<EMAIL>> for the OpenSSL
# project. Rights for redistribution and usage in source and binary
# forms are granted according to the OpenSSL license.
# ====================================================================
#
# Version 1.0.
#
# aes-*-cbc benchmarks are improved by 50% [compared to gcc 3.3.2 on
# Opteron 240 CPU] plus all the bells-n-whistles from 32-bit version
# [you'll notice a lot of resemblance], such as compressed S-boxes
# in little-endian byte order, prefetch of these tables in CBC mode,
# as well as avoiding L1 cache aliasing between stack frame and key
# schedule and already mentioned tables.
#
# Performance in number of cycles per processed byte for 128-bit key:
#
#		ECB		CBC encrypt
# AMD64		15.6		14.6(*)
# EM64T		23.3(**)	21.4(*)
#
# (*)	CBC benchmarks are better than ECB thanks to custom ABI used
#	by the private block encryption function.
# (**)	This module exhibits virtually same ECB performance as 32-bit
#	counterpart on [current] Intel CPU.

$output=shift;
open STDOUT,"| $^X ../perlasm/x86_64-xlate.pl $output";

$code=".text\n";

{'fraction_non_alphanumeric': 0.22091380122468204, 'fraction_numerical': 0.0287329251059821, 'mean_word_length': 4.725067385444744, 'pattern_counts': {'":': 0, '<': 9, '<?xml version=': 0, '>': 9, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '941593', 'n_tokens_mistral': 687, 'n_tokens_neox': 596, 'n_words': 251}