/[pub]/suikawiki/script/default/suikawiki-config.ph
Suika

Contents of /suikawiki/script/default/suikawiki-config.ph

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (hide annotations) (download)
Sun Jan 12 09:20:12 2003 UTC (21 years, 10 months ago) by w
Branch: MAIN
Changes since 1.1: +238 -19 lines
view definitions are revised

1 w 1.1 use strict;
2     #
3     # You MUST modify following '$modifier_...' variables.
4     #
5     # our $modifier_dbtype = 'AnyDBM_File'; # Fast, not available on some server, page size limited.
6     # our $modifier_dbtype = 'dbmopen'; # Fast, not available on some server, page size limited.
7 w 1.2 #our $modifier_dbtype = 'Yuki::YukiWikiDB'; # Slow, available on all environment.
8     #our $modifier_dbtype = 'Yuki::YukiWikiDB2'; # Slow, available on all environment.
9     our $modifier_dbtype = 'Yuki::YukiWikiDBMeta'; # Slow, available on all environment.
10     our $url_cgi; {
11     my $scheme = 'http';
12     $scheme = lc $1 if $main::ENV{SERVER_PROTOCOL} =~ m#([A-Za-z0-9+.%-]+)#;
13     $url_cgi = "$scheme://$main::ENV{SERVER_NAME}:$main::ENV{SERVER_PORT}/~wakaba/wiki/wiki";
14 w 1.1 ## - MUST NOT include [&<>"] and/or non-URI characters
15 w 1.2 }
16     our %uri = (
17     external_script => 'script/',
18     );
19 w 1.1 $uri{wiki} = $url_cgi;
20 w 1.2 $SuikaWiki::Plugin::plugin_directory = q(lib/SuikaWiki/Plugin/);
21 w 1.1 our %PathTo = ( ## Path to your data, from the main CGI script (NOT from this config script)
22     WikiDataBase => q(./wikidata/page),
23     );
24     our $use_exists = 0; # If you can use 'exists' method for your DB.
25     ##############################
26     our %PageName = (
27     FrontPage => 'HomePage',
28     IndexPage => 'IndexPage',
29     SearchPage => 'SearchPage',
30     CreatePage => 'CreatePage',
31     ErrorPage => 'ErrorPage',
32 w 1.2 RecentChanges => 'RecentChanges',
33     AdminSpecialPage => "\x11\x11Admin\x11Special\x11Page\x11\x11",
34 w 1.1 DefaultStyleForHTML => 'WikiHTMLStyle',
35 w 1.2 UserAgentList => 'WikiUserAgentList',
36 w 1.1 );
37     our $kanjicode = 'euc';
38     our $lang = 'ja';
39 w 1.2
40     $wiki::useragent::UseLog = 0; ## Use User-Agent name log (WikiUserAgentList) or not
41     $wiki::diff::UseDiff = 1; ## Use diff mode or not
42    
43     my %vd;
44     $vd{links} = <<'EOH';
45     %link-wiki(mode=>edit,rel=>edit,class=>wiki-cmd,title=>\"%res(name=>EditThisPageLink);\");
46     %link-wiki(mode=>edit,rel=>edit,class=>wiki-cmd,title=>\"%res(name=>AdminEditThisPageLink);\",add_param=>\"admin=1\");
47     %link-wiki(rel=>view,class=>wiki-cmd,title=>\"%res(name=>ViewThisPageLink);\",up_to_date);
48     %link-wiki(rel=>myself,class=>wiki,title=>\"%res(name=>GoToMyselfLink);\");
49     %link-wiki(page=>IndexPage,rel=>index,class=>wiki,title=>\"%res(name=>GoToIndexPageLink);\");
50     %link-wiki(page=>HomePage,rel=>home,class=>wiki,title=>\"%res(name=>GoToHomePageLink);\");
51     %link-wiki(page=>WikiNews,rel=>News,class=>wiki,title=>\"%res(name=>GoToWikiNewsLink);\");
52     %link-wiki(page=>RecentChanges,rel=>News,class=>wiki,title=>\"%res(name=>GoToRecentChangesLink);\");
53     %link-wiki(page=>RecentChanges,mode=>rss,rel=>News,class=>wiki,title=>\"%res(name=>GoToRssPageLink);\",type=>\"application/xml\");
54     %link-wiki(page=>SearchPage,rel=>search,class=>wiki,title=>\"%res(name=>GoToSearchPageLink);\");
55     %link-wiki(page=>WikiHelp,mode=>read,rel=>help,class=>wiki,title=>\"%res(name=>GoToWikiHelpLink);\");
56     %link-wiki(page=>WikiPageLicense,rel=>copyright,class=>wiki,title=>\"%res(name=>GoToWikiPageLicenseLink);\");
57     %link-wiki(mode=>map,rel=>contents,class=>wiki-cmd,title=>\"%res(name=>ShowMapOfThisPageLink);\");
58     %link-wiki(mode=>RandomJump,up_to_date,rel=>lucky,class=>\"wiki randomlink\",title=>\"%res(name=>GoSomewhereLink);\");
59     EOH
60     #%link-viewcvs(href=>\"http://path-to-viewcvs/path-to-repository/\",rel=>history,class=>wiki-cmd,title=>\"%res(name=>ViewHistoryOfThisPageLink);\",hreflang=>en);
61     $vd{links} .= q( %link-wiki(mode=>diff,rel=>history,class=>wiki-cmd,title=>\"%res(name=>ViewDiffOfThisPageLink);\");) if $wiki::diff::UseDiff;
62     $vd{links} .= <<EOH;
63     %link-wiki(href=>\\\"javascript:var%20WikiName=prompt('Please%20input%20the%20WikiName:','','Jump%20to%20SuikaWiki');if(WikiName)%7B_content.location.href='$url_cgi%3F'+encodeURIComponent(WikiName)%7D\\\",rel=>jump,class=>wiki-cmd,title=>\\\"%res(name=>JumpToLink);\\\");
64     %link-wiki(href=>\\\"javascript:var%20WikiName=prompt('Please%20input%20the%20WikiName:','','Jump%20to%20SuikaWiki');if(WikiName)%7B_content.location.href='$url_cgi%3Fmycmd=edit;mypage='+encodeURIComponent(WikiName)%7D\\\",rel=>jump,class=>wiki-cmd,title=>\\\"%res(name=>JumpToEditLink);\\\");
65     EOH
66     $vd{navbar} = <<'EOH';
67     %anchor-wiki(mode=>edit,rel=>edit,class=>wiki-cmd,label=>\\\"%res(name=>EditThisPage);\\\",title=>\\\"%res(name=>EditThisPageLong,accesskey=>E);\\\");
68     %anchor-wiki(rel=>view,up_to_date,class=>wiki-cmd,label=>\\\"%res(name=>ViewThisPage);\\\",title=>\\\"%res(name=>ViewThisPageLong);\\\");
69     %anchor-wiki(page=>CreatePage,class=>wiki,label=>\\\"%res(name=>GoToCreatePage);\\\",title=>\\\"%res(name=>GoToCreatePageLong);\\\");
70     %anchor-wiki(page=>IndexPage,class=>wiki,label=>\\\"%res(name=>GoToIndexPage);\\\",title=>\\\"%res(name=>GoToIndexPageLong);\\\");
71     %anchor-wiki(page=>HomePage,class=>wiki,label=>\\\"%res(name=>GoToHomePage);\\\",title=>\\\"%res(name=>GoToHomePageLong);\\\");
72     %anchor-wiki(page=>SearchPage,class=>wiki,label=>\\\"%res(name=>GoToSearchPage);\\\",title=>\\\"%res(name=>GoToSearchPageLong);\\\");
73     %anchor-wiki(mode=>RandomJump,up_to_date,rel=>lucky,class=>\\\"wiki randomlink\\\",label=>\\\"%res(name=>GoSomewhere);\\\",title=>\\\"%res(name=>GoSomewhereLong);\\\");
74     %anchor-wiki(page=>RecentChanges,class=>wiki,label=>\\\"%res(name=>GoToRecentChanges);\\\",title=>\\\"%res(name=>GoToRecentChangesLong);\\\");
75     EOH
76    
77     our %ViewDefinition = (
78     read => {media => {type => 'text/html', charset => 1, expires => 120}, check => sub {1},
79     #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 120},
80     template => <<EOH},
81     %html-start;%html-head(title=>"%res(name=>\\"View:WebPageTitle\\");",link_meta=>"
82     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
83     $vd{links}");
84     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
85     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
86     %section(level=>2,id=>read,add_to_toc=>0,content=>\\"%read(comment);\\");
87     %section(level=>2,id=>\\"see-also\\",title=>SeeAlso,heading,content=>\\"%search-result;\\");
88     %section(level=>2,id=>referer,title=>Referer,heading,content=>\\"%referer-list;\\");
89     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
90     %section(id=>last-modified,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"LastModified=\\\\\\");%last-modified;\\");
91     %section(class=>tools,add_to_toc=>0,content=>\\\"$vd{navbar}\\\");
92     %section(id=>footer,add_to_toc=>0,content=>\\"
93     <a href=\\\\\\"http://www.hyuki.com/yukiwiki/\\\\\\" title=\\\\\\"YukiWiki 2.0.beta1.2002-05-29 &copy; 2000-2002 by Hiroshi Yuki\\\\\\">%res(name=>\\\\\\"About:Name:YukiWiki\\\\\\");</a>
94     <a href=\\\\\\"http://digit.que.ne.jp/work/\\\\\\" title=\\\\\\"WalWiki 2.0.beta1.wal.1 &copy; 2000-2002 by Makio Tsukamoto\\\\\\">%res(name=>\\\\\\"About:Name:WalWiki\\\\\\");</a>
95     <a href=\\\\\\"http://suika.fam.cx/gate/cvs/wakaba/wiki/\\\\\\" title=\\\\\\"%res(name=>\\\\\\"About:SuikaWiki:JumpToCVS\\\\\\");\\\\\\">%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;</a>
96     \\");
97     ");%html-end;
98     EOH
99     map => {media => {type => 'text/html', charset => 1, expires => 120}, check => sub {1},
100     #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 120},
101     template => <<EOH},
102     %html-start;%html-head(title=>"%res(name=>\\"Map:WebPageTitle\\");",link_meta=>"
103     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
104     $vd{links}");
105     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
106     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
107     %section(level=>2,id=>\\"link-map\\",title=>\\"Map:Title\\",heading,content=>\\"
108     <p>%res(name=>\\\\\\"Map:Description\\\\\\");</p>
109     %link-map;
110     \\");
111     %section(level=>2,id=>\\"see-also\\",title=>SeeAlso,heading,content=>\\"%search-result;\\");
112     %section(level=>2,id=>referer,title=>Referer,heading,content=>\\"%referer-list;\\");
113     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
114     %section(class=>tools,add_to_toc=>0,content=>\\\"$vd{navbar}\\\");
115     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
116     ");%html-end;
117     EOH
118    
119     edit => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
120     #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
121     template => <<EOH},
122     %html-start;%html-head(title=>"%res(name=>\\"Edit:WebPageTitle\\");",link_meta=>"
123     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
124     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
125     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
126     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
127     %section(level=>2,id=>edit,title=>\\"Edit:Title\\",heading,content=>\\"
128     %edit-form;
129     %section(level=>3,id=>edit-help,add_to_toc=>0,content=>\\\\\\"%read(page=>WikiEditHelp);\\\\\\");
130     \\");
131     %section(level=>2,id=>\\"see-also\\",title=>SeeAlso,heading,content=>\\"%search-result;\\");
132     %section(level=>2,id=>referer,title=>Referer,heading,content=>\\"%referer-list;\\");
133     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
134     %section(id=>last-modified,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"LastModified=\\\\\\");%last-modified;\\");
135     %section(class=>tools,add_to_toc=>0,content=>\\\"$vd{navbar}\\\");
136     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
137     ");%html-end;
138     EOH
139     adminedit => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
140     xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
141     template => <<EOH},
142     %html-start;%html-head(title=>"%res(name=>\\"Edit:Admin:WebPageTitle\\");",link_meta=>"
143     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
144     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
145     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
146     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
147     %section(level=>2,id=>edit,title=>\\"Edit:Title\\",heading,content=>\\"%edit-form(admin);\\");
148     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
149     %section(id=>last-modified,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"LastModified=\\\\\\");%last-modified;\\");
150     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
151     ");%html-end;
152     EOH
153     -conflict => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
154     #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
155     template => <<EOH},
156     %html-start;%html-head(title=>"%res(name=>\\"Edit:Conflict:WebPageTitle\\");",link_meta=>"
157     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
158     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
159     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
160     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
161     %section(level=>2,id=>edit-conflict,title=>\\"Edit:Conflict:Title\\",heading,content=>\\"
162     <p>%res(name=>\\\\\\"Edit:Conflict:Description\\\\\\");</p>
163     %conflict-form;
164     <p>%res(name=>\\\\\\"Edit:Conflict:Diff:Description\\\\\\");</p>
165     %conflict-diff;
166     \\");
167     %section(level=>2,id=>edit,title=>\\"Edit:Title\\",heading,content=>\\"
168     <p>%res(name=>\\\\\\"Edit:Conflict:Edit:Description\\\\\\");</p>
169     %edit-form;
170     %section(level=>3,id=>edit-help,add_to_toc=>0,content=>\\\\\\"%read(page=>WikiEditHelp);\\\\\\");
171     \\");
172     %section(level=>2,id=>\\"see-also\\",title=>SeeAlso,heading,content=>\\"%search-result;\\");
173     %section(level=>2,id=>referer,title=>Referer,heading,content=>\\"%referer-list;\\");
174     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
175     %section(class=>tools,add_to_toc=>0,content=>\\\"$vd{navbar}\\\");
176     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
177     ");%html-end;
178     EOH
179     -wrote => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
180     xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
181     template => <<EOH},
182     %html-start;%html-head(title=>"%res(name=>\\"Edit:Wrote:WebPageTitle\\");",link_meta=>"
183     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
184     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
185     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
186     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
187     <p>%res(name=>\\"Edit:SavedSuccessfully\\");</p>
188     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
189     ");%html-end;
190     EOH
191     -deleted => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
192     xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
193     template => <<EOH},
194     %html-start;%html-head(title=>"%res(name=>\\"Edit:Deleted:WebPageTitle\\");",link_meta=>"
195     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
196     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
197     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
198     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
199     <p>%res(name=>\\"Edit:PageIsDeletedSuccessfully\\");</p>
200     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
201     ");%html-end;
202     EOH
203     -error => {media => {type => 'text/html', charset => 1, expires => 60}, check => sub {1},
204     xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 60},
205     template => <<EOH},
206     %html-start;%html-head(title=>"%res(name=>\\"Error:WebPageTitle\\");",link_meta=>"
207     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
208     $vd{links} %html-meta(name=>ROBOTS,content=>NOINDEX);");
209     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
210     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
211     %section(level=>2,id=>error,title=>\\"Error:Title\\",heading,content=>\\"
212     <p>%error-message;</p>
213     \\");
214     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
215     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
216     ");%html-end;
217     EOH
218    
219     css => {media => {type => 'text/css', charset => 1, expires => 3600},
220     check => sub { ref $_[0]->format_converter ($_[0]->{magic} => 'CSS') ? 1 : 0 },
221     template => '%read(to=>CSS);'},
222     rss => {media => {type => 'application/rss+xml', charset => 1, expires => 3600},
223     check => sub { ref $_[0]->format_converter ($_[0]->{magic} => 'RSS') ? 1 : 0 },
224     template => '%read(to=>RSS);'},
225     -UnsupportedMediaType => {media => {type => 'text/html', charset => 1, expires => -1},
226     xmedia => {type => 'application/xhtml+xml', charset => 1, expires => -1},
227     check => sub {1}, template => <<EOH},
228     %html-start;%html-head(title=>"%page-name;",link_meta=>"
229     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
230     $vd{links}");
231     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
232     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
233     %section(level=>2,title=>\\"UnsupportedMediaType:Title\\",heading,content=>\\"
234     %res(name=>\\\\\\"UnsupportedMediaType:Description\\\\\\");
235     \\");
236     %section(level=>2,id=>\\"see-also\\",title=>SeeAlso,heading,content=>\\"%search-result;\\");
237     %section(level=>2,id=>referer,title=>Referer,heading,content=>\\"%referer-list;\\");
238     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
239     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
240     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
241     ");%html-end;
242     EOH
243 w 1.1 );
244 w 1.2
245    
246     $ViewDefinition{diff} = {media => {type => 'text/html', charset => 1, expires => 120},
247     #xmedia => {type => 'application/xhtml+xml', charset => 1, expires => 120},
248     template => <<EOH, check => sub {1}} if $wiki::diff::UseDiff;
249     %html-start;%html-head(title=>"%res(name=>\\"Diff:WebPageTitle\\");",link_meta=>"
250     %style-wiki(type=>\\"text/css\\",page=>\\"$PageName{DefaultStyleForHTML}\\");
251     $vd{links}");
252     %section(level=>1,add_to_toc=>0,type=>body,title=>"%page-name;",heading,content=>"
253     %section(class=>tools,add_to_toc=>0,content=>\\"$vd{navbar}\\");
254     %section(level=>2,id=>\\"diff\\",title=>\\"Diff:Title\\",heading,content=>\\"
255     <p>%res(name=>\\\\\\"Diff:Notice\\\\\\");</p>
256     %diff-between-previous;
257     \\");
258     %section(level=>2,id=>toc,title=>\\"TOC:Title\\",heading,add_to_toc=>0,content=>\\"%toc(drag);\\");
259     %section(class=>tools,add_to_toc=>0,content=>\\\"$vd{navbar}\\\");
260     %section(id=>footer,add_to_toc=>0,content=>\\"%res(name=>\\\\\\"About:Name:SuikaWiki\\\\\\"); %wiki-version;\\");
261     ");
262     EOH
263 w 1.1
264     1;

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24