From: Peng Li Date: Wed, 8 Mar 2017 15:20:59 +0000 (+0800) Subject: bin - Add script to encrypt/decrypt file X-Git-Url: http://47.100.26.94:8080/?a=commitdiff_plain;h=6a28d5c6cc1b2e7a7837d738e82cb49f80f93854;p=dotfiles.git bin - Add script to encrypt/decrypt file --- 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;