Class: FPM::Package::PEAR

Inherits:
FPM::Package show all
Defined in:
lib/fpm/package/pear.rb

Overview

This provides PHP PEAR package support.

This provides input support, but not output support.

Instance Attribute Summary

Attributes inherited from FPM::Package

#architecture, #attributes, #attrs, #category, #config_files, #conflicts, #dependencies, #description, #directories, #epoch, #iteration, #license, #maintainer, #name, #provides, #replaces, #scripts, #url, #vendor, #version

Instance Method Summary collapse

Methods inherited from FPM::Package

apply_options, #build_path, #cleanup, #cleanup_build, #cleanup_staging, #convert, #converted_from, default_attributes, #edit_file, #files, inherited, #initialize, option, #output, #script, #staging_path, #to_s, #type, type, types

Methods included from Util

#ar_cmd, #ar_cmd_deterministic?, #copied_entries, #copy_entry, #copy_metadata, #default_shell, #execmd, #expand_pessimistic_constraints, #logger, #mknod_w, #program_exists?, #program_in_path?, #safesystem, #safesystemout, #tar_cmd, #tar_cmd_supports_sort_names_and_set_mtime?

Constructor Details

This class inherits a constructor from FPM::Package

Instance Method Details

#input(input_package) ⇒ Object

Input a PEAR package.

The parameter is a PHP PEAR package name.

Attributes that affect behavior here:

  • :prefix - changes the install root, default is /usr/share

  • :pear_package_name_prefix - changes the



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
# File 'lib/fpm/package/pear.rb', line 38

def input(input_package)
  if !program_in_path?("pear")
    raise ExecutableNotFound.new("pear")
  end

  # Create a temporary config file
  logger.debug("Creating pear config file")
  config = File.expand_path(build_path("pear.config"))
  installroot = attributes[:prefix] || "/usr/share"
  safesystem("pear", "config-create", staging_path(installroot), config)

  if attributes[:pear_php_dir]
    logger.info("Setting php_dir", :php_dir => attributes[:pear_php_dir])
    safesystem("pear", "-c", config, "config-set", "php_dir", "#{staging_path(installroot)}/#{attributes[:pear_php_dir]}")
  end

  if attributes[:pear_data_dir]
    logger.info("Setting data_dir", :data_dir => attributes[:pear_data_dir])
    safesystem("pear", "-c", config, "config-set", "data_dir", "#{staging_path(installroot)}/#{attributes[:pear_data_dir]}")
  end

  bin_dir = attributes[:pear_bin_dir] || "usr/bin"
  logger.info("Setting bin_dir", :bin_dir => bin_dir)
  safesystem("pear", "-c", config, "config-set", "bin_dir", bin_dir)

  php_bin = attributes[:pear_php_bin] || "/usr/bin/php"
  logger.info("Setting php_bin", :php_bin => php_bin)
  safesystem("pear", "-c", config, "config-set", "php_bin", php_bin)

  # do channel-discover if required
  if !attributes[:pear_channel].nil?
    logger.info("Custom channel specified", :channel => attributes[:pear_channel])
    channel_list = safesystemout("pear", "-c", config, "list-channels")
    if channel_list !~ /#{Regexp.quote(attributes[:pear_channel])}/
      logger.info("Discovering new channel", :channel => attributes[:pear_channel])
      safesystem("pear", "-c", config, "channel-discover", attributes[:pear_channel])
    end
    input_package = "#{attributes[:pear_channel]}/#{input_package}"
    logger.info("Prefixing package name with channel", :package => input_package)
  end

  # do channel-update if requested
  if attributes[:pear_channel_update?]
    channel = attributes[:pear_channel] || "pear"
    logger.info("Updating the channel", :channel => channel)
    safesystem("pear", "-c", config, "channel-update", channel)
  end

  logger.info("Installing pear package", :package => input_package,
                :directory => staging_path)
  ::Dir.chdir(staging_path) do
    safesystem("pear", "-c", config, "install", "-n", "-f", input_package)
  end

  pear_cmd = "pear -c #{config} remote-info #{input_package}"
  logger.info("Fetching package information", :package => input_package, :command => pear_cmd)
  name = %x{#{pear_cmd} | sed -ne '/^Package\s*/s/^Package\s*//p'}.chomp
  self.name = "#{attributes[:pear_package_name_prefix]}-#{name}"
  self.version = %x{#{pear_cmd} | sed -ne '/^Installed\s*/s/^Installed\s*//p'}.chomp
  self.description  = %x{#{pear_cmd} | sed -ne '/^Summary\s*/s/^Summary\s*//p'}.chomp
  logger.debug("Package info", :name => self.name, :version => self.version,
                :description => self.description)

  # Remove the stuff we don't want
  delete_these = [".depdb", ".depdblock", ".filemap", ".lock", ".channel", "cache", "temp", "download", ".channels", ".registry"]
  Find.find(staging_path) do |path|
    if File.file?(path)
      logger.info("replacing staging_path in file", :replace_in => path, :staging_path => staging_path)
      begin
        content = File.read(path).gsub(/#{Regexp.escape(staging_path)}/, "")
        File.write(path, content)
      rescue ArgumentError => e
        logger.warn("error replacing staging_path in file", :replace_in => path, :error => e)
      end
    end
    FileUtils.rm_r(path) if delete_these.include?(File.basename(path))
  end

end