Kodowanie do base32 z powłoki

Chcę zakodować ciąg wejściowy do kodowania base32 bezpośrednio z powłoki. Chcę to zrobić w Ubuntu, ale wyobrażam sobie, że smak nie ma tutaj szczególnego znaczenia.

Czy istnieją dostępne narzędzia linux / unix, które po prostu to robią?

Coś w stylu:

-bash-3.2$ echo -n 'hello' | base32

Hmm, szybkie wyszukiwanie pakietów nie daje nic takiego jak pojedyncze, niezależne narzędzie.

Z drugiej strony pokazuje, że istnieje odpowiednia biblioteka Perla i łatwo jest przygotować szybki skrypt perla. Coś jak:

$ sudo apt-get install libmime-base32-perl

A potem skrypt taki jak base32enc.pl:

#!/usr/bin/perl

use MIME::Base32 qw( RFC );

undef $/;  # in case stdin has newlines
$string = <STDIN>;

$encoded = MIME::Base32::encode($string);

print "$encoded\n";

Więc:

$ echo -n "hello" | ./base32enc.pl
NBSWY3DP

Dość rzadki wpis CPAN to: http://search.cpan.org/~danpeder/MIME-Base32-1.01/Base32.pm

Tak więc niewielka zmiana pozwoli również na dekodowanie.

Tylko ulepszenie doskonałej odpowiedzi cjc, dzięki czemu możemy mieć base32narzędzie, które działa podobnie do base64sposobu, w jaki możemy kodować i dekodować:

#! /usr/bin/perl

use MIME::Base32;
use strict;

undef $/;

my $string = <STDIN>;
my $changed;

if ( $ARGV[0] eq "-d" ){
        $changed = MIME::Base32::decode($string);
}else{
        $changed = MIME::Base32::encode($string); 
}

if ( $changed =~ /\n$/ ) {
    printf $changed;
}else{
    printf $changed . "\n";
}

Test:

$ base32 < <(echo -n 'abcdef')
MFRGGZDFMY
$ base32 -d < <(echo  'MFRGGZDFMY')
abcdef

Jest instalowany domyślnie w Ubuntu 16.04 jako część coreutils :

$ which base32
/usr/bin/base32

Za pomocą Pythona:

$ python
Python 2.7.14 (default, Sep 27 2017, 12:15:00) 
[GCC 4.2.1 Compatible Apple LLVM 9.0.0 (clang-900.0.37)] on darwin
Type "help", "copyright", "credits" or "license" for more information.
>>> import base64
>>> base64.b32encode('hello')
'NBSWY3DP'

1. Zainstaluj perl-MIME-Base32.noarch:

   yum install perl-MIME-Base32.noarch
   

2. Zapisz skrypt w nazwie pliku bas32:

   #!/usr/bin/perl
   
   use MIME::Base32 qw( RFC );
   
   undef $/;  # in case stdin has newlines
   $ed=$ARGV[0];
   $string=$ARGV[1];
   if ($ed eq "-e")
   {
   $encoded = MIME::Base32::encode($string);
   print "$encoded\n";
   }
   elsif ($ed eq "-d")
   {
   $decoded = MIME::Base32::decode($string);
   print "$decoded\n";
   }
   else { print " please pass option also\n";
   exit;
   }
   
   chmod +x base32
   cp base32 /usr/bin/
   base32 -e string
   base32 -d "any encoded value"