Loading ...
Sorry, an error occurred while loading the content.

14406Re: [Clip] MD5 checksum clip : Resolved

Expand Messages
  • Larry Hamilton
    Nov 15, 2005
    • 0 Attachment
      This got figured out just in time....

      Slashdot has a link to an article about the imminent demise of MD5,
      since it can be cracked with a dedicated high-end PC in about 45 minutes.

      This clip is a lot easier than trying to track down where I put the
      md5.exe for Windows I have somewhere on my hard drive.

      Thanks for sharing!

      Larry Hamilton
      Kairos Computer Solutions
      http://www.kairoscomputers.com/
      Sales Affiliate for Grisoft Anti-Virus


      hsavage wrote:

      >Charles M. Raine wrote:
      > > Hi hrs and others:
      > >
      > > I added a couple instruction to display the name of the file in the
      > > information window to better identify where the result was from.
      > >
      > > H="GetMD5 ID"
      > > ;_Modified-Updated~Created
      > > ;_20051114_3:57:08p_hsavage@...
      > > ;_20051115_2:30:01p_C. M. Raine
      >
      >Good idea Charles, it, usually, never hurts to have more info at any
      >given point so I modified the clip a little further.
      >
      >H="GetMD5 ID"
      >;_Modified-Updated~Created
      >;_20051115_6:46:06p_hsavage@...
      >;_20051115_2:30:01p_C. M. Raine
      >^!ClearVariables
      >^!SetWizardTitle CHECKSUM MD5 ID
      >^!SetWizardLabel Browse And Select File
      >^!Set %md5%=^?[File or Text ChecksuM==SELECTED_TEXT|FILE_TEXT|_WHOLE_FILE]
      >^!IfSame 'SELECTED_TEXT' '^%md5%' SELECTED_TEXT
      >^!SetWizardLabel Browse And Select File
      >^!Set %filename%=^?[(T=O)GET MD5 CHECKSUM for=C:\]
      >^!Goto ^%md5%
      >:SELECTED_TEXT
      >^!Set %md5%=^%md5%^%nl%MD5 CHECKSUM for^%nl%^%nl%^$GetFileName(^##)$
      >^!SetClipboard ^$GetMD5Text(^$GetSelection$)$
      >^!Goto END
      >:FILE_TEXT
      >^!Set %md5%=^%md5%^%nl%MD5 CHECKSUM for^%nl%^%nl%^$GetFileName(^%filename%)$
      >^!SetClipboard ^$GetMD5Text(^$GetFileText(^%filename%)$)$
      >^!Goto END
      >:WHOLE_FILE
      >^!Set %md5%=^%md5%^%nl%MD5 CHECKSUM for^%nl%^%nl%^$GetFileName(^%filename%)$
      >^!SetClipboard ^$GetMD5File(^%filename%)$
      >:END
      >^!Info [C]^$StrUpper("^%md5^%nl%^%nl%^$GetClipboard$")$
      >;^!Info [C]^%md5^%nl%^%nl%^$GetClipboard$
      >
      >Users can un-comment either ^!Info line to see which display they prefer.
      >
      >ºvº
      >05.11.15
      >hrs > hsavage@...
      >
    • Show all 8 messages in this topic