mirror of
https://github.com/MariaDB/server.git
synced 2025-10-30 04:26:45 +03:00
240 lines
6.0 KiB
Bash
240 lines
6.0 KiB
Bash
#!@PERL@
|
|
#
|
|
# Usage: fill_help_tables <manual.texi>
|
|
# Example: ./fill_help_tables < ../Docs/manual.texi > fill_help_tables.sql
|
|
#
|
|
# This script generates the SQL statements required by mysql_install_db to
|
|
# fill up the tables for the server-side online function help, which can be
|
|
# invoked with "help <function>" from the MySQL client.
|
|
#
|
|
# Please note, that you first need to update Docs/manual.texi with the
|
|
# manual file from the separate "mysqldoc" BitKeeper-Tree! The manual.texi
|
|
# included in the source tree is just an empty stub file - the full manual
|
|
# is now maintained in a separate tree.
|
|
#
|
|
# Original version by Victor Vagin <vva@mysql.com>
|
|
#
|
|
|
|
my $cat_name= "";
|
|
my $func_name= "";
|
|
my $text= "";
|
|
my $example= "";
|
|
|
|
local $mode= "";
|
|
|
|
sub prepare_name
|
|
{
|
|
my ($a)= @_;
|
|
|
|
$a =~ s/(\@itemize \@bullet)/ /g;
|
|
$a =~ s/(\@end itemize)/ /g;
|
|
$a =~ s/(\@end multitable)/ /g;
|
|
$a =~ s/(\@end table)/ /g;
|
|
$a =~ s/(\@cindex(.*?)\n)/ /g;
|
|
$a =~ s/(\@multitable \@columnfractions(.*?)\n)/ /g;
|
|
$a =~ s/(\@node(.*?)\n)/ /g;
|
|
$a =~ s/(\@tab)/\t/g;
|
|
$a =~ s/\@item/ /g;
|
|
$a =~ s/\@code\{((.|\n)+?)\}/$1/go;
|
|
$a =~ s/\@strong\{(.+?)\}/$1/go;
|
|
$a =~ s/\@samp\{(.+?)\}/$1/go;
|
|
$a =~ s/\@emph\{((.|\n)+?)\}/\/$1\//go;
|
|
$a =~ s/\@xref\{((.|\n)+?)\}/See also : [$1]/go;
|
|
$a =~ s/\@ref\{((.|\n)+?)\}/[$1]/go;
|
|
$a =~ s/\'/\'\'/g;
|
|
$a =~ s/\\/\\\\/g;
|
|
$a =~ s/\`/\`\`/g;
|
|
|
|
$a =~ s/\@table \@code/ /g;
|
|
|
|
$a =~ s/\(\)//g;
|
|
|
|
$a =~ s/((\w|\s)+)\(([\+-=><\/%*!<>\s]+)\)/$3/gxs; #$a =~ s/((\w|\s)+)\(([\+-=><\/%*!<>\s]+)\)/$3 $1/gxs;
|
|
$a =~ s/([\+-=><\/%*!<>\s]+)\(((\w|\s)+)\)/$1/gxs;#$a =~ s/([\+-=><\/%*!<>\s]+)\(((\w|\s)+)\)/$1 $2/gxs;
|
|
$a =~ s/((\w|\s)+)\((.+)\)/$1/gxs;
|
|
|
|
return $a;
|
|
}
|
|
|
|
sub prepare_text
|
|
{
|
|
my ($a)= @_;
|
|
|
|
$a =~ s/(\@itemize \@bullet)/ /g;
|
|
$a =~ s/(\@end itemize)/ /g;
|
|
$a =~ s/(\@end multitable)/ /g;
|
|
$a =~ s/(\@end table)/ /g;
|
|
$a =~ s/(\@cindex(.*?)\n)/ /g;
|
|
$a =~ s/(\@multitable \@columnfractions(.*?)\n)/ /g;
|
|
$a =~ s/(\@node(.*?)\n)/ /g;
|
|
$a =~ s/(\@tab)/\t/g;
|
|
$a =~ s/\@itemx/ /g;
|
|
$a =~ s/\@item/ /g;
|
|
$a =~ s/\@code\{((.|\n)+?)\}/$1/go;
|
|
$a =~ s/\@strong\{(.+?)\}/$1/go;
|
|
$a =~ s/\@samp\{(.+?)\}/$1/go;
|
|
$a =~ s/\@emph\{((.|\n)+?)\}/\/$1\//go;
|
|
$a =~ s/\@xref\{((.|\n)+?)\}/See also : [$1]/go;
|
|
$a =~ s/\@ref\{((.|\n)+?)\}/[$1]/go;
|
|
$a =~ s/\'/\'\'/g;
|
|
$a =~ s/\\/\\\\/g;
|
|
$a =~ s/\`/\`\`/g;
|
|
$a =~ s/(\n*?)$//g;
|
|
$a =~ s/\n/\\n/g;
|
|
|
|
$a =~ s/\@table \@code/ /g;
|
|
|
|
return $a;
|
|
}
|
|
|
|
sub prepare_example
|
|
{
|
|
my ($a)= @_;
|
|
|
|
$a =~ s/\'/\'\'/g;
|
|
$a =~ s/\\/\\\\/g;
|
|
$a =~ s/\`/\`\`/g;
|
|
$a =~ s/(\n*?)$//g;
|
|
$a =~ s/\n/\\n/g;
|
|
|
|
return $a;
|
|
}
|
|
|
|
sub flush_all
|
|
{
|
|
my ($mode) = @_;
|
|
|
|
if ($mode eq ""){return;}
|
|
|
|
$func_name= prepare_name($func_name);
|
|
$text= prepare_text($text);
|
|
$example= prepare_example($example);
|
|
|
|
if ($func_name ne "" && $text ne "" && !($func_name =~ /[abcdefghikjlmnopqrstuvwxyz]/)){
|
|
print "INSERT INTO help_topic (name,description,example) VALUES (";
|
|
print "'$func_name',";
|
|
print "'$text',";
|
|
print "'$example'";
|
|
print ");\n";
|
|
print "INSERT INTO help_relation (help_category_id,help_topic_id) VALUES (\@cur_category,LAST_INSERT_ID());\n";
|
|
}
|
|
|
|
$func_name= "";
|
|
$text= "";
|
|
$example= "";
|
|
$mode= "";
|
|
}
|
|
|
|
sub new_category
|
|
{
|
|
my ($category)= @_;
|
|
|
|
$category= prepare_text($category);
|
|
|
|
print "INSERT INTO help_category (name) VALUES (\'$category\');\n";
|
|
print "SET \@cur_category=LAST_INSERT_ID();\n";
|
|
}
|
|
|
|
#print "INSERT INTO db (Host,DB,User,Select_priv) VALUES ('%','mysql_help','','Y');\n";
|
|
#print "CREATE DATABASE mysql_help;\n";
|
|
|
|
print "USE mysql;\n";
|
|
|
|
print "DROP TABLE IF EXISTS help_topic;\n";
|
|
print "CREATE TABLE help_topic (";
|
|
print " help_topic_id int unsigned not null auto_increment,";
|
|
print " name varchar(64) not null,";
|
|
print " description text not null,";
|
|
print " example text not null,";
|
|
print " url varchar(128) not null,";
|
|
print " primary key (help_topic_id),";
|
|
print " unique index(name)";
|
|
print ") type=myisam;\n\n";
|
|
|
|
print "DROP TABLE IF EXISTS help_category;\n";
|
|
print "CREATE TABLE help_category (";
|
|
print " help_category_id smallint unsigned not null auto_increment,";
|
|
print " name varchar(64) not null,";
|
|
print " url varchar(128) not null,";
|
|
print " primary key (help_category_id),";
|
|
print " unique index (name)";
|
|
print ") type=myisam;\n\n";
|
|
|
|
print "DROP TABLE IF EXISTS help_relation;\n";
|
|
print "CREATE TABLE help_relation (";
|
|
print" help_topic_id int unsigned not null references help_topic,";
|
|
print" help_category_id smallint unsigned not null references help_category,";
|
|
print" primary key (help_category_id, help_topic_id),";
|
|
print ") type=myisam;\n\n";
|
|
|
|
print "SET \@cur_category=null;\n\n";
|
|
|
|
my $in_section_6_3= 0;
|
|
|
|
for(<>)
|
|
{
|
|
if ($_=~/\@section Functions for Use in \@code{SELECT} and \@code{WHERE} Clauses/ &&
|
|
!$in_section_6_3){
|
|
$in_section_6_3= 1;
|
|
next;
|
|
}
|
|
|
|
if ($_=~/\@section/ && $in_section_6_3){
|
|
$in_section_6_3= 0;
|
|
next;
|
|
}
|
|
|
|
if (!$in_section_6_3) { next; }
|
|
|
|
my $c_name= "";
|
|
|
|
($c_name)=m|\@c for_mysql_help,(.+?)$|;
|
|
if (!($c_name eq "") && ! ($c_name =~ m/$cat_name/i)){
|
|
($cat_name)= $c_name;
|
|
new_category($cat_name);
|
|
next;
|
|
}
|
|
|
|
($c_name)=m|\@subsubsection (.+?)$|;
|
|
if (!($c_name eq "") && ! ($c_name =~ m/$cat_name/i)){
|
|
($cat_name)= $c_name;
|
|
new_category($cat_name);
|
|
next;
|
|
}
|
|
|
|
($c_name)=m|\@subsection (.+?)$|;
|
|
if (!($c_name eq "") && ! ($c_name =~ m/$cat_name/i)){
|
|
($cat_name)= $c_name;
|
|
new_category($cat_name);
|
|
next;
|
|
}
|
|
|
|
($f_name)=m|\@findex (.+?)$|;
|
|
if (!($f_name eq "")){
|
|
flush_all($mode);
|
|
($func_name)= ($f_name);
|
|
$mode= "text";
|
|
next;
|
|
}
|
|
|
|
if ($_=~/\@example/ && ($mode eq "text")){
|
|
$mode= "example";
|
|
next;
|
|
}
|
|
|
|
if ($_=~/\@end example/ && ($mode eq "example")){
|
|
flush_all($mode);
|
|
next;
|
|
}
|
|
|
|
if ($mode eq "text") { $text .= $_; }
|
|
if ($mode eq "example") { $example .= $_; }
|
|
}
|
|
|
|
|
|
print "DELETE help_category ";
|
|
print "FROM help_category ";
|
|
print "LEFT JOIN help_relation ON help_category.help_category_id=help_relation.help_category_id ";
|
|
print "WHERE help_relation.help_category_id is null;"
|
|
|