// File: /workspace/github_cpp_makefile_star2_O1/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, %r13
movl $0x10, %edi
callq 0x2180
movq %rax, %r12
xorps %xmm0, %xmm0
movaps %xmm0, (%rax)
movq %rax, (%r13)
movq $0x1f4, 0x8(%rax)       # imm = 0x1F4
movl $0x1f7, %edi            # imm = 0x1F7
callq 0x2040
movq %rax, (%r12)
movl $0x0, 0xc(%r12)
movb $0x0, (%rax)
movq %r13, 0x8(%rsp)
movq (%r15), %rax
movl 0xc(%rax), %r12d
testl %r12d, %r12d
jle 0x290b3
xorl %eax, %eax
movq %rbp, 0x10(%rsp)
movq (%r15), %rcx
movslq %eax, %rbx
xorl %edx, %edx
movl $0xffffffff, %esi       # imm = 0xFFFFFFFF
incl %esi
cmpb $0x0, (%r14,%rsi)
jne 0x28fa6
movslq %esi, %rsi
cmpq %rsi, %rdx
jge 0x28fe9
cmpl %ebx, 0xc(%rcx)
je 0x28fe9
movq (%rcx), %rsi
movb (%rsi,%rbx), %sil
cmpb (%r14,%rdx), %sil
jne 0x28fe9
movl $0xfffffffe, %esi       # imm = 0xFFFFFFFE
leal 0x2(%rsi), %edi
incl %esi
cmpb $0x0, (%r14,%rdi)
jne 0x28fce
movl %esi, %esi
cmpq %rsi, %rdx
je 0x29016
incq %rbx
incq %rdx
jmp 0x28fa1
xorl %ecx, %ecx
movl %eax, %ebx
testb %cl, %cl
jne 0x29008
movq 0x8(%rsp), %rdi
movq (%r15), %rax
movq (%rax), %rax
movslq %ebx, %rcx
movsbl (%rax,%rcx), %esi
callq 0x278c0
incl %ebx
movl %ebx, %eax
cmpl %r12d, %ebx
jl 0x28f99
jmp 0x290b3
movq 0x8(%rsp), %rax
testq %rax, %rax
je 0x2903d
movq (%rax), %rcx
cmpl $0x0, 0xc(%rcx)
je 0x2903d
movq 0x8(%rbp), %rsi
cmpq 0x10(%rbp), %rsi
je 0x29051
movq %rax, (%rsi)
addq $0x8, 0x8(%rbp)
jmp 0x2905e
movq (%rax), %rax
movl $0x0, 0xc(%rax)
movq (%rax), %rax
movb $0x0, (%rax)
movb $0x1, %cl
jmp 0x28fed
movq %rbp, %rdi
leaq 0x8(%rsp), %rdx
callq 0x2a4d0
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)
movq $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)
movb $0x1, %cl
movq 0x10(%rsp), %rbp
jmp 0x28fed
movq 0x8(%rsp), %r14
testq %r14, %r14
je 0x29103
movq (%r14), %rax
cmpl $0x0, 0xc(%rax)
je 0x290da
movq 0x8(%rbp), %rsi
cmpq 0x10(%rbp), %rsi
je 0x290f6
movq %r14, (%rsi)
addq $0x8, 0x8(%rbp)
jmp 0x29103
testq %r14, %r14
je 0x29103
movq %r14, %rdi
callq 0x27708
movl $0x8, %esi
movq %r14, %rdi
callq 0x2190
jmp 0x29103
leaq 0x8(%rsp), %rdx
movq %rbp, %rdi
callq 0x2a4d0
movq %rbp, %rax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
jmp 0x29117
movq %rax, %rbx
movl $0x8, %esi
movq %r13, %rdi
callq 0x2190
movq %rbx, %rdi
callq 0x22e0
nop