Nikolai Weibull wrote:
In linuxtex.zip.bz2 you mean? (why the double compression?)
the zip is not compressed, just use as storage container, bzipping the
whole unzipped lot is more efficient
Then no. Neither is it in any of the cont-*.zip files;
nor in
http://www.pragma-ade.com/system/usr/local/context/tex/texmf-local/scripts/context/ruby/
hm, i'll have a look, file attached
Hans
-
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | fax: 038 477 53 74 | www.pragma-ade.com
| www.pragma-pod.nl
-
#!/usr/bin/env ruby
# program : texsync
# copyright : PRAGMA Advanced Document Engineering
# version : 1.1 - 2003/2004
# author: Hans Hagen
# For the moment this script only handles the 'minimal' context
# distribution. In due time I will add a few more options, like
# synchronization of the iso image.
banner = ['TeXSync', 'version 1.1', '2002/2004', 'PRAGMA ADE/POD']
unless defined? ownpath
ownpath = $0.sub(/[\\\/]\w*?\.rb/i,'')
$: << ownpath
end
require 'xmpl/switch'
require 'exa/logger'
require 'rbconfig'
class Commands
include CommandBase
@@formats = ['en','nl','de','cz','it','ro']
@@always = ['metafun','mptopdf','en','nl']
@@rsync = 'rsync -r -z -c --progress --stats "--exclude=*.fmt"
"--exclude=*.efmt" "--exclude=*.mem"'
@@kpsewhich = Hash.new
@@kpsewhich['minimal'] = 'SELFAUTOPARENT'
@@kpsewhich['context'] = 'TEXMFLOCAL'
@@kpsewhich['documentation'] = 'TEXMFLOCAL'
@@kpsewhich['unknown'] = 'SELFAUTOPARENT'
def update
report
return unless destination = getdestination
texpaths = gettexpaths
address = option('address')
user = option('user')
tree = option('tree')
force= option('force')
ok = true
begin
report("synchronizing '#{tree}' from '#{address}' to '#{destination}'")
report
if texpaths then
texpaths.each do |path|
report("synchronizing path '#{path}' of '#{tree}' from
'#{address}' to '#{destination}'")
command = "#{rsync} [EMAIL PROTECTED]::#{tree}/#{path}
#{destination}/{path}"
ok = ok && system(command) if force
end
else
command = "#{@@rsync} [EMAIL PROTECTED]::#{tree} #{destination}"
ok = system(command) if force
end
rescue
report("error in running rsync")
ok = false
ensure
if force then
if ok then
if option('make') then
report("generating tex and metapost formats")
report
formats.delete_if do |f|
begin
`kpsewhich cont-#{f}`.chomp.empty?
rescue
end
end
str = [@@formats,@@always].flatten.uniq.join(' ')
begin
system("texexec --make --alone #{str}")
rescue
report("unable to generate formats '#{str}'")
else
report
end
else
report("regenerate the formats files if needed")
end
else
report("error in synchronizing '#{tree}'")
end
else
report("provide --force to execute '#{command}'") unless force
end
end
end
def list
report
address = option('address')
user= option('user')
result = nil
begin
report("fetching list of trees from '#{address}'")
command = "#{@@rsync} [EMAIL PROTECTED]::"
if option('force') then
result = `#{command}`.chomp
else
report("provide --force to execute '#{command}'")
end
rescue
result = nil
else
if result then
report("available trees:")
report
reportlines(result)
end
ensure
report("unable to fetch list") unless result
end
end
private
def gettexpaths
if option('full') then
texpaths =
['texmf','texmf-local','texmf-fonts','texmf-mswin','texmf-linux','texmf-macos']
elsif option('terse') then
texpaths = ['texmf','texmf-local','texmf-fonts']
case Config::CONFIG['hos