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

import org.litesoft.commonfoundation.typeutils.*;

import java.util.*;

import org.litesoft.commonfoundation.charstreams.*;

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 );
    }
}