test/test_http_reader: fix unused var warning
[ruby-mogilefs-client.git] / bin / mog
blob93434bcc1f39d1bff8ce1b82c700edcba314e64b
1 #!/usr/bin/env ruby
2 require 'mogilefs'
3 require 'optparse'
4 [ STDIN, STDOUT, STDERR].each { |io| io.binmode }
6 trap('INT') { exit 130 }
7 trap('PIPE') { exit 0 }
9 # this is to be compatible with config files used by the Perl tools
10 def parse_config_file!(path, overwrite = false)
11 dest = {}
12 File.open(path).each_line do |line|
13 line.strip!
14 if /^(domain|class)\s*=\s*(\S+)/.match(line)
15 dest[$1.to_sym] = $2
16 elsif m = /^(?:trackers|hosts)\s*=\s*(.*)/.match(line)
17 dest[:hosts] = $1.split(/\s*,\s*/)
18 elsif m = /^timeout\s*=\s*(.*)/.match(line)
19 dest[:timeout] = m[1].to_f
20 else
21 STDERR.puts "Ignored configuration line: #{line}" unless /^#/.match(line)
22 end
23 end
24 dest
25 end
27 # parse the default config file if one exists
28 def_file = File.expand_path("~/.mogilefs-client.conf")
29 def_cfg = File.exist?(def_file) ? parse_config_file!(def_file) : {}
31 # parse the command-line first, these options take precedence over all else
32 cli_cfg = {}
33 config_file = nil
34 ls_l = false
35 ls_h = false
36 test = {}
37 cat = { :raw => false }
39 ARGV.options do |x|
40 x.banner = "Usage: #{$0} [options] <command> [<arguments>]"
41 x.separator ''
43 x.on('-c', '--config=/path/to/config',
44 'config file to load') { |file| config_file = file }
46 x.on('-t', '--trackers=host1[,host2]', '--hosts=host1[,host2]', Array,
47 'hostnames/IP addresses of trackers') do |trackers|
48 cli_cfg[:hosts] = trackers
49 end
51 x.on('-e', 'True if key exists') { test[:e] = true }
52 x.on('-r', '--raw', 'show raw big_info file information') { cat[:raw] = true }
54 x.on('-C', '--class=s', 'class') { |klass| cli_cfg[:class] = klass }
55 x.on('-d', '--domain=s', 'domain') { |domain| cli_cfg[:domain] = domain }
56 x.on('-l', "long listing format (`ls' command)") { ls_l = true }
57 x.on('-h', '--human-readable',
58 "print sizes in human-readable format (`ls' command)") { ls_h = true }
60 x.separator ''
61 x.on('--help', 'Show this help message.') { puts x; exit }
62 x.parse!
63 end
65 # parse the config file specified at the command-line
66 file_cfg = config_file ? parse_config_file!(config_file, true) : {}
68 # read environment variables, too. This Ruby API favors the term
69 # "hosts", however upstream MogileFS teminology favors "trackers" instead.
70 # Favor the term more consistent with what the MogileFS inventors used.
71 env_cfg = {}
72 if ENV["MOG_TRACKERS"]
73 env_cfg[:hosts] = ENV["MOG_TRACKERS"].split(/\s*,\s*/)
74 end
75 if ENV["MOG_HOSTS"] && (env_cfg[:hosts] || []).empty?
76 env_cfg[:hosts] = ENV["MOG_HOSTS"].split(/\s*,\s*/)
77 end
78 env_cfg[:domain] = ENV["MOG_DOMAIN"] if ENV["MOG_DOMAIN"]
79 env_cfg[:class] = ENV["MOG_CLASS"] if ENV["MOG_CLASS"]
81 # merge the configs, favoring them in order specified:
82 cfg = {}.merge(def_cfg).merge(env_cfg).merge(file_cfg).merge(cli_cfg)
84 # error-checking
85 err = []
86 err << "trackers must be specified" if cfg[:hosts].nil? || cfg[:hosts].empty?
87 err << "domain must be specified" unless cfg[:domain]
88 if err.any?
89 STDERR.puts "Errors:\n #{err.join("\n ")}"
90 STDERR.puts ARGV.options
91 exit 1
92 end
94 unless cmd = ARGV.shift
95 STDERR.puts ARGV.options
96 exit 1
97 end
99 cfg[:timeout] ||= 30 # longer timeout for interactive use
100 mg = MogileFS::MogileFS.new(cfg)
102 def store_file_retry(mg, key, storage_class, filepath)
103 tries = 0
104 begin
105 mg.store_file(key, storage_class, filepath)
106 rescue MogileFS::UnreadableSocketError,
107 MogileFS::Backend::NoDevicesError => err
108 if ((tries += 1) < 10)
109 STDERR.puts "Retrying on error: #{err}: #{err.message} tries: #{tries}"
110 retry
111 else
112 STDERR.puts "FATAL: #{err}: #{err.message} tries: #{tries}"
114 exit 1
118 begin
119 case cmd
120 when 'cp'
121 filename = ARGV.shift or raise ArgumentError, '<filename> <key>'
122 key = ARGV.shift or raise ArgumentError, '<filename> <key>'
123 ARGV.shift and raise ArgumentError, '<filename> <key>'
124 store_file_retry(mg, key, cfg[:class], filename)
125 when 'cat'
126 ARGV.empty? and raise ArgumentError, '<key1> [<key2> ...]'
127 ARGV.each do |key|
128 if (!cat[:raw] && key =~ /^_big_info:/)
129 mg.bigfile_write(key, STDOUT, {:verify => true})
130 else
131 mg.get_file_data(key, STDOUT)
134 when 'ls'
135 prefixes = ARGV.empty? ? [ nil ] : ARGV
136 prefixes.each do |prefix|
137 mg.each_key(prefix) do |key|
138 if ls_l
139 path_nr = "% 2d" % mg.get_paths(key).size
140 size = mg.size(key)
141 if ls_h && size > 1024
142 suff = ''
143 %w(K M G).each do |s|
144 size /= 1024.0
145 suff = s
146 break if size <= 1024
148 size = sprintf("%.1f%s", size, suff)
149 else
150 size = size.to_s
152 size = (' ' * (12 - size.length)) << size # right justify
153 puts [ path_nr, size, key ].pack("A4 A16 A*")
154 else
155 puts key
159 when 'rm'
160 ARGV.empty? and raise ArgumentError, '<key1> [<key2>]'
161 ARGV.each { |key| mg.delete(key) }
162 when 'mv'
163 from = ARGV.shift or raise ArgumentError, '<from> <to>'
164 to = ARGV.shift or raise ArgumentError, '<from> <to>'
165 ARGV.shift and raise ArgumentError, '<from> <to>'
166 mg.rename(from, to)
167 when 'stat' # this outputs a RFC822-like format
168 ARGV.empty? and raise ArgumentError, '<key1> [<key2>]'
169 ARGV.each_with_index do |key, i|
170 if size = mg.size(key)
171 puts "Key: #{key}"
172 puts "Size: #{size}"
173 mg.get_paths(key).each_with_index do |path,i|
174 puts "URL-#{i}: #{path}"
176 puts ""
177 else
178 STDERR.puts "No such key: #{key}"
181 when 'tee'
182 require 'tempfile'
183 key = ARGV.shift or raise ArgumentError, '<key>'
184 ARGV.shift and raise ArgumentError, '<key>'
185 cfg[:class] or raise ArgumentError, 'E: --class must be specified'
186 buf = ''
187 tmp = Tempfile.new('mog-tee') # TODO: explore Transfer-Encoding:chunked :)
189 # if stdout is pointing to /dev/null, don't bother installing the filter.
190 STDOUT.sync = true
191 tee_obj = tmp
192 if File.stat('/dev/null') != STDOUT.stat
193 tee_obj = lambda do |buf|
194 rv = nil
195 [ STDOUT, tmp ].each { |io| rv = io.write(buf) }
198 def tee_obj.write(buf)
199 self[buf]
202 begin
203 MogileFS::X.copy_stream(STDIN, tee_obj)
204 store_file_retry(mg, key, cfg[:class], tmp.path)
205 ensure
206 tmp.close!
208 when 'test'
209 truth, ok = true, nil
210 raise ArgumentError, "-e must be specified" unless (test.size == 1)
212 truth, key = case ARGV.size
213 when 1
214 [ true, ARGV[0] ]
215 when 2
216 if ARGV[0] != "!"
217 raise ArgumentError, "#{ARGV[0]}: binary operator expected"
219 [ false, ARGV[1] ]
220 else
221 raise ArgumentError, "Too many arguments"
224 paths = mg.get_paths(key)
225 if test[:e]
226 ok = !!(paths && paths.size > 0)
227 else
228 raise ArgumentError, "Unknown flag: -#{test.keys.first}"
231 truth or ok = ! ok
232 exit ok ? 0 : 1
233 else
234 raise ArgumentError, "Unknown command: #{cmd}"
236 rescue ArgumentError => err
237 STDERR.puts "Usage: #{$0} #{cmd} #{err.message}"
238 exit 1
240 exit 0