package com.healchow.util;

import java.security.InvalidParameterException;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.Stack;

/**
 * Java 解析不帶引號(hào)的JSON字符串
 *
 * @author Heal Chow
 * @date 2019/08/13 11:36
 */
public class ParseJsonStrUtils {

 public static void main(String[] args) {

  // 帶引號(hào)的字符串, 會(huì)將字符串當(dāng)作key-value的一部分, 因此這類字符串推薦使用fastJson、Gson等工具轉(zhuǎn)換
  // 注意: String內(nèi)部不要存在無(wú)意義的{、}、[、]符號(hào) - 暫時(shí)沒(méi)想到好的兼容方法
  /*String sourceStr = "{\"_index\":\"book_shop\"," +
       "\"_id\":\"1\"," +
       "\"_source\":{" +
        "\"name\":\"Thinking in Java [4th Edition]\"," +
        "\"author\":\"[US] Bruce Eckel\"," +
        "\"price\":109.0,\"date\":\"2007-06-01 00:00:00\"," +
        "\"tags\":[\"Java\",[\"Programming\"]" +
       "}}";*/

  // 不帶引號(hào)的字符串, 首尾多對(duì)[]、{}不影響解析
  String sourceStr = "[[[{" +
       "{" +
        "Type:1," +
        "StoragePath:[{Name:/image/2019-08-01/15.jpeg,DeviceID:4401120000130},{ShotTime:2019-08-01 14:44:24}]," +
        "Width:140" +
       "}," +
       "{" +
        "Type:2,StoragePath:9090/pic/2019_08_01/src.jpeg," +
        "Inner:{DeviceID:44011200}," +
        "Test:[{ShotTime:2019-08-01 14:50:14}]," +
        "Width:5600}" +
       "}}]]]";

  List<Map<String, Object>> jsonArray;
  Map<String, Object> jsonMap;

  Object obj = null;
  try {
   obj = parseJson(sourceStr);
  } catch (Exception e) {
   System.out.println("出錯(cuò)啦: " + e.getMessage());
   e.printStackTrace();
  }

  if (obj instanceof List) {
   jsonArray = (List<Map<String, Object>>) obj;
   System.out.println("解析生成了List對(duì)象: " + jsonArray);
  } else if (obj instanceof Map) {
   jsonMap = (Map<String, Object>) obj;
   System.out.println("解析生成了Map對(duì)象: " + jsonMap);
  } else {
   System.out.println("需要解析的字符串既不是JSON Array, 也不符合JSON Object!\n原字符串: " + sourceStr);
  }
 }

 /**
  * 解析 Json 格式的字符串, 封裝為 List 或 Map 并返回
  * 注意: (1) key 和 value 不能含有 ",", key 中不能含有 ":" —— 要分別用 "," 和 ":" 進(jìn)行分隔
  *  (2) 要解析的字符串必須符合JSON對(duì)象的格式, 只對(duì)最外層的多層嵌套做了簡(jiǎn)單的處理,
  *   復(fù)雜的如"{a:b},{x:y}"將不能完全識(shí)別 —— 正確的應(yīng)該是"[{a:b},{x:y}]"
  * @param sourceStr 首尾被"[]"或"{}"包圍的字符串
  * @return 生成的JsonObject
  */
 public static Object parseJson(String sourceStr) throws InvalidParameterException {
  if (sourceStr == null || "".equals(sourceStr)) {
   return sourceStr;
  }

  // 判斷字符串首尾有沒(méi)有多余的、相匹配的 "[]" 和 "{}"
  String parsedStr = simplifyStr(sourceStr, "[", "]");
  parsedStr = simplifyStr(parsedStr, "{", "}");

  // 借助棧來(lái)實(shí)現(xiàn) "[]" 和 "{}" 的出入
  Stack<String> leftSymbolStack = new Stack<>();
  Stack<String> rightSymbolStack = new Stack<>();

  if ((parsedStr.startsWith("[") && parsedStr.endsWith("]")) || (parsedStr.startsWith("{") && parsedStr.endsWith("}"))) {
   leftSymbolStack.push(parsedStr.substring(0, 1));
   rightSymbolStack.push(parsedStr.substring(parsedStr.length() - 1));
   parsedStr = parsedStr.substring(1, parsedStr.length() - 1);

   // parsedStr 內(nèi)部還可能是連續(xù)的"{{}}"
   parsedStr = simplifyStr(parsedStr, "{", "}");
  } else {
   throw new InvalidParameterException("要解析的字符串中存在不匹配的'[]'或'{}', 請(qǐng)檢查!\n原字符串為: " + sourceStr);
  }

  // 保存解析的結(jié)果, jsonArray中可能只有String, 也可能含有Map<String, Object>
  List<Object> jsonArray = new ArrayList<>();
  Map<String, Object> jsonMap = new HashMap<>(16);

  // 內(nèi)部遍歷、解析
  innerParseByLoop(parsedStr, leftSymbolStack, rightSymbolStack, jsonArray, jsonMap);

  // 判斷jsonArray是否為空
  if (jsonArray.size() > 0) {
   return jsonArray;
  } else {
   return jsonMap;
  }
 }

 /**
  * 循環(huán)解析內(nèi)部的List、Map對(duì)象
  */
 private static void innerParseByLoop(String parsedStr, Stack<String> leftSymbolStack, Stack<String> rightSymbolStack,
           List<Object> jsonArray, Map<String, Object> jsonMap) throws InvalidParameterException {
  if (parsedStr == null || parsedStr.equals("")) {
   return;
  }
  // 按照","分隔
  String[] allKeyValues = parsedStr.split(",");
  if (allKeyValues.length > 0) {

   // 遍歷, 并按照":"分隔解析
   out:
   for (String keyValue : allKeyValues) {

    // 如果keyValue中含有":", 說(shuō)明該keyValue是List<Map>中的一個(gè)對(duì)象, 就需要確定第一個(gè)":"的位置 —— 可能存在多個(gè)":"
    int index = keyValue.indexOf(":");
    if (index > 0) {

     // 判斷key是否仍然以"{"或"["開(kāi)始, 如果是, 則壓棧
     String key = keyValue.substring(0, index);
     while (key.startsWith("[") || key.startsWith("{")) {
      leftSymbolStack.push(key.substring(0, 1));
      // 解析過(guò)的串要一直跟進(jìn)
      parsedStr = parsedStr.substring(1);
      key = key.substring(1);
     }

     // 判讀和value是否以"["開(kāi)頭 —— 又是一個(gè) List 對(duì)象 —— 遞歸解析
     String value = keyValue.substring(index + 1);
     if (value.startsWith("[")) {
      int innerIndex = parsedStr.indexOf("]");
      List<Object> innerList = (List<Object>) parseJson(parsedStr.substring(key.length() + 1, innerIndex + 1));
      jsonMap.put(key, innerList);
      // 清除最后的"]", 并判斷是否存在","
      parsedStr = parsedStr.substring(innerIndex + 1);
      if (parsedStr.indexOf(",") == 0) {
       parsedStr = parsedStr.substring(1);
      }

      // 此內(nèi)部存在對(duì)象, 內(nèi)部的","已經(jīng)解析完畢了, 要修正按照","切割的字符串?dāng)?shù)組, 并繼續(xù)遍歷
      innerParseByLoop(parsedStr, leftSymbolStack, rightSymbolStack, jsonArray, jsonMap);
      break;
     }

     // 判讀和value是否以 "{" 開(kāi)頭 —— 又是一個(gè) Map 對(duì)象 —— 遞歸解析
     else if (value.startsWith("{")) {
      int innerIndex = parsedStr.indexOf("}");
      Map<String, Object> innerMap = (Map<String, Object>) parseJson(parsedStr.substring(key.length() + 1, innerIndex + 1));
      jsonMap.put(key, innerMap);

      // 清除最后的"}", 并判斷是否存在","
      parsedStr = parsedStr.substring(innerIndex + 1);
      if (parsedStr.indexOf(",") == 0) {
       parsedStr = parsedStr.substring(1);
      }

      // 此內(nèi)部存在對(duì)象, 內(nèi)部的","已經(jīng)解析完畢了, 要修正按照","切割的字符串?dāng)?shù)組, 并繼續(xù)遍歷
      innerParseByLoop(parsedStr, leftSymbolStack, rightSymbolStack, jsonArray, jsonMap);
      break;
     }

     // 最后判斷value尾部是否含有 "]" 或 "}"
     else {
      while (value.endsWith("]") || value.endsWith("}")) {
       // 最右側(cè)的字符
       String right = value.substring(value.length() - 1);
       // 此時(shí)棧頂元素
       String top = leftSymbolStack.peek();
       // 如果有相匹配的, 則彈棧, 否則忽略
       if (("}".equals(right) && "{".equals(top)) || ("]".equals(right) && "[".equals(top))) {
        leftSymbolStack.pop();
        value = value.substring(0, value.length() - 1);
        jsonMap.put(key, value);

        // 清除最后的"}", 并判斷是否存在","
        parsedStr = parsedStr.substring(key.length() + 1 + value.length() + 1);
        if (parsedStr.indexOf(",") == 0) {
         parsedStr = parsedStr.substring(1);
        }

        // 解析完成了一個(gè)對(duì)象, 則將該元素添加到List中, 并創(chuàng)建新的對(duì)象
        jsonArray.add(jsonMap);
        jsonMap = new HashMap<>(16);

        // 繼續(xù)進(jìn)行外層的解析
        continue out;
       }

       // 如果都不匹配, 則有可能是源字符串的最后一個(gè)符號(hào)
       else {
        rightSymbolStack.push(right);
        value = value.substring(0, value.length() - 1);
       }
      }
      jsonMap.put(key, value);
      int length = key.length() + value.length() + 2;
      if (parsedStr.length() > length) {
       parsedStr = parsedStr.substring(length);
      } else {
       parsedStr = "";
      }
     }
    }
    // 如果keyValue中不含":", 說(shuō)明該keyValue只是List<String>中的一個(gè)串, 而非List<Map>中的一個(gè)Map, 則直接將其添加到List中即可
    else {
     jsonArray.add(keyValue);
    }
   }

   // 遍歷結(jié)束, 處理最后的符號(hào)問(wèn)題 —— 判斷左右棧是否匹配
   while (!leftSymbolStack.empty()) {
    if (leftSymbolStack.peek().equals("{") && parsedStr.equals("}")) {
     leftSymbolStack.pop();
    }
    if (!rightSymbolStack.empty()) {
     if (leftSymbolStack.peek().equals("{") && rightSymbolStack.peek().equals("}")) {
      leftSymbolStack.pop();
      rightSymbolStack.pop();
     } else if (leftSymbolStack.peek().equals("[") && rightSymbolStack.peek().equals("]")) {
      leftSymbolStack.pop();
      rightSymbolStack.pop();
     } else {
      throw new InvalidParameterException("傳入的字符串中不能被解析成JSON對(duì)象!\n原字符串為: " + parsedStr);
     }
    }
   }
  }
 }

 /**
  * 判斷字符串首尾有沒(méi)有多余的、相匹配的 "[]" 和 "{}", 對(duì)其進(jìn)行簡(jiǎn)化
  */
 private static String simplifyStr(String sourceStr, String firstSymbol, String lastSymbol) {

  while (sourceStr.startsWith(firstSymbol) && sourceStr.endsWith(lastSymbol)) {
   String second = sourceStr.substring(1, 2);
   // 如果第二個(gè)仍然是"["或"{", 再判斷倒數(shù)第二個(gè)是不是"]"或"}" —— 說(shuō)明長(zhǎng)度至少為3, 不會(huì)發(fā)生 IndexOutOfBoundsException
   if (second.equals(firstSymbol)) {
    String penultimate = sourceStr.substring(sourceStr.length() - 2, sourceStr.length() - 1);
    if (penultimate.equals(lastSymbol)) {
     // 縮短要解析的串
     sourceStr = sourceStr.substring(1, sourceStr.length() - 1);
    } else {
     break;
    }
   } else {
    break;
   }
  }
  return sourceStr;
 }

}

// 測(cè)試字符串:
String sourceStr = "{\"_index\":\"book_shop\"," +
     "\"_id\":\"1\"," +
     "\"_source\":{" +
      "\"name\":\"Thinking in Java [4th Edition]\"," +
      "\"author\":\"[US] Bruce Eckel\"," +
      "\"price\":109.0,\"date\":\"2007-06-01 00:00:00\"," +
      "\"tags\":[\"Java\",[\"Programming\"]" +
     "}}";

// 測(cè)試字符串: 
String sourceStr = "[[[{" +
     "{" +
      "Type:1," +
      "StoragePath:[{Name:/image/2019-08-01/15.jpeg,DeviceID:4401120000130},{ShotTime:2019-08-01 14:44:24}]," +
      "Width:140" +
     "}," +
     "{" +
      "Type:2,StoragePath:9090/pic/2019_08_01/src.jpeg," +
      "Inner:{DeviceID:44011200}," +
      "Test:[{ShotTime:2019-08-01 14:50:14}]," +
      "Width:5600}" +
     "}}]]]";