bcrypt

ความขยันขันแข็ง

ห้องสมุดที่จะช่วยคุณใช้รหัสผ่านแฮช คุณสามารถอ่านเกี่ยวกับ bcrypt ใน Wikipedia และในบทความต่อไปนี้: วิธีเก็บรหัสผ่านอย่างปลอดภัย

การติดตั้ง

ผ่านบอส

เพื่อความสะดวกฉันแนะนำให้ใช้ Boss (Manager Predency for Delphi) สำหรับการติดตั้งเพียงแค่เรียกใช้คำสั่งด้านล่างบนเทอร์มินัล (ตัวอย่างเช่น Windows PowerShell):

 boss install https://github.com/viniciussanchez/bcrypt

คู่มือ

หากคุณเลือกที่จะติดตั้งด้วยตนเองเพียงเพิ่มโฟลเดอร์ต่อไปนี้ลงในโครงการของคุณใน โครงการ> ตัวเลือก> คอมไพเลอร์ทรัพยากร> ไดเรกทอรีและเงื่อนไข> รวมเส้นทางการค้นหาไฟล์

 ../bcrypt/src

การใช้งาน

สร้างแฮช

 var
  LHash: string;
begin
  LHash := TBCrypt.GenerateHash(password, cost, type );
end ;

ที่ไหน

• password เป็นรหัสผ่านที่จะถูกแฮช
• type เป็นหนึ่งใน thashtype.php, thashtype.bsd หรือ Thashtype.default, Thashtype.bsd เป็นค่าเริ่มต้น $ 2A $
• cost คือตัวเลขระหว่าง 10 ถึง 30 ค่าเริ่มต้นคือ 10

เปรียบเทียบแฮช

 var
  LVerify : Boolean;
begin
  LVerify := TBCrypt.CompareHash(password, hash);
end ;

ที่ไหน

• password คือรหัสผ่านที่จะตรวจสอบ
• hash เป็นแฮชที่สร้างขึ้นคล้ายกับ $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFq

รับข้อมูลแฮช

 var
  LHashInfo: THashInfo;
  LSalt, LHash: string;
  LHashType: THashType;
  LCost: Word;
begin
  LHashInfo := TBCrypt.GetHashInfo(hash);
  LCost := LHashInfo.Cost;
  LSalt := LHashInfo.Salt;
  LHash := LHashInfo.Hash;
  LHashType := LHashInfo.& Type ;

ที่ไหน

• hash เป็นแฮชที่สร้างขึ้น

ต้องการการปรับปรุงใหม่

 var
  LNeeds : Boolean;
begin
  LNeeds := TBCrypt.NeedsRehash(hash, cost);
end ;

ที่ไหน

• hash เป็นแฮชคล้ายกับ $2y$12$GuC.Gk2YDsp8Yvga.IuSNOWM0fxEIsAEaWC1hqEI14Wa.7Ps3iYFq
• cost คือตัวเลขระหว่าง 10 ถึง 30 ค่าเริ่มต้นคือ 10

ข้อมูลแฮช

อักขระที่ประกอบด้วยแฮชผลลัพธ์คือ:

 ./ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789

แฮชผลลัพธ์จะมีความยาว 60 อักขระ

การให้เครดิต

รหัสสำหรับสิ่งนี้มาจากแหล่งข้อมูลไม่กี่แห่ง:

• Pascal Bcrypt ฟรี
• Bcrypt สำหรับ Delphi