2

テキストファイルをバイトシフトする必要があります。私は perl についてまったく何も知りませんが、perl でmoz-byteshift.plという完全に機能するコードを見つけました(ドキュメンテーション)。これはまさに私がやりたいことですが、C# で行う必要があります。

perl ファイルのソース コードは次のとおりです。

#!/usr/bin/perl

# To perform a byteshift of 7
#   To decode: moz-byteshift.pl -s -7 <infile >outfile
#   To encode: moz-byteshift.pl -s  7 <infile >outfile

# To perform a byteshift of 13
#   To decode: moz-byteshift.pl -s -13 <infile >outfile
#   To encode: moz-byteshift.pl -s  13 <infile >outfile

use encoding 'latin1';
use strict;
use Getopt::Std;

use vars qw/$opt_s/;

getopts("s:");
if(!defined $opt_s) {
  die "Missing shift\n";
}

my $buffer;
while(1) {
  binmode(STDIN, ":raw");
  my $n=sysread STDIN, $buffer, 1;
  if($n == 0) {
    last;
  }
  my $byte = unpack("c", $buffer);
  $byte += 512 + $opt_s;
  $buffer = pack("c", $byte);
  binmode(STDOUT, ":raw");
  syswrite STDOUT, $buffer, 1;
}

誰かが少なくとも perl スクリプトがどのように機能するかを説明できれば、それは素晴らしいことです。C# での同等のサンプル コードの方がよいでしょう。=)

助けてくれてありがとう。

4

3 に答える 3

4

言うことはあまりありません。一度に1バイトずつファイルを読み取り、各バイトの値を任意の値（-sフラグで指定）で調整し、調整されたバイトを書き出します。これは、テキストファイルのROT-13暗号化に相当するバイナリです。

残りの詳細は、Perlがそれらのことをどのように行うかに固有のものです。getopts（）は、コマンドラインスイッチを処理する（Getopt :: Stdモジュールからの）関数です。binmode（）は、ファイルハンドルをrawモードにして、PerlがI/O中に通常行う魔法をバイパスします。sysread（）およびsyswrite（）関数は、低レベルのストリームアクセスに使用されます。pack（）およびunpack（）関数は、バイナリデータの読み取りと書き込みに使用されます。Perlはネイティブタイプを行いません。

これは、Cで再実装するのは簡単です。C＃に直接移植するのではなく、それを実行する（そして必要に応じてC＃からバインドする）ことをお勧めします。

于 2009-05-15T04:05:28.317 に答える
1

他の回答から判断すると、C# で同等のものは次のようになります。

using(Stream sIn = new FileStream(inPath))
{
  using(Stream sOut = new FileStream(outPath))
  {
    int b = sIn.ReadByte();
    while(b >= 0)
    {
      b = (byte)b+1; // or some other value
      sOut.WriteByte((byte)b);
      b = sIn.ReadByte();
    }
    sOut.Close();
  }
  sIn.Close();
}
于 2009-05-15T13:36:20.520 に答える
1

コードは次のようになります: 標準入力から各バイトを 1 つずつ読み取ります (raw モードに切り替えた後、変換は行われません)。アンパックは、読み取ったばかりの文字のバイト値を取得するため、「0」の読み取りは 0x30 に変わります。この変換が一貫するように、latin1 エンコーディングが選択されます (たとえば、http://www.cs.tut.fi/~jkorpela/latin9.htmlを参照してください)。

次に、モジュラス操作をシミュレートするために、-s オプションを使用してコマンド ラインで指定された値が 512 と共にこのバイトに追加されます。このように、-s 0、-s 256 などは同等です。次のパックがそれを処理すると想定していたので、なぜこれが必要なのかはわかりませんが、そこに入れる正当な理由があったに違いないと思います.

次に、生のバイトを標準入力に書き込みます。

文字 012345 を含むファイルで実行すると、次のようになります (データはDATAセクションに入れました)。

E:\Test> byteshift.pl -s 1 | xxd
0000000: 3132 3334 3536 0b                        123456.

各バイト値は 1 ずつ増加します。

E:\Test> byteshift.pl -s 257 | xxd
0000000: 3132 3334 3536 0b                        123456.

257 % 256 = 1 を思い出してください。

$byte += $opt_s;
$byte %= 256;

コードで使用される単一のステップに相当します。

ずっと後: OK、私は C# を知りませんが、オンライン ドキュメントを使用してまとめることができたものを次に示します。C# を知っている人はこれを修正する必要があります。

using System;
using System.IO;

class BinaryRW {
    static void Main(string[] args) {
        BinaryWriter binWriter = new BinaryWriter(
                Console.OpenStandardOutput()
                );
        BinaryReader binReader = new BinaryReader(
                Console.OpenStandardInput()
                );

        int delta;

        if ( args.Length < 1 
                || ! int.TryParse( args[0], out delta ) )
        {
            Console.WriteLine(
                    "Provide a non-negative delta on the command line"
                    );
        } 
        else {       
            try  {
                while ( true ) {
                    int bin = binReader.ReadByte();
                    byte bout = (byte) ( ( bin + delta ) % 256 );
                    binWriter.Write( bout );
                }
            }

            catch(EndOfStreamException) { }

            catch(ObjectDisposedException) { }

            catch(IOException e) {
                Console.WriteLine( e );        
            }

            finally {
                binWriter.Close();
                binReader.Close();

            }
        }
    }
}

E:\Test> xxd bin
0000000: 3031 3233 3435 0d0a 0d0a                 012345....

E:\Test> b 0 < bin | xxd
0000000: 3031 3233 3435 0d0a 0d0a                 012345....

E:\Test> b 32 < bin | xxd
0000000: 5051 5253 5455 2d2a 2d2a                 PQRSTU-*-*

E:\Test> b 257 < bin | xxd
0000000: 3132 3334 3536 0e0b 0e0b                 123456....
于 2009-05-15T13:29:50.473 に答える