public class Yasuo {
 private int bianma = 256;// 編碼
 private String perfix = "";// 前綴
 private String suffix = "";// 后綴
 private String zhongjian = "";// 中間變量
 HashMap<String, Integer> hm = new HashMap<String, Integer>();// 編碼表
 private static String path = "D:\\JAVA\\字典壓縮\\zidianyasuo.txt";// 要壓縮的文件
 private static String path3 = "D:\\JAVA\\字典壓縮\\yasuo.txt";// 解壓后的文件
 private static String path4 = "D:\\JAVA\\字典壓縮\\jieya.txt";// 解壓后的文件
 public static void main(String[] args) throws IOException {
 /**
  * 壓縮
  */
 Yasuo yasuo = new Yasuo();
 yasuo.yasuo();
 /**
  * 解壓
  */
 Jieya jie = new Jieya();
 jie.jieya(path3,path4);
 }
 public void yasuo() throws IOException {
 // 創建文件輸入流
 InputStream is = new FileInputStream(path);
 byte[] buffer = new byte[is.available()];// 創建緩存區域
 is.read(buffer);// 讀入所有的文件字節
 String str = new String(buffer);// 對字節進行處理
 is.close(); // 關閉流
 // 創建文件輸出流
 OutputStream os = new FileOutputStream(path3);
 DataOutputStream dos = new DataOutputStream(os);
// System.out.println(str);
 // 把最基本的256個Ascll碼放編碼表中
 for (int i = 0; i < 256; i++) {
  char ch = (char) i;
  String st = ch + "";
  hm.put(st, i);
 }
 for (int i = 0; i < str.length(); i++) {
  if(bianma==65535){
  System.out.println("重置");
  dos.writeChar(65535);//寫出一個-1作為重置的表示與碼表的打印
  hm.clear();//清空Hashmap
  for (int j = 0; j < 256; j++) {//重新將基本256個編碼寫入
   char ch = (char) j;
   String st = ch + "";
   hm.put(st, j);
  }
  perfix="";
  bianma=0;
  }
  char ch = str.charAt(i);
  String s = ch + "";
  suffix = s;
  zhongjian = perfix + suffix;
  if (hm.get(zhongjian) == null) {// 如果碼表中沒有 前綴加后綴的碼表
//  System.out.print(zhongjian);
//  System.out.println(" 對應的編碼為 " + bianma);
  hm.put(zhongjian, bianma);// 向碼表添加 前綴加后綴 和 對應的編碼
//  System.out.println(" " + perfix);
//  System.out.println("寫入的編碼 "+hm.get(perfix));
  dos.writeChar(hm.get(perfix)); // 把前綴寫入壓縮文件
  bianma++;
  perfix = suffix;
  } else {// 如果有下一個前綴保存 上一個前綴加后綴
  perfix = zhongjian;
  }
  if (i == str.length() - 1) {// 把最后一個寫進去
//  System.out.print("寫入最后一個"+perfix);
  dos.writeChar(hm.get(perfix));
//  System.out.println("   "+hm.get(perfix));
  }
 }
 os.close();// 關閉流
// System.out.println(hm.toString());// 輸出碼表
 }
}

public class Jieya {
 private ArrayList<Integer> list = new ArrayList<Integer>();// 存高八位
 private int count = 0;// 下標
 private ArrayList<Integer> numlist = new ArrayList<>();// 存編碼
 HashMap<String, Integer> hm = new HashMap<>();// 編碼表
 HashMap<Integer, String> hm1 = new HashMap<>();// 編碼表
 private String cw = "";
 private String pw = "";
 private String p = "";
 private String c = "";
 private int bianma = 256;
 public void jieya(String path, String path2) throws IOException {
 // 讀取壓縮文件
 InputStream is = new FileInputStream(path);
 byte[] buffer = new byte[is.available()];
 is.read(buffer);
 is.close();// 關閉流
 String str = new String(buffer);
 // System.out.println(str);
 // 讀高八位 把高八位所表示的數字放入List中
 for (int i = 0; i < buffer.length; i += 2) {
  int a = buffer[i];
  list.add(a);// 高八位存入list列表中
 }
 for (int i = 1; i < buffer.length; i += 2) {// 讀低八位
  // System.out.println(list.get(count)+"---");
  if (buffer[i] == -1 && buffer[i - 1] == -1) {
  numlist.add(65535);
  } else {
  // System.out.println(i);
  if (list.get(count) > 0) {// 如果低八位對應的高八位為1
   if (buffer[i] < 0) {
   int a = buffer[i] + 256 + 256 * list.get(count);
   // buffer[i]+=256+256*list.get(count);
   numlist.add(a);// 存入numlist中
   } else {
   int a = buffer[i] + 256 * (list.get(count));
   // System.out.println(buffer[i]+" "+a + "+++");
   numlist.add(a);// 存入numlist中
   }
  } else {// 高八位為0
   // System.out.println(buffer[i]);
   numlist.add((int) buffer[i]);// 存入numlist中
  }
  count++;
  }
 }
 // System.out.println(list.size()+" "+count+" "+numlist.size()+"比較大小"+"
 // "+buffer.length);
 // for(int i=0;i<numlist.size();i++){
 // System.out.println(numlist.get(i)+"p");
 // }
 /**
  * 把0-255位字符編碼
  */
 for (int i = 0; i < 256; i++) {
  char ch = (char) i;
  String st = ch + "";
  hm.put(st, i);
  hm1.put(i, st);
 }
 /**
  * 根據numlist隊列中的元素開始重新編碼，輸出文件
  */
 // 創建輸出流
 OutputStream os = new FileOutputStream(path2);
 // 遍歷numlist
 for (int i = 0; i < numlist.size(); i++) {
  int n = numlist.get(i);
  if (hm.containsValue(n) == true) {// 如果編碼表中存在
  cw = hm1.get(n);
  // System.out.println(cw+"*");
  if (pw != "") {
   os.write(cw.getBytes("gbk"));
   p = pw;
   c = cw.charAt(0) + "";// c=cw的第一個
   // System.out.println(c+"&");
   hm.put(p + c, bianma);
   hm1.put(bianma, p + c);
   bianma++;
  } else {
   os.write(cw.getBytes("gbk"));// 第一個
  }
  } else {// 編碼表中不存在
  p = pw;
  // System.out.println(pw+"-=");
  c = pw.charAt(0) + "";// c=pw的第一個
  hm.put(p + c, bianma);
  hm1.put(bianma, p + c);
  bianma++;
  os.write((p + c).getBytes("gbk"));
  cw = p + c;
  }
  pw = cw;
  // System.out.println(bianma);
  // System.out.println(cw+"==");
  if (i == 65535) {
  System.out.println("重置2");
  hm.clear();
  hm1.clear();
  for (int j = 0; j < 256; j++) {
   char ch = (char) j;
   String st = ch + "";
   hm.put(st, j);
   hm1.put(j, st);
  }
  bianma = 0;
  pw = "";
  }
 }
 // System.out.println(hm1.toString());
 os.close();
 }
}