view src/dehqx.py @ 8821:0bab7b98e930 v7.4.1698

commit https://github.com/vim/vim/commit/298c65971e884666d57c32bff6b730d517d9dc30 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Apr 2 22:24:20 2016 +0200 patch 7.4.1698 Problem: Two tests fail when running tests with MinGW. (Michael Soyka) Solution: Convert test_getcwd.ok test_wordcount.ok to unix fileformat.
author Christian Brabandt <cb@256bit.org>
date Sat, 02 Apr 2016 22:30:04 +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: