Início / unix / Perguntas / 411938
Accepted
Att Righ
Asked: 2017-12-20 16:25:20 +0800 CST

Como faço para converter um fluxo de números ASCII separados por nova linha em binário (e vice-versa)?

  • 772

Isso ocorre no contexto de interação com /dev/dspe pacat.

Eu gostaria de ser capaz de especificar o mecanismo de codificação (big versus little endian, char/short/long).

Como bônus, pode ser bom ter algum tipo de empacotamento de estruturas binárias.

Basicamente, estou pensando em algo como o dtype do numpy, mas no shell.

Exemplo de entrada/saída

> seq 11 | bincat --big -n 1 | hd
01 02 03 04 05 06 07 08
09 0A 0B
binary

1 respostas

  1. Best Answer

    As linguagens de programação não devem ter problemas com esta tarefa; aqui está uma maneira de empacotar inteiros de 64 bits (big ou little endian) e 32, 16 e 8 bits nativos de uma lista de números na entrada

    $ cat input
-1
2
$ < input perl -pe '$_=pack "q>",$_' | xxd
00000000: ffff ffff ffff ffff 0000 0000 0000 0002  ................
$ < input perl -pe '$_=pack "q<",$_' | xxd
00000000: ffff ffff ffff ffff 0200 0000 0000 0000  ................
$ < input perl -pe '$_=pack "l",$_' | xxd
00000000: ffff ffff 0200 0000                      ........
$ < input perl -pe '$_=pack "s",$_' | xxd
00000000: ffff 0200                                ....
$ < input perl -pe '$_=pack "c",$_' | xxd
00000000: ff02                                     ..
$

    A outra maneira requer saber o que o binário foi escrito, caso contrário, os números podem sair errados

    $ jot 255 | perl -pe '$_=pack "l>",$_' > 32big
$ < 32big perl -nE 'say for unpack "l*",$_' | head -3
16777216
33554432
50331648
$ < 32big perl -nE 'say for unpack "l>*",$_' | head -3
1
2
3
$
    • 1

relate perguntas