Questa è una sfida di poliziotti e ladri che puoi trovare qui

La tua sfida è scrivere un programma che emetta un anagramma del suo codice sorgente ma non del codice sorgente originale stesso.

Ad esempio il seguente programma Python,

print`'print*2``'*2`

stampe

'print*2``print*2``'

che ha tutti gli stessi personaggi della sua fonte originale ma in un ordine diverso.

Una volta trovato un tale programma, includere l'output del programma come risposta omettendo il programma che lo genera. Come avrai intuito, i ladri cercheranno di scoprire il programma che hai nascosto o qualsiasi programma che soddisfi le specifiche. Il tuo obiettivo è creare il programma più breve che i ladri non possano decifrare.

Regole

• Come per la maggior parte delle sfide di sbirri e poliziotti , se la tua risposta rimane senza crack per una settimana, puoi aggiungere la soluzione desiderata alla tua risposta e contrassegnarla come Sicura . Una volta al sicuro, una risposta non può essere decifrata dai ladri.

• Non è necessario includere la lingua della soluzione prevista, tuttavia se non si include la lingua i ladri possono decifrarla in qualsiasi lingua precedente alla sfida, mentre se si specifica la lingua possono solo decifrarla in quella fornita.

• Si applicano le regole standard per Quines.

Brain-Flak , 231 byte Cracked by Wheat Wizard

}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{][][][][][][][)()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()()(

Il programma originale utilizza l' -Aargomento.

Ecco i conteggi:

( -> 74
) -> 74
{ -> 34
} -> 34
[ -> 7
] -> 7

Python 2, 96 byte, crackato da math_junkie

Produzione:

B97.off]xo) wnd[ri0'of{r1({r6-{r{rri) {r1(xo0'sjD;0'0'qhF=1({r{r2)4+}twnri2)wnlcof) yp) ) xomd2)

Codice golf per la prima volta! Spero non sia troppo facile.

Haskell, 107 byte, Cracking di nimi

"$$$$'''''''',,----....::<<<<<<<<========>>>>[[[[[[[[]]]]]]]]aaddddddddddddiiiiiiiiiiiimmnnnnpprrtt||||||"

C'è una nuova riga finale aggiuntiva.

Soluzione originale:

main=print$id=<<[[id|i<-"main=print$id=<<[[id|i<-,i==d]>>d:[d]|d<-['$'..'|']]",i==d]>>d:[d]|d<-['$'..'|']]

Provalo online!

La mia idea principale era quella di scrivere un quine che ordina il proprio codice sorgente prima di emetterlo senza usare una sortfunzione di libreria . Solo dopo un primo tentativo di cracking da parte di nimi , mi è venuto in mente che il codice del programma poteva essere ordinato manualmente, codificato nel programma e quindi stampato mentre raddoppiava ogni lettera. Tuttavia, i caratteri disponibili limitati rendono questo approccio più ingombrante e il crack di successo di nimi è abbastanza simile al mio programma originale.

Spiegazione:

main=print$                                      -- full program which prints the following string
  id=<<[[id|i<-"...",i==d]>>d:[d]|d<-['$'..'|']]
                                 |d<-['$'..'|']  -- for each char d in "$%&'()*+,-./012 ... xyz{|"
        [id|i<-"...",i==d]                       -- build a list with as many elements as d is contained in the string
                          >>d:[d]                -- replicate the string "dd" as often as the previous list is long 
  id=<<[                                       ] -- concatenate the resulting list of srings to one single string

Langauge non specificato, 124 byte,

Nel tema della risposta di DJMcMayhem si tratta dei primi 32 caratteri ASCII (a parte 0x00) stampati quattro volte ciascuno. Poiché nessuno di questi è visibile, non ho incluso il codice effettivo nella mia risposta.

Ecco il hexdump:

00000000: 0101 0101 0202 0202 0303 0303 0404 0404  ................
00000010: 0505 0505 0606 0606 0707 0707 0808 0808  ................
00000020: 0909 0909 0a0a 0a0a 0b0b 0b0b 0c0c 0c0c  ................
00000030: 0d0d 0d0d 0e0e 0e0e 0f0f 0f0f 1010 1010  ................
00000040: 1111 1111 1212 1212 1313 1313 1414 1414  ................
00000050: 1515 1515 1616 1616 1717 1717 1818 1818  ................
00000060: 1919 1919 1a1a 1a1a 1b1b 1b1b 1c1c 1c1c  ................
00000070: 1d1d 1d1d 1e1e 1e1e 1f1f 1f1f            ............

Ecco comunque qualche Python che lo stampa (e una nuova riga) se lo desideri:

print"".join(chr(x)*4for x in range(1,32))

Pyth , 32 byte, crackato da math_junkie

J+J=JJ 1-2#pTN%"J+J=JJ 1-2#pTN%"

Soluzione originale

J2#p+"J+J=JJ 1-2#pTN%"N=J-J1 %TJ

Provalo online!

J2                               # Assign 2 to the variable J
  #                              # Infinite loop, break on error
    +"J+J=JJ 1-2#pTN%"N          # appending a '"' to the string 'J+J=JJ 1-2#pTN%'
   p                             # print the string above
                       =J-J1     # subtract 1 from J and assign back to J
                             %TJ # calculated 10%J, with a blank space before to supress output,
                                 # on the 3rd iteration this will be 10%0 that will generate an
                                 # erro and will break out the loop

CJam, 46 byte, rotto da math_junkie

3658:93]93]]]95_959599c101101$::]]]]]]____ccee

V , 21 byte (sicuro!)

"&./124ipq|ÍÓÚîñòÿ

Nota la nuova riga principale.

Poiché questo contiene non stampabili, ecco un hexdump:

00000000: 0a16 1b22 262e 2f31 3234 6970 717c cdd3  ..."&./124ipq|..
00000010: daee f1f2 ff                             .....

Per aiutare alcune persone, ecco un link al V quine estensibile standard

Ecco la versione originale:

ñi241"qp|Ó./ò&
ÚÍîÿ

Provalo online!

La versione leggibile è:

ñi<C-v>241<esc>"qp|Ó./ò&
ÚÍîÿ

Il modo in cui funziona è incorporando l' ordinamento nel quine estensibile predefinito. Mentre pensavo a V-quines a causa di questa risposta, mi sono reso conto che il quine estensibile standard può essere ridotto di tre byte, quindi questa soluzione avrebbe potuto essere:

ñiéÑ~"qp|Ó./ò&
ÚÍîÿ

Spiegazione:

ñi<C-v>241<esc>"qp  " Standard V-quine. Everything after this is recorded into register 'q'
                    " so we can do whatever we want without ruining it's "quine-ness"


|       " Go the first character on the line (I just realized now that this is pointless)
 Ó./ò&  " Put every character on a newline
Ú       " Sort every line
 Íî     " Join all lines together
   ÿ    " Necessary for V-quines

Linguaggio non specificato, 254 byte Craccato da @Dennis!

Dubito che questo vincerà per brevità, ma sarà un dolore da decifrare, quindi vale comunque la pena farlo.

A causa di un bug, l'ordine è 0x0b, 0x0c, 0x0astato un po 'confuso, ma questo è sicuramente il vero risultato.

Ho pensato che non avrei specificato la lingua solo per poter vedere in quali lingue è possibile farlo. Dato che l'output è per lo più non ASCII, ecco un dump dell'output:

00000000: 0102 0304 0506 0708 090b 0c0a 0e0f 1011  ................
00000010: 1213 1415 1617 1819 1a1b 1c1d 1e1f 2021  .............. !
00000020: 2223 2425 2627 2829 2a2b 2c2d 2e2f 3031  "#$%&'()*+,-./01
00000030: 3233 3435 3637 3839 3a3b 3c3d 3e3f 4041  23456789:;<=>?@A
00000040: 4243 4445 4647 4849 4a4b 4c4d 4e4f 5051  BCDEFGHIJKLMNOPQ
00000050: 5253 5455 5657 5859 5a5b 5c5d 5e5f 6061  RSTUVWXYZ[\]^_`a
00000060: 6263 6465 6667 6869 6a6b 6c6d 6e6f 7071  bcdefghijklmnopq
00000070: 7273 7475 7677 7879 7a7b 7c7d 7e7f 8081  rstuvwxyz{|}~...
00000080: 8283 8485 8687 8889 8a8b 8c8d 8e8f 9091  ................
00000090: 9293 9495 9697 9899 9a9b 9c9d 9e9f a0a1  ................
000000a0: a2a3 a4a5 a6a7 a8a9 aaab acad aeaf b0b1  ................
000000b0: b2b3 b4b5 b6b7 b8b9 babb bcbd bebf c0c1  ................
000000c0: c2c3 c4c5 c6c7 c8c9 cacb cccd cecf d0d1  ................
000000d0: d2d3 d4d5 d6d7 d8d9 dadb dcdd dedf e0e1  ................
000000e0: e2e3 e4e5 e6e7 e8e9 eaeb eced eeef f0f1  ................
000000f0: f2f3 f4f5 f6f7 f8f9 fafb fcfd feff       ..............

Questo è ogni singolo carattere ASCII tranne 0x00e 0x0Dperché entrambi hanno causato uno strano comportamento su TIO. Buon divertimento! >: D

Il codice originale era in V.

Provalo online

hexdump:

00000000: ee02 0304 0506 0708 090b 0c0e 0f10 1112  ................
00000010: 1314 1516 1718 191a 1b1c 1d1e 1f20 2122  ............. !"
00000020: 2324 2526 2728 292a 2b2c 2d2e 2f30 3132  #$%&'()*+,-./012
00000030: 3334 3536 3738 393a 3b3c 3d3e 3f40 4142  3456789:;<=>?@AB
00000040: 4344 4546 4748 494a 4b4c 4d4e 4f50 5152  CDEFGHIJKLMNOPQR
00000050: 5455 5657 5859 5a5b 5c5d 5e5f 6061 6263  TUVWXYZ[\]^_`abc
00000060: 6465 6667 6869 6a6b 6c6d 6e6f 7071 7273  defghijklmnopqrs
00000070: 7475 7677 7879 7a7b 7c7d 7e7f 8081 8283  tuvwxyz{|}~.....
00000080: 8485 8687 8889 8a8b 8c8d 8e8f 9091 9293  ................
00000090: 9495 9697 9899 9a9b 9c9d 9e9f a0a1 a2a3  ................
000000a0: a4a5 a6a7 a8a9 aaab adae afb0 b1b2 b3b4  ................
000000b0: b5b6 b7b8 b9ba bbbc bdbe bfc0 c1c2 c3c4  ................
000000c0: c5c6 c7c8 c9ca cbcc cdce cfd0 d1d2 d3d4  ................
000000d0: d5d6 d7d8 d9da dbdc ddde dfe0 e1e2 e3e4  ................
000000e0: e5e6 e7e8 e9ea ebec edef f0f1 f2f3 f4f5  ................
000000f0: f6f7 f8f9 fafb fcfd feff 0a53 ac01       ...........S..

Fondamentalmente, tutto fino al Sgiusto inserisce immondizia nel buffer. L' 0xEEinizio è solo per assicurare che tutto ciò che segue la newline non accada in parte di un ciclo o di una macro. Quindi lo facciamo

¬<C-a>   "Insert every character in the range 0x01-0xFF

Ottava , 91 byte

a=['111111111123666667eeegggkkknnszEEGn};:;:'];
''''''''''(),,,,,-[[[]]]aaaddip;;=ds1010]);

PHP, 130 byte (sicuro)

    $$$$$$''''(((((((()))))))),,22;;;;;;<<==??\\\\____aaccddeeeeeeeehhhhiiiillllmmoooooopppppppppprrrrrrrrssssssssttttttttttvvvvvv

Soluzione originale

Non riuscivo a capire che non era rotto

<?php $v=str_split(str_repeat('<?php\ $v=str_split(str_repeat(\'\',2));sort($v);echo\ implode($v);',2));sort($v);echo implode($v);

Indovina, 43 byte

{4"2)4q):)u(4o'{4t:q(e)(",(t22(u()o)?,?'2e

È stata una decisione difficile se condividere o meno la lingua in cui si trovava, ma penso che questa opzione sia migliore. Nota che c'è una nuova riga finale.