// File: /workspace/github_cpp_makefile_star2_O2/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
pushq $0x18
popq %rdi
callq 0x2170
xorps %xmm0, %xmm0
movups %xmm0, (%rax)
movq %rax, 0x10(%rsp)
andq $0x0, 0x10(%rax)
pushq $0x8
popq %rdi
callq 0x2170
movq %rax, %r13
movq %rax, %rdi
callq 0x20cd8
leaq 0x8(%rsp), %rax
movq %r13, (%rax)
movq (%r15), %rax
movl 0xc(%rax), %r13d
xorl %r12d, %r12d
xorl %ebx, %ebx
cmpl %r13d, %ebx
jge 0x22495
movl %ebx, %ebp
movq %r14, %rdi
callq 0x20d90
movq (%r15), %rdx
leal -0x1(%rax), %esi
movslq %ebp, %rcx
leal (%rcx,%rax), %ebx
decl %ebx
testl %eax, %eax
cmovlel %r12d, %eax
xorl %edi, %edi
cmpq %rdi, %rax
je 0x2243a
leal (%rdi,%rbp), %r9d
movq (%rdx), %r8
cmpl 0xc(%rdx), %r9d
je 0x2243d
leaq (%r8,%rcx), %r9
movb (%rdi,%r9), %r9b
cmpb (%r14,%rdi), %r9b
jne 0x2243d
cmpq %rdi, %rsi
je 0x22452
incq %rdi
jmp 0x22410
movq (%rdx), %r8
movq 0x8(%rsp), %rdi
movsbl (%r8,%rcx), %esi
callq 0x213f4
movl %ebp, %ebx
incl %ebx
jmp 0x223e7
movq 0x8(%rsp), %rax
movq (%rax), %rax
cmpl $0x0, 0xc(%rax)
je 0x22489
movq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rsi
callq 0x22cbc
pushq $0x8
popq %rdi
callq 0x2170
movq %rax, %rbp
movq %rax, %rdi
callq 0x20cd8
movq %rbp, 0x8(%rsp)
jmp 0x2244e
andl $0x0, 0xc(%rax)
movq (%rax), %rax
movb $0x0, (%rax)
jmp 0x2244e
movq 0x8(%rsp), %r14
testq %r14, %r14
movq 0x10(%rsp), %rbx
je 0x224c4
movq (%r14), %rax
cmpl $0x0, 0xc(%rax)
je 0x224bc
leaq 0x8(%rsp), %rsi
movq %rbx, %rdi
callq 0x22cbc
jmp 0x224cf
movq %r14, %rdi
callq 0x212b2
pushq $0x8
popq %rsi
movq %r14, %rdi
callq 0x2180
movq %rbx, %rax
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
movq %rax, %rbx
pushq $0x8
popq %rsi
movq %r13, %rdi
jmp 0x224f5
movq %rax, %rbx
pushq $0x8
popq %rsi
movq %rbp, %rdi
callq 0x2180
movq %rbx, %rdi
callq 0x22d0