Variable: tramp-awk-decode

tramp-awk-decode is a variable defined in tramp-sh.el.gz.

Value

"%a '\\\nBEGIN {\n  b64 = \"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/\"\n}\n{\n  for (i=1; i<=length($0); i++) {\n    c=index(b64, substr($0,i,1))\n    if(c--) {\n      for(b=0; b<6; b++) {\n        o=o*2+int(c/32); c=(c*2)%%64\n        if(++obc==8) {\n          if (o) {\n            printf \"%%c\", o\n          } else {\n            system(\"dd if=/dev/zero bs=1 count=1 %n\")\n          }\n          obc=0; o=0\n        }\n      }\n    }\n  }\n}'"

Documentation

Awk program to use for decoding a file.

Format specifiers are replaced by tramp-expand-script, percent characters need to be doubled.

Source Code

;; Defined in /usr/src/emacs/lisp/net/tramp-sh.el.gz
(defconst tramp-awk-decode "\
%a '\\
BEGIN {
  b64 = \"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/\"
}
{
  for (i=1; i<=length($0); i++) {
    c=index(b64, substr($0,i,1))
    if(c--) {
      for(b=0; b<6; b++) {
        o=o*2+int(c/32); c=(c*2)%%64
        if(++obc==8) {
          if (o) {
            printf \"%%c\", o
          } else {
            system(\"dd if=/dev/zero bs=1 count=1 %n\")
          }
          obc=0; o=0
        }
      }
    }
  }
}'"
  "Awk program to use for decoding a file.
Format specifiers are replaced by `tramp-expand-script', percent
characters need to be doubled.")