2 // PukiWiki - Yet another WikiWikiWeb clone.
4 // Copyright 2002-2017 PukiWiki Development Team
5 // License: GPL v2 or (at your option) any later version
9 function plugin_newpage_convert()
11 global $vars, $_btn_edit, $_msg_newpage, $BracketName;
14 $script = get_base_uri();
15 if (PKWK_READONLY) return ''; // Show nothing
18 if (func_num_args()) list($newpage) = func_get_args();
19 if (! preg_match('/^' . $BracketName . '$/', $newpage)) $newpage = '';
21 $s_page = htmlsc(isset($vars['refer']) ? $vars['refer'] : $vars['page']);
22 $s_newpage = htmlsc($newpage);
26 <form action="$script" method="post">
28 <input type="hidden" name="plugin" value="newpage" />
29 <input type="hidden" name="refer" value="$s_page" />
30 <label for="_p_newpage_$id">$_msg_newpage:</label>
31 <input type="text" name="page" id="_p_newpage_$id" value="$s_newpage" size="30" />
32 <input type="submit" value="$_btn_edit" />
40 function plugin_newpage_action()
42 global $vars, $_btn_edit, $_msg_newpage;
44 if (PKWK_READONLY) die_message('PKWK_READONLY prohibits editing');
46 if ($vars['page'] == '') {
47 $retvars['msg'] = $_msg_newpage;
48 $retvars['body'] = plugin_newpage_convert();
51 $page = strip_bracket($vars['page']);
52 $r_page = rawurlencode(isset($vars['refer']) ?
53 get_fullname($page, $vars['refer']) : $page);
54 $r_refer = rawurlencode($vars['refer']);
57 header('Location: ' . get_base_uri(PKWK_URI_ROOT) .
58 '?cmd=read&page=' . $r_page . '&refer=' . $r_refer);