summaryrefslogtreecommitdiff
path: root/lib/bundler/cli/doctor.rb
blob: e4e15fe1a2659e7eb365db14673d8862b4688a91 (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
116
117
118
119
120
121
122
123
124
125
126
127
128
# frozen_string_literal: true

require "rbconfig"
require "find"

module Bundler
  class CLI::Doctor
    DARWIN_REGEX = /\s+(.+) \(compatibility /
    LDD_REGEX = /\t\S+ => (\S+) \(\S+\)/

    attr_reader :options

    def initialize(options)
      @options = options
    end

    def otool_available?
      Bundler.which("otool")
    end

    def ldd_available?
      Bundler.which("ldd")
    end

    def dylibs_darwin(path)
      output = `/usr/bin/otool -L "#{path}"`.chomp
      dylibs = output.split("\n")[1..-1].map {|l| l.match(DARWIN_REGEX).captures[0] }.uniq
      # ignore @rpath and friends
      dylibs.reject {|dylib| dylib.start_with? "@" }
    end

    def dylibs_ldd(path)
      output = `/usr/bin/ldd "#{path}"`.chomp
      output.split("\n").map do |l|
        match = l.match(LDD_REGEX)
        next if match.nil?
        match.captures[0]
      end.compact
    end

    def dylibs(path)
      case RbConfig::CONFIG["host_os"]
      when /darwin/
        return [] unless otool_available?
        dylibs_darwin(path)
      when /(linux|solaris|bsd)/
        return [] unless ldd_available?
        dylibs_ldd(path)
      else # Windows, etc.
        Bundler.ui.warn("Dynamic library check not supported on this platform.")
        []
      end
    end

    def bundles_for_gem(spec)
      Dir.glob("#{spec.full_gem_path}/**/*.bundle")
    end

    def check!
      require "bundler/cli/check"
      Bundler::CLI::Check.new({}).run
    end

    def run
      check_home_permissions
      Bundler.ui.level = "error" if options[:quiet]
      Bundler.settings.validate!
      check!

      definition = Bundler.definition
      broken_links = {}

      definition.specs.each do |spec|
        bundles_for_gem(spec).each do |bundle|
          bad_paths = dylibs(bundle).select {|f| !File.exist?(f) }
          if bad_paths.any?
            broken_links[spec] ||= []
            broken_links[spec].concat(bad_paths)
          end
        end
      end

      if broken_links.any?
        message = "The following gems are missing OS dependencies:"
        broken_links.map do |spec, paths|
          paths.uniq.map do |path|
            "\n * #{spec.name}: #{path}"
          end
        end.flatten.sort.each {|m| message += m }
        raise ProductionError, message
      else
        Bundler.ui.info "No issues found with the installed bundle"
      end
    end

  private

    def check_home_permissions
      check_for_files_not_owned_by_current_user_but_still_rw
      check_for_files_not_readable_or_writable
    end

    def check_for_files_not_owned_by_current_user_but_still_rw
      return unless files_not_owned_by_current_user_but_still_rw.any?
      Bundler.ui.warn "Files exist in Bundler home that are owned by another " \
        "user, but are stil readable/writable. These files are:\n - #{files_not_owned_by_current_user_but_still_rw.join("\n - ")}"
    end

    def check_for_files_not_readable_or_writable
      return unless files_not_readable_or_writable.any?
      Bundler.ui.warn "Files exist in Bundler home that are not " \
        "readable/writable to the current user. These files are:\n - #{files_not_readable_or_writable.join("\n - ")}"
    end

    def files_not_readable_or_writable
      Find.find(Bundler.home.to_s).select do |f|
        !(File.writable?(f) && File.readable?(f))
      end
    end

    def files_not_owned_by_current_user_but_still_rw
      Find.find(Bundler.home.to_s).select do |f|
        (File.stat(f).uid != Process.uid) &&
          (File.writable?(f) && File.readable?(f))
      end
    end
  end
end