// This Source Code is in the Public Domain per: http://unlicense.org
package org.litesoft.core.util.text;

import org.litesoft.commonfoundation.charstreams.*;
import org.litesoft.commonfoundation.typeutils.*;

import java.util.*;

public class CodedTextParser {
    public static List<String> parse( String pText ) {
        ArrayList<String> rv = new ArrayList<String>();
        if ( pText != null ) {
            CharSource zSource = new CharSourceFromSequence( pText );
            if ( consumeNonVisible7bitAscii( zSource ) ) {
                do {
                    if ( !rv.isEmpty() ) {
                        rv.add( " " );
                    }
                    addChunk( rv, getUpToNonVisible7bitAscii( zSource ) );
                }
                while ( consumeNonVisible7bitAscii( zSource ) );
            }
        }
        return rv;
    }

    private static String getUpToNonVisible7bitAscii( CharSource pSource ) {
        if ( !pSource.anyRemaining() ) {
            return "";
        }
        StringBuilder sb = new StringBuilder();
        for ( int c = pSource.peek(); (c != -1) && ((' ' < c) && (c <= 126)); c = pSource.peek() ) {
            sb.append( pSource.getRequired() );
        }
        return sb.toString();
    }

    private static boolean consumeNonVisible7bitAscii( CharSource pSource ) {
        for ( int c = pSource.peek(); (c != -1) && ((c <= ' ') || (126 < c)); c = pSource.peek() ) {
            pSource.get(); // Consume
        }
        return pSource.anyRemaining();
    }

    private static void addChunk( List<String> pCollector, String pToken ) {
        if ( pToken.length() > 1 ) {
            int zLeadingPunc = 0;
            while ( zLeadingPunc < pToken.length() && !Characters.isAlphaNumeric( pToken.charAt( zLeadingPunc ) ) ) {
                zLeadingPunc++;
            }
            if ( zLeadingPunc != pToken.length() ) {
                if ( zLeadingPunc != 0 ) {
                    pCollector.add( pToken.substring( 0, zLeadingPunc ) );
                    pToken = pToken.substring( zLeadingPunc );
                }

                int zTrailingPunc = 0;
                while ( !Characters.isAlphaNumeric( pToken.charAt( pToken.length() - (zTrailingPunc + 1) ) ) ) {
                    zTrailingPunc++;
                }
                if ( zTrailingPunc != 0 ) {
                    int zAt = pToken.length() - zTrailingPunc;
                    pCollector.add( pToken.substring( 0, zAt ) );
                    pToken = pToken.substring( zAt );
                }
            }
        }
        pCollector.add( pToken );
    }
}