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

ビーフ + 野菜カレー (ルー大盛り, 辛さ 70 倍)
カリーライス専門店 エチオピア 本店 (No. 13 – 辛さ 70 倍メドレー 1) を投稿した時は、まさか全メニューを辛さ 70 倍で横断するとは思っていませんでしたが、我ながら凝り性
豚肉生姜焼定食 (ライス 大)
柏や (アジフライカレー) の続きです。さて、今日もデータセンターで頭脳 + 肉体が半々な長丁場の日です。朝起きると、大分アジフライ定食に気持ちが傾きつつありましたが、前日の自分との約束を果たさない訳
つけ麺 (中)
有楽町・銀座には私用で月に 2, 3 回は訪れていますが、タイミングが合えば 三田製麺所 有楽町店に行くことがあります。濃厚豚骨魚介スープをうたうお店は最近はめずらしくありませんが、ここのスープは本当
Lavender
現在の東京オフィスでは、健康診断が毎年 2 月にあります。おそらく今年初めてだったとは思いますが眼底検査というものを行い、緑内障の疑いがあると診断されました。ショックでした。腰痛に歯痛、今度は眼ですか
串焼き処 日比谷 鳥こまち (1)
先週の今日は、1 年ぶりに花の 46 年組 (笑) の 1 人と飲み会でした。沖縄出身ですが現在はタイで奮闘しているスタッフが久しぶりに国内での仕事の後に、東京オフィスからも近い有楽町に立ち寄ってくれ
Gala 青い海 (7)
去年の 2 月になりますが、景色 (Gala 青い海 2010) 以来約 3 年ぶりに Gala 青い海 をゆっくり訪れる時間がありました。2 月の 14 時頃でこの明るさと海の色です。これは 3 年
古宇利大橋 (1)
沖縄出張 (No. 31 – 備瀬フク木並木通り) を後にして本部循環線に戻り、古宇利島を目指しました。私の記憶では、古宇利島へのルートは名護から奥武島 -> 屋我地島を抜けて古宇利
肉野菜炒め定食 (3)
23 年通っている とちぎや で とちぎや (生姜焼き定食) 以外のメニューを初めてオーダーするべく、再び訪れました。日替わりの "サービス定食" は今までまったくのノーマークでし
積雪 2014/02/08 (5)
天気予報では記録的な大雪になる予報が出されていた様ですが、あまり気に留めていませんでした。昨年は 沖縄出張 (No. 14 – 欠航 Part 2) で羽田空港から引き返して来ましたが、今
玄米 + ゲンコツメンチ + キャベツ千切り
一時期 セブンイレブン (あらびき牛肉メンチカツ) を土日のどちらかのお昼ご飯として買っていた時期がありましたが、ローソンでも同じ様なメンチカツを見かけました。最寄りのローソンではなぜか夕方の方がスト
Valid HTML5 Valid CSS3 Another HTML Lint