net.infordata.em.crt5250.XIEbcdicTranslator Maven / Gradle / Ivy

Go to download
Show more of this group Show more artifacts with this name
Show all versions of xtn5250 Show documentation
This is a fork of https://sourceforge.net/projects/xtn5250/
The newest version!
/*
Copyright 2007 Infordata S.p.A.

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

    http://www.apache.org/licenses/LICENSE-2.0

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
*/

/*
!!V 10/04/97 rel. 0.93 - moved to crt5250 package.
    16/04/97 rel. 0.94 - toPacked method added.
    28/04/97 rel. 0.94c- corrected problem with underscore.
    27/05/97 rel. 1.00 - first release.
    25/07/97 rel. 1.03a- '|' char mapping.
    03/03/98 rel. _.___- SWING and reorganization.
    ***
    30/06/98 rel. _.___- Swing, JBuilder2 e VSS.
 */

package net.infordata.em.crt5250;

import java.util.Collections;
import java.util.LinkedHashMap;
import java.util.Map;

/**
 * @author Valentino Proietti - Infordata S.p.A.
 */
public abstract class XIEbcdicTranslator {

  private static final Map cvRegistry =
      Collections.synchronizedMap(new LinkedHashMap<>());
  private static final Map cvRORegistry =
      Collections.unmodifiableMap(cvRegistry);

  static {
    registerTranslator("CP37", XIEbcdicNTranslator.TRANSLATOR_CP37);
    registerTranslator("CP273", XIEbcdicNTranslator.TRANSLATOR_CP273);
    registerTranslator("CP277", XIEbcdicNTranslator.TRANSLATOR_CP277);
    registerTranslator("CP278", XIEbcdicNTranslator.TRANSLATOR_CP278);
    registerTranslator("CP280", XIEbcdicNTranslator.TRANSLATOR_CP280);
    registerTranslator("CP284", XIEbcdicNTranslator.TRANSLATOR_CP284);
    registerTranslator("CP285", XIEbcdicNTranslator.TRANSLATOR_CP285);
    registerTranslator("CP297", XIEbcdicNTranslator.TRANSLATOR_CP297);
    registerTranslator("CP424", XIEbcdicNTranslator.TRANSLATOR_CP424);
    registerTranslator("CP500", XIEbcdicNTranslator.TRANSLATOR_CP500);
    registerTranslator("CP850", XIEbcdicNTranslator.TRANSLATOR_CP850);
    registerTranslator("CP870", XIEbcdicNTranslator.TRANSLATOR_CP870);
    registerTranslator("CP838", XIEbcdicNTranslator.TRANSLATOR_CP838);
    registerTranslator("CP1140", XIEbcdicNTranslator.TRANSLATOR_CP1140);
    registerTranslator("CP1141", XIEbcdicNTranslator.TRANSLATOR_CP1141);
    registerTranslator("CP1144", XIEbcdicNTranslator.TRANSLATOR_CP1144);
    registerTranslator("CP1147", XIEbcdicNTranslator.TRANSLATOR_CP1147);
    registerTranslator("CP1153", XIEbcdicNTranslator.TRANSLATOR_CP1153);
    registerTranslator("CP1160", XIEbcdicNTranslator.TRANSLATOR_CP1160);
    registerTranslator("CP1025", XIEbcdicNTranslator.TRANSLATOR_CP1025);
    registerTranslator("CP1026", XIEbcdicNTranslator.TRANSLATOR_CP1026);

    registerTranslator("CP1112", XIEbcdicNTranslator.TRANSLATOR_CP1112);
    registerTranslator("CP1122", XIEbcdicNTranslator.TRANSLATOR_CP1122);
    registerTranslator("CP1123", XIEbcdicNTranslator.TRANSLATOR_CP1123);
    registerTranslator("CP1125", XIEbcdicNTranslator.TRANSLATOR_CP1125);

    registerTranslator("CP1130", XIEbcdicNTranslator.TRANSLATOR_CP1130);
    registerTranslator("CP1132", XIEbcdicNTranslator.TRANSLATOR_CP1132);
    registerTranslator("CP1137", XIEbcdicNTranslator.TRANSLATOR_CP1137);

    registerTranslator("CP1142", XIEbcdicNTranslator.TRANSLATOR_CP1142);
    registerTranslator("CP1145", XIEbcdicNTranslator.TRANSLATOR_CP1145);
    registerTranslator("CP1146", XIEbcdicNTranslator.TRANSLATOR_CP1146);
    registerTranslator("CP1148", XIEbcdicNTranslator.TRANSLATOR_CP1148);
    registerTranslator("CP1149", XIEbcdicNTranslator.TRANSLATOR_CP1149);

    registerTranslator("CP1154", XIEbcdicNTranslator.TRANSLATOR_CP1154);
    registerTranslator("CP1155", XIEbcdicNTranslator.TRANSLATOR_CP1155);
    registerTranslator("CP1156", XIEbcdicNTranslator.TRANSLATOR_CP1156);
    registerTranslator("CP1157", XIEbcdicNTranslator.TRANSLATOR_CP1157);
    registerTranslator("CP1158", XIEbcdicNTranslator.TRANSLATOR_CP1158);

    registerTranslator("CP1164", XIEbcdicNTranslator.TRANSLATOR_CP1164);

    registerTranslator("CP420", XIEbcdicNTranslator.TRANSLATOR_CP420);
    registerTranslator("CP871", XIEbcdicNTranslator.TRANSLATOR_CP871);
    registerTranslator("CP875", XIEbcdicNTranslator.TRANSLATOR_CP875);
  }

  protected XIEbcdicTranslator() {
  }

  public static synchronized void registerTranslator(String id,
      XIEbcdicTranslator tr) {
    if (id == null) {
      throw new NullPointerException("id is null");
    }
    if (tr == null) {
      throw new NullPointerException("tr is null");
    }
    if (cvRegistry.containsKey(id.toLowerCase())) {
      throw new IllegalArgumentException("Translator " + id.toLowerCase() + " already registered");
    }
    cvRegistry.put(id.toLowerCase(), tr);
  }

  /**
   * @return a read-only map of registered translators
   */
  public static Map getRegisteredTranslators() {
    return cvRORegistry;
  }

  /**
   * Returns the XIEbcdicTranslator.
   *
   * @param id of the translator
   * @return the translator for the given id
   */
  public static XIEbcdicTranslator getTranslator(String id) {
    return cvRegistry.get(id.toLowerCase());
  }

  /**
   * Converts byte to int without sign.
   *
   * @param bb the byte to get the int from
   * @return integer representation of the byte
   */
  public static int toInt(byte bb) {
    return ((int) bb & 0xff);
  }


  /**
   * Converts byte to hex representation
   *
   * @param bb the byte to get the hex representation from
   * @return the hex representation of the byte
   */
  public static String toHex(byte bb) {
    String hex = Integer.toString(toInt(bb), 16);
    return "00".substring(hex.length()) + hex;
  }

  /**
   * From ebcdic code to char
   *
   * @param aEbcdicChar the ebcdic code to get the char from.
   * @return the char obtained from the ebcdic code
   */
  public abstract char toChar(byte aEbcdicChar);

  /**
   * From char to ebcdic code
   *
   * @param aChar the the char to get ebcdic code from.
   * @return the ebcdic code obtained from the char
   */
  public abstract byte toEBCDIC(char aChar);

  /**
   * From String to ebcdic string
   *
   * @param aString the string to get the ebcdic codes from
   * @param aLen number of bytes to get from the string
   * @return ebcdic code bytes for the given string and length
   */
  public byte[] toText(String aString, int aLen) {
    byte[] bb = new byte[aLen];
    int i;
    int len = Math.min(aLen, aString.length());

    for (i = 0; i < len; i++) {
      bb[i] = toEBCDIC(aString.charAt(i));
    }
    // fill with space
    for (i = len; i < aLen; i++) {
      bb[i] = toEBCDIC(' ');
    }

    return bb;
  }

  /**
   * From int to ebcdic numeric not packed
   *
   * @param aNum number to get the ebcdic bytes from
   * @param aLen number of bytes to get from the number
   * @return not packed ebcdic code bytes for the given number and length
   */
  public byte[] toNumeric(int aNum, int aLen) {
    byte[] bb = new byte[aLen];
    int i;

    for (i = aLen - 1; i >= 0; i--) {
      bb[i] = toEBCDIC((char) (((int) '0') + (aNum % 10)));
      aNum /= 10;
    }

    return bb;
  }

  /**
   * From int to packed
   *
   * @param aNum number to get the ebcdic bytes from
   * @param aLen number of bytes to get from the number
   * @return packed ebcdic code bytes for the given number and length
   */
  public byte[] toPacked(int aNum, int aLen) {
    byte[] res = new byte[(aLen + 1) / 2];
    int x;

    for (int i = res.length - 1; i >= 0; i--) {
      if (i == res.length - 1 && aNum < 0) {
        res[i] = (byte) 0x0D;
      } else {
        x = aNum % 10;
        aNum /= 10;
        res[i] = (byte) x;
      }

      x = aNum % 10;
      aNum /= 10;
      res[i] |= (byte) (x << 4);
    }

    return res;
  }

  /**
   * From ebcdic string to String
   *
   * @param aBuf ebcdic code bytes to get the string from
   * @param aOfs offset in the bytes from where to get the string from
   * @param aLen number of bytes to get from the bytes
   * @return string for the given ebcdic code bytes
   */
  public String toString(byte[] aBuf, int aOfs, int aLen) {
    String str = "";
    int i;

    for (i = aOfs; i < (aOfs + aLen); i++) {
      str += toChar(aBuf[i]);
    }

    // strip trailing blanks
    for (i = str.length() - 1; (i >= 0) && (str.charAt(i) == ' '); i--) {
      ;
    }

    return str.substring(0, Math.max(0, Math.min(str.length(), i + 1)));
  }

  /**
   * From ebcdic numeric not packed to int
   *
   * @param aBuf not packed ebcdic code bytes to get the number from
   * @param aOfs offset in the bytes from where to get the number from
   * @param aLen number of bytes to get from the bytes
   * @return number for the given ebcdic code bytes
   */
  public int toInt(byte[] aBuf, int aOfs, int aLen) {
    String str = toString(aBuf, aOfs, aLen);
    return Integer.parseInt(str);
  }

  /**
   * From ebcdic packed to int
   *
   * @param aBuf packed ebcdic code bytes to get the number from
   * @param aOfs offset in the bytes from where to get the number from
   * @param aLen number of bytes to get from the bytes
   * @return number for the given ebcdic code bytes
   */
  public int toIntFromPacked(byte[] aBuf, int aOfs, int aLen) {
    int res = 0;

    for (int i = aOfs; i < (aOfs + aLen); i++) {
      res = (res * 100) + ((aBuf[i] >> 4 & 0x0F) * 10);

      if ((aBuf[i] & 0x0F) == 0x0D) {
        res /= -10;
      } else if ((aBuf[i] & 0x0F) == 0x0F) {
        res /= 10;
      } else {
        res += (aBuf[i] & 0x0F);
      }
    }

    return res;
  }

}