403Webshell
Server IP : 51.89.169.208  /  Your IP : 216.73.216.211
Web Server : Apache
System : Linux ns3209505.ip-198-244-202.eu 4.18.0-553.27.1.el8_10.x86_64 #1 SMP Tue Nov 5 04:50:16 EST 2024 x86_64
User : yellowleaf ( 1019)
PHP Version : 7.4.33
Disable Function : exec,passthru,shell_exec,system
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON  |  Sudo : ON  |  Pkexec : ON
Directory :  /proc/self/root/proc/thread-self/root/usr/share/zsh/5.5.1/functions/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :


[ Back ]     

Current File : /proc/self/root/proc/thread-self/root/usr/share/zsh/5.5.1/functions/transpose-lines
# Transpose lines.  This is like in emacs: with a positive argument
# (default 1) the current line and the previous line are swapped and the
# cursor goes down one line; with a negative argument the previous two
# lines are swapped and the cursor goes up one line.

emulate -L zsh
setopt extendedglob # xtrace

local -a match mbegin mend
integer count=${NUMERIC:-1}
local init prev lline final rrline

if (( ${NUMERIC:-1} < 0 )); then
  while (( count++ )); do
    [[ $LBUFFER != (#b)(|*$'\n')([^$'\n']#$'\n')([^$'\n']#$'\n')([^$'\n']#) ]] && return 1
    
    LBUFFER=$match[1]$match[3]
    RBUFFER=$match[2]$match[4]$RBUFFER
  done
else
  while (( count-- )); do
    [[ $LBUFFER != (#b)(*)$'\n'([^$'\n']#) ]] && return 1

    prev=$match[1]
    lline=$match[2]

    if [[ $prev = (#b)(*$'\n')([^$'\n']#) ]]; then
      init=$match[1]
      prev=$match[2]
    fi

    if [[ $RBUFFER = (#b)([^$'\n']#)$'\n'(*) ]]; then
      rline=$match[1]
      final=$match[2]
      prev+=$'\n'
    else
      rline=$RBUFFER
    fi

    LBUFFER=$init$lline$rline$'\n'$prev
    RBUFFER=$final
  done
fi

Youez - 2016 - github.com/yon3zu
LinuXploit