|
|
@@ -1,177 +0,0 @@
|
|
|
-#!/usr/bin/env ruby
|
|
|
-
|
|
|
-#
|
|
|
-# mtime_cache
|
|
|
-# Copyright (c) 2016 Borislav Stanimirov
|
|
|
-#
|
|
|
-# Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
|
-# of this software and associated documentation files (the "Software"), to
|
|
|
-# deal in the Software without restriction, including without limitation the
|
|
|
-# rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
|
|
|
-# sell copies of the Software, and to permit persons to whom the Software is
|
|
|
-# furnished to do so, subject to the following conditions:
|
|
|
-#
|
|
|
-# The above copyright notice and this permission notice shall be included in
|
|
|
-# all copies or substantial portions of the Software.
|
|
|
-#
|
|
|
-# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
|
-# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
|
-# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
|
-# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
|
-# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
|
|
|
-# FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
|
|
|
-# IN THE SOFTWARE.
|
|
|
-#
|
|
|
-
|
|
|
-require 'digest/md5'
|
|
|
-require 'json'
|
|
|
-require 'fileutils'
|
|
|
-
|
|
|
-VERSION = "1.0.2"
|
|
|
-
|
|
|
-VERSION_TEXT = "mtime_cache v#{VERSION}"
|
|
|
-
|
|
|
-USAGE = <<ENDUSAGE
|
|
|
-
|
|
|
-Usage:
|
|
|
- mtime_cache [<globs>] [-g globfile] [-d] [-q|V] [-c cache]
|
|
|
-ENDUSAGE
|
|
|
-
|
|
|
-HELP = <<ENDHELP
|
|
|
-
|
|
|
- Traverse through globbed files, making a json cache based on their mtime.
|
|
|
- If a cache exists, changes the mtime of existing unchanged (based on MD5
|
|
|
- hash) files to the one in the cache.
|
|
|
-
|
|
|
- Options:
|
|
|
-
|
|
|
- globs Ruby-compatible glob strings (ex some/path/**/*.java)
|
|
|
- A extension pattern is allowd in the form %{pattern}
|
|
|
- (ex some/path/*.{%{pattern1},%{pattern2}})
|
|
|
- The globs support the following patterns:
|
|
|
- %{cpp} - common C++ extensions
|
|
|
-
|
|
|
- -g, --globfile A file with list of globs to perform (one per line)
|
|
|
-
|
|
|
- -?, -h, --help Show this help message.
|
|
|
- -v, --version Show the version number (#{VERSION})
|
|
|
- -q, --quiet Don't log anything to stdout
|
|
|
- -V, --verbose Show extra logging
|
|
|
- -d, --dryrun Don't change any files on the filesystem
|
|
|
- -c, --cache Specify the cache file for input and output.
|
|
|
- [Default is .mtime_cache.json]
|
|
|
-
|
|
|
-ENDHELP
|
|
|
-
|
|
|
-param_arg = nil
|
|
|
-ARGS = { :cache => '.mtime_cache.json', :globs => [] }
|
|
|
-
|
|
|
-ARGV.each do |arg|
|
|
|
- case arg
|
|
|
- when '-g', '--globfile' then param_arg = :globfile
|
|
|
- when '-h', '-?', '--help' then ARGS[:help] = true
|
|
|
- when '-v', '--version' then ARGS[:ver] = true
|
|
|
- when '-q', '--quiet' then ARGS[:quiet] = true
|
|
|
- when '-V', '--verbose' then ARGS[:verbose] = true
|
|
|
- when '-d', '--dryrun' then ARGS[:dry] = true
|
|
|
- when '-c', '--cache' then param_arg = :cache
|
|
|
- else
|
|
|
- if param_arg
|
|
|
- ARGS[param_arg] = arg
|
|
|
- param_arg = nil
|
|
|
- else
|
|
|
- ARGS[:globs] << arg
|
|
|
- end
|
|
|
- end
|
|
|
-end
|
|
|
-
|
|
|
-def log(text, level = 0)
|
|
|
- return if ARGS[:quiet]
|
|
|
- return if level > 0 && !ARGS[:verbose]
|
|
|
- puts text
|
|
|
-end
|
|
|
-
|
|
|
-if ARGS[:ver] || ARGS[:help]
|
|
|
- log VERSION_TEXT
|
|
|
- exit if ARGS[:ver]
|
|
|
- log USAGE
|
|
|
- log HELP
|
|
|
- exit
|
|
|
-end
|
|
|
-
|
|
|
-if ARGS[:globs].empty? && !ARGS[:globfile]
|
|
|
- log 'Error: Missing globs'
|
|
|
- log USAGE
|
|
|
- exit 1
|
|
|
-end
|
|
|
-
|
|
|
-EXTENSION_PATTERNS = {
|
|
|
- :cpp => "c,cc,cpp,cxx,h,hpp,hxx,inl,ipp,inc,ixx"
|
|
|
-}
|
|
|
-
|
|
|
-cache_file = ARGS[:cache]
|
|
|
-
|
|
|
-cache = {}
|
|
|
-
|
|
|
-if File.file?(cache_file)
|
|
|
- log "Found #{cache_file}"
|
|
|
- cache = JSON.parse(File.read(cache_file))
|
|
|
- log "Read #{cache.length} entries"
|
|
|
-else
|
|
|
- log "#{cache_file} not found. A new one will be created"
|
|
|
-end
|
|
|
-
|
|
|
-globs = ARGS[:globs].map { |g| g % EXTENSION_PATTERNS }
|
|
|
-
|
|
|
-globfile = ARGS[:globfile]
|
|
|
-if globfile
|
|
|
- File.open(globfile, 'r').each_line do |line|
|
|
|
- line.strip!
|
|
|
- next if line.empty?
|
|
|
- globs << line % EXTENSION_PATTERNS
|
|
|
- end
|
|
|
-end
|
|
|
-
|
|
|
-if globs.empty?
|
|
|
- log 'Error: No globs in globfile'
|
|
|
- log USAGE
|
|
|
- exit 1
|
|
|
-end
|
|
|
-
|
|
|
-files = {}
|
|
|
-num_changed = 0
|
|
|
-
|
|
|
-globs.each do |glob|
|
|
|
- Dir[glob].each do |file|
|
|
|
- next if !File.file?(file)
|
|
|
-
|
|
|
- mtime = File.mtime(file).to_i
|
|
|
- hash = Digest::MD5.hexdigest(File.read(file))
|
|
|
-
|
|
|
- cached = cache[file]
|
|
|
-
|
|
|
- if cached && cached['hash'] == hash && cached['mtime'] < mtime
|
|
|
- mtime = cached['mtime']
|
|
|
-
|
|
|
- log "mtime_cache: changing mtime of #{file} to #{mtime}", 1
|
|
|
-
|
|
|
- File.utime(File.atime(file), Time.at(mtime), file) if !ARGS[:dry]
|
|
|
- num_changed += 1
|
|
|
- else
|
|
|
- log "mtime_cache: NOT changing mtime of #{file}", 1
|
|
|
- end
|
|
|
-
|
|
|
- files[file] = { 'mtime' => mtime, 'hash' => hash }
|
|
|
- end
|
|
|
-end
|
|
|
-
|
|
|
-log "Changed mtime of #{num_changed} of #{files.length} files"
|
|
|
-log "Writing #{cache_file}"
|
|
|
-
|
|
|
-if !ARGS[:dry]
|
|
|
- dirname = File.dirname(cache_file)
|
|
|
- unless File.directory?(dirname)
|
|
|
- FileUtils.mkdir_p(dirname)
|
|
|
- end
|
|
|
- File.open(cache_file, 'w').write(JSON.pretty_generate(files))
|
|
|
-end
|
Kim Kulling