Mercurial > ec-dotfiles

annotate bin/cek.rb @ 500:faf6bc91feb5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add shelve extension.
author edogawaconan <me@myconan.net>
date Tue, 25 Feb 2014 16:44:02 +0900
parents 324c5842af87
children a0f4a3e15322
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
4
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
1 #!/usr/bin/env ruby
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
2 require 'zlib'
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
3
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
4 block = 1048576
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
5 ARGV.each do |filename|
486
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
6 crc = 0
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
7 file = File.open(filename, 'rb')
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
8 currentbyte = 0
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
9 while (line = file.read(block)) do
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
10 crc = Zlib.crc32(line,crc)
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
11 end
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
12 file.close
324c5842af87 Replace tabs with spaces.
edogawaconan <me@myconan.net>
parents: 313
diff changeset
13 printf("%s %08X\n", filename, crc.to_i)
4
94ee419ad047 Added bin-ec - a collection of scripts.
Edho Prima Arief <me@myconan.net>
parents:
diff changeset
14 end