7 * LICENSE: This source file is licensed under the terms of the GNU General Public License.
9 * @package Magic3 Framework
10 * @author 平田直毅(Naoki Hirata) <naoki@aplo.co.jp>
11 * @copyright Copyright 2006-2009 Magic3 Project.
12 * @license http://www.gnu.org/copyleft/gpl.html GPL License
13 * @version SVN: $Id: article.inc.php 1601 2009-03-21 05:51:06Z fishbone $
14 * @link http://www.magic3.org
17 // 2002-2005 PukiWiki Developers Team
18 // 2002 Originally written by OKAWARA,Satoshi <kawara@dml.co.jp>
19 // http://www.dml.co.jp/~kawara/pukiwiki/pukiwiki.php
21 // article: BBS-like plugin
24 メッセージを変更したい場合はLANGUAGEファイルに下記の値を追加してからご使用ください
26 $_btn_article = '記事の投稿';
27 $_btn_subject = '題名: ';
29 ※$_btn_nameはcommentプラグインで既に設定されている場合があります
31 投稿内容の自動メール転送機能をご使用になりたい場合は
38 define('PLUGIN_ARTICLE_COLS', 70); // テキストエリアのカラム数
39 define('PLUGIN_ARTICLE_ROWS', 5); // テキストエリアの行数
40 define('PLUGIN_ARTICLE_NAME_COLS', 24); // 名前テキストエリアのカラム数
41 define('PLUGIN_ARTICLE_SUBJECT_COLS', 60); // 題名テキストエリアのカラム数
42 define('PLUGIN_ARTICLE_NAME_FORMAT', '[[$name]]'); // 名前の挿入フォーマット
43 define('PLUGIN_ARTICLE_SUBJECT_FORMAT', '**$subject'); // 題名の挿入フォーマット
45 define('PLUGIN_ARTICLE_INS', 0); // 挿入する位置 1:欄の前 0:欄の後
46 define('PLUGIN_ARTICLE_COMMENT', 1); // 書き込みの下に一行コメントを入れる 1:入れる 0:入れない
47 define('PLUGIN_ARTICLE_AUTO_BR', 1); // 改行を自動的変換 1:する 0:しない
49 define('PLUGIN_ARTICLE_MAIL_AUTO_SEND', 0); // 投稿内容のメール自動配信 1:する 0:しない
50 define('PLUGIN_ARTICLE_MAIL_FROM', ''); // 投稿内容のメール送信時の送信者メールアドレス
51 define('PLUGIN_ARTICLE_MAIL_SUBJECT_PREFIX', "[someone's PukiWiki]"); // 投稿内容のメール送信時の題名
54 global $_plugin_article_mailto;
55 $_plugin_article_mailto = array (
59 function plugin_article_action()
61 //global $script, $post, $vars, $cols, $rows, $now;
62 global $script, $cols, $rows, $now;
63 global $_title_collided, $_msg_collided, $_title_updated;
64 global $_plugin_article_mailto, $_no_subject, $_no_name;
65 global $_msg_article_mail_sender, $_msg_article_mail_page;
67 if (PKWK_READONLY) die_message('PKWK_READONLY prohibits editing');
69 //if ($post['msg'] == '') return array('msg'=>'','body'=>'');
70 if (WikiParam::getMsg() == '') return array('msg'=>'','body'=>'');
72 $refer = WikiParam::getPostVar('refer');
73 //$name = ($post['name'] == '') ? $_no_name : $post['name'];
74 $name = (WikiParam::getPostVar('name') == '') ? $_no_name : WikiParam::getPostVar('name');
75 $name = ($name == '') ? '' : str_replace('$name', $name, PLUGIN_ARTICLE_NAME_FORMAT);
76 //$subject = ($post['subject'] == '') ? $_no_subject : $post['subject'];
77 $subject = (WikiParam::getPostVar('subject') == '') ? $_no_subject : WikiParam::getPostVar('subject');
78 $subject = ($subject == '') ? '' : str_replace('$subject', $subject, PLUGIN_ARTICLE_SUBJECT_FORMAT);
79 $article = $subject . "\n" . '>' . $name . ' (' . $now . ')~' . "\n" . '~' . "\n";
81 //$msg = rtrim($post['msg']);
82 $msg = rtrim(WikiParam::getMsg());
83 if (PLUGIN_ARTICLE_AUTO_BR) {
84 //改行の取り扱いはけっこう厄介。特にURLが絡んだときは…
85 //コメント行、整形済み行には~をつけないように arino
86 $msg = join("\n", preg_replace('/^(?!\/\/)(?!\s)(.*)$/', '$1~', explode("\n", $msg)));
88 $article .= $msg . "\n\n" . '//';
90 if (PLUGIN_ARTICLE_COMMENT) $article .= "\n\n" . '#comment' . "\n";
93 //$postdata_old = get_source($post['refer']);
94 $postdata_old = get_source($refer);
97 foreach($postdata_old as $line) {
98 if (! PLUGIN_ARTICLE_INS) $postdata .= $line;
99 if (preg_match('/^#article/i', $line)) {
100 //if ($article_no == $post['article_no'] && $post['msg'] != '')
101 if ($article_no == WikiParam::getPostVar('article_no') && WikiParam::getMsg() != '')
102 $postdata .= $article . "\n";
105 if (PLUGIN_ARTICLE_INS) $postdata .= $line;
108 $postdata_input = $article . "\n";
111 //if (md5(@join('', get_source($post['refer']))) != $post['digest']) {
112 if (md5(get_source($refer, true)) != WikiParam::getPostVar('digest')) {
113 $title = $_title_collided;
115 $body = $_msg_collided . "\n";
117 /* $s_refer = htmlspecialchars($post['refer']);
118 $s_digest = htmlspecialchars($post['digest']);*/
119 $s_refer = htmlspecialchars($refer);
120 $s_digest = htmlspecialchars(WikiParam::getPostVar('digest'));
121 $s_postdata = htmlspecialchars($postdata_input);
122 $postScript = $script . WikiParam::convQuery('?cmd=preview');
124 <form action="$postScript" method="post" class="form">
126 <input type="hidden" name="refer" value="$s_refer" />
127 <input type="hidden" name="digest" value="$s_digest" />
128 <textarea name="msg" class="wiki_edit" rows="$rows" cols="$cols">$s_postdata</textarea><br />
134 <form action="$script?cmd=preview" method="post">
136 <input type="hidden" name="refer" value="$s_refer" />
137 <input type="hidden" name="digest" value="$s_digest" />
138 <textarea name="msg" rows="$rows" cols="$cols" id="textarea">$s_postdata</textarea><br />
144 //page_write($post['refer'], trim($postdata));
145 page_write($refer, trim($postdata));
148 if (PLUGIN_ARTICLE_MAIL_AUTO_SEND) {
149 $mailaddress = implode(',', $_plugin_article_mailto);
150 $mailsubject = PLUGIN_ARTICLE_MAIL_SUBJECT_PREFIX . ' ' . str_replace('**', '', $subject);
151 // if ($post['name']) $mailsubject .= '/' . $post['name'];
152 $name = WikiParam::getVar('name');
153 if ($name != '') $mailsubject .= '/' . $name;
154 $mailsubject = mb_encode_mimeheader($mailsubject);
156 $mailbody = $post['msg'];
157 $mailbody .= "\n\n" . '---' . "\n";
158 $mailbody .= $_msg_article_mail_sender . $post['name'] . ' (' . $now . ')' . "\n";
159 $mailbody .= $_msg_article_mail_page . $post['refer'] . "\n";
160 $mailbody .= ' URL: ' . $script . '?' . rawurlencode($post['refer']) . "\n";
161 $mailbody = mb_convert_encoding($mailbody, 'JIS');
164 $mailbody = WikiParam::getMsg();
165 $mailbody .= "\n\n" . '---' . "\n";
166 $mailbody .= $_msg_article_mail_sender . $name . ' (' . $now . ')' . "\n";
167 $mailbody .= $_msg_article_mail_page . $refer . "\n";
168 $mailbody .= ' URL: ' . $script . WikiParam::convQuery('?' . rawurlencode($refer)) . "\n";
169 $mailbody = mb_convert_encoding($mailbody, 'JIS');
171 $mailaddheader = 'From: ' . PLUGIN_ARTICLE_MAIL_FROM;
173 mail($mailaddress, $mailsubject, $mailbody, $mailaddheader);
176 $title = $_title_updated;
178 $retvars['msg'] = $title;
179 $retvars['body'] = $body;
181 /* $post['page'] = $post['refer'];
182 $vars['page'] = $post['refer'];*/
183 WikiParam::setPage($refer);
188 function plugin_article_convert()
190 //global $script, $vars, $digest;
192 global $_btn_article, $_btn_name, $_btn_subject;
193 static $numbers = array();
195 if (PKWK_READONLY) return ''; // Show nothing
197 $page = WikiParam::getPage();
198 if (!isset($numbers[$page])) $numbers[$page] = 0;
199 //if (! isset($numbers[$vars['page']])) $numbers[$vars['page']] = 0;
201 //$article_no = $numbers[$vars['page']]++;
202 $article_no = $numbers[$page]++;
204 //$s_page = htmlspecialchars($vars['page']);
205 $s_page = htmlspecialchars($page);
206 //$s_digest = htmlspecialchars($digest);
207 $s_digest = htmlspecialchars(WikiParam::getDigest());
208 $name_cols = PLUGIN_ARTICLE_NAME_COLS;
209 $subject_cols = PLUGIN_ARTICLE_SUBJECT_COLS;
210 $article_rows = PLUGIN_ARTICLE_ROWS;
211 $article_cols = PLUGIN_ARTICLE_COLS;
212 $postScript = $script . WikiParam::convQuery('?');
214 <form action="$postScript" method="post" class="form">
216 <input type="hidden" name="article_no" value="$article_no" />
217 <input type="hidden" name="plugin" value="article" />
218 <input type="hidden" name="digest" value="$s_digest" />
219 <input type="hidden" name="refer" value="$s_page" />
220 <label for="_p_article_name_$article_no">$_btn_name</label>
221 <input type="text" name="name" id="_p_article_name_$article_no" size="$name_cols" /><br />
222 <label for="_p_article_subject_$article_no">$_btn_subject</label>
223 <input type="text" name="subject" id="_p_article_subject_$article_no" size="$subject_cols" /><br />
224 <textarea name="msg" class="wiki_edit" rows="$article_rows" cols="$article_cols">\n</textarea><br />
225 <input type="submit" class="button" name="article" value="$_btn_article" />