Home » Program » パスワード暗号化 (Movable Type 6.0) (Tag: )

Movable Type 6.0 (mt_author テーブル author_password カラム) で使用する暗号化されたパスワードを作成するため、ソースファイルを参考にスクリプト化しました。

ソースファイルを展開したディレクトリを /home/tools/appli/mt.60/ とし、文末に添付したスクリプトを mkhash.pl として保存した場合、引数に文字列を指定することで、管理画面での操作と同様に暗号化されたパスワードが出力されます。

perl mkhash.pl raw_password

MT/Author.pm set_password() を参考に必要な個所のみ切り出しています。Movable Type 5.0 では Perl 標準の crypt() で処理出来ましたが、MT/Auth/MT.pm is_valid_password() を参照する限り、3 タイプの暗号化方式に対応しています。

添付したスクリプトでは、標準で採用されている方式を参考にしました。

#!/usr/bin/perl -w

use strict;
use lib qw ( /home/tools/appli/mt.60/lib /home/tools/appli/mt.60/extlib );

use MT::Util;

    my $pass  = $ARGV[0];
    my @alpha = ( 'a' .. 'z', 'A' .. 'Z', 0 .. 9 );
    my $salt  = join '', map $alpha[ rand @alpha ], 1 .. 16;

    print '{SHA}' . $salt . '$' . MT::Util::perl_sha1_digest_hex($salt . $pass);

Random Select

ビーフ + 野菜カレー (ルー大盛り, 辛さ 70 倍)
カリーライス専門店 エチオピア 本店 (No. 13 – 辛さ 70 倍メドレー 1) を投稿した時は、まさか全メニューを辛さ 70 倍で横断するとは思っていませんでしたが、我ながら凝り性
ドライブラック エクストラコールド
エクストラコールド BAR TOKYO 2013 (Part 1) の続きです。さて、いくつかおつまみもオーダーしてみます。初めて入るところでも慣れているところでも、まず枝豆を探してオーダーします。枝
カフェくるくま (3)
沖縄出張も先日の出張 (05/27 – 06/09) で 16 回目でした。大抵 2 週間の滞在型で出張するので、土・日を 1 回は含みます。その度いろいろと連れて行ってもらうことも多いの
瀬底大橋 (2)
沖縄本島 (No. 3 – 本部港 Part 2) の続きです。出発して 2 分程で、あっと言う間に瀬底大橋が迫って来ました。さらにまた 1 分程経過。渡ったことは 2, 3 度ありますが
超クリーミー泡サーバー (12)
新開発 ! 超クリーミー泡サーバー (Part 5) の続きです。せっかくですから、旧バージョンのクリーミー生サーバーと並べてみました。デザイン的には超クリーミー泡サーバーの方が好みではあります。果た
石垣牛炙り握り
石垣島 (No. 2 – まかない屋) の続きです。軽めな量がらも気持ちは満たされた "まかない屋" を後にして 730 交差点に戻り、美崎町を中心に少し散策しました。
伊江島 (6)
沖縄本島 (No. 4 – 瀬底大橋) の続きです。出発して 15 分弱で肉眼でもはっきりと伊江島が迫ってくるのが分かります。普通に写真を撮っている様に見えるかもしれませんが、風がものすご
揚げずにからあげ (鮭) + 釜揚しらす
揚げずにからあげ (鮭 Part 1) の続きです。今回の調理に用意したかの様にちょうど良いサイズのフライパンがありました。小さじ 2 杯程のサラダ油を引いて熱した後、いよいよ焼き始めます。並べる前に
eco かまど (14)
長谷園 eco かまど (目止め) の続きです。目止めが終わった後に待ち望んでいた白米を炊くべく、すでに研いで浸水は済ませていました。まずは二合で試してみます。説明書きの手順は以下の通りです。360m
八重山そば + チャーハン
黒島 (No. 6 – 黒島展望台) の続きです。黒島から戻って、やや遅いランチとすることにしました。知り合いから奨められていた 味処 岩 は石垣港離島ターミナルから歩ける距離なので、黒島
Valid HTML5 Valid CSS3 Another HTML Lint