zold 0.13.46 → 0.14.0

data/lib/zold/commands/remote.rb

@@ -63,10 +63,15 @@ Available commands:
     #{Rainbow('remote elect').green}
       Pick a random remote node as a target for a bonus awarding
     #{Rainbow('remote trim').green}
-      Remote the least reliable nodes
+      Remove the least reliable nodes
+    #{Rainbow('remote select [options]').green}
+      Select the strongest n nodes.
     #{Rainbow('remote update').green}
       Check each registered remote node for availability
 Available options:"
+        o.integer '--tolerate',
+          'Maximum level of errors we are able to tolerate',
+          default: Remotes::TOLERANCE
         o.bool '--ignore-score-weakness',
           'Don\'t complain when their score is too weak',
           default: false
@@ -86,6 +91,19 @@ Available options:"
         o.bool '--reboot',
           'Exit if any node reports version higher than we have',
           default: false
+
+        # @todo #292:30min Group options by subcommands
+        #  Having all the options in one place _rather than grouping them by subcommands_
+        #  makes the help totally misleading and hard to read.
+        #  Not all the options are valid for every command - that's the key here.
+        #  The option below (`--max-nodes`) is an example.
+        #  **Next actions:**
+        #  - Implement the suggestion above.
+        #  - Remove note from the --max-nodes option saying that it applies to the select
+        #  subcommand only.
+        o.integer '--max-nodes',
+          "This applies only to the select subcommand. Number of nodes to limit to. Defaults to #{Remotes::MAX_NODES}.",
+          default: Remotes::MAX_NODES
         o.bool '--help', 'Print instructions'
       end
       mine = Args.new(opts, @log).take || return
@@ -109,6 +127,8 @@ Available options:"
       when 'update'
         update(opts)
         update(opts, false)
+      when 'select'
+        select(opts)
       else
         raise "Unknown command '#{command}'"
       end
@@ -184,7 +204,7 @@ Available options:"
 
     def trim(opts)
       @remotes.all.each do |r|
-        remove(r[:host], r[:port], opts) if r[:errors] > Remotes::TOLERANCE
+        remove(r[:host], r[:port], opts) if r[:errors] > opts['tolerate']
       end
       @log.info("The list of remotes trimmed, #{@remotes.all.count} nodes left there")
     end
@@ -231,6 +251,12 @@ in #{(Time.now - start).round(2)}s")
       end
     end
 
+    # @todo #292:30min Implement the logic of selecting the nodes as per #292.
+    #  The strongest n nodes should be selected, where n = opts['max-nodes'].
+    def select(_opts)
+      raise NotImplementedError, 'This feature is not yet implemented.'
+    end
+
     def terminate
       @log.info("All threads before exit: #{Thread.list.map { |t| "#{t.name}/#{t.status}" }.join(', ')}")
       require_relative '../node/front'

data/lib/zold/commands/taxes.rb

@@ -30,12 +30,24 @@ require_relative '../id'
 require_relative '../tax'
 require_relative '../http'
 
-# TAXES command.
+# Zold module.
 # Author:: Yegor Bugayenko (yegor256@gmail.com)
 # Copyright:: Copyright (c) 2018 Yegor Bugayenko
 # License:: MIT
 module Zold
-  # Taxes command
+  # Taxes command.
+  #
+  # The user pays taxes for his/her wallet by running 'zold taxes pay'. As
+  # the White Paper explains (find it at http://papers.zold.io), each wallet
+  # has to pay certain amount of taxes in order to be accepted by any node
+  # in the network. Of course, a node may make a decision to accept and
+  # store any wallet, even if taxes are not paid, but the majority of
+  # nodes will obey the rules and will reject wallets that haven't paid
+  # enough taxes.
+  #
+  # Taxes are paid from wallet to wallet, not from clients to nodes. A wallet
+  # just selects the most suitable wallet to transfer taxes to and sends
+  # the payment. More details you can find in the White Paper.
   class Taxes
     def initialize(wallets:, remotes:, log: Log::Quiet.new)
       @wallets = wallets

data/lib/zold/copies.rb

@@ -22,6 +22,7 @@ require 'time'
 require 'csv'
 require_relative 'atomic_file'
 require_relative 'log'
+require_relative 'wallet'
 
 # The list of copies.
 # Author:: Yegor Bugayenko (yegor256@gmail.com)
@@ -52,8 +53,8 @@ module Zold
         list.reject! { |s| s[:time] < Time.now - 24 * 60 * 60 }
         save(list)
         deleted = 0
-        Dir.new(@dir).select { |f| f =~ /^[0-9]+$/ }.each do |f|
-          next unless list.find { |s| s[:name] == f }.nil?
+        Dir.new(@dir).select { |f| File.basename(f, Wallet::EXTENSION) =~ /^[0-9]+$/ }.each do |f|
+          next unless list.find { |s| s[:name] == File.basename(f, Wallet::EXTENSION) }.nil?
           file = File.join(@dir, f)
           size = File.size(file)
           File.delete(file)
@@ -83,17 +84,17 @@ module Zold
         FileUtils.mkdir_p(@dir)
         list = load
         target = list.find do |s|
-          f = File.join(@dir, s[:name])
+          f = File.join(@dir, "#{s[:name]}#{Wallet::EXTENSION}")
           File.exist?(f) && AtomicFile.new(f).read == content
         end
         if target.nil?
           max = Dir.new(@dir)
-            .select { |f| f =~ /^[0-9]+$/ }
+            .select { |f| File.basename(f, Wallet::EXTENSION) =~ /^[0-9]+$/ }
             .map(&:to_i)
             .max
           max = 0 if max.nil?
           name = (max + 1).to_s
-          AtomicFile.new(File.join(@dir, name)).write(content)
+          AtomicFile.new(File.join(@dir, "#{name}#{Wallet::EXTENSION}")).write(content)
         else
           name = target[:name]
         end
@@ -115,12 +116,12 @@ module Zold
         load.group_by { |s| s[:name] }.map do |name, scores|
           {
             name: name,
-            path: File.join(@dir, name),
+            path: File.join(@dir, "#{name}#{Wallet::EXTENSION}"),
             score: scores.select { |s| s[:time] > Time.now - 24 * 60 * 60 }
               .map { |s| s[:score] }
               .inject(&:+) || 0
           }
-        end.select { |c| File.exist?(c[:path]) }
+        end.select { |c| File.exist?(c[:path]) }.sort_by { |c| c[:score] }.reverse
       end
     end
 
@@ -153,7 +154,7 @@ module Zold
     end
 
     def file
-      File.join(@dir, 'scores')
+      File.join(@dir, "scores#{Wallet::EXTENSION}")
     end
   end
 end

data/lib/zold/hungry_wallets.rb

@@ -0,0 +1,12 @@
+require 'delegate'
+
+module Zold
+  # Wallets decorator that adds missing wallets to the queue to be pulled later.
+  class HungryWallets < SimpleDelegator
+    # @todo #280:30min Add to the queue. Once in there, try
+    #  to pull it as soon as possible as is described in #280.
+    def find(id)
+      super(id)
+    end
+  end
+end

data/lib/zold/log.rb

@@ -22,12 +22,27 @@ require 'rainbow'
 
 STDOUT.sync = true
 
-# The log.
+# Zold module.
 # Author:: Yegor Bugayenko (yegor256@gmail.com)
 # Copyright:: Copyright (c) 2018 Yegor Bugayenko
 # License:: MIT
 module Zold
-  # Logging
+  # Logging facilities.
+  #
+  # There are a few logging classes, which can be used depending on what
+  # you want a user to see. There are three logging levels: INFO, ERROR,
+  # and DEBUG. In "quiet" mode the user won't see anything. This logging
+  # mode is used only for testing, when we don't want to see absolutely
+  # anything in the console. In order to turn off logging entirely, see
+  # how we configure it in test__helper.rb
+  #
+  # The default "regular" logging mode is what a user gets when he/she runs
+  # the gem in commmand line without any specific flags. In that case,
+  # the user will see only INFO and ERROR messages.
+  #
+  # In a "verbose" mode the user will see everything, including DEBUG
+  # messages. The user turns this mode by using --verbose command line argument.
+  #
   module Log
     # Extra verbose log
     class Verbose

data/lib/zold/node/async_entrance.rb

@@ -20,6 +20,7 @@
 
 require 'concurrent'
 require_relative '../log'
+require_relative '../id'
 require_relative '../verbose_thread'
 
 # The async entrance of the web front.
@@ -29,20 +30,36 @@ require_relative '../verbose_thread'
 module Zold
   # The entrance
   class AsyncEntrance
-    def initialize(entrance, log: Log::Quiet.new)
+    THREADS = Concurrent.processor_count * 4
+
+    def initialize(entrance, dir, log: Log::Quiet.new)
       raise 'Entrance can\'t be nil' if entrance.nil?
       @entrance = entrance
+      raise 'Directory can\'t be nil' if dir.nil?
+      raise 'Directory must be of type String' unless dir.is_a?(String)
+      @dir = dir
       raise 'Log can\'t be nil' if log.nil?
       @log = log
+      @mutex = Mutex.new
     end
 
     def start
       @entrance.start do
+        FileUtils.mkdir_p(@dir)
         @pool = Concurrent::FixedThreadPool.new(
-          Concurrent.processor_count * 8,
-          max_queue: Concurrent.processor_count * 32,
-          fallback_policy: :abort
+          AsyncEntrance::THREADS, max_queue: AsyncEntrance::THREADS, fallback_policy: :abort
         )
+        AsyncEntrance::THREADS.times do
+          @pool.post do
+            VerboseThread.new(@log).run(true) do
+              loop do
+                take
+                break if @pool.shuttingdown?
+                sleep Random.rand(100) / 100
+              end
+            end
+          end
+        end
         begin
           yield(self)
         ensure
@@ -69,13 +86,35 @@ module Zold
     end
 
     def push(id, body)
-      @pool.post do
-        VerboseThread.new(@log).run(true) do
-          @entrance.push(id, body)
+      @mutex.synchronize do
+        AtomicFile.new(File.join(@dir, id.to_s)).write(body)
+      end
+    end
+
+    private
+
+    def take
+      id = ''
+      body = ''
+      @mutex.synchronize do
+        opts = queue
+        unless opts.empty?
+          file = File.join(@dir, opts[0])
+          id = opts[0]
+          body = File.read(file)
+          File.delete(file)
         end
       end
-      @log.debug("Pushed #{id}/#{body.length}b to #{@entrance.class.name}, \
-pool: #{@pool.length}/#{@pool.queue_length}")
+      return if id.empty? || body.empty?
+      start = Time.now
+      @entrance.push(Id.new(id), body)
+      @log.debug("Pushed #{id}/#{body.length}b to #{@entrance.class.name} in #{(Time.now - start).round}s")
+    end
+
+    def queue
+      Dir.new(@dir)
+        .select { |f| f =~ /^[0-9a-f]{16}$/ }
+        .sort_by { |f| File.mtime(File.join(@dir, f)) }
     end
   end
 end

data/lib/zold/node/entrance.rb

@@ -37,7 +37,7 @@ module Zold
   class Entrance
     def initialize(wallets, remotes, copies, address, log: Log::Quiet.new)
       raise 'Wallets can\'t be nil' if wallets.nil?
-      raise 'Wallets must be of type Wallets' unless wallets.is_a?(Wallets)
+      raise 'Wallets must implement the contract of Wallets: method #find is required' unless wallets.respond_to?(:find)
       @wallets = wallets
       raise 'Remotes can\'t be nil' if remotes.nil?
       raise "Remotes must be of type Remotes: #{remotes.class.name}" unless remotes.is_a?(Remotes)

data/lib/zold/node/front.rb

@@ -49,6 +49,7 @@ module Zold
       set :show_exceptions, false
       set :server, 'webrick'
       set :version, VERSION # to be injected at node.rb
+      set :protocol, PROTOCOL # to be injected at node.rb
       set :ignore_score_weakness, false # to be injected at node.rb
       set :reboot, false # to be injected at node.rb
       set :home, nil? # to be injected at node.rb
@@ -89,10 +90,13 @@ module Zold
       end
     end
 
+    # @todo #357:30min Test that the headers are being set correctly.
+    #  Currently there are no tests at all that would verify the headers.
     after do
       headers['Cache-Control'] = 'no-cache'
       headers['Connection'] = 'close'
       headers['X-Zold-Version'] = settings.version
+      headers['X-Zold-Protocol'] = settings.protocol.to_s
       headers['Access-Control-Allow-Origin'] = '*'
       headers[Http::SCORE_HEADER] = score.reduced(16).to_s
     end
@@ -150,6 +154,8 @@ module Zold
       {
         version: settings.version,
         score: score.to_h,
+        wallets: settings.wallets.all.count,
+        mtime: wallet.mtime.utc.iso8601,
         body: AtomicFile.new(wallet.path).read
       }.to_json
     end
@@ -170,6 +176,22 @@ module Zold
       wallet.key.to_s
     end
 
+    get %r{/wallet/(?<id>[A-Fa-f0-9]{16})/mtime} do
+      id = Id.new(params[:id])
+      wallet = settings.wallets.find(id)
+      error 404 unless wallet.exists?
+      content_type 'text/plain'
+      wallet.mtime.utc.iso8601.to_s
+    end
+
+    get %r{/wallet/(?<id>[A-Fa-f0-9]{16})/digest} do
+      id = Id.new(params[:id])
+      wallet = settings.wallets.find(id)
+      error 404 unless wallet.exists?
+      content_type 'text/plain'
+      wallet.digest
+    end
+
     get %r{/wallet/(?<id>[A-Fa-f0-9]{16})\.txt} do
       id = Id.new(params[:id])
       wallet = settings.wallets.find(id)
@@ -177,7 +199,7 @@ module Zold
       content_type 'text/plain'
       [
         wallet.network,
-        wallet.version,
+        wallet.protocol,
         wallet.id.to_s,
         wallet.key.to_s,
         '',
@@ -185,7 +207,9 @@ module Zold
         '',
         '--',
         "Balance: #{wallet.balance.to_zld}",
-        "Transactions: #{wallet.txns.count}"
+        "Transactions: #{wallet.txns.count}",
+        "Modified: #{wallet.mtime.utc.iso8601}",
+        "Digest: #{wallet.digest}"
       ].join("\n")
     end
 
@@ -209,7 +233,8 @@ module Zold
       settings.entrance.push(id, after)
       JSON.pretty_generate(
         version: settings.version,
-        score: score.to_h
+        score: score.to_h,
+        wallets: settings.wallets.all.count
       )
     end
 

data/lib/zold/node/safe_entrance.rb

@@ -56,9 +56,9 @@ module Zold
       raise 'Id can\'t be nil' if id.nil?
       raise 'Id must be of type Id' unless id.is_a?(Id)
       raise 'Body can\'t be nil' if body.nil?
-      Tempfile.open do |f|
-        File.write(f.path, body)
-        wallet = Wallet.new(f)
+      Tempfile.open(['', Wallet::EXTENSION]) do |f|
+        File.write(f, body)
+        wallet = Wallet.new(f.path)
         unless wallet.network == @network
           raise "The network name mismatch, the wallet is in '#{wallet.network}', we are in '#{@network}'"
         end

data/lib/zold/node/spread_entrance.rb

@@ -41,7 +41,7 @@ module Zold
       raise 'Entrance can\'t be nil' if entrance.nil?
       @entrance = entrance
       raise 'Wallets can\'t be nil' if wallets.nil?
-      raise 'Wallets must be of type Wallets' unless wallets.is_a?(Wallets)
+      raise 'Wallets must implement the contract of Wallets: method #find is required' unless wallets.respond_to?(:find)
       @wallets = wallets
       raise 'Remotes can\'t be nil' if remotes.nil?
       raise 'Remotes must be of type Remotes' unless remotes.is_a?(Remotes)

data/lib/zold/patch.rb

@@ -33,14 +33,14 @@ module Zold
   class Patch
     def initialize(wallets, log: Log::Quiet.new)
       raise 'Wallets can\'t be nil' if wallets.nil?
-      raise 'Wallets must be of type Wallets' unless wallets.is_a?(Wallets)
+      raise 'Wallets must implement the contract of Wallets: method #find is required' unless wallets.respond_to?(:find)
       @wallets = wallets
       @txns = []
       @log = log
     end
 
     def to_s
-      return 'empty patch' if @txns.empty?
+      return 'nothing' if @txns.empty?
       "#{@txns.count} txns"
     end
 
@@ -50,7 +50,7 @@ module Zold
         @key = wallet.key
         if baseline
           @txns = wallet.txns
-          @log.debug("The baseline: #{@txns.count} transactions, the balance is #{wallet.balance}")
+          @log.debug("The baseline of #{wallet.id} is #{wallet.balance}/#{@txns.count}t")
         else
           @log.debug("The baseline of #{@txns.count} transactions ignored")
         end
@@ -84,9 +84,13 @@ module Zold
             @log.error("RSA signature is redundant at ##{txn.id} of #{wallet.id}: #{txn.to_text}")
             next
           end
+          unless wallet.key.to_s.include?(txn.prefix)
+            @log.error("Payment prefix doesn't match with the key of #{wallet.id}: #{txn.to_text}")
+            next
+          end
           payer = @wallets.find(txn.bnf)
           unless payer.exists?
-            @log.error("Paying wallet #{wallet.id} is absent at ##{txn.id}: #{txn.to_text}")
+            @log.error("Paying wallet file is absent: #{txn.to_text}")
             next
           end
           unless payer.has?(txn.id, wallet.id)

data/lib/zold/remotes.rb

@@ -39,6 +39,12 @@ module Zold
     # At what amount of errors we delete the remote automatically
     TOLERANCE = 8
 
+    # After this limit, the remote runtime must be recorded
+    RUNTIME_LIMIT = 16
+
+    # Default number of nodes to fetch.
+    MAX_NODES = 16
+
     # Empty, for standalone mode
     class Empty < Remotes
       def initialize
@@ -180,6 +186,7 @@ module Zold
         begin
           yield Remotes::Remote.new(r[:host], r[:port], score, idx, log: log, network: @network)
           idx += 1
+          raise 'Took too long to execute' if (Time.now - start).round > Remotes::RUNTIME_LIMIT
         rescue StandardError => e
           error(r[:host], r[:port])
           errors = errors(r[:host], r[:port])

data/lib/zold/score.rb

@@ -18,7 +18,7 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 
-require 'digest'
+require 'openssl'
 require 'time'
 require_relative 'remotes'
 
@@ -101,7 +101,7 @@ module Zold
     def hash
       raise 'Score has zero value, there is no hash' if @suffixes.empty?
       @suffixes.reduce(prefix) do |pfx, suffix|
-        Digest::SHA256.hexdigest(pfx + ' ' + suffix)[0, 64]
+        OpenSSL::Digest::SHA256.new("#{pfx} #{suffix}").hexdigest
       end
     end
 

data/lib/zold/tax.rb

@@ -18,7 +18,6 @@
 # OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
 # SOFTWARE.
 
-require 'digest'
 require_relative 'key'
 require_relative 'id'
 require_relative 'amount'

data/lib/zold/upgrades.rb

@@ -0,0 +1,57 @@
+# Copyright (c) 2018 Yegor Bugayenko
+#
+# 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 NONINFINGEMENT. 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_relative 'log'
+
+module Zold
+  # Class to manage data upgrades (when zold itself upgrades).
+  class Upgrades
+    def initialize(version, directory, log: Log::Verbose.new)
+      @version = version
+      @directory = directory
+      @log = log
+    end
+
+    # @todo #285:30min Write the upgrade manager tests that ensure:
+    #  - Nothing breaks without the version file.
+    #  - The upgrade scripts run when there is a version file and there are pending upgrade scripts.
+    #  - Make sure *only* the correct upgrade scripts run.
+    def run
+      # This is a workaround, remove it once this class works correctly
+      require_relative '../../upgrades/2.rb'
+      UpgradeTo2.new(Dir.pwd, @log).exec
+
+      scripts.each do |script|
+        @version.apply(script)
+      end
+    end
+
+    private
+
+    def scripts
+      Dir.glob("#{@directory}/*.rb").sort.map do |path|
+        basename = File.basename(path)
+        match = basename.match(/^(\d+\.\d+\.\d+)\.rb$/)
+        raise 'An upgrade script has to be named <version>.rb.' unless match
+        match[1]
+      end
+    end
+  end
+end

data/lib/zold/version.rb

@@ -23,5 +23,6 @@
 # Copyright:: Copyright (c) 2018 Yegor Bugayenko
 # License:: MIT
 module Zold
-  VERSION = '0.13.46'.freeze
+  VERSION  = '0.14.0'.freeze
+  PROTOCOL = 2
 end

data/lib/zold/version_file.rb

@@ -0,0 +1,39 @@
+# Copyright (c) 2018 Yegor Bugayenko
+#
+# 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 NONINFINGEMENT. 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 'semantic'
+require_relative 'log'
+
+module Zold
+  # Read and write .zoldata/version.
+  class VersionFile
+    def initialize(path, log: Log::Verbose.new)
+      @path = path
+      @log = log
+    end
+
+    # @todo #285:30min Replace this stub with functionality.
+    #  We need to run the script (`yield`) if the version of
+    #  the script is between the saved version and the current one.
+    def apply(version)
+      @log.info("Version #{version} doesn't need to be applied.")
+    end
+  end
+end

data/lib/zold/wallet.rb

@@ -19,6 +19,7 @@
 # SOFTWARE.
 
 require 'time'
+require 'openssl'
 require_relative 'version'
 require_relative 'key'
 require_relative 'id'
@@ -44,8 +45,12 @@ module Zold
     # must have different names.
     MAIN_NETWORK = 'zold'.freeze
 
+    # The extension of the wallet files
+    EXTENSION = '.z'.freeze
+
     def initialize(file)
       @file = file
+      @file = "#{file}#{EXTENSION}" if File.extname(file).empty?
     end
 
     def ==(other)
@@ -62,10 +67,10 @@ module Zold
       n
     end
 
-    def version
+    def protocol
       v = lines[1].strip
-      raise "Invalid version name '#{v}'" unless v =~ /^[0-9]+$/
-      v
+      raise "Invalid protocol version name '#{v}'" unless v =~ /^[0-9]+$/
+      v.to_i
     end
 
     def exists?
@@ -79,7 +84,7 @@ module Zold
     def init(id, pubkey, overwrite: false, network: 'test')
       raise "File '#{@file}' already exists" if File.exist?(@file) && !overwrite
       raise "Invalid network name '#{network}'" unless network =~ /^[a-z]{4,16}$/
-      AtomicFile.new(@file).write("#{network}\n1\n#{id}\n#{pubkey.to_pub}\n\n")
+      AtomicFile.new(@file).write("#{network}\n#{PROTOCOL}\n#{id}\n#{pubkey.to_pub}\n\n")
     end
 
     def root?
@@ -139,6 +144,14 @@ module Zold
       end
     end
 
+    def mtime
+      File.mtime(@file)
+    end
+
+    def digest
+      OpenSSL::Digest::SHA256.new(File.read(@file)).hexdigest
+    end
+
     # Age of wallet in hours
     def age
       list = txns