Кодирование в base32 из оболочки


9

Я ищу, чтобы закодировать входную строку в кодировку base32 непосредственно из оболочки. Я собираюсь сделать это в Ubuntu, но я думаю, что аромат здесь не имеет особого значения.

Существуют ли какие-либо инструменты для Linux / Unix, чтобы просто сделать это?

Что-то вроде:

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

Ответы:


10

Хм, быстрый поиск пакетов не дает ничего похожего на отдельную утилиту.

С другой стороны, это показывает, что есть соответствующая библиотека Perl, и достаточно легко создать быстрый Perl-скрипт. Что-то вроде:

$ sudo apt-get install libmime-base32-perl

И тогда такой скрипт 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";

Так:

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

Достаточно редкая запись CPAN: http://search.cpan.org/~danpeder/MIME-Base32-1.01/Base32.pm

Таким образом, небольшие изменения позволят вам также делать декодирование.


2

Просто улучшение cjc превосходного ответа, чтобы у нас была base32утилита, которая работает аналогично base64тому, как мы можем кодировать и декодировать:

#! /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";
}

Тестовое задание:

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


2

Используя Python:

$ 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'

0
  1. Установить perl-MIME-Base32.noarch:

    yum install perl-MIME-Base32.noarch
    
  2. Сохраните скрипт в имени файла 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"
    
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.