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

VAIO Fit 13A (7)
VAIO Fit 13A (到着) の続きです。バックライトキーボードと MacBook のトラックパッドに似たタッチパッドにすっかり惚れました。ところが、設定変更は簡単には済みませんでした。VAIO
今帰仁城跡 (1)
沖縄本島 (No. 11 – 首里ほりかわ) の続きです。首里城には 2 度行ったことがありますが、沖縄には城跡が点在すると聞いています。今回は中城城跡と今帰仁城跡を訪れてみました。いずれ
カフェテリア・スタイル
レンタルサーバ (ホスティングサービス) にカフェテリア・スタイルと聞くと、違和感を感じるかもしれません。世間では BTO (Build to Order) の方が通りが良いでしょう。現在の 共有サー
名物チャントン
ここ最近、銀座でランチする時に気になっているお店があります。いさば (日本一美味しいサバの塩焼き) はすでに定番ですが、銀座 いし井 (中華せいろ) との間に挟まれている 元祖 博多チャンポン ハカタ
川平湾 (3)
石垣島 (No. 6 – 明石食堂) の続きです。ランチで大満足した後は、ゆっくり川平湾に向かいました。寄り道しなければ明石食堂からは 40 分程の距離の様ですが、途中目についた海岸に降り
タコライス + メキシチョイス
自宅 de タコライス (S&B タコスシーズニング Part 3) で思わぬ成功に味をしめたので、再び挑戦しました。今回は OLD EL PASO タコ・シーズニング を手に入れるべく、隣駅
ヱビス 夏のコク (3)
普段ビールは ザ・プレミアム・モルツ を好んで飲んでいますが、たまに YEBISU ヱビスビール が飲みたくなる時があります。ヱビスを求めて訪れた近所のコンビニエンスストアで、ヱビス 夏のコク を見つ
BLT サンドセット
沖縄本島 (No. 40 – 目利きの銀次 新都心店) の続きです。5 泊 6 日の最終日、ついに東京に帰る日となりました。旅の〆、最後の悪あがきに今回も那覇空港内の A&W OK
高速船ニューくだか (5)
沖縄本島 (No. 15 – 天神矢 ふたたび) の続きです。4 年程前に初めて久高島を訪れた際の景色は 景色 (久高島) で掲載しましたが、この時は慌てて飛び乗るくらいにギリギリで最後の
Ti picchio
最近 facebook で 以前の職場 のメンバーを登録し始めました。もう 10 年以上会っていない人達がコツコツ集まってくるにつれ、"やっぱり久しぶりに会いたいよね" ということ
Valid HTML5 Valid CSS3 Another HTML Lint