This guideline is consistent with the requirements of the Office of Management and Budget (OMB) Circular A-130. NIST is responsible for developing information security standards and guidelines, including minimum requirements for federal systems, but such standards and guidelines shall not apply to national security systems without the express approval of appropriate federal officials exercising policy authority over such systems. This publication has been developed by NIST in accordance with its statutory responsibilities under the Federal Information Security Modernization Act (FISMA) of 2014, 44 U.S.C. Kent Rochford, Acting NIST Director and Under Secretary of Commerce for Standards and National Institute of Standards and Technology This publication is available free of charge from:
National Protection and Programs Directorate It prefills Result with spaces and then replaces with random chars until all spaces are replaced.NIST Special Publication 800-63B Digital Identity Guidelines Authentication and Lifecycle Management Paul A. Here is example that first makes sure all extra modes are filled and the rest. If not, you still need to add them as that was one of your requirements. You just need to check in the end if the generated password contains an Upper and Extra character. You now check in the end if they ever were ever added if required and then add them if so required. This is not a complete solution but with this you will at least remove Upper and Extra from the requirements as soon as they get taken. Procedure TForm1.Button1Click(Sender: TObject) TPasswordMode = (pmLower, pmUpper, pmNumbers, pmExtra) įunction GeneratePassword(ALength: Integer Mode: TPasswordModes): string Result := Result.Insert(1 + Random(Length(Result)), cExtra) Result := Result.Insert(1 + Random(Length(Result)), cUpper) To be sure to have one special char and one uppercase you can do that : function GeneratePassword(ALength: Integer Mode: TPasswordModes): string
0 kommentar(er)
