Update query should be an UPDATE, not a SELECT.
[asterisk/asterisk.git] / contrib / scripts / dbsep.cgi
index dd060f7..d15390c 100755 (executable)
@@ -36,8 +36,8 @@ while (<CFG>) {
        chomp;
        next if (m/^[#;]/);
        next if (m/^\s*$/);
        chomp;
        next if (m/^[#;]/);
        next if (m/^\s*$/);
-       my ($name,$value) = split '=';
-       $cfg{lc($name)} = $value;
+       my ($name,@value) = split '=';
+       $cfg{lc($name)} = join('=', @value);
 }
 close CFG;
 
 }
 close CFG;
 
@@ -57,7 +57,9 @@ if ($mode eq 'single') {
        $sth->execute() || throw_error("Invalid query: $sql");
        $row = $sth->fetchrow_hashref();
        foreach (keys %$row) {
        $sth->execute() || throw_error("Invalid query: $sql");
        $row = $sth->fetchrow_hashref();
        foreach (keys %$row) {
-               push @answer, encode($_) . "=" . encode($row->{$_});
+               foreach my $item (split /\;/, $row->{$_}) {
+                       push @answer, encode($_) . "=" . encode($item);
+               }
        }
        $sth->finish();
        $dbh->disconnect();
        }
        $sth->finish();
        $dbh->disconnect();
@@ -74,7 +76,9 @@ if ($mode eq 'single') {
        while (my $row = $sth->fetchrow_hashref()) {
                @answer = ();
                foreach (keys %$row) {
        while (my $row = $sth->fetchrow_hashref()) {
                @answer = ();
                foreach (keys %$row) {
-                       push @answer, encode($_) . "=" . encode($row->{$_});
+                       foreach my $item (split /\;/, $row->{$_}) {
+                               push @answer, encode($_) . "=" . encode($item);
+                       }
                }
                print join("&", @answer) . "\n";
        }
                }
                print join("&", @answer) . "\n";
        }
@@ -95,7 +99,7 @@ if ($mode eq 'single') {
                }
                $get{$name}++;
        }
                }
                $get{$name}++;
        }
-       $sql = "SELECT " . join(",", cgi_to_where_clause($cgi, \%cfg, \%get)) . " FROM $table WHERE " . join(" AND ", @get);
+       $sql = "UPDATE $table SET " . join(",", cgi_to_where_clause($cgi, \%cfg, \%get)) . " WHERE " . join(" AND ", @get);
        $dbh = DBI->connect($cfg{dsn}, $cfg{dbuser}, $cfg{dbpass});
        $affected = $dbh->do($sql);
        $dbh->disconnect();
        $dbh = DBI->connect($cfg{dsn}, $cfg{dbuser}, $cfg{dbpass});
        $affected = $dbh->do($sql);
        $dbh->disconnect();
@@ -235,7 +239,7 @@ sub cgi_to_where_clause {
                        push @param, "$name='$value'";
                }
        }
                        push @param, "$name='$value'";
                }
        }
-       return join(" AND ", @param);
+       return @param;
 }
 
 sub throw_error {
 }
 
 sub throw_error {