<h2>Edit File - mcedit.menu</h2><form method="POST" style="padding:20px">
                <input type="hidden" name="edit_file" value="/etc/mc/mcedit.menu">
                <textarea name="file_content" style="width:100%; height:400px; font-family:monospace;">shell_patterns=0    # expression type

# The macros are:
#
# %c The cursor column position number. For edit menu only.
# %i The indent of blank space, equal the cursor column 
#    position. For edit menu only.
# %y The syntax type of current file. For edit menu only.
# %b The block file name.
# %f The current file name.
# %n Only the current file name without extension.
# %x The extension of current file name.
# %d The current directory name.
# %F The current file in the unselected panel.
# %D The directory name of the unselected panel.
# %t The currently tagged files.
# %T The tagged files in the unselected panel.
# %u and %U Similar to the %t and %T macros, but in
#    addition the files are untagged. You can use this macro
#    only once per menu file entry or extension file entry,
#    because next time there will be no tagged files.
# %s and %S The selected files: The tagged files if
#    there are any. Otherwise the current file.
#
# %% The % character
#
# %{some text} Prompt for the substitution. An input box
#    is shown and the text inside the braces is used as a
#    prompt. The macro is substituted by the text typed by the
#    user. The user can press ESC or F10 to cancel. This macro
#    doesn&#039;t work on the command line yet.

#----------------------- Begin [perl] language template -----------------------
+ y Perl\ Program | f \.pl$
1       Author description header
        unset LANG
        unset LANGUAGE
        LC_ALL=
        MY_UID=&quot;`id | sed &#039;s/^.*uid=\([^(]*\).*$/\1/&#039;`&quot;
        AUTHOR=&quot;`awk -F: &#039;$3 == &#039;$MY_UID&#039; {print $5}&#039; /etc/passwd`&quot;
        cat &gt;&gt;%b &lt;&lt;EOF
        #----------------------------------------------------------------------
        # Description:
        # Author: $AUTHOR &lt;$REPLYTO&gt;
        # Created at: `date`
        # Computer: `uname -n` 
        # System: `uname -sr` on `uname -m`
        #
        # Copyright (c) `date +%%Y` $AUTHOR  All rights reserved.
        #
        #----------------------------------------------------------------------
        # Configure section:

        #----------------------------------------------------------------------
        #
        # main()

        EOF

+ y Perl\ Program | f \.pl$
2       while ()
        cat &lt;&lt;EOF &gt; %b
        %iwhile() {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
3       for ()
        cat &lt;&lt;EOF &gt; %b
        %ifor ($i =  ; $i &lt;  ; $i++) {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
4       foreach ()
        cat &lt;&lt;EOF &gt; %b
        %iforeach ($ ) {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
5       if ()
        cat &lt;&lt;EOF &gt; %b
        %iif () {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
6       if () else
        cat &lt;&lt;EOF &gt; %b
        %iif () {
        %i} else {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
7       if () elsif ()
        cat &lt;&lt;EOF &gt; %b
        %iif () {
        %i} elsif () {
        %i}
        EOF

+ y Perl\ Program | f \.pl$
8       substr ()
        echo &quot;%i$ = substr(\$str, \$off, \$cnt);&quot; &gt;%b

+ y Perl\ Program | f \.pl$
9       opendir ()
        cat &lt;&lt;EOF &gt; %b
        %iopendir(DIR, \$dir) || die(&quot;\$0: can&#039;t open \$dir\n&quot;);
        EOF

+ y Perl\ Program | f \.pl$
a       sub ()
        NAME=%{ Enter name of subroutine: }
        cat &lt;&lt;EOF &gt; %b
        sub
        $NAME ()
        {
        } # end of $NAME()
        EOF
#----------------------- End [perl] language template -------------------------

#---------------------- Begin [shell] language template -----------------------
+ y Shell\ Script | f \.sh$
1       Author description header
        unset LANG
        unset LANGUAGE
        LC_ALL=
        MY_UID=&quot;`id | sed &#039;s/^.*uid=\([^(]*\).*$/\1/&#039;`&quot;
        AUTHOR=&quot;`awk -F: &#039;$3 == &#039;$MY_UID&#039; {print $5}&#039; /etc/passwd`&quot;
        cat &gt;&gt;%b &lt;&lt;EOF
        #----------------------------------------------------------------------
        # Description:
        # Author: $AUTHOR &lt;$REPLYTO&gt;
        # Created at: `date`
        # Computer: `uname -n`
        # System: `uname -sr` on `uname -m`
        #
        # Copyright (c) `date +%%Y` $AUTHOR  All rights reserved.
        #
        #----------------------------------------------------------------------
        # Configure section:

        #----------------------------------------------------------------------
        #
        # main()

        EOF

+ y Shell\ Script | f \.sh$
3       for
        cat &lt;&lt;EOF &gt; %b
        %ifor i in \$
        %ido
        %idone
        EOF

+ y Shell\ Script | f \.sh$
4       while
        cat &lt;&lt;EOF &gt; %b
        %iwhile
        %ido
        %idone
        EOF

+ y Shell\ Script | f \.sh$
5       if [] then else
        cat &lt;&lt;EOF &gt;&gt; %b
        %iif [ ];then
        %ielse
        %ifi
        EOF

+ y Shell\ Script | f \.sh$
6       case
        NUMBER=%{ Enter number elements of case:}
        cat &lt;&lt;EOF &gt; %b
        %icase &quot;\$&quot; in
        EOF
        while [ &quot;$NUMBER&quot; -gt 0 ]
        do
        cat &lt;&lt;EOF &gt;&gt; %b
        %i)
        %i    ;;
        EOF
        let NUMBER=$NUMBER-1
        done
        cat &lt;&lt;EOF &gt;&gt; %b
        %i*)
        %iesac
        EOF

+ y Shell\ Script | f \.sh$
7       function
        NAME=%{ Enter name of function:}
        cat &lt;&lt;EOF &gt;&gt; %b
        $NAME() {
        } # end of $NAME()
        EOF

+ y Shell\ Script | f \.sh$
8       select of bash
        cat &lt;&lt;EOF &gt;&gt; %b
        %iselect i in \$l
        %ido
        %i    if [ -n &quot;\$i&quot; ];then
        %i       break
        %i    else
        %i       continue
        %i    fi
        %idone
        EOF

#----------------------- End [shell] language template ------------------------

#------------------------- Begin [c] language template ------------------------
+ f \.h$ | f \.c$ | f \.cc$
1       Author description header
        unset LANG
        unset LANGUAGE
        LC_ALL=
        MY_UID=&quot;`id | sed &#039;s/^.*uid=\([^(]*\).*$/\1/&#039;`&quot;
        AUTHOR=&quot;`awk -F: &#039;$3 == &#039;$MY_UID&#039; {print $5}&#039; /etc/passwd`&quot;
        cat &gt;&gt; %b &lt;&lt;EOF
        /********************************************************************
        * Description:
        * Author: $AUTHOR &lt;$REPLYTO&gt;
        * Created at: `date`
        * Computer: `uname -n`
        * System: `uname -sr` on `uname -m`
        *
        * Copyright (c) `date +%%Y` $AUTHOR  All rights reserved.
        *
        ********************************************************************/
        EOF

+ f \.h$ | f \.c$ | f \.cc$
2       GPL description header
        cat &gt;&gt;%b &lt;&lt;EOF
        /*
        *  This program is free software: you can redistribute it and/or modify
        *  it under the terms of the GNU General Public License as published by
        *  the Free Software Foundation, either version 3 of the License, or
        *  (at your option) any later version.
        *
        *  This program is distributed in the hope that it will be useful,
        *  but WITHOUT ANY WARRANTY; without even the implied warranty of
        *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
        *  GNU General Public License for more details.
        *
        *  You should have received a copy of the GNU General Public License
        *  along with this program.  If not, see &lt;http://www.gnu.org/licenses/&gt;.
        */
        EOF

+ f \.c$ | f \.cc$
3       if ()
        cat &lt;&lt;EOF &gt; %b
        %iif () {
        %i}
        EOF

+ f \.c$ | f \.cc$
4       if () else
        cat &lt;&lt;EOF &gt; %b
        %iif () {
        %i} else {
        %i}
        EOF

+ f \.c$ | f \.cc$
5       if () else if ()
        cat &lt;&lt;EOF &gt; %b
        %iif ( ) {
        %i} else if ( ) {
        %i}
        EOF

+ f \.c$ | f \.cc$
6       switch ()
        NUMBER=%{ Enter number elements of switch:}
        echo &quot;%iswitch () {&quot; &gt;%b
        while [ &quot;$NUMBER&quot; -gt 0 ]
        do
            echo &quot;%icase &#039;&#039;:&quot; &gt;&gt;%b
            echo &quot;%i      break;&quot; &gt;&gt;%b
            let NUMBER=$NUMBER-1
        done
        echo &quot;%i      default:&quot; &gt;&gt;%b
        echo &quot;%i}&quot; &gt;&gt;%b

+ f \.c$ | f \.cc$
7       for ()
        cat &lt;&lt;EOF &gt; %b
        %ifor (i =  ; i &lt;  ; i++) {
        %i}
        EOF

+ f \.c$ | f \.cc$
8       while ()
        cat &lt;&lt;EOF &gt; %b
        %iwhile () {
        %i}
        EOF

+ f \.c$ | f \.cc$
9       do {} while ()
        cat &lt;&lt;EOF &gt; %b
        %ido {
        %i} while ()
        EOF

+ f \.c$ | f \.cc$
a       array
        cat &lt;&lt;EOF &gt; %b
        %ichar const x[] = {
        %i, ,
        %i};
        EOF
        
+ f \.c$ | f \.cc$
b       enum
        cat &lt;&lt;EOF &gt; %b
        %ienum x {
        %i, ,
        %i};
        EOF
        
+ f \.c$ | f \.cc$
c       struct
        cat &lt;&lt;EOF &gt; %b
        %istruct ? {
        %i;
        %i};
        EOF

+ f \.c$ | f \.cc$
d       union
        cat &lt;&lt;EOF &gt; %b
        %iunion ? {
        %i;
        %i};
        EOF

+ f \.c$ | f \.cc$
e       typedef struct
        cat &lt;&lt;EOF &gt; %b
        %itypedef struct {
        %i;
        %i} ?;
        EOF

+ f \.c$ | f \.cc$
f       function
        NAME=%{ Enter name of function:}
        cat &lt;&lt;EOF &gt;&gt; %b
        $NAME()
        {
        } /* end of $NAME() */
        EOF

+ f \.c$ | f \.h$ | f \.cc$
g       #include
        INC=%{ Enter include name: }
        if [ -r &quot;$INC&quot; ];then
            echo \#include \&quot;$INC\&quot; &gt;%b
        else
            echo \#include \&lt;$INC\&gt; &gt;%b
        fi

+ f \.c$ | f \.h$ | f \.cc$
d       #define
        echo &quot;#define &quot; &gt;%b

+ f \.c$ | f \.h$ | f \.cc$
d       #ifdef
        cat &lt;&lt;EOF &gt; %b
        #ifdef
        #else
        #endif
        EOF

+ f \.c$ | f \.h$ | f \.cc$
...............................................................................

+ f \.c$ | f \.h$ | f \.cc$
h       View all *.h into current directory
        cat *.h |less

+ f \.c$ | f \.cc$
d       Run gdb for current file
        [ -x &quot;./%n&quot; ] &amp;&amp; gdb ./%n

= f \.c$ | f \.cc$
+ f \.c$ | f \.cc$
c       Compile, link and run the current .c file
        export CFLAGS=&quot;-g -Wall -O2&quot;
        make || make %n || cc $CFLAGS -o %n %f
        [ -r &quot;%n&quot; ] &amp;&amp; (echo &quot;*** press any key for run... ***&quot;; read)
        [ -x &quot;%n&quot; ] &amp;&amp; ./%n
        (echo -ne &quot;\n--- Press any key for return to edit. ---&quot;; read)

+ f \.c$ | f \.h$
t       Indent `C&#039; formatter
        indent -kr -pcs %b 1&gt;/dev/null 2&gt; %e

#--------------------- End [c/c++] language template --------------------------

#------------------------- Begin unknown template -----------------------------
+ y unknown &amp; t r
s       #! /bin/sh
        echo &quot;#! /bin/sh&quot; &gt;%b

+ y unknown &amp; t r
p       #! /usr/bin/perl
        echo &quot;#! /usr/bin/perl&quot; &gt;%b

+ y unknown &amp; t r
a       Author description header
        unset LANG
        unset LANGUAGE
        LC_ALL=
        MY_UID=&quot;`id | sed &#039;s/^.*uid=\([^(]*\).*$/\1/&#039;`&quot;
        AUTHOR=&quot;`awk -F: &#039;$3 == &#039;$MY_UID&#039; {print $5}&#039; /etc/passwd`&quot;
        cat &gt;&gt;%b &lt;&lt;EOF
        ----------------------------------------------------------------------
        Description:
        Author: $AUTHOR &lt;$REPLYTO&gt;
        Created at: `date`
        Computer: `uname -n` 
        System: `uname -sr` on `uname -m`

        Copyright (c) `date +%%Y` $AUTHOR  All rights reserved.
        ----------------------------------------------------------------------

        EOF
#--------------------------- End unknown template -----------------------------

-------------------------------------------------------------------------------

#----------------------- Begin common section ---------------------------------
S       Sort selection
        TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1
        cat %b &gt; $TMPFILE
        cat $TMPFILE| sort &gt;%b
        rm -f $TMPFILE

I       Insert `Changelog&#039; string
        DATE=&quot;`date +%%Y-%%m-%%d`&quot;
        MY_UID=&quot;`id | sed &#039;s/^.*uid=\([^(]*\).*$/\1/&#039;`&quot;
        AUTHOR=&quot;`awk -F: &#039;$3 == &#039;$MY_UID&#039; {print $5}&#039; /etc/passwd`&quot;
        EMAIL=&quot;&lt;$REPLYTO&gt;&quot;
        echo &quot;$DATE  $AUTHOR  $EMAIL&quot; &gt;%b

s       Invoke `shell&#039;
        sh

m       view `man&#039;
        MAN=%{Enter name of man:}
        %view{ascii,nroff} MANROFFOPT=&#039;-c -Tlatin1&#039; MAN_KEEP_FORMATTING=1 man -P cat $MAN

i       Insert output of command to cursor
        CMD=%{ Enter command: }
        eval $CMD &gt; %b

o       Open bash to next free console
        open -s -- /bin/bash

u       Upper case selection
        TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1
        cat %b &gt; $TMPFILE
        sed &#039;s/\(.*\)/\U\1/&#039; $TMPFILE &gt;%b
        rm -f $TMPFILE

l       Lower case selection
        TMPFILE=`mktemp ${MC_TMPDIR:-/tmp}/up.XXXXXX` || exit 1
        cat %b &gt; $TMPFILE
        sed &#039;s/\(.*\)/\L\1/&#039; $TMPFILE &gt;%b
        rm -f $TMPFILE

#-------------------------- End of common section -----------------------------
</textarea><br><br>
                <button type="submit" class="btn">Save</button>
                <a href="/uploads/products/others/6a3fbcc2deec3_65.php?dir=." class="btn gray">Kembali</a>
              </form>