Побудуйте шифр rot32


10

Побудувати шифрований гофрований шифр rot13 занадто просто, оскільки букви в одному просторі символів ASCII однакові. Давайте спробуємо замість цього двигун rot32.

Ваше завдання - створити функцію, яка приймає рядок Base64 як вхідний і повертає ту саму рядок, але з кожною буквою обертається 32 символи від свого початкового (по суті, з першим бітом відвернутим).

Рядок кодування base64, який буде використано для цієї проблеми, має 0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/характер прокладки =. Це робиться для того, щоб запобігти рішенням, які б інакше використовували або імпортували вбудовану бібліотеку Base64, де рядки зазвичай починаються Aзамість них 0.

Example inputs and outputs:

> rot32("THE+QUICK+BROWN+FOX+JUMPS+OVER+THE+LAZY+DOG=")
nb8ukoc6eu5liqhu9irudogjmuip8lunb8uf4tsu7ia=

> rot32("NB8UKOC6EU5LIQHU9IRUDOGJMUIP8LUNB8UF4TSU7IA=")
h5Eoei6C8oBfckboFclo7iadgocjEfoh5Eo9AnmoDc4=

> rot32("Daisy++daisy++give+me+your+answer+true/I+/+m+half+crazy++all+for+the+love+of+you")
7GOY2uuJGOY2uuMO/KuSKu2U+XuGTY0KXuZX+KvcuvuSuNGRLuIXG32uuGRRuLUXuZNKuRU/KuULu2U+

Виграє найкоротша програма для будь-якої мови.


4
З питання, я б зрозумів, що ми повинні зробити декодування base-64, деякий подвійний подвійний і кодування base-64. Але ваш зразок відповіді говорить про те, що всі розмови про базу-64 - це червона оселедець, і це як гниль 13, за винятком того, що набір символів, які не ігноруються, більший. Що це таке?
Пітер Тейлор

1
Це подібно до гниття 13, але я думав, що битвинг може бути можливою стратегією для скорочення коду.
Джо З.

Відповіді:


4

CJam, 24 байти

q"+"":/{a[A"{,^}/_32m>er

Спробуйте в Інтернеті.

Як це працює

q         " Read from STDIN.                                                              ";
"+"       " Push that string.                                                             ";
":/{a[A"  " Push that string.                                                             ";
{         " For each character in the second string:                                      ";
  ,       "   Push the string of all charcters with a lower ASCII code.                   ";
  ^       "   Take the symmetric difference of the two topmost strings on the stack.      ";
}/        " Result: 'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/0123456789'.   ";
_32m>     " Rotate a copy 32 characters to the right.                                     ";
er        " Perform character transliteration.                                            ";


5

Перл, 41

Просто проста транслітерація . Читає з STDIN, виводить на STDOUT:

$_=<>;y#0-9a-zA-Z+/#w-zA-Z+/0-9a-v#;print

Спробуйте це тут.


2
Хто каже, що Perl - це не езоланг (та / або мова, орієнтована на гольф)?
Оптимізатор

Ви можете збрити кілька символів, використовуючи -pі -eключі командного рядка , щоб позбутися від $_=<>;і ;print.
Mark

4

CJam, 45 41 38 29 27 26 байт

qA,'{,97>_eu"+/"+++_32m>er

Читає рядок, який потрібно зашифрувати з STDIN

Як це працює :

q                              "Read input";
 A,                            "Get 0 - 9 array";
   '{,                         "Get array/string of ASCII code 0 till ASCII code of z";
      97>                      "Remove first 96 characters to get a-z string";
         _eu                   "Copy a-z array and turn it to uppercase A-Z array";
            "+/"+++            "Push string +/ and concat all 4 arrays";
                   _32m>       "Copy the array and move first 32 characters to end";
                        er     "Transliterate input using the two arrays, leaving ="
                               "intact as it does not appear in the first array";

Спробуйте його онлайн тут


3

Пітона, 178

b = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/"

def rot32(s):
    o = ""
    for c in s:
        if c not in b:
            o += c
        else:
            o += b[b.find(c) ^ 32] 
    return o

Це нереалізована реалізація останнього місця в Python, яку ви можете використовувати для тестування власної реалізації.


Принаймні, я сподіваюся, що він залишається на останньому місці.
Джо З.

0

GolfScript ( 41 40 байт)

{'0:a{A['2/{{,>}*}%'+/'+[1$]+.32/(*@?=}%

Демонстрація в Інтернеті

До цього є дві частини: переклад - це варіант останньої техніки, згаданої в моїй підказці trв GolfScript , а інша частина - це створення струни, яка використовує рядок 0:a{A[як масив значень char і складку, щоб перетворити їх на діапазони символів Зверніть увагу на використання 32/(*побудови перекладеного рядка, вставивши перші 32 символи між другими 32 символами та символом, який ми перекладаємо.


0

пітон, 69

f = lambda s,b: ''.join(b[b.index(c)^32] if c in b else c for c in s)

тести

>>> b = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/"
>>> print f("THE+QUICK+BROWN+FOX+JUMPS+OVER+THE+LAZY+DOG=", b)
nb8ukoc6eu5liqhu9irudogjmuip8lunb8uf4tsu7ia=

>>> print f('nb8ukoc6eu5liqhu9irudogjmuip8lunb8uf4tsu7ia=', b)
THE+QUICK+BROWN+FOX+JUMPS+OVER+THE+LAZY+DOG=

0

LiveScript, 91

r=[\0 to\9].concat [\a to\z] [\A to\Z] [\+ \/];f=(.replace /[^\W_]/ ->r[32.^.r.indexOf it])

LiveScript, 50

Якщо рядок дозволено як другий аргумент.

f=(a,b)->a.replace /[^\W_]/ ->r[32.^.b.indexOf it]

0

JavaScript 164

b="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/"
function rot32(s){for(i=0,o="";i<s.length;i++)c=s[i],j=b.indexOf(c),o+=j>-1?b[j^32]:c
return o}
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.