Skip to content

Instantly share code, notes, and snippets.

Embed
What would you like to do?
library(digest)
DEBUG <- FALSE
while(TRUE) {
flag <- paste0(c(sample(c(letters,LETTERS,0:9,":","_","+"), 8, replace = TRUE)), collapse = "")
shasum <- substr(digest(flag,"md5", serialize=FALSE), 27,32)
cat(flag,shasum,"\n")
}
@MartinMSPedersen

This comment has been minimized.

Copy link
Owner Author

@MartinMSPedersen MartinMSPedersen commented Aug 11, 2019

Generate flags and last 6 hexdigits of md5

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.