1 |
|
2 |
=encoding euc-jp |
3 |
|
4 |
=head1 名前 |
5 |
|
6 |
Crypt::OOEnigma::Rotor - Crypt::OOEnigmaで使うためのRotorオブジェクト |
7 |
|
8 |
=head1 概要 |
9 |
|
10 |
my $rotor = Crypt::OOEnigma::Rotor->new(); |
11 |
|
12 |
# あるいは |
13 |
my $subHash ={ # A..Z全ての暗号のための置換コード |
14 |
A => "Z", |
15 |
B => "G", |
16 |
# など |
17 |
}; |
18 |
my $freq = 2 ; # ローテーションのたびに暗号化される文字の数 |
19 |
my $start_position = 20 ; # モジュロ 26 |
20 |
my $rotor = Crypt::OOEnigma::Rotor->new(cipher => $subHash, |
21 |
freq => $freq |
22 |
start_position => $pos); |
23 |
|
24 |
|
25 |
# Enigma machinesでの内部利用のため: |
26 |
$rotor->init(); # その内部状態のためRotorを返します |
27 |
my $op = $rotor->encode($some_letter); # 前方向での文字のエンコード |
28 |
$op = $rotor->revencode($some_letter); # 逆方向での文字のエンコード |
29 |
$rotor->next(); # 次のエンコードのための準備、必要に合わせて回転 |
30 |
$rotor->rotate(); # 次の位置に回転 |
31 |
|
32 |
=head1 説明 |
33 |
|
34 |
これはCrypt::OOEnigmaで使われるRotorです。特定のプロパティを持った |
35 |
独自のエニグマを作りたいときに、お使いください。 |
36 |
|
37 |
=head1 注意 |
38 |
|
39 |
何もありません |
40 |
|
41 |
=head1 バグと警告 |
42 |
|
43 |
=head2 エニグマは脆弱です! |
44 |
|
45 |
暗号の専門家はコンピュータ的にやぶれやすいかどうかという面から |
46 |
暗号アルゴリズムの強さを語ります。もちろんエニグマ暗号はコンピュータ的には |
47 |
やぶられやすいものです。そのため重要なものには使わないでください! |
48 |
|
49 |
=head1 歴史 |
50 |
|
51 |
このパッケージはOO PerlとCPANのための適切な準備の練習のため、2002年の春に |
52 |
作成されました。さらに重要なことはEnigmaが面白いことです。 |
53 |
|
54 |
CPANにはオブジェクト指向ではなく、1つのEnigmaだけを実装している |
55 |
Crypt::Enigmaが既にありました。(これに対してこれらのオブジェクトでエニグマに似た |
56 |
機械を作ることができます)。そのためこのパッケージをCrypt::OOEnigmaと |
57 |
名付けました。 |
58 |
|
59 |
=head1 参考資料 |
60 |
|
61 |
The Pleasures of Counting, T W Korner, CUP 1996. A great book for anyone with |
62 |
the slightest interest in mathematics |
63 |
ISBN 0 521 56087 X hardback |
64 |
ISBN 0 521 56823 4 paperback |
65 |
|
66 |
Crypt::OOEnigma::Military |
67 |
|
68 |
コンポーネント |
69 |
Crypt::OOEnigma::Rotor |
70 |
Crypt::OOEnigma::Reflector |
71 |
Crypt::OOEnigma::Plugboard |
72 |
|
73 |
=head1 著作権(=COPYRIGHT) |
74 |
|
75 |
This package is licenced under the same terms as Perl itself. |
76 |
|
77 |
=head1 翻訳者 |
78 |
|
79 |
川合孝典 (GCD00051@nifty.ne.jp) |