问如何在AWK中打印JSON对象

EN

function ltrim(s) { sub(/^[ \t]+/, "", s); return s }
function rtrim(s) { sub(/[ \t]+$/, "", s); return s }
function sTrim(s){
    return rtrim(ltrim(s));
}

function jsonEscape(jsValue) {
    gsub(/\\/, "\\\\", jsValue)
    gsub(/"/,  "\\\"", jsValue)
    gsub(/\b/, "\\b",  jsValue)
    gsub(/\f/, "\\f",  jsValue)
    gsub(/\n/, "\\n",  jsValue)
    gsub(/\r/, "\\r",  jsValue)
    gsub(/\t/, "\\t",  jsValue)

    return jsValue
}

function jsonStringEscapeAndWrap(jsValue) {
    return "\42" jsonEscape(jsValue) "\42"
}

function jsonPrint(contentArray, contentRowsCount, schemaArray){    
    result = ""
    schemaLength = length(schemaArray)
    for (x = 1; x <= contentRowsCount; x++) {
        result = result "{"
        for(y = 1; y <= schemaLength; y++){

            result = result "\42" sTrim(schemaArray[y]) "\42:" sTrim(contentArray[x, y])

             if(y < schemaLength){
                result = result ","
            }

        }        
        result = result "}"
        if(x < contentRowsCount){
            result = result ",\n"
        }
    }
    return result
}

function jsonValidateAndPrint(contentArray, contentRowsCount, schemaArray, schemaColumnsCount, errorArray){  
    result = ""
    errorsCount = 1
    for (x = 1; x <= contentRowsCount; x++) {
        jsonRow = "{"
        for(y = 1; y <= schemaColumnsCount; y++){

            regexValue = schemaArray[y, 2]
            jsonValue = sTrim(contentArray[x, y])
            isValid = jsonValue ~ regexValue            

            if(isValid == 0){
                errorArray[errorsCount, 1] = "\42" sTrim(schemaArray[y, 1]) "\42"
                errorArray[errorsCount, 2] = "\42Value " jsonValue " not match format: " regexValue " \42"
                errorArray[errorsCount, 3] = x
                errorsCount++
                jsonValue = "null"
            }            

            jsonRow = jsonRow "\42" sTrim(schemaArray[y, 1]) "\42:" jsonValue

            if(y < schemaColumnsCount){
                jsonRow =  jsonRow ","
            }
        }        
        jsonRow = jsonRow "}"
        result = result jsonRow

        if(x < contentRowsCount){
            result = result ",\n"
        }
    }

    return result
}

BEGIN{  
    rowsCount =1
    matchCount = 0
    errorsCount = 0
    shareholdersJsonSchema[1, 1] = "Imie"
    shareholdersJsonSchema[2, 1] = "Nazwisko"
    shareholdersJsonSchema[3, 1] = "PESEL"
    shareholdersJsonSchema[4, 1] = "Funkcja"

    shareholdersJsonSchema[1, 2] = "\\.*"
    shareholdersJsonSchema[2, 2] = "\\.*"
    shareholdersJsonSchema[3, 2] = "^[0-9]{11}$"
    shareholdersJsonSchema[4, 2] = "\\.*"


    errorsSchema[1] = "PropertyName"    
    errorsSchema[2] = "Message"
    errorsSchema[3] = "PositionIndex"

    resultSchema[1]= "ShareHolders"
    resultSchema[2]= "Errors"
}

/dane wspólników/,/czwarta linia/{      

    if(/imie/ || /nazwisko/ || /pesel/ || /funkcja/){

        if(/imie/){
            shareholdersArray[rowsCount, 1] = jsonStringEscapeAndWrap($2)
            matchCount++ 
        }
        if(/nazwisko/){ 
            shareholdersArray[rowsCount, 2] = jsonStringEscapeAndWrap($2)
            matchCount ++ 
        }
        if(/pesel/){             
            shareholdersArray[rowsCount, 3] = $2
            matchCount ++ 
        }
        if(/funkcja/){ 
            shareholdersArray[rowsCount, 4] = jsonStringEscapeAndWrap($2)
            matchCount ++
        }

        if(matchCount==4){
            rowsCount++
            matchCount = 0;
        }         
    } 
}

END{
    shareHolders = jsonValidateAndPrint(shareholdersArray, rowsCount - 1, shareholdersJsonSchema, 4, errorArray)

    shareHoldersErrors = jsonPrint(errorArray, length(errorArray) / length(errorsSchema), errorsSchema)

    resultArray[1,1] = "\n[\n" shareHolders "\n]\n"
    resultArray[1,2] = "\n[\n" shareHoldersErrors "\n]\n"

    resultJson = jsonPrint(resultArray, 1, resultSchema)
    print resultJson    
}

{"ShareHolders":
[
{"Imie":"JanA","Nazwisko":"NowakA","PESEL":null,"Funkcja":"PrezesA"},
{"Imie":"Ja\"nD","Nazwisko":"NowakD","PESEL":11111111111,"Funkcja":"PrezesD"},
{"Imie":"JanC","Nazwisko":"NowakC","PESEL":null,"Funkcja":"PrezesC"}
]
,"Errors":
[
{"PropertyName":"PESEL","Message":"Value 11111111111A not match format: ^[0-9]{11}$ ","PositionIndex":1},
{"PropertyName":"PESEL","Message":"Value 12342C not match format: ^[0-9]{11}$ ","PositionIndex":3}
]
}