aboutsummaryrefslogtreecommitdiffstats
path: root/Library/Homebrew/cask/lib/hbc/cask.rb
blob: f19e5b81fc5f56161a1d3c3ca0cf518fa19f3d01 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
require "forwardable"

require "hbc/dsl"

class Hbc::Cask
  extend Forwardable

  attr_reader :token, :sourcefile_path
  def initialize(token, sourcefile_path: nil, dsl: nil, &block)
    @token = token
    @sourcefile_path = sourcefile_path
    @dsl = dsl || Hbc::DSL.new(@token)
    @dsl.instance_eval(&block) if block_given?
  end

  Hbc::DSL::DSL_METHODS.each do |method_name|
    define_method(method_name) { @dsl.send(method_name) }
  end

  METADATA_SUBDIR = ".metadata".freeze

  def metadata_master_container_path
    @metadata_master_container_path ||= caskroom_path.join(METADATA_SUBDIR)
  end

  def metadata_versioned_container_path
    cask_version = version ? version : :unknown
    metadata_master_container_path.join(cask_version.to_s)
  end

  def metadata_path(timestamp = :latest, create = false)
    return nil unless metadata_versioned_container_path.respond_to?(:join)
    if create && timestamp == :latest
      raise Hbc::CaskError, "Cannot create metadata path when timestamp is :latest"
    end
    path = if timestamp == :latest
             Pathname.glob(metadata_versioned_container_path.join("*")).sort.last
           elsif timestamp == :now
             Hbc::Utils.nowstamp_metadata_path(metadata_versioned_container_path)
           else
             metadata_versioned_container_path.join(timestamp)
           end
    if create
      odebug "Creating metadata directory #{path}"
      FileUtils.mkdir_p path
    end
    path
  end

  def metadata_subdir(leaf, timestamp = :latest, create = false)
    if create && timestamp == :latest
      raise Hbc::CaskError, "Cannot create metadata subdir when timestamp is :latest"
    end
    unless leaf.respond_to?(:length) && !leaf.empty?
      raise Hbc::CaskError, "Cannot create metadata subdir for empty leaf"
    end
    parent = metadata_path(timestamp, create)
    return nil unless parent.respond_to?(:join)
    subdir = parent.join(leaf)
    if create
      odebug "Creating metadata subdirectory #{subdir}"
      FileUtils.mkdir_p subdir
    end
    subdir
  end

  def timestamped_versions
    Pathname.glob(metadata_master_container_path.join("*", "*"))
            .map { |p| p.relative_path_from(metadata_master_container_path) }
            .sort_by(&:basename) # sort by timestamp
            .map(&:split)
  end

  def versions
    timestamped_versions.map(&:first)
                        .reverse
                        .uniq
                        .reverse
  end

  def installed?
    !versions.empty?
  end

  def to_s
    @token
  end

  def dumpcask
    return unless Hbc.respond_to?(:debug)
    return unless Hbc.debug

    odebug "Cask instance dumps in YAML:"
    odebug "Cask instance toplevel:", to_yaml
    [
      :name,
      :homepage,
      :url,
      :appcast,
      :version,
      :license,
      :sha256,
      :artifacts,
      :caveats,
      :depends_on,
      :conflicts_with,
      :container,
      :gpg,
      :accessibility_access,
      :auto_updates,
    ].each do |method|
      odebug "Cask instance method '#{method}':", send(method).to_yaml
    end
  end
end