Mercurial > vim
view src/dehqx.py @ 8800:f57949e1e9f1 v7.4.1688
commit https://github.com/vim/vim/commit/67c2c058ea34628bd575aac7ddba4cd3b244ed57
Author: Bram Moolenaar <Bram@vim.org>
Date: Wed Mar 30 22:03:02 2016 +0200
patch 7.4.1688
Problem: MzScheme does not support partial.
Solution: Add minimal partial support. (Ken Takata)
author | Christian Brabandt <cb@256bit.org> |
---|---|
date | Wed, 30 Mar 2016 22:15:10 +0200 |
parents | f90bb88c2615 |
children | 54756c29118c |
line wrap: on
line source
# Python script to get both the data and resource fork from a BinHex encoded # file. # Author: MURAOKA Taro <koron.kaoriya@gmail.com> # Last Change: 2012 Jun 29 # # Copyright (C) 2003,12 MURAOKA Taro <koron.kaoriya@gmail.com> # THIS FILE IS DISTRIBUTED UNDER THE VIM LICENSE. import sys import binhex input = sys.argv[1] conv = binhex.HexBin(input) info = conv.FInfo out = conv.FName out_data = out out_rsrc = out + '.rsrcfork' #print 'out_rsrc=' + out_rsrc print 'In file: ' + input outfile = open(out_data, 'wb') print ' Out data fork: ' + out_data while 1: d = conv.read(128000) if not d: break outfile.write(d) outfile.close() conv.close_data() d = conv.read_rsrc(128000) if d: print ' Out rsrc fork: ' + out_rsrc outfile = open(out_rsrc, 'wb') outfile.write(d) while 1: d = conv.read_rsrc(128000) if not d: break outfile.write(d) outfile.close() conv.close() # vim:set ts=8 sts=4 sw=4 et: