sql: allow dburl prefix 'sql:'

This commit is contained in:
Ole Tange 2010-09-09 23:30:56 +02:00
parent 0db41520c3
commit 9711803e61

View file

@ -762,9 +762,10 @@ sub check_permissions {
sub parse_dburl { sub parse_dburl {
my $url = shift; my $url = shift;
my %options = (); my %options = ();
# mysql://[[user][:password]@][host][:port]/[database[?sql statement]] # sql:mysql://[[user][:password]@][host][:port]/[database[?sql statement]]
if($url=~m!((?:oracle|ora|mysql|pg|postgres|postgresql)(?:s|ssl|)| if($url=~m!(?:sql:)? # You can prefix with 'sql:'
((?:oracle|ora|mysql|pg|postgres|postgresql)(?:s|ssl|)|
(?:sqlite|sqlite2|sqlite3)):// # Databasedriver ($1) (?:sqlite|sqlite2|sqlite3)):// # Databasedriver ($1)
(?: (?:
([^:@]*) # Username ($2) ([^:@]*) # Username ($2)