AnonSec Shell
Server IP : 185.86.78.101  /  Your IP : 216.73.216.213
Web Server : Apache
System : Linux 675867-vds-valikoshka1996.gmhost.pp.ua 5.4.0-150-generic #167-Ubuntu SMP Mon May 15 17:35:05 UTC 2023 x86_64
User : www ( 1000)
PHP Version : 7.4.33
Disable Function : passthru,exec,system,putenv,chroot,chgrp,chown,shell_exec,popen,proc_open,pcntl_exec,ini_alter,ini_restore,dl,openlog,syslog,readlink,symlink,popepassthru,pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,imap_open,apache_setenv
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : OFF  |  Sudo : ON  |  Pkexec : OFF
Directory :  /www/server/mysql/mysql-test/include/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ HOME ]     

Current File : /www/server/mysql/mysql-test/include/escape_sql.inc
# ==== Purpose ====
#
# Escape occurences of " or ' in a string, in order to be used inside
# an SQL statement.
#
# ==== Usage ====
#
# --let $escape_string= String
# [--let $enclosing_char= "|' (default is ")]
# --source include/escape_sql.inc
# --echo $escape_string
#
# Parameters:
#   $escape_string
#     String to search for occurences of the $enclosing_char and
#     escape them according to SQL syntax. It is also the output
#     parameter.

#   $enclosing_char
#     The character that will be used to enclose $escape_string when
#     included in an SQL statement.
#

if (!$escape_string)
{
  --die Error: set $escape_string before sourcing escape_sql.inc
}

if ($escape_string != '')
{
  --let $_enclosing_char= "
  if ($enclosing_char)
  {
    --let $_enclosing_char= $enclosing_char
  }


  --let $_output_filename= `SELECT UUID()`
  --let $_output_filename= $MYSQLTEST_VARDIR/tmp/$_output_filename
  --let full_output_filename= $_output_filename
  --let to_replace= $escape_string
  --let used_quote= $_enclosing_char

  perl;
    my $out= $ENV{'full_output_filename'};
    my $to_replace= $ENV{'to_replace'};
    my $quote= $ENV{'used_quote'};

    $to_replace =~ s/$quote/$quote$quote/g;

    open(FILE, ">", $out) or die "Error $? opening $output_filename: $!";
    print FILE $to_replace or die "Error $? writing to $output_filename: $!";
    close FILE or die "Error $? closing $output_filename: $!";
    chmod 0777, $out;
  EOF

  --let $escape_string= `SELECT LOAD_FILE('$_output_filename')`
}
# Cleanup
--remove_file $_output_filename

Anon7 - 2022
AnonSec Team