mirror of
https://github.com/jimeh/build-emacs-for-macos.git
synced 2026-02-19 13:06:38 +00:00
Compare commits
21 Commits
| Author | SHA1 | Date | |
|---|---|---|---|
|
9f6ec5954f
|
|||
| 9ea79670d8 | |||
|
72e40248e1
|
|||
|
7259111478
|
|||
|
bb45cda023
|
|||
|
ab872202df
|
|||
|
2d1c5d47d9
|
|||
| 30a71c423e | |||
|
5c48445397
|
|||
|
bf7c4d5deb
|
|||
|
3ffeb4854c
|
|||
|
0a22d8393c
|
|||
|
ac8348323d
|
|||
| 59f52b65ee | |||
|
81a96f4d60
|
|||
|
1df39fafe6
|
|||
|
14a8d1aaaf
|
|||
|
272a3000a1
|
|||
|
d684cf560f
|
|||
| ea189a6713 | |||
|
63289216d7
|
29
CHANGELOG.md
29
CHANGELOG.md
@@ -2,6 +2,35 @@
|
||||
|
||||
All notable changes to this project will be documented in this file. See [standard-version](https://github.com/conventional-changelog/standard-version) for commit guidelines.
|
||||
|
||||
### [0.4.13](https://github.com/jimeh/build-emacs-for-macos/compare/0.4.12...0.4.13) (2021-05-22)
|
||||
|
||||
|
||||
### Bug Fixes
|
||||
|
||||
* **codesign:** prevent "bundle format unrecognized" error from codesign ([7259111](https://github.com/jimeh/build-emacs-for-macos/commit/7259111478ecb838dea9c8f50ea39eafdf47ed5a))
|
||||
* **embed:** avoid potential error caused by trying to set duplicate rpath ([bb45cda](https://github.com/jimeh/build-emacs-for-macos/commit/bb45cda0231e99618571dc835348cf5c3345e277))
|
||||
|
||||
### [0.4.12](https://github.com/jimeh/build-emacs-for-macos/compare/0.4.11...0.4.12) (2021-05-17)
|
||||
|
||||
|
||||
### Bug Fixes
|
||||
|
||||
* **shared-libraries:** stop aggressive dylib re-linking ([0a22d83](https://github.com/jimeh/build-emacs-for-macos/commit/0a22d8393c53305354c4c6d8e784e7d59caa039a)), closes [#12](https://github.com/jimeh/build-emacs-for-macos/issues/12)
|
||||
* **svg:** enable SVG by default via librsvg ([bf7c4d5](https://github.com/jimeh/build-emacs-for-macos/commit/bf7c4d5debf32980dbbabc1ea99b58b266390011))
|
||||
|
||||
### [0.4.11](https://github.com/jimeh/build-emacs-for-macos/compare/0.4.10...0.4.11) (2021-05-08)
|
||||
|
||||
|
||||
### Features
|
||||
|
||||
* **builds:** update build script for new plan.yml format ([1df39fa](https://github.com/jimeh/build-emacs-for-macos/commit/1df39fafe62ada385aa1d92e6b7f591c16c0a80c))
|
||||
* **release:** initial attempt at providing automatic builds ([6328921](https://github.com/jimeh/build-emacs-for-macos/commit/63289216d70e496d664a7e3078dea5a82eb8f65d))
|
||||
|
||||
|
||||
### Bug Fixes
|
||||
|
||||
* **release:** attempt to fix issue with talking to GitHub API ([272a300](https://github.com/jimeh/build-emacs-for-macos/commit/272a3000a1f96d8f131e684736127b923513a205))
|
||||
|
||||
### [0.4.10](https://github.com/jimeh/build-emacs-for-macos/compare/0.4.9...0.4.10) (2021-04-25)
|
||||
|
||||
|
||||
|
||||
@@ -72,14 +72,14 @@ available here: https://github.com/emacs-mirror/emacs
|
||||
Options:
|
||||
-j, --parallel COUNT Compile using COUNT parallel processes (detected: 8)
|
||||
--git-sha SHA Override detected git SHA of specified branch allowing builds of old commits
|
||||
--[no-]xwidgets Enable/disable XWidgets (default: enabled if supported)
|
||||
--[no-]xwidgets Enable/disable XWidgets if supported (default: enabled)
|
||||
--[no-]native-comp Enable/disable native-comp (default: enabled if supported)
|
||||
--[no-]native-full-aot Enable/disable NATIVE_FULL_AOT / Ahead of Time compilation (default: disabled)
|
||||
--rsvg Enable SVG image support via librsvg, can yield a unstable build (default: disabled)
|
||||
--[no-]rsvg Enable/disable SVG image support via librsvg (default: enabled)
|
||||
--no-titlebar Apply no-titlebar patch (default: disabled)
|
||||
--no-frame-refocus Apply no-frame-refocus patch (default: disabled)
|
||||
--[no-]native-fast-boot DEPRECATED: use --[no-]native-full-aot instead
|
||||
--[no-]launcher DEPRECATED: Launcher script is no longer used.
|
||||
--work-dir DIR Specify a working directory where tarballs, sources, and builds will be stored and worked with
|
||||
--plan FILE Follow given plan file, instead of using given git ref/sha
|
||||
```
|
||||
|
||||
Resulting applications are saved to the `builds` directory in a bzip2 compressed
|
||||
|
||||
@@ -1,52 +0,0 @@
|
||||
#!/usr/bin/env ruby
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'optparse'
|
||||
|
||||
require_relative '../lib/commit_info'
|
||||
require_relative '../lib/errors'
|
||||
require_relative '../lib/log'
|
||||
|
||||
options = {
|
||||
repo: 'emacs-mirror/emacs',
|
||||
output: File.expand_path('../tarballs', __dir__),
|
||||
log_level: :info
|
||||
}
|
||||
|
||||
OptionParser.new do |opts|
|
||||
opts.banner = <<~TXT
|
||||
Usage: ./commit-info [options] <branch/tag/sha>
|
||||
|
||||
Fetch commit info of given GitHub repository branch, tag, or SHA.
|
||||
|
||||
Options:
|
||||
TXT
|
||||
|
||||
opts.on('-r', '--repo STRING',
|
||||
"GitHub repository (default: #{options[:repo]})") do |v|
|
||||
options[:repo] = v
|
||||
end
|
||||
|
||||
opts.on('-o', '--output DIR', 'Directory to save tarball in ' \
|
||||
"(default: #{options[:output]})") do |v|
|
||||
options[:output] = v
|
||||
end
|
||||
|
||||
opts.on('-l', '--log-level LEVEL', 'Log level ' \
|
||||
"(default: #{options[:log_level]})") do |v|
|
||||
options[:log_level] = v.to_sym
|
||||
end
|
||||
end.parse!
|
||||
|
||||
begin
|
||||
logger = Log.new('commit-info', options[:log_level])
|
||||
commit = CommitInfo.new(
|
||||
ref: ARGV[0],
|
||||
repo: options[:repo],
|
||||
logger: logger
|
||||
).perform
|
||||
|
||||
puts commit.to_yaml
|
||||
rescue Error => e
|
||||
handle_error(e)
|
||||
end
|
||||
@@ -1,53 +0,0 @@
|
||||
#!/usr/bin/env ruby
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'optparse'
|
||||
|
||||
require_relative '../lib/download_tarball'
|
||||
require_relative '../lib/errors'
|
||||
require_relative '../lib/log'
|
||||
|
||||
options = {
|
||||
repo: 'emacs-mirror/emacs',
|
||||
output: File.expand_path('../tarballs', __dir__),
|
||||
log_level: :info
|
||||
}
|
||||
|
||||
OptionParser.new do |opts|
|
||||
opts.banner = <<~TXT
|
||||
Usage: ./download-tarball [options] <branch/tag/sha>
|
||||
|
||||
Download a tarball of given GitHub repository branch, tag, or SHA.
|
||||
|
||||
Options:
|
||||
TXT
|
||||
|
||||
opts.on('-r', '--repo STRING',
|
||||
"GitHub repository (default: #{options[:repo]})") do |v|
|
||||
options[:repo] = v
|
||||
end
|
||||
|
||||
opts.on('-o', '--output DIR', 'Directory to save tarball in ' \
|
||||
"(default: #{options[:output]})") do |v|
|
||||
options[:output] = v
|
||||
end
|
||||
|
||||
opts.on('-l', '--log-level LEVEL', 'Log level ' \
|
||||
"(default: #{options[:log_level]})") do |v|
|
||||
options[:log_level] = v.to_sym
|
||||
end
|
||||
end.parse!
|
||||
|
||||
begin
|
||||
logger = Log.new('download-tarball', options[:log_level])
|
||||
tarball = DownloadTarball.new(
|
||||
ref: ARGV[0],
|
||||
repo: options[:repo],
|
||||
output: options[:output],
|
||||
logger: logger
|
||||
).perform
|
||||
|
||||
puts tarball.to_yaml
|
||||
rescue Error => e
|
||||
handle_error(e)
|
||||
end
|
||||
@@ -10,7 +10,9 @@ require 'json'
|
||||
require 'net/http'
|
||||
require 'optparse'
|
||||
require 'pathname'
|
||||
require 'time'
|
||||
require 'uri'
|
||||
require 'yaml'
|
||||
|
||||
class Error < StandardError; end
|
||||
|
||||
@@ -21,9 +23,9 @@ module Output
|
||||
|
||||
def out(msg, newline: true)
|
||||
if newline
|
||||
puts "==> #{msg}"
|
||||
warn "==> #{msg}"
|
||||
else
|
||||
print "==> #{msg}"
|
||||
STDERR.print "==> #{msg}"
|
||||
end
|
||||
end
|
||||
|
||||
@@ -87,8 +89,10 @@ class Build
|
||||
end
|
||||
|
||||
def build
|
||||
load_plan(options[:plan]) if options[:plan]
|
||||
|
||||
unless meta[:sha] && meta[:date]
|
||||
err 'Failed to get commit info from GitHub API.'
|
||||
err 'Failed to get commit info from GitHub.'
|
||||
end
|
||||
|
||||
tarball = download_tarball(meta[:sha])
|
||||
@@ -108,6 +112,17 @@ class Build
|
||||
|
||||
private
|
||||
|
||||
def load_plan(filename)
|
||||
plan = YAML.safe_load(File.read(filename), [:Time])
|
||||
|
||||
@meta = {
|
||||
sha: plan.dig('commit', 'sha'),
|
||||
ref: plan.dig('commit', 'ref'),
|
||||
date: plan.dig('commit', 'date')
|
||||
}
|
||||
@archive_filename = plan['archive']
|
||||
end
|
||||
|
||||
def tarballs_dir
|
||||
@tarballs_dir ||= File.join(root_dir, 'tarballs')
|
||||
end
|
||||
@@ -299,7 +314,7 @@ class Build
|
||||
configure_flags << '--with-xwidgets'
|
||||
end
|
||||
configure_flags << native_comp_configure_flag if options[:native_comp]
|
||||
configure_flags << '--without-rsvg' unless options[:rsvg]
|
||||
configure_flags << '--without-rsvg' if options[:rsvg] == false
|
||||
|
||||
run_cmd './configure', *configure_flags
|
||||
|
||||
@@ -358,29 +373,39 @@ class Build
|
||||
end
|
||||
end
|
||||
|
||||
def archive_app(app)
|
||||
FileUtils.mkdir_p(builds_dir)
|
||||
def archive_filename
|
||||
return @archive_filename if @archive_filename
|
||||
|
||||
metadata = [
|
||||
meta[:ref]&.gsub(/\W/, '-'),
|
||||
meta[:date],
|
||||
meta[:date]&.strftime('%Y-%m-%d'),
|
||||
meta[:sha][0..6],
|
||||
"macOS-#{OS.version}",
|
||||
OS.arch
|
||||
].compact
|
||||
|
||||
filename = "Emacs.app-[#{metadata.join('][')}].tbz"
|
||||
target = "#{builds_dir}/#{filename}"
|
||||
@archive_filename = File.join(builds_dir, filename)
|
||||
end
|
||||
|
||||
def archive_app(app)
|
||||
filename = File.basename(archive_filename)
|
||||
target_dir = File.dirname(archive_filename)
|
||||
relative_target_dir = target_dir.gsub(root_dir + '/', '')
|
||||
|
||||
FileUtils.mkdir_p(target_dir)
|
||||
|
||||
app_base = File.basename(app)
|
||||
app_dir = File.dirname(app)
|
||||
|
||||
if !File.exist?(target)
|
||||
info "Creating #{filename} archive in \"#{builds_dir}\"..."
|
||||
FileUtils.cd(app_dir) { system('tar', '-cjf', target, app_base) }
|
||||
if !File.exist?(archive_filename)
|
||||
info "Creating #{filename} archive in \"#{relative_target_dir}\"..."
|
||||
FileUtils.cd(app_dir) do
|
||||
system('tar', '-cjf', archive_filename, app_base)
|
||||
end
|
||||
else
|
||||
info "#{filename} archive exists in " \
|
||||
"#{builds_dir.gsub(root_dir + '/', '')}, skipping archving."
|
||||
"#{relative_target_dir}, skipping archving."
|
||||
end
|
||||
end
|
||||
|
||||
@@ -411,7 +436,7 @@ class Build
|
||||
commit = JSON.parse(commit_json)
|
||||
meta = {
|
||||
sha: commit['sha'],
|
||||
date: Date.parse(commit['commit']['committer']['date'])
|
||||
date: Time.parse(commit['commit']['committer']['date'])
|
||||
}
|
||||
meta[:ref] = ref if ref && ref[0..6] != meta[:sha][0..6]
|
||||
|
||||
@@ -560,7 +585,7 @@ class AbstractEmbedder
|
||||
private
|
||||
|
||||
def invocation_dir
|
||||
File.join(app, 'Contents/MacOS')
|
||||
File.join(app, 'Contents', 'MacOS')
|
||||
end
|
||||
|
||||
def bin
|
||||
@@ -592,7 +617,6 @@ class LibEmbedder < AbstractEmbedder
|
||||
FileUtils.cd(File.dirname(app)) do
|
||||
copy_libs(binary)
|
||||
copy_extra_libs(extra_libs, binary) if extra_libs.any?
|
||||
self_ref_libs(binary)
|
||||
end
|
||||
end
|
||||
|
||||
@@ -604,6 +628,16 @@ class LibEmbedder < AbstractEmbedder
|
||||
Pathname.new(File.dirname(exe))
|
||||
).to_s
|
||||
|
||||
rpath = File.join('@executable_path', rel_path)
|
||||
rpaths = `otool -l "#{exe}" | grep -A 2 'cmd LC_RPATH' | grep 'path'`
|
||||
|
||||
unless rpaths.include?(rpath)
|
||||
while_writable(exe) do
|
||||
system('install_name_tool', '-add_rpath',
|
||||
File.join('@executable_path', rel_path), exe)
|
||||
end
|
||||
end
|
||||
|
||||
`otool -L "#{exe}"`.split("\n")[1..-1].each do |line|
|
||||
match = line.match(%r{^\s+(.+/(lib[^/ ]+))\s})
|
||||
next unless match && match[1].start_with?(lib_source)
|
||||
@@ -648,31 +682,6 @@ class LibEmbedder < AbstractEmbedder
|
||||
end
|
||||
end
|
||||
|
||||
def self_ref_libs(exe)
|
||||
rel_path = Pathname.new(lib_dir).relative_path_from(
|
||||
Pathname.new(File.dirname(exe))
|
||||
).to_s
|
||||
lib_paths ||= Dir.glob("#{lib_dir}/*").select { |f| File.file?(f) }
|
||||
libs = lib_paths.map { |f| File.basename(f) }
|
||||
|
||||
([exe] + lib_paths).each do |bin_path|
|
||||
`otool -L "#{bin_path}"`.split("\n")[1..-1].each do |line|
|
||||
match = line.match(%r{^\s+(.+/(lib[^/ ]+))\s})
|
||||
next unless match
|
||||
next if match[1].start_with?('@executable_path/')
|
||||
next unless libs.include?(match[2])
|
||||
|
||||
while_writable(bin_path) do
|
||||
system(
|
||||
'install_name_tool', '-change', match[1],
|
||||
File.join('@executable_path', rel_path, match[2].to_s),
|
||||
bin_path
|
||||
)
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
def while_writable(file)
|
||||
mode = File.stat(file).mode
|
||||
File.chmod(0o775, file)
|
||||
@@ -704,7 +713,9 @@ class GccLibEmbedder < AbstractEmbedder
|
||||
|
||||
FileUtils.mkdir_p(File.dirname(target_dir))
|
||||
FileUtils.cp_r(source_dir, target_dir)
|
||||
FileUtils.rm(Dir[File.join(target_dir, '**/.DS_Store')], force: true)
|
||||
FileUtils.rm(Dir[File.join(target_dir, '**', '.DS_Store')], force: true)
|
||||
FileUtils.chmod_R('u+w', target_dir)
|
||||
FileUtils.mv(source_darwin_dir, target_darwin_dir)
|
||||
end
|
||||
|
||||
private
|
||||
@@ -717,9 +728,21 @@ class GccLibEmbedder < AbstractEmbedder
|
||||
File.join(invocation_dir, gcc_info.relative_lib_dir)
|
||||
end
|
||||
|
||||
def source_darwin_dir
|
||||
File.join(invocation_dir, gcc_info.relative_darwin_lib_dir)
|
||||
end
|
||||
|
||||
def target_darwin_dir
|
||||
File.join(invocation_dir, gcc_info.sanitized_relative_darwin_lib_dir)
|
||||
end
|
||||
|
||||
def source_dir
|
||||
gcc_info.lib_dir
|
||||
end
|
||||
|
||||
def relative_dir(path, root)
|
||||
Pathname.new(path).relative_path_from(Pathname.new(root)).to_s
|
||||
end
|
||||
end
|
||||
|
||||
class GccInfo
|
||||
@@ -759,6 +782,17 @@ class GccInfo
|
||||
@relative_darwin_lib_dir ||= relative_dir(darwin_lib_dir, root_dir)
|
||||
end
|
||||
|
||||
# Sanitize folder name with full "MAJOR.MINOR.PATCH" version number to just
|
||||
# the MAJOR version. Apple's codesign CLI tool throws a "bundle format
|
||||
# unrecognized" error if there are any folders with two dots in their name
|
||||
# within the Emacs.app application bundle.
|
||||
def sanitized_relative_darwin_lib_dir
|
||||
@sanitized_relative_darwin_lib_dir ||= File.join(
|
||||
File.dirname(relative_darwin_lib_dir),
|
||||
File.basename(relative_darwin_lib_dir).split('.').first
|
||||
)
|
||||
end
|
||||
|
||||
def libgccjit_root_dir
|
||||
@libgccjit_root_dir ||= `brew --prefix libgccjit`.chomp
|
||||
end
|
||||
@@ -803,18 +837,16 @@ class GccInfo
|
||||
private
|
||||
|
||||
def relative_dir(path, root)
|
||||
root += '/' unless root[-1] == '/'
|
||||
return if path[0..root.size - 1] != root
|
||||
|
||||
path[root.size..-1]
|
||||
Pathname.new(path).relative_path_from(Pathname.new(root)).to_s
|
||||
end
|
||||
end
|
||||
|
||||
if __FILE__ == $PROGRAM_NAME
|
||||
cli_options = {
|
||||
work_dir: File.expand_path(__dir__),
|
||||
native_full_aot: false,
|
||||
parallel: Etc.nprocessors,
|
||||
rsvg: false,
|
||||
rsvg: true,
|
||||
xwidgets: true
|
||||
}
|
||||
|
||||
@@ -835,14 +867,15 @@ if __FILE__ == $PROGRAM_NAME
|
||||
cli_options[:parallel] = v
|
||||
end
|
||||
|
||||
opts.on('--git-sha SHA', 'Override detected git SHA of specified ' \
|
||||
'branch allowing builds of old commits') do |v|
|
||||
opts.on('--git-sha SHA',
|
||||
'Override detected git SHA of specified ' \
|
||||
'branch allowing builds of old commits') do |v|
|
||||
cli_options[:git_sha] = v
|
||||
end
|
||||
|
||||
opts.on('--[no-]xwidgets',
|
||||
'Enable/disable XWidgets ' \
|
||||
'(default: enabled if supported)') do |v|
|
||||
'Enable/disable XWidgets if supported ' \
|
||||
'(default: enabled)') do |v|
|
||||
cli_options[:xwidgets] = v
|
||||
end
|
||||
|
||||
@@ -858,9 +891,10 @@ if __FILE__ == $PROGRAM_NAME
|
||||
cli_options[:native_full_aot] = v
|
||||
end
|
||||
|
||||
opts.on('--rsvg', 'Enable SVG image support via librsvg, ' \
|
||||
'can yield a unstable build (default: disabled)') do
|
||||
cli_options[:rsvg] = true
|
||||
opts.on('--[no-]rsvg',
|
||||
'Enable/disable SVG image support via librsvg ' \
|
||||
'(default: enabled)') do |v|
|
||||
cli_options[:rsvg] = v
|
||||
end
|
||||
|
||||
opts.on('--no-titlebar', 'Apply no-titlebar patch (default: disabled)') do
|
||||
@@ -872,25 +906,22 @@ if __FILE__ == $PROGRAM_NAME
|
||||
cli_options[:no_frame_refocus] = true
|
||||
end
|
||||
|
||||
opts.on('--[no-]native-fast-boot',
|
||||
'DEPRECATED: use --[no-]native-full-aot instead') do |v|
|
||||
if v
|
||||
raise Error, '--native-fast-boot option is deprecated, ' \
|
||||
'use --no-native-full-aot instead'
|
||||
else
|
||||
raise Error, '--no-native-fast-boot option is deprecated, ' \
|
||||
'use --native-full-aot instead'
|
||||
end
|
||||
opts.on('--work-dir DIR',
|
||||
'Specify a working directory where tarballs, sources, and ' \
|
||||
'builds will be stored and worked with') do |v|
|
||||
cli_options[:work_dir] = v
|
||||
end
|
||||
|
||||
opts.on('--[no-]launcher',
|
||||
'DEPRECATED: Launcher script is no longer used.') do |_|
|
||||
raise Error, '--[no-]launcher option is deprecated, launcher ' \
|
||||
'script is no longer used.'
|
||||
opts.on(
|
||||
'--plan FILE',
|
||||
'Follow given plan file, instead of using given git ref/sha'
|
||||
) do |v|
|
||||
cli_options[:plan] = v
|
||||
end
|
||||
end.parse!
|
||||
|
||||
Build.new(File.expand_path(__dir__), ARGV.shift, cli_options).build
|
||||
work_dir = cli_options.delete(:work_dir)
|
||||
Build.new(work_dir, ARGV.shift, cli_options).build
|
||||
rescue Error => e
|
||||
warn "ERROR: #{e.message}"
|
||||
exit 1
|
||||
|
||||
@@ -1,9 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require_relative './common'
|
||||
require_relative './output'
|
||||
|
||||
class BaseAction
|
||||
include Common
|
||||
include Output
|
||||
end
|
||||
@@ -1,46 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'json'
|
||||
require 'time'
|
||||
require 'yaml'
|
||||
|
||||
require_relative './errors'
|
||||
require_relative './common'
|
||||
|
||||
class Commit
|
||||
include Common
|
||||
|
||||
attr_reader :repo
|
||||
attr_reader :ref
|
||||
attr_reader :message
|
||||
attr_reader :sha
|
||||
attr_reader :time
|
||||
|
||||
def initialize(sha:, time:, repo: nil, ref: nil, message: nil)
|
||||
@sha = sha
|
||||
@time = time
|
||||
@repo = repo
|
||||
@ref = ref
|
||||
@message = message
|
||||
end
|
||||
|
||||
def sha_short
|
||||
sha[0..6]
|
||||
end
|
||||
|
||||
def to_hash
|
||||
{
|
||||
'repo' => repo,
|
||||
'ref' => ref,
|
||||
'sha' => sha,
|
||||
'sha_short' => sha_short,
|
||||
'time' => time.utc,
|
||||
'timestamp' => time.utc.to_i,
|
||||
'message' => message
|
||||
}
|
||||
end
|
||||
|
||||
def to_yaml
|
||||
to_hash.to_yaml
|
||||
end
|
||||
end
|
||||
@@ -1,43 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require_relative './base_action'
|
||||
require_relative './commit'
|
||||
|
||||
class CommitInfo < BaseAction
|
||||
COMMIT_URL = 'https://api.github.com/repos/%s/commits/%s'
|
||||
|
||||
attr_reader :ref
|
||||
attr_reader :repo
|
||||
attr_reader :logger
|
||||
|
||||
def initialize(ref:, repo:, logger:)
|
||||
@ref = ref
|
||||
@repo = repo
|
||||
@logger = logger
|
||||
|
||||
err 'branch/tag/sha argument cannot be empty' if ref.nil? || ref.empty?
|
||||
end
|
||||
|
||||
def perform
|
||||
info "Fetching info for git ref: #{ref}"
|
||||
|
||||
url = format(COMMIT_URL, repo, ref)
|
||||
commit_json = http_get(url)
|
||||
|
||||
err "Failed to get commit info about: #{ref}" if commit_json.nil?
|
||||
|
||||
parsed = JSON.parse(commit_json)
|
||||
commit = Commit.new(
|
||||
repo: repo,
|
||||
ref: ref,
|
||||
sha: parsed&.dig('sha'),
|
||||
message: parsed&.dig('commit', 'message'),
|
||||
time: Time.parse(parsed&.dig('commit', 'committer', 'date')).utc
|
||||
)
|
||||
|
||||
err 'Failed to get commit SHA' if commit.sha.nil? || commit.sha.empty?
|
||||
err 'Failed to get commit time' if commit.time.nil?
|
||||
|
||||
commit
|
||||
end
|
||||
end
|
||||
@@ -1,23 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'net/http'
|
||||
|
||||
module Common
|
||||
private
|
||||
|
||||
def self.included(base)
|
||||
base.extend(self)
|
||||
end
|
||||
|
||||
def run_cmd(*args)
|
||||
info "executing: #{args.join(' ')}"
|
||||
system(*args) || err("Exit code: #{$CHILD_STATUS.exitstatus}")
|
||||
end
|
||||
|
||||
def http_get(url)
|
||||
response = Net::HTTP.get_response(URI.parse(url))
|
||||
return unless response.code == '200'
|
||||
|
||||
response.body
|
||||
end
|
||||
end
|
||||
@@ -1,61 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'fileutils'
|
||||
require 'json'
|
||||
require 'time'
|
||||
|
||||
require_relative './base_action'
|
||||
|
||||
require_relative './commit_info'
|
||||
require_relative './tarball'
|
||||
|
||||
class DownloadTarball < BaseAction
|
||||
TARBALL_URL = 'https://github.com/%s/tarball/%s'
|
||||
|
||||
attr_reader :ref
|
||||
attr_reader :repo
|
||||
attr_reader :output
|
||||
attr_reader :logger
|
||||
|
||||
def initialize(ref:, repo:, output:, logger:)
|
||||
@ref = ref
|
||||
@repo = repo
|
||||
@output = output
|
||||
@logger = logger
|
||||
|
||||
err 'branch/tag/sha argument cannot be empty' if ref.nil? || ref.empty?
|
||||
end
|
||||
|
||||
def perform
|
||||
FileUtils.mkdir_p(output)
|
||||
tarball = Tarball.new(file: target, commit: commit)
|
||||
|
||||
if File.exist?(target)
|
||||
info "#{filename} already exists locally, attempting to use."
|
||||
return tarball
|
||||
end
|
||||
|
||||
info 'Downloading tarball from GitHub. This could take a while, ' \
|
||||
'please be patient.'
|
||||
result = run_cmd('curl', '-L', url, '-o', target)
|
||||
err 'Download failed.' if !result || !File.exist?(target)
|
||||
|
||||
tarball
|
||||
end
|
||||
|
||||
def url
|
||||
@url ||= format(TARBALL_URL, repo, commit.sha)
|
||||
end
|
||||
|
||||
def filename
|
||||
@filename ||= "#{repo.gsub(/[^\w]/, '-')}-#{commit.sha_short}.tgz"
|
||||
end
|
||||
|
||||
def target
|
||||
@target ||= File.join(output, filename)
|
||||
end
|
||||
|
||||
def commit
|
||||
@commit ||= CommitInfo.new(ref: ref, repo: repo, logger: logger).perform
|
||||
end
|
||||
end
|
||||
@@ -1,12 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
def handle_error(err)
|
||||
warn "ERROR: #{err.message}"
|
||||
Process.exit 1
|
||||
end
|
||||
|
||||
class Error < StandardError; end
|
||||
|
||||
class CommitNotFound < Error; end
|
||||
class NoCommitSHA < Error; end
|
||||
class NoCommitTime < Error; end
|
||||
31
lib/log.rb
31
lib/log.rb
@@ -1,31 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
class Log
|
||||
extend Forwardable
|
||||
|
||||
attr_reader :name
|
||||
attr_reader :level
|
||||
|
||||
def initialize(name, level = :info)
|
||||
@name = name
|
||||
@level = level
|
||||
end
|
||||
|
||||
def_delegators :logger, :debug, :info, :warn, :error, :fatal, :unkonwn
|
||||
|
||||
private
|
||||
|
||||
def logger
|
||||
@logger ||= Logger.new($stderr).tap do |l|
|
||||
l.progname = name
|
||||
l.level = level
|
||||
l.formatter = formatter
|
||||
end
|
||||
end
|
||||
|
||||
def formatter
|
||||
proc do |severity, _datetime, progname, msg|
|
||||
"==> [#{progname}] #{severity}: #{msg}\n"
|
||||
end
|
||||
end
|
||||
end
|
||||
@@ -1,28 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'forwardable'
|
||||
require 'logger'
|
||||
|
||||
require_relative './errors'
|
||||
|
||||
module Output
|
||||
extend Forwardable
|
||||
|
||||
def self.included(base)
|
||||
base.extend(ClassMethods)
|
||||
end
|
||||
|
||||
module ClassMethods
|
||||
def logger_name(name = nil)
|
||||
return @logger_name if name.nil?
|
||||
|
||||
@logger_name = name
|
||||
end
|
||||
end
|
||||
|
||||
def_delegators :logger, :debug, :info, :warn, :error, :fatal, :unkonwn
|
||||
|
||||
def err(msg = nil)
|
||||
raise Error, msg
|
||||
end
|
||||
end
|
||||
@@ -1,24 +0,0 @@
|
||||
# frozen_string_literal: true
|
||||
|
||||
require 'yaml'
|
||||
|
||||
class Tarball
|
||||
attr_reader :file
|
||||
attr_reader :commit
|
||||
|
||||
def initialize(file:, commit:)
|
||||
@file = file
|
||||
@commit = commit
|
||||
end
|
||||
|
||||
def to_hash
|
||||
{
|
||||
'file' => file,
|
||||
'commit' => commit.to_hash
|
||||
}
|
||||
end
|
||||
|
||||
def to_yaml
|
||||
to_hash.to_yaml
|
||||
end
|
||||
end
|
||||
@@ -1,10 +1,10 @@
|
||||
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
|
||||
index 4036080976..2ff8dbd74c 100644
|
||||
index 8c638312b0..87af889ef4 100644
|
||||
--- a/lisp/emacs-lisp/comp.el
|
||||
+++ b/lisp/emacs-lisp/comp.el
|
||||
@@ -4079,6 +4079,52 @@ of (commands) to run simultaneously."
|
||||
@@ -4215,6 +4215,52 @@ native-compile-async
|
||||
(let ((load (not (not load))))
|
||||
(native--compile-async paths recursively load selector)))
|
||||
(native--compile-async files recursively load selector)))
|
||||
|
||||
+;;;###autoload
|
||||
+(defun native-compile-setup-environment-variables (&rest _args)
|
||||
@@ -19,7 +19,7 @@ index 4036080976..2ff8dbd74c 100644
|
||||
+ "<%= relative_lib_dir %>"
|
||||
+ invocation-directory))
|
||||
+ (darwin-dir (expand-file-name
|
||||
+ "<%= relative_darwin_lib_dir %>"
|
||||
+ "<%= sanitized_relative_darwin_lib_dir %>"
|
||||
+ invocation-directory))
|
||||
+ (lib-paths (list)))
|
||||
+
|
||||
@@ -54,4 +54,4 @@ index 4036080976..2ff8dbd74c 100644
|
||||
+
|
||||
(provide 'comp)
|
||||
|
||||
;;; comp.el ends here
|
||||
;; LocalWords: limplified limplified limplification limplify Limple LIMPLE libgccjit elc eln
|
||||
|
||||
Reference in New Issue
Block a user