From 6a28d5c6cc1b2e7a7837d738e82cb49f80f93854 Mon Sep 17 00:00:00 2001 From: Peng Li Date: Wed, 8 Mar 2017 23:20:59 +0800 Subject: [PATCH] bin - Add script to encrypt/decrypt file --- bin/filedec | 15 +++++++++++++++ bin/fileenc | 15 +++++++++++++++ 2 files changed, 30 insertions(+) create mode 100755 bin/filedec create mode 100755 bin/fileenc diff --git a/bin/filedec b/bin/filedec new file mode 100755 index 0000000..fa0ad30 --- /dev/null +++ b/bin/filedec @@ -0,0 +1,15 @@ +#!/usr/bin/perl -w +# +use strict; + +#https://www.madboa.com/geek/openssl/#how-do-i-create-an-md5-or-sha1-digest-of-a-file +# +# encrypt the file using 256-bit AES in CBC mode +# +# Usage: filedec inFile +# +my $inFile = shift or die "Usage: $0 in_file \n"; +my $outFile = shift || ""; + +my $command = "openssl enc -d -aes-256-cbc -in $inFile " . ($outFile && "-out $outFile"); +print `$command`; diff --git a/bin/fileenc b/bin/fileenc new file mode 100755 index 0000000..0907601 --- /dev/null +++ b/bin/fileenc @@ -0,0 +1,15 @@ +#!/usr/bin/perl -w +# +use strict; + +#https://www.madboa.com/geek/openssl/#how-do-i-create-an-md5-or-sha1-digest-of-a-file +# +# encrypt the file using 256-bit AES in CBC mode +# +# Usage: fileenc inFile + +my $inFile = shift or die "Usage: $0 in_file \n"; +my $outFile = shift || ""; + +my $command = "openssl enc -aes-256-cbc -salt -in $inFile " . ($outFile && "-out $outFile"); +print $command; -- 2.11.0