银行系统中EBCDIC同GBK互转，Java的实现

 

银行系统中有的核心Core banking采用AS/400系统，而AS/400采用EBCDIC编码，所以渠道整合的时候就会涉及到转码的问题。避免冷僻字的问题， 采用GBK字符集

 

package com.ebcdic;

import java.io.BufferedReader;
import java.io.ByteArrayOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.io.OutputStream;
import java.io.UnsupportedEncodingException;
import java.util.LinkedList;
import java.util.Queue;
import java.util.TreeMap;
/**
 * 
 * @author Kevin
 * @since jdk1.5
 *
 */

public class EbcdicGbkConverter {
	
	final static String GBK_FILE="GBK_CVT.txt";
	final static String ebcdicCharsetName="Cp1047";
	
	private static TreeMap <Character,Integer> gbk2Ebcdic=new TreeMap<Character,Integer> ();
	private static TreeMap <Integer,Character> ebcdic2Gbk=new TreeMap<Integer,Character> ();
	
	private static char gbk2EbcdicChar[] ;
	private static int gbk2EbcdicInt[];
	
	private static char ebcdic2GbkChar[] ;
	private static int ebcdic2GbkInt[];
	
	static {
		try {
			initEbcdicGBKMapping();
		} catch (IOException e) {
			// TODO Auto-generated catch block
			e.printStackTrace();
		}
	}
	/**
	 * Initial the EBCDIC and GBK mapping
	 * @throws IOException
	 */
	private static void initEbcdicGBKMapping() throws IOException{
		
		InputStream input=EbcdicGbkConverter.class.getResource(GBK_FILE).openStream();
		BufferedReader reader=new BufferedReader(new InputStreamReader(input));
		String record;
		while((record=reader.readLine())!=null){
			char gbkChar=record.charAt(0);
			String ebcdicChar=record.substring(1, 5);
			Integer ebcdicInt=Integer.valueOf(ebcdicChar,16);
			gbk2Ebcdic.put(gbkChar, ebcdicInt);
			ebcdic2Gbk.put(ebcdicInt, gbkChar);			
		}		
		gbk2EbcdicChar=new char[gbk2Ebcdic.size()];
		gbk2EbcdicInt=new int[gbk2Ebcdic.size()];
		int index=0;
		for(Character c:gbk2Ebcdic.keySet()){
			gbk2EbcdicChar[index]=c.charValue();
			gbk2EbcdicInt[index++]=gbk2Ebcdic.get(c).intValue();
		}
		ebcdic2GbkChar=new char[ebcdic2Gbk.size()];
		ebcdic2GbkInt=new int[ebcdic2Gbk.size()];
		
		index=0;
		for(Integer i:ebcdic2Gbk.keySet()){
			ebcdic2GbkChar[index]=ebcdic2Gbk.get(i).charValue();
			ebcdic2GbkInt[index++]=i.intValue();
		}
		
		
	}
	private static boolean isEnglishChar(char c){
		if(c <0xFF )
			return true;
		else
			return false;
	}	
	/**
	 * convert the string into EBCDIC format
	 * @throws IOException 
	 */
	public static byte[] stringToEbcdic(String data) throws IOException{
		ByteArrayOutputStream out=new ByteArrayOutputStream();
		char dataChar[]=data.toCharArray();
		Queue<Integer> gbkQueue= new LinkedList<Integer>();
		String eng;
		for(int i=0;i<dataChar.length;i++){
			char c=dataChar[i];
			if(isEnglishChar(c)){
				if(gbkQueue.size()>0){
					readGBKQueue(out,gbkQueue);
				}
				eng=new String(new char[]{c});
				byte buff[]=eng.getBytes(ebcdicCharsetName);
				out.write(buff);
			}else{
				//the Dichotomy is faster than hash table
				//seaqueue.add(gbk2Ebcdic.get(c));
				//Add the Chinese Character in the queue first
				gbkQueue.add(midSearch(c));
			}
		}
		if(gbkQueue.size()>0){
			readGBKQueue(out,gbkQueue);
		}
		
		return out.toByteArray();
	}
	/**
	 * The Chinese character start with '0x0e' and end with '0x0f' in EBCDIC character set
	 * @param out
	 * @param queue
	 * @throws IOException
	 */
	private static void readGBKQueue(OutputStream out,Queue <Integer>queue) throws IOException{
		out.write(0x0e);
		Integer data;
		while((data=queue.poll())!=null){
			int dataInt=data.intValue();
			out.write((dataInt>>8)&0xff);
			out.write(dataInt&0xff);
		}
		out.write(0x0f);
	}
	/**
	 * Dichotomy to search 
	 * @param c
	 * @return
	 */
	private static int midSearch(char c){
		int start=0;
		int end=gbk2EbcdicChar.length-1;		
		while(start<=end){	
			int mid=(start+end)>>1;
			char midChar=gbk2EbcdicChar[mid];
			if(c>midChar){
				start=mid +1 ;
			}else if(c<midChar){
				end=mid -1 ;
			}else{
				return gbk2EbcdicInt[mid];
			}
		}
		return -1;
	}
	
	/**
	 * Dichotomy to search 
	 * @param c
	 * @return
	 */
	private static char midSearchEbcdicToGBK(int c){
		int start=0;
		int end=ebcdic2GbkInt.length-1;		
		while(start<=end){	
			int mid=(start+end)>>1;
			int midValue=ebcdic2GbkInt[mid];
			if(c>midValue){
				start=mid +1 ;
			}else if(c<midValue){
				end=mid -1 ;
			}else{
				return ebcdic2GbkChar[mid];
			}
		}
		return ' ';
	}
	/**
	 * Convert the EBCDIC to GBK format String 
	 * @param data
	 * @return
	 * @throws UnsupportedEncodingException
	 */
	public static String ebcdicToGBK(byte data[]) throws UnsupportedEncodingException{
		Queue<Integer>  ebcdicQueue= new LinkedList<Integer>();
		StringBuffer buff=new StringBuffer();
		for(int i=0;i<data.length;i++){
			int b=data[i]&0xff;
			if(b==0x0e){
				ebcdicQueue.add(data[++i]&0xff);
			}else if(b==0x0f){
				readEbcdicQueue(buff,ebcdicQueue);
			}else{
				if(ebcdicQueue.size()==0)
					buff.append(new String(new byte[]{data[i]}, ebcdicCharsetName));
				else
					ebcdicQueue.add(data[i]&0xff);
			}
		}
		return buff.toString();
	}
	private static void readEbcdicQueue(StringBuffer buff,Queue <Integer>ebcdicQueue){
		
		Integer data1;
		while((data1=ebcdicQueue.poll())!=null){			
			int data2=ebcdicQueue.poll();
			int data=(data1<<8)+data2;
			char c=midSearchEbcdicToGBK(data);
			buff.append(c);
		}
	}
	/** 
     * Convert the string to 16 Radix format
     */  

    public static String str2HexStr(String str) {  
      
        return byte2HexStr(str.getBytes());  

    }  
    
    public static String byte2HexStr(byte data[]) {  

        char[] chars = "0123456789abcdef".toCharArray();  
        StringBuilder sb = new StringBuilder("");
        byte[] bs = data;  
        int bit;  
        for (int i = 0; i < bs.length; i++) {  
            bit = (bs[i] & 0x0f0) >> 4; 
            sb.append(chars[bit]);  
            bit = bs[i] & 0x0f;  
            sb.append(chars[bit]); 
            sb.append(" ");
        }  
        return sb.toString();  

    }  

 


	/**
	 * @param args
	 * @throws IOException 
	 */
	public static void main(String[] args) throws IOException {
		// TODO Auto-generated method stub
		
		EbcdicGbkConverter con=new EbcdicGbkConverter();
		
		byte buff[]=null;
		buff=EbcdicGbkConverter.stringToEbcdic("AS400 Ebcdic Converter Testing");			
		System.out.println("EBCDIC:["+byte2HexStr(buff)+"]");
		
		String st=EbcdicGbkConverter.ebcdicToGBK(buff);
		System.out.println("Eng:"+st);
		
		
		buff=EbcdicGbkConverter.stringToEbcdic("AS400 Ebcdic Converter Testing 冷僻字测试-镕");			
		System.out.println("EBCDIC:["+byte2HexStr(buff)+"]");
		
		st=EbcdicGbkConverter.ebcdicToGBK(buff);
		System.out.println("GBK:"+st);
		

	}

}

 

备注：

GBK_CVT.txt 文件

国4d9bb9fa
第一位：中文字符
第二位到第五位：16进制的EBCDIC码
第六位到第九位：16进制的GBK码

 

附录： GBK同EBCDIC的对应表文件GBK_CVT.txt 从如下URL下载

http://www.900.ibm.com/cn/support/viewdoc/detail?DocId=2222001000000