บทนำ

เห็นได้ชัดว่าคำถามนี้ถูกถามที่นี่และมันปิดอย่างน่าเสียดาย ฉันคิดว่ามันเป็นความคิดที่ดีที่จะลองอีกครั้ง แต่ทำถูกต้อง

XKCDดูที่วิธีการที่เราได้รับการฝึกฝนให้ใช้ "รหัสผ่านที่จำยาก" โดยคิดว่าปลอดภัย แต่ใช้เวลาคอมพิวเตอร์ 3 วันในการถอดรหัส ในทางกลับกันการจดจำความยาว 4-5 คำจะทำให้รหัสผ่านของควน Intropy อัพและง่ายต่อการจดจำ บ้าแล้วมันใช้ได้ยังไงเหรอ?

ท้าทาย

งานวันนี้คือสร้างรหัสผ่าน 5 คำโดยใช้คำ 4 คำต่อรหัสผ่านและอย่างน้อย 4 ตัวอักษรต่อคำ แต่ไม่เกิน รหัสผ่านของ Kuan จะต้องมีการคำนวณสำหรับทุกรหัสผ่าน แต่จะไม่ได้ตั้งค่าขั้นต่ำที่บังคับ

รหัสผ่านของควน Intropy คืออะไร?

รหัสผ่านของ Kuan Intropy เป็นการวัดว่ารหัสผ่านไม่สามารถคาดเดาได้ มีการคำนวณง่ายๆคือE = เข้าสู่ระบบ₂ (R) * L E เป็นรหัสผ่านของ Kuan Intropy, R เป็นช่วงของอักขระที่มีอยู่และ L สำหรับความยาวรหัสผ่าน

ช่วงของตัวละครที่มีอยู่เป็นตัวอธิบาย เป็นช่วงของอักขระที่รหัสผ่านสามารถมีได้ในกรณีนี้คือตัวพิมพ์ใหญ่และตัวพิมพ์เล็ก เนื่องจากมี 26 ตัวอักษรในตัวอักษร 26 x 2 = 52 ตัวอักษรในช่วงทั้งหมดของรหัสผ่าน

ความยาวของรหัสผ่านยังอธิบายด้วยตนเอง มันคือความยาวรวมของรหัสผ่านหลังการสร้าง

ข้อ จำกัด

• ไม่มีอินพุต
• คำไม่สามารถปรากฏขึ้นอีกครั้งในรหัสผ่านเดียวกัน
• ไม่อนุญาตให้ใช้สัญลักษณ์หรือตัวเลขในรหัสผ่าน
• 4 คำต่อรหัสผ่าน แต่บังคับขั้นต่ำ 4 ตัวอักษรต่อคำ
• ไม่มีช่องว่างระหว่างคำ
• คุณไม่สามารถสร้างรหัสผ่านเดิมซ้ำแล้วซ้ำอีก
• แต่ละคำจะต้องเป็นตัวพิมพ์ใหญ่ในรหัสผ่าน
• เอาต์พุตจะต้องสามารถอ่านได้โดยมนุษย์และต้องเว้นระยะ ต้องรวมรหัสผ่าน Intropy ของ Kuan ด้วยโดยใช้สมการรหัสผ่านของ Kuan ด้านบน
• พจนานุกรม คุณต้องใช้สิ่งนี้ดาวน์โหลดมันเป็นไฟล์ข้อความและรวมเข้าด้วยกัน นี่จะเป็นรายการที่คุณใช้ค้นหาคำ รหัสของคุณควรถือว่าใช้ได้
• นี่คือcode-golfไบต์ที่สั้นที่สุดชนะ

เอาท์พุต

TriedScarProgressPopulation 153.9
TryingPastOnesPutting 119.7
YearnGasesDeerGiven 108.3
DoubtFeetSomebodyCreature 142.5
LiquidSureDreamCatch 114.0

Python 2, 102 101 97 91 ไบต์

from random import*
exec"x=''.join(x.title()for x in sample(f,4));print(x,57*len(x)/10);"*5

fถือว่าพจนานุกรมเป็นรายการที่มีชื่อว่า

สามารถทดสอบได้โดยการบันทึกไฟล์เป็นdict.txtและการโทร

f = open('dict.txt').readlines()

PowerShell (3.0+), 77 ไบต์

1..5|%{($p=-join($d|random -c 4|%{culture|% te*|% tot* $_}));57*$p.Length/10}

ลองออนไลน์!

ใช้กลอุบายของJonathan Allan57*len/10

$dมีพจนานุกรมเป็นอาร์เรย์ของคำ หากคุณกำลังเล่นที่บ้านและต้องการเติม$d:

$d=-split(irm pastebin.com/raw/eMRSQ4u2)

ใช้เวอร์ชัน golfed ของ(Get-Culture).TextInfo.ToTitleCase()เพื่อใช้ประโยชน์อักษรตัวแรก; ฉันไม่คิดว่าจะมีวิธีที่สั้นกว่าในการทำเช่นนั้นใน PowerShell

ที่เหลือฉันคิดว่าตรงไปตรงมา

ลิงก์ TIO มีทั้งพจนานุกรม ปิดการใช้งานแคชและไปถั่ว!

เยลลี่ , 22 ไบต์

Ẋḣ4ŒtFµL×57÷⁵⁸,K
çЀ5Y

ลิงก์ monadic ที่ใช้รายการรายการอักขระพจนานุกรมแยกวิเคราะห์ (ตามที่อนุญาตในการแชท )

ลองออนไลน์! (คลิก "อาร์กิวเมนต์" เพื่อซ่อนพจนานุกรมและลดความจำเป็นในการเลื่อน)

อย่างไร?

เนื่องจากพจนานุกรมมีเพียงคำที่ถูกต้อง ( 4ตัวอักษรหรือมากกว่าเท่านั้น[a-z]) จึงไม่จำเป็นต้องตรวจสอบสภาพนี้

เนื่องจากทุกคำในพจนานุกรมมีความยาวใน[4-8]ความยาวของรหัสผ่านที่เป็นไปได้ใน[16,32]และ entropies เป็นไปได้ที่จะไม่แตกต่างกันไปรอบหนึ่งสถานทศนิยมกว่าโดยการแทนที่ด้วยlog(52,2) 5.7ปัญหาเดียวก็คือว่าการใช้ค่าจุดลอยตัว5.7จะให้ลอยข้อผิดพลาดจุดปัดเศษสำหรับความยาว18, และ26 31อย่างไรก็ตามคูณด้วย57และแล้วหารด้วย10โดยใช้×57÷⁵หลีกเลี่ยงนี้ (ในขณะที่ยังคงความไบต์สั้นกว่าการพิมพ์เต็มรูปแบบค่าความแม่นยำโดยใช้จุดลอย×52l2¤)

çЀ5Y - Main link: list of list of characters (the parsed dictionary)
   5  - literal 5
 Ѐ   - map across the implicit range [1,2,3,4,5]:
ç     -   last link (1) as a dyad
    Y - join with newlines
      - implicit print

Ẋḣ4ŒtFµL×57÷⁵⁸,K - Link 1, get password and entropy: list of lists of characters, number
Ẋ                - shuffle the list of lists (shuffle all the words)
 ḣ4              - head to 4 (the first four words)
   Œt            - title case (make the first letter of each uppercase)
     F           - flatten into one list of characters
      µ          - monadic chain separation, call that p
       L         - length of p
         57      - 57
        ×        - multiply
            ⁵    - 10
           ÷     - divide -> entropy to 1 decimal place
             ⁸   - link's left argument, p
              ,  - pair -> [p, entropy]
               K - join with (a) space(s)

Ruby, 89 83 ไบต์

d.select!{|w|w[3]}
5.times{p w=d.sample(4).map(&:capitalize)*'',5.700439718*w.size}

dสันนิษฐานว่ารหัสผ่านที่ถูกเก็บไว้ในตัวแปร คุณสามารถเพิ่มบรรทัดนี้ก่อนรหัส:

d=$<.map(&:chomp)

และเรียกใช้สคริปต์เช่นนี้:

$ ruby generate_passwords.rb < dictionary_file.txt

ตัวอย่างผลลัพธ์:

"MarginStarvedOnusInsulted"
142.51099295
"KitchenMiseryLurkJoints"
131.110113514
"InducesNotablePitfallsPrecede"
165.312751822
"FarmersAbortFutileWrapper"
142.51099295
"RoutesBishopGlowFaithful"
136.81055323200002

KitchenMiseryLurkJoints ... ว้าว

-6 ไบต์จาก Ajedi32

Mathematica, 178 ไบต์

t=1;l=Length;While[t<6,s=RandomChoice[Import["https://pastebin.com/raw/eMRSQ4u2"],4];c=Capitalize/@s;f=Flatten@Characters[c];Print[StringJoin[c]," ",Log[2,l@Union@f]*l@f//N];t++]

ลองออนไลน์

คัดลอกและวางโดยใช้ ctrl-v แล้วกด Shift + enter เพื่อเรียกใช้

Mathematica, 136 ไบต์

สมมติว่า m คือพจนานุกรมรหัสคือ

m=ImportString[Import["C:\a.txt"]]

.

t=1;l=Length;While[t<6,s=RandomChoice[m,4];c=Capitalize/@s;f=Flatten@Characters[c];Print[StringJoin[c]," ",Log[2,l@Union@f]*l@f//N];t++]

ทุบตี ,66 65 ไบต์

for w in `shuf -n4 -`;{((l+=${#w}));printf ${w^};};bc<<<$l*5.7004

ลองออนไลน์!

พจนานุกรมถูกเรียกคืนโดย STDIN สลับคำทั้งหมดในพจนานุกรมและส่งออกก่อน 4

สำหรับแต่ละคำให้เพิ่มความยาวเป็น var l และสะท้อนคำที่เป็นตัวพิมพ์ใหญ่ ในที่สุดเรียก bc เพื่อทำคณิตศาสตร์

วิธีแก้ปัญหา Awk 112 ไบต์สี่รหัสผ่าน:

shuf -n16 -|xargs -n4|awk '{for(i=1;i<5;i++)printf toupper(substr($i,1,1))substr($i,2);print(length($0)-3)*5.7}'

(นี่คือการปรับคำตอบของ Martmists แต่ฉันไม่มีตัวแทนที่จะแสดงความคิดเห็น)

Python, 88ไบต์

g={*f}
exec('x="".join(g.pop().title()for i in "a"*4);print(x,len(x)*5.700439718);'*5)

โดยการใช้ประโยชน์จากsetnondeterministic คุณสามารถหลีกเลี่ยงการนำเข้าไลบรารีแบบสุ่มใด ๆ ได้

Japt , 30 ไบต์

5Ç[V=Uö4 ®g u +Zt1ìMm52 *Vl]¸

ลองออนไลน์!

JavaScript (ES6), 164 ไบต์

d=>{for(i=5;i--;)console.log(p="....".replace(/./g,_=>(w=d.splice(Math.random()*d.length|0,1)[0])[0].toUpperCase()+w.slice(1)),(Math.log2(52)*p.length).toFixed(1))}

ถือว่าพจนานุกรมถูกส่งผ่านไปยังฟังก์ชันเป็นอาร์เรย์

ตัวอย่างการทดสอบ

Mathematica, 71 ไบต์

สมมติว่าพจนานุกรมโหลดลงในอาร์เรย์dแล้ว

Table[{#,Log[2,52]StringLength[#]}&[""<>Capitalize@d~RandomSample~4],5]

ชี้แจง:

                                        Capitalize@d                    - Capitalize all the dictionary
                                                    ~RandomSample~4     - make an array with 4 values. By default values can not repeat.
                                    ""<>                                - Concatenate with empty string to turn array into single string.
      {#,Log[2,52]StringLength[#]}&[                               ]    - Put current string next to log(2,52) times length of current string
Table[                                                              ,5] - Repeat this 5 times.

ColdFusion 216 ไบต์

p={};z=arrayLen(c);for(x=0;x<5;x++){pw="";r={};while(structCount(r)<4){n=RandRange(1,z);r.append({"#c[n]#":true});}for(w in structKeyList(r)){pw&=REReplace(w,"\b(\w)","\u\1","All");};p.append({"#pw#":57*len(pw)/10})}

ใช้งานได้ใน ColdFusion 11+ และ Lucee 4.5+

หากต้องการเรียกใช้: https://trycf.com/gist/ff14e2b27d66f28ff69ab90365361b12/acf11?theme=monokai

ลิงก์ TryCF มีสนามกอล์ฟน้อยกว่า แต่เป็นรหัสเดียวกัน

ฉันไม่ได้คาดหวังว่าจะได้คำตอบในการแข่งขันกอล์ฟ ฉันแค่อยากจะเห็นสิ่งที่จะใช้ในการท้าทายนี้ใน ColdFusion โดยเฉพาะอย่างยิ่งเนื่องจากมี CF ไม่มากในคำตอบเหล่านี้ :-) หลังจากการตั้งค่ามันสั้นกว่าที่ฉันคาดไว้อย่างน่าประหลาดใจ

ความพยายามครั้งแรกของฉันสั้นลงเล็กน้อยจนกระทั่งฉันจำได้ว่าคำเดียวกันไม่สามารถใช้ได้มากกว่าหนึ่งครั้ง แม้ว่ามันจะไม่น่าเป็นไปได้สูงที่ตัวสุ่มจะเลือกดัชนีเดียวกันมากกว่าหนึ่งครั้ง แต่ฉันจะดัมพ์ดัชนีลงในคีย์ของโครงสร้างซึ่งจะป้องกันการทำซ้ำ จากนั้นฉันใช้รายการคีย์เพื่อสร้างสตริงรหัสผ่านสุดท้าย ฉันยังใช้เคล็ดลับทางคณิตศาสตร์เพื่อค้นหาเอนโทรปี

PHP , 136 129 ไบต์

-7 ไบต์ขอบคุณJörg

for(shuffle($a);$i++<5;){for($s='',$c=0;$c<4;)strlen($w=$a[$k++])<4?:$s.=ucfirst($w).!++$c;echo$s.' '.log(52, 2)*strlen($s)."
";}

ลองออนไลน์!

Python 3, 252 ไบต์

นี่เป็นความท้าทายครั้งแรกของฉันที่ฉันได้ทำ! ฉันรู้ว่ามีคำตอบอื่น ๆ ของ Python อยู่ที่นี่ (อาจจะดีกว่าของฉัน) แต่นี่ดูสนุกและฉันก็อยากลองต่อไป นี่คือเวอร์ชั่น golfed:

import random, math
with open("d") as f: d=f.read()
l=d.split()
for a in range(5):
 u=[]
 p=""
 for b in range(4):
  w=random.choice([w for w in l if not w in u and len(w)>=4])
  u.append(w)
  w=w.title()
  p+=w
 print("%s %s"%(p,math.log2(52)*len(p)))

ฉันจะโพสต์ลองออนไลน์! ลิงก์ แต่ไม่รองรับไฟล์หลายไฟล์ ดังนั้นนี่คือลิงค์ repl.it: https://repl.it/InIl/0

นอกจากนี้ยังเป็นรุ่นที่ไม่ได้แต่งแต้ม:

import random
import math
with open("d") as f:
    dictionary = f.read() #this is the dictionary text file, simply saved as "d" as to use as few bytes as possible
words = dictionary.split() #here we turn that dictionary string into a list
for a in range(5): #here we iterate through 5 passwords
    used_words = []
    password = ""
    for b in range(4): #here we iterate through the 4 words in each password
        word = ""
        word = random.choice([word for word in words if not word in used_words and len(word) >= 4]) #Thanks to blackadder1337 from #python on freenode IRC for helping me with this.
        used_words.append(word)
        word = word.title()
        password = password + word
    print("%s %s"%(password, math.log2(52) * len(password)))

อย่างที่ฉันบอกนี่เป็นครั้งแรกที่ฉันใช้รหัส gofling ดังนั้นฉันจึงมั่นใจว่านี่น่าจะดีขึ้นมาก

tcl, 137

ไม่ใช่ผู้ชนะแน่นอน แต่ฉันคิดว่ามันสามารถเป็นสนามกอล์ฟได้อีกเล็กน้อย

time {set p "";time {set p [string totitle [lindex $d [expr int(rand()*[llength $d])]]]$p} 4;puts $p\ [expr 5.7004*[string length $p]]} 5

ตัวอย่าง - วัตถุประสงค์ของบรรทัดที่ 1 มีไว้เพื่อใส่เนื้อหาพจนานุกรมลงในตัวแปรเท่านั้นd

เป็นกลุ่ม 87 การกดแป้น

qq:r!echo "$RANDOM"l<CR>D:w o|e w<CR>@"ev4bd:w|bp<CR>p0~wX~wX~wX~Y:.!wc -c<CR>A*5.7003<Esc>:.!bc<CR>PJq4@q

wสันนิษฐานว่าพจนานุกรมอยู่ในไฟล์ชื่อ จะใช้คำที่ต่อเนื่องกัน 4 คำเสมอ

:

qq                       Start recording a macro named 'q'
:r!echo "$RANDOM"l<CR>   Append the result of the shell command `echo "$RANDOM"l`
D                        Delete what you just appended
:w o|                    Save the buffer to the file 'o' and ..
e w<CR>                  Open the file 'w'
@"                       Execute the text we deleted as a normal-mode command
                         This will move the cursor a random number of characters
                         to the right
e                        Go to the end of the next word
v4bd                     Delete 4 words backwards
:w|                      Save the file and ..
bp<CR>                   Open the last buffer (the 'o' file)
p                        Paste the 4 words we deleted
0                        Move the cursor to the beginning of the line
~wX~wX~wX~               Remove the spaces between the words and capitalize
Y                        Copy current line
:.!wc -c<CR>             Pipe the current line through 'wc -c'
A*5.7003<Esc>            Append "*5.7003" to the end of the line
:.!bc<CR>                Pipe the current line through 'bc'
P                        Paste the password above the current line
J                        Join with line bellow
q                        Stop recording the 'q' macro
4@q                      Run the 'q' macro 4 times

q / kdb +, 76 74 65 56 ไบต์

วิธีการแก้:

{(x;5.70044*(#)x)}(,/)@[;0;upper]each -4?" "vs(*)(0:)`:w

ตัวอย่าง:

q){(x;5.70044*(#)x)}(,/)@[;0;upper]each -4?" "vs(*)(0:)`:w
"RulingOverheadSaddensPriest"
153.9119

คำอธิบาย:

อ่านในรายการคำแยกเป็น "" เลือกคำที่สุ่ม 4 คำจากรายการนี้ตัวอักษรตัวพิมพ์ใหญ่ตัวแรกของแต่ละคำจากนั้นรวมเข้าด้วยกัน ฟีดนี้เป็นฟังก์ชั่นแลมบ์ดาซึ่งส่งคืนรหัสผ่านและ 'เอนโทรปี' ที่คำนวณได้:

                                                     `:w / the wordlist is a file called 'w'
                                                 (0:)    / read in the file list (\n separated list)
                                              (*)        / take first (and only) item in the list
                                         " "vs           / split this on " "
                                      -4?                / take 4 random items from this list, neg means 'dont put back'
                      @[; ;     ]                        / apply a function to variable at indices (variable is implicit)
                           upper                         / uppercase (the function being applied)
                         0                               / index 0, the first character
                                 each                    / each of the 4 random items
                  (,/)                                   / 'raze' (flatten lists)
{                }                                       / anonymous lambda function
 (x;            )                                        / a 2-item list, x is first item
            (#)x                                         / count x, return the length of the list
    5.70044*                                             / multiply by 5.70044

หมายเหตุ:

ฉันยุบและใช้ 5.70044 แทน2 xlog 52 xexp...