// File: /workspace/github_cpp_makefile_star2_O3/gersteinlab[P]MUSIC/src/ms_ansi_string.cpp
// Function: t_string::tokenize_by_str(char const*)
t_string_tokens* t_string::tokenize_by_str(const char* delimiter_string)
{
	t_string_tokens* token_vector = new vector<t_string*>();

	// Current token is nothing at the beginning.
	t_string* current_token = new t_string();

	// Go over the obj_string.
	int str_len = this->length();
	for(int i_str = 0; i_str < str_len; i_str++)
	{
		//printf("Processing: %c\n", this->x(i_str));
		// This is set to true if i_str'th character is a delimiter.
		bool is_delimiter = false;

		int i_str_search = i_str;
		// Check if current character in the string is a delimiter character.
		for(int i_del = 0; i_del < string_length(delimiter_string); i_del++)
		{
			if(i_str_search == this->length() || this->x(i_str_search) != delimiter_string[i_del])
			{
				is_delimiter = false;
				break;
			}				

			// If the current substring matches the delimiter string, set delimiter to true.
			if(i_del == string_length(delimiter_string) - 1)
			{
				// Push current token to vector (if it is appropriate for pushing.) and start a new token.
				// Push the previous token. Cannot push the next token since there is no way of knowing that
				// it is a valid token beforehand.
				if(current_token != NULL && current_token->length() != 0)
				{
					// Push this token to token vector.
					//printf("pushing %s\n", current_token->obj_string);
					token_vector->push_back(current_token);

					// Do not free current token now, allocate a new one.
					current_token = new t_string();
				}
				else // The token is not a good token (i.e., an empty token), free its memory and 
				{
					current_token->empty();
				}

				is_delimiter = true;

				// Note that the last char that is at i_str_search is the last char
				// of delimiter string but that will be jumped over by for loop.
				// This is the same in tokenize_by_chars function.
				i_str = i_str_search;
				break;
			}

			// Increment substring counter.
			i_str_search++;

		} // delimiter char loop.

		// If this character is not a delimiter, concatenate the character to the current_token.
		if(!is_delimiter)
		{
			current_token->concat_char(this->x(i_str));
		}

	} // string char loop.

	// The last token is added to the tokens vector after whole loop is finished.
	if(current_token != NULL && current_token->length() != 0)
	{
		// Push this token to token vector.
		token_vector->push_back(current_token);
		//printf("pushing %s\n", current_token->obj_string);
	}
	else
	{
		delete(current_token);
	}

	return(token_vector);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %rsi, %r14
movq %rdi, %r15
movl $0x18, %edi
callq 0x2180
movq %rax, %rbp
xorps %xmm0, %xmm0
movups %xmm0, (%rax)
movq $0x0, 0x10(%rax)
movl $0x8, %edi
callq 0x2180
movq %rax, %r12
movl $0x10, %edi
callq 0x2180
movq %rax, %r13
xorps %xmm0, %xmm0
movaps %xmm0, (%rax)
movq %rax, (%r12)
movl $0x1f4, 0x8(%rax)       # imm = 0x1F4
movl $0x1f7, %edi            # imm = 0x1F7
callq 0x2040
movq %rax, (%r13)
movl $0x0, 0xc(%r13)
movb $0x0, (%rax)
movq %r12, 0x8(%rsp)
movq (%r15), %rax
movl 0xc(%rax), %ebx
testl %ebx, %ebx
jle 0x28992
xorl %r13d, %r13d
movq %rbp, 0x10(%rsp)
movq (%r15), %rcx
movslq %r13d, %rax
xorl %edx, %edx
movq %rax, %r12
movl $0xffffffff, %esi       # imm = 0xFFFFFFFF
incl %esi
cmpb $0x0, (%r14,%rsi)
jne 0x28890
movslq %esi, %rsi
cmpq %rsi, %rdx
jge 0x288d4
movq (%rcx), %rsi
cmpl %r12d, 0xc(%rcx)
je 0x288d7
movb (%rsi,%r12), %dil
cmpb (%r14,%rdx), %dil
jne 0x288d7
movl $0xfffffffe, %esi       # imm = 0xFFFFFFFE
leal 0x2(%rsi), %edi
incl %esi
cmpb $0x0, (%r14,%rdi)
jne 0x288b9
movl %esi, %esi
cmpq %rsi, %rdx
je 0x288f2
incq %r12
incq %rdx
jmp 0x2888b
movq (%rcx), %rsi
movq 0x8(%rsp), %rdi
movsbl (%rsi,%rax), %esi
callq 0x2724c
incl %r13d
cmpl %ebx, %r13d
jl 0x28880
jmp 0x28988
movq 0x8(%rsp), %rax
movq (%rax), %rcx
cmpl $0x0, 0xc(%rcx)
je 0x28914
movq 0x8(%rbp), %rsi
cmpq 0x10(%rbp), %rsi
je 0x28926
movq %rax, (%rsi)
addq $0x8, 0x8(%rbp)
jmp 0x28933
movl $0x0, 0xc(%rcx)
movq (%rcx), %rax
movb $0x0, (%rax)
movl %r12d, %r13d
jmp 0x288e5
movq %rbp, %rdi
leaq 0x8(%rsp), %rdx
callq 0x29d64
movl $0x8, %edi
callq 0x2180
movq %rax, %r13
movl $0x10, %edi
callq 0x2180
movq %rax, %rbp
xorps %xmm0, %xmm0
movaps %xmm0, (%rax)
movq %rax, (%r13)
movl $0x1f4, 0x8(%rax)       # imm = 0x1F4
movl $0x1f7, %edi            # imm = 0x1F7
callq 0x2040
movq %rax, (%rbp)
movl $0x0, 0xc(%rbp)
movb $0x0, (%rax)
movq %r13, 0x8(%rsp)
movl %r12d, %r13d
movq 0x10(%rsp), %rbp
jmp 0x288e5
movq 0x8(%rsp), %r12
testq %r12, %r12
je 0x289ba
movq (%r12), %rax
cmpl $0x0, 0xc(%rax)
je 0x289b0
movq 0x8(%rbp), %rsi
cmpq 0x10(%rbp), %rsi
je 0x289cc
movq %r12, (%rsi)
addq $0x8, 0x8(%rbp)
jmp 0x289d9
movq %r12, %rdi
callq 0x27096
jmp 0x289bd
xorl %r12d, %r12d
movl $0x8, %esi
movq %r12, %rdi
callq 0x2190
jmp 0x289d9
leaq 0x8(%rsp), %rdx
movq %rbp, %rdi
callq 0x29d64
movq %rbp, %rax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq %rax, %rbx
movl $0x8, %esi
movq %r12, %rdi
jmp 0x28a03
movq %rax, %rbx
movl $0x8, %esi
movq %r13, %rdi
callq 0x2190
movq %rbx, %rdi
callq 0x22e0