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

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

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

perl mkhash.pl raw_password

MT/Author.pm set_password() を参考に必要な個所のみ切り出しています。添付したスクリプトでは、標準で採用されている暗号化方式を参考にしました。

use lib で指定するパス以外は パスワード暗号化 (Movable Type 6.1) と同一の内容です。

#!/usr/bin/perl -w

use strict;
use lib qw ( /home/tools/appli/mt.61/lib /home/tools/appli/mt.61/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

よなよなエール
最寄の綾瀬駅前にはイトーヨーカドーと 東急ストア があり、普段生鮮食品は地下に降りなくて済む東急ストアで済ませます。ここの惣菜が美味しいのはまた別の機会として、ある日ふとあまり見掛けないビールが置いて
Heart Shaped Dish
48 時間ファスティングダイエット (No. 3) の続きです。4 日目 : お腹ぺったん3 日目の朝よりもはっきり感じます。ドローイン vs ロングプレス で意図的に引っ込めていた時と、普通にしてい
香るプレミアム + お刺身 (本マグロ, 真鯛, かんぱち, サーモン)
ザ・プレミアム・モルツ <香るプレミアム> (Part 1) の続きです。期間限定の ザ・プレミアム・モルツ <香るプレミアム> がすっかり気に入り、ここぞとばかりに飲みだめし
欧風カレー ガヴィアル
食べログ 秋葉原・神田・水道橋 カレー の総合ランキングで、ボンディと同じくらい気になっていたお店の 1 つに 欧風カレー ガヴィアル があります。今日は 15:00 頃のランチとなったので、本当はラ
海底遺跡 (3)
与那国島 (No. 10 – 居処屋どぅーらい) の続きです。翌朝は与那国観光の目的の 1 つである海底遺跡を訪れました。グラスボートやスノーケリング・ダイビングと方法がありますが、今回は
新開発 ! 超クリーミー泡サーバー (18)
新開発 ! 超クリーミー泡サーバー (Part 2) で、ともあれ 20 点分 (応募台紙 1 枚分) はあたりました。そして発送先の登録完了後、1 ヶ月弱程で郵便物が届きましたが、20 点分が郵送さ
浜比嘉島 (2)
去年の 1 月になりますが、初めて浜比嘉島に降りて散策しました。出張時の恒例 "北部ドライブ" の前日です。沖縄出張 (No. 17 – きしもと食堂)沖縄出張 (No
対応後
調査した結果では Windows 7 に限らない様ですが、何のきっかけかは特定していませんが突然 flv ファイルのサムネイル表示 (縮小版表示) が RealPlayer のアイコンに代わってされな
VGP-WAR100 (6)
VAIO Fit 13A + Logicool Ultrathin Touch Mouse T630 (Part 2) で bluetooth マウスに切り替えるよりも前に、ワイヤレスルータ VGP-
Gala 青い海 (7)
去年の 2 月になりますが、景色 (Gala 青い海 2010) 以来約 3 年ぶりに Gala 青い海 をゆっくり訪れる時間がありました。2 月の 14 時頃でこの明るさと海の色です。これは 3 年
Valid HTML5 Valid CSS3 Another HTML Lint