You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
88 lines
2.6 KiB
88 lines
2.6 KiB
8 years ago
|
#! /bin/sed -nf
|
||
|
1i\
|
||
|
/** @page database Database Schema\
|
||
|
\
|
||
|
@dot\
|
||
|
digraph schema {
|
||
|
|
||
|
# get everithing on one single line
|
||
|
H;$!d;$x
|
||
|
|
||
|
# remove all single-line comment lines
|
||
|
s/\n--[^\n]*//g
|
||
|
|
||
|
# encode html entities
|
||
|
s/&/\&##SEMICOLON##/g
|
||
|
s/</\<##SEMICOLON##/g
|
||
|
s/>/\>##SEMICOLON##/g
|
||
|
|
||
|
# reduce spaces
|
||
|
s,\t\| \+, ,g
|
||
|
|
||
|
# remove multiline comments
|
||
|
:f;s,\(.*\)/\*.*\*/[ \n]*;*,\1,g;tf
|
||
|
|
||
|
# remove empty lines
|
||
|
s,\n\+,\n,g
|
||
|
|
||
|
# remove unknown commands
|
||
|
s,\(;\|\n\) *\(INSERT\|DELIMITER\|USE\|DROP\|CREATE[ \n]\+DATABASE\)[ \n]\+[^;]*;\+,,ig
|
||
|
|
||
|
# convert special characters within quotes
|
||
|
:a;s/^\(\([^"]*"[^",]*"\)*[^"]*"[^"]*\),\([^"]*".*\)/\1\##COMMA##\3/g;ta
|
||
|
:c;s/^\(\([^']*'[^',]*'\)*[^']*'[^']*\),\([^']*'.*\)/\1\##COMMA##\3/g;tc
|
||
|
|
||
|
# backup everything to the buffer
|
||
|
# then analyze only on one create table
|
||
|
:i
|
||
|
h
|
||
|
s,.*\(create[ \n]\+table[^;]*;\).*,\1,ig
|
||
|
|
||
|
# start html table node
|
||
|
s|CREATE[ \n]\+TABLE[ \n]\+\(IF[ \n]\+NOT[ \n]\+EXISTS[ \n]\+\)\?`\?\(\w\+\)`\?| \2\n [shape=none, margin=0, label=<\n <table bgcolor="#dddddd">\n <tr><td bgcolor="#ddddff" colspan="4"><b>\2</b></td></tr>|ig
|
||
|
|
||
|
# remove key definitions
|
||
|
s/[),][\n ]*\(\(UNIQUE\|PRIMARY\)[ \n]\+\)\?KEY[ \n]\+[^(]*([^)]*)//gi
|
||
|
|
||
|
# move foreign keys as relation to the end
|
||
|
:b;s/\(\w\+\)\([^;]*\)FOREIGN[\n ]\+KEY[ \n]*([ \n]*`\?\([a-z]\+\)`\?[ \n]*)[ \n]*REFERENCES[ \n]*`\?\([a-z]\+\)`\?[ \n]*([ \n]*`\?\([a-z]\+\)`\?[ \n]*)[ \n]*\([^,)]*\)\([,)].*\)/\1\2\7\n \1:\3 -> \4:\5 [label="\6"]##SEMICOLON##/ig;tb
|
||
|
|
||
|
# create table rows
|
||
|
s|[(,][ \n]*`\?\(\w\+\)`\?[ \n]\+\(\w\+\(([^)]\+)\)\?\)[ \n]*\([^,)]*\)|\n <tr><td align="left" port="\1"><b>\1</b></td><td align="left">\2</td><td align="left">\4</td><td></td></tr>|g
|
||
|
# extract comment
|
||
|
s|\(<td\( *\w*="\w*"\)* *>[^<]*\)COMMENT[ \n]\+["']\([^"']*\)["']\([^<]*</td>\)<td></td>|\1\4<td align="left">\3</td>|g
|
||
|
|
||
|
# add line breaks for long lines
|
||
|
s|\(<td[^>]*>[^<]\{30,40\}\)[ \n]\+\([^<]\{20,\}</td>\)|\1<br/>\2|g
|
||
|
#:d;s|\(<br/>[^<]\{30,40\}\)[ \n]\+\([^<]\{20,\}</td>\)|\1<br/>\2|g;td
|
||
|
|
||
|
# add table comment below
|
||
|
:k;tk
|
||
|
s|[ \n]*)[^)]*COMMENT[ \n]*=[ \n]*["']\?\([^"']*\)["']\?[^;]*|\n <tr><td bgcolor="#ddddff" colspan="4">\1</td></tr>|ig;th
|
||
|
s|)[^);]*;|\n;|ig
|
||
|
:h
|
||
|
|
||
|
# cleanup comment below, add line breaksfor long lines
|
||
|
s|\(<td[^>]*>[^<]\{60,80\}\)[ \n]\+\([^<]\{30,\}</td>\)|\1<br/>\2|g
|
||
|
#:e;s|\(<br/>[^<]\{60,80\}\)[ \n]\+\([^<]\{30,\}</td>\)|\1<br/>\2|g;te
|
||
|
|
||
|
# close table
|
||
|
s|;|\n </table>\n >];|ig
|
||
|
|
||
|
# convert ##COMMA## to ,
|
||
|
s|##COMMA##|,|g
|
||
|
# convert ##SEMICOLON## to ;
|
||
|
s,##SEMICOLON##,;,g
|
||
|
|
||
|
# print one table
|
||
|
p
|
||
|
# get buffer back and remove the table that has just been analyzed
|
||
|
x
|
||
|
s,\(.*\)create[ \n]\+table[^;]*;\(.*\),\1\2,ig
|
||
|
ti
|
||
|
|
||
|
$a\
|
||
|
}\
|
||
|
@enddot\
|
||
|
*/
|