私はDocomoの携帯しか持ってないので、事前にauとsoftbankを持ってる友人に頼んで、メールヘッダなどを調査したらこんな感じ↓
■ Docomo
----------------------------------------------------------------------------------
From ****@docomo.ne.jp Wed May 26 17:54:11 2010
Return-Path: <****@docomo.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id 5DE338B41B2
for <***@igreks.jp>; Wed, 26 May 2010 17:54:11 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id kkpANBxiUasa for <****@igreks.jp>;
Wed, 26 May 2010 17:54:11 +0900 (JST)
Received: from docomo.ne.jp (mail108.docomo.ne.jp [203.138.203.8])
by ***.igreks.jp (Postfix) with ESMTP id 3E6618B40B0
for <***@igreks.jp>; Wed, 26 May 2010 17:54:11 +0900 (JST)
Date: Wed, 26 May 2010 17:54:09 +0900 (JST)
From: ****@docomo.ne.jp
To: ***@igreks.jp
Subject: =?iso-2022-jp?B?GyRCMSsbKEI=?=
Message-ID:
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-2022-jp"
Content-Transfer-Encoding: 7bit
$BK\J8(B
----------------------------------------------------------------------------------
■ au
----------------------------------------------------------------------------------
From ****@ezweb.ne.jp Wed May 26 18:24:29 2010
Return-Path: <****@ezweb.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id F1F818B41B2
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id CBSY6-Rv+mf6 for <***@igreks.jp>;
Wed, 26 May 2010 18:24:28 +0900 (JST)
Received: from ezweb.ne.jp (nx3oBP07-06.ezweb.ne.jp [59.135.39.240])
by ***.igreks.jp (Postfix) with ESMTP id D7FC88B40B0
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
Received: from nxev04mp06 (localhost [127.0.0.1])
by nxev04mp06.ezweb.ne.jp (EZweb Mail) with SMTP id 955ED5BC640B4
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
From: ****@ezweb.ne.jp
To: ***@igreks.jp
Subject: =?iso-2022-jp?B?GyRCMSsbKEI=?=
Message-ID: <2010052618242860697200007c12@nxev04mp06.ezweb.ne.jp>
Date: Wed, 26 May 2010 18:24:28 +0900
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-2022-jp"
Content-Transfer-Encoding: 7bit
$B%6!<%6!<(B
----------------------------------------------------------------------------------
■ Softbank
----------------------------------------------------------------------------------
From ****@softbank.ne.jp Wed May 26 18:24:36 2010
Return-Path: <****@softbank.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id 975BD8B41B2
for <***@igreks.jp>; Wed, 26 May 2010 18:24:36 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id HQrmiDMGcT3n for <***@igreks.jp>;
Wed, 26 May 2010 18:24:36 +0900 (JST)
Received: from mmrts049p01c.softbank.ne.jp (mmrts049p01c.softbank.ne.jp [123.108.236.27])
by ***.igreks.jp (Postfix) with SMTP id 6D9898B40B0
for <***@igreks.jp>; Wed, 26 May 2010 18:24:36 +0900 (JST)
Subject: =?ISO-2022-JP?B?GyRCJCYkcyQzGyhC?=
Mime-Version: 1.0
Content-Type:text/plain;charset=ISO-2022-JP
Content-Transfer-Encoding:7bit
Date: Wed, 26 May 2010 18:24:35 +0900
Message-ID: <20100526182435672870.2aea@0016E68F5982>
From: <****@softbank.ne.jp>
To: ***@igreks.jp
Sender:****@softbank.ne.jp
X-Priority: 3
$B%b%j%b%j(B
----------------------------------------------------------------------------------
仕様としては、
・DBはMySQL
・空メの送信先は「reg_kara_mail@igreks.jp」とする
・空メの件名に名前を指定できる。
・登録済みの場合はエラーメールを返す。
・空メ本文にメルマガIDをあらかじめ記載しておく。
・メルマガIDが認識できない場合もエラーメールを返す。
・読者データテーブル名は仮に「user_'メルマガID'」、文字コードはUTF8とする。
これを受けて、スクリプトはざっとこんな感じに。
※おおまかな流れだけで、細かい点は割愛してます
■ 空メール登録処理用CGI（karame.cgi）
-----------------------------------------------------------------------------------
#!/usr/bin/perl
package main;
use strict;
use CGI;
use DBI;
use Unicode::Japanese;
require './lib/get.pl'; #各種データ取得用ライブラリ（詳細割愛）
require './lib/proc.pl'; #各種処理用ライブラリ（詳細割愛）
require './lib/db.pl'; #DB接続、各種SQL実行用ライブラリ（詳細割愛）
require './lib/start.pl'; #メール配信用ライブラリ（詳細割愛）
&db::open(); #DB接続
my $sys_msg = ''; #エラー返信用メッセージ
my ($email, $name, $id);
###### メールから標準入力をパース
my $grep = '[\d\w-.+]+\@[\d\w-]+(\.[\d\w-]+)+'; #メールアドレスの正規表現
while(<>){
if($_ =~ /^From.*?($grep)/i || $_ =~ /^Return-Path:.*?<($grep)>/i){
$email = $1; #メールアドレス
}
if($_ =~ /^Subject:\s*(.+)$/i){
$name .= $1; #名前
}
if($_ =~ /^\s*(=\?ISO-2022-JP.+\?=)\s*$/i){ #件名が途中で改行されてる時のため
$name .= $1;
}
if($_ =~ /^mid:(.+)$/){
$id = $1; #メルマガID
}
}
if($email){
if($id){
my $stg = &get::setting_data($id); #メルマガ設定データ取得
if($stg){
####### 読者テーブル内重複チェック
&db::query("
SELECT * FROM user_$id WHERE email='$email'
");
my $href = $db::sth->fetchrow_hashref();
if($href){
#すでに登録済みの場合
$sys_msg = <<EOM;
送信いただいたメールアドレス「$email」はすでに登録済みです。
このまま次回の配信をお待ちください。
EOM
$sys_msg =~ s/\t//g;
#メール返信処理
&start::return_mail(
'空メール登録処理エラー',
$sys_msg,
);
exit;
}
if($name){
#名前の入力があった場合
$name = Unicode::Japanese->new(
&proc::base64decode($name), #Base64デコード処理
'jis'
)->utf8; #JISからUTF8に変換
}
######## 新規登録
&db::query("
INSERT IGNORE INTO user_$$pd{'id'} (
no, #オートインクリメント
email,
name,
・
・
・
)
VALUES(
'',
'$email',
'$name',
・
・
・
)
");
}
else{
$sys_msg = <<EOM;
登録しようとしたメールマガジンは存在しないか、すでに廃刊されています。
お手数ですが、詳しくは発行者までお問い合わせください。
EOM
}
}
else{
$sys_msg = <<EOM;
送信いただいた情報に不備があり登録できませんでした。
空メール本文の内容は変更せずに送信してください。
何度もこのエラーメールが返信される場合は、お手数ですが発行者までお問い合わせください。
EOM
}
########## エラー返信処理
if($sys_msg){
&start::return_mail(
'空メール登録処理エラー',
$sys_msg,
);
}
&db::close(); #DB切断
exit;
-----------------------------------------------------------------------------------
■Postfixエイリアス設定ファイル（/etc/aliase）に以下を追加
-----------------------------------------------------------------------------------
reg_kara_mail: "|cd 'karame.cgiがあるディレクトリの絶対パス'; ./karame.cgi"
-----------------------------------------------------------------------------------
■リスタート
-----------------------------------------------------------------------------------
# newaliases
# /etc/init.d/postfix restart
-----------------------------------------------------------------------------------
■以下のようなメールを「reg_kara_mail@igreks.jp」宛に送る
件名：自分の名前もしくは空白
本文：mid:melmagaID
以上。
※レンタルサーバなどでエイリアスが設定できない場合は、後からcronなどでPOPアクセスして処理するなどの方法もある。（参考→http://www.igreks.jp/dev/2009/06/pop.html）
この場合は返信メールが即時配信されない。
※ディズニーモバイルとかwilcomは調べてないけど、まあだいたい同じだべってことで。
■ Docomo
----------------------------------------------------------------------------------
From ****@docomo.ne.jp Wed May 26 17:54:11 2010
Return-Path: <****@docomo.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id 5DE338B41B2
for <***@igreks.jp>; Wed, 26 May 2010 17:54:11 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id kkpANBxiUasa for <****@igreks.jp>;
Wed, 26 May 2010 17:54:11 +0900 (JST)
Received: from docomo.ne.jp (mail108.docomo.ne.jp [203.138.203.8])
by ***.igreks.jp (Postfix) with ESMTP id 3E6618B40B0
for <***@igreks.jp>; Wed, 26 May 2010 17:54:11 +0900 (JST)
Date: Wed, 26 May 2010 17:54:09 +0900 (JST)
From: ****@docomo.ne.jp
To: ***@igreks.jp
Subject: =?iso-2022-jp?B?GyRCMSsbKEI=?=
Message-ID:
MIME-Version: 1.0
Content-Type: text/plain; charset="iso-2022-jp"
Content-Transfer-Encoding: 7bit
$BK\J8(B
----------------------------------------------------------------------------------
■ au
----------------------------------------------------------------------------------
From ****@ezweb.ne.jp Wed May 26 18:24:29 2010
Return-Path: <****@ezweb.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id F1F818B41B2
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id CBSY6-Rv+mf6 for <***@igreks.jp>;
Wed, 26 May 2010 18:24:28 +0900 (JST)
Received: from ezweb.ne.jp (nx3oBP07-06.ezweb.ne.jp [59.135.39.240])
by ***.igreks.jp (Postfix) with ESMTP id D7FC88B40B0
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
Received: from nxev04mp06 (localhost [127.0.0.1])
by nxev04mp06.ezweb.ne.jp (EZweb Mail) with SMTP id 955ED5BC640B4
for <***@igreks.jp>; Wed, 26 May 2010 18:24:28 +0900 (JST)
From: ****@ezweb.ne.jp
To: ***@igreks.jp
Subject: =?iso-2022-jp?B?GyRCMSsbKEI=?=
Message-ID: <2010052618242860697200007c12@nxev04mp06.ezweb.ne.jp>
Date: Wed, 26 May 2010 18:24:28 +0900
Mime-Version: 1.0
Content-Type: text/plain; charset="iso-2022-jp"
Content-Transfer-Encoding: 7bit
$B%6!<%6!<(B
----------------------------------------------------------------------------------
■ Softbank
----------------------------------------------------------------------------------
From ****@softbank.ne.jp Wed May 26 18:24:36 2010
Return-Path: <****@softbank.ne.jp>
X-Original-To: ***@igreks.jp
Delivered-To: ***@igreks.jp
Received: from localhost (localhost.localdomain [127.0.0.1])
by ***.igreks.jp (Postfix) with ESMTP id 975BD8B41B2
for <***@igreks.jp>; Wed, 26 May 2010 18:24:36 +0900 (JST)
X-Virus-Scanned: amavisd-new at igreks.jp
Received: from ***.igreks.jp ([127.0.0.1])
by localhost (igreks.jp [127.0.0.1]) (amavisd-new, port ****)
with ESMTP id HQrmiDMGcT3n for <***@igreks.jp>;
Wed, 26 May 2010 18:24:36 +0900 (JST)
Received: from mmrts049p01c.softbank.ne.jp (mmrts049p01c.softbank.ne.jp [123.108.236.27])
by ***.igreks.jp (Postfix) with SMTP id 6D9898B40B0
for <***@igreks.jp>; Wed, 26 May 2010 18:24:36 +0900 (JST)
Subject: =?ISO-2022-JP?B?GyRCJCYkcyQzGyhC?=
Mime-Version: 1.0
Content-Type:text/plain;charset=ISO-2022-JP
Content-Transfer-Encoding:7bit
Date: Wed, 26 May 2010 18:24:35 +0900
Message-ID: <20100526182435672870.2aea@0016E68F5982>
From: <****@softbank.ne.jp>
To: ***@igreks.jp
Sender:****@softbank.ne.jp
X-Priority: 3
$B%b%j%b%j(B
----------------------------------------------------------------------------------
仕様としては、
・DBはMySQL
・空メの送信先は「reg_kara_mail@igreks.jp」とする
・空メの件名に名前を指定できる。
・登録済みの場合はエラーメールを返す。
・空メ本文にメルマガIDをあらかじめ記載しておく。
・メルマガIDが認識できない場合もエラーメールを返す。
・読者データテーブル名は仮に「user_'メルマガID'」、文字コードはUTF8とする。
これを受けて、スクリプトはざっとこんな感じに。
※おおまかな流れだけで、細かい点は割愛してます
■ 空メール登録処理用CGI（karame.cgi）
-----------------------------------------------------------------------------------
#!/usr/bin/perl
package main;
use strict;
use CGI;
use DBI;
use Unicode::Japanese;
require './lib/get.pl'; #各種データ取得用ライブラリ（詳細割愛）
require './lib/proc.pl'; #各種処理用ライブラリ（詳細割愛）
require './lib/db.pl'; #DB接続、各種SQL実行用ライブラリ（詳細割愛）
require './lib/start.pl'; #メール配信用ライブラリ（詳細割愛）
&db::open(); #DB接続
my $sys_msg = ''; #エラー返信用メッセージ
my ($email, $name, $id);
###### メールから標準入力をパース
my $grep = '[\d\w-.+]+\@[\d\w-]+(\.[\d\w-]+)+'; #メールアドレスの正規表現
while(<>){
if($_ =~ /^From.*?($grep)/i || $_ =~ /^Return-Path:.*?<($grep)>/i){
$email = $1; #メールアドレス
}
if($_ =~ /^Subject:\s*(.+)$/i){
$name .= $1; #名前
}
if($_ =~ /^\s*(=\?ISO-2022-JP.+\?=)\s*$/i){ #件名が途中で改行されてる時のため
$name .= $1;
}
if($_ =~ /^mid:(.+)$/){
$id = $1; #メルマガID
}
}
if($email){
if($id){
my $stg = &get::setting_data($id); #メルマガ設定データ取得
if($stg){
####### 読者テーブル内重複チェック
&db::query("
SELECT * FROM user_$id WHERE email='$email'
");
my $href = $db::sth->fetchrow_hashref();
if($href){
#すでに登録済みの場合
$sys_msg = <<EOM;
送信いただいたメールアドレス「$email」はすでに登録済みです。
このまま次回の配信をお待ちください。
EOM
$sys_msg =~ s/\t//g;
#メール返信処理
&start::return_mail(
'空メール登録処理エラー',
$sys_msg,
);
exit;
}
if($name){
#名前の入力があった場合
$name = Unicode::Japanese->new(
&proc::base64decode($name), #Base64デコード処理
'jis'
)->utf8; #JISからUTF8に変換
}
######## 新規登録
&db::query("
INSERT IGNORE INTO user_$$pd{'id'} (
no, #オートインクリメント
email,
name,
・
・
・
)
VALUES(
'',
'$email',
'$name',
・
・
・
)
");
}
else{
$sys_msg = <<EOM;
登録しようとしたメールマガジンは存在しないか、すでに廃刊されています。
お手数ですが、詳しくは発行者までお問い合わせください。
EOM
}
}
else{
$sys_msg = <<EOM;
送信いただいた情報に不備があり登録できませんでした。
空メール本文の内容は変更せずに送信してください。
何度もこのエラーメールが返信される場合は、お手数ですが発行者までお問い合わせください。
EOM
}
########## エラー返信処理
if($sys_msg){
&start::return_mail(
'空メール登録処理エラー',
$sys_msg,
);
}
&db::close(); #DB切断
exit;
-----------------------------------------------------------------------------------
■Postfixエイリアス設定ファイル（/etc/aliase）に以下を追加
-----------------------------------------------------------------------------------
reg_kara_mail: "|cd 'karame.cgiがあるディレクトリの絶対パス'; ./karame.cgi"
-----------------------------------------------------------------------------------
■リスタート
-----------------------------------------------------------------------------------
# newaliases
# /etc/init.d/postfix restart
-----------------------------------------------------------------------------------
■以下のようなメールを「reg_kara_mail@igreks.jp」宛に送る
件名：自分の名前もしくは空白
本文：mid:melmagaID
以上。
※レンタルサーバなどでエイリアスが設定できない場合は、後からcronなどでPOPアクセスして処理するなどの方法もある。（参考→http://www.igreks.jp/dev/2009/06/pop.html）
この場合は返信メールが即時配信されない。
※ディズニーモバイルとかwilcomは調べてないけど、まあだいたい同じだべってことで。
