// myString.cpp 串採用定長順序儲存結構的基本操作(14個)
// SString是陣列，故不需引用型別。
// 串的定長順序儲存表示
#include <iostream>
#define MAXSTRLEN 40 // 使用者可在255以內定義最大串長（1個位元組）
typedef char SString[MAXSTRLEN+1]; // 0號單元存放串的長度
using namespace std;
bool  StrAssign(SString T,char *chars)
{ // 生成一個其值等於chars的串T
int i;
if(strlen(chars)>MAXSTRLEN)
return false;
else
{
T[0]=strlen(chars);
for(i=1;i<=T[0];i++)
T[i]=*(chars+i-1);
return true;
}
}


bool StrCopy(SString T,SString S)
{ // 由串S複製得串T
int i;
for(i=0;i<=S[0];i++)
T[i]=S[i];
return true;
}


bool StrEmpty(SString S)
{ // 若S為空串,則返回TRUE,否則返回FALSE
if(S[0]==0)
return true;
else
return false;
}


int StrCompare(SString S,SString T)
{ // 初始條件: 串S和T存在
// 操作結果: 若S>T,則返回值>0;若S=T,則返回值=0;
//若S<T,則返回值<0
int i;
for(i=1;i<=S[0]&&i<=T[0];++i)
if(S[i]!=T[i])
return S[i]-T[i];
return S[0]-T[0];
}


int StrLength(SString S)
{ // 返回串的元素個數
return S[0];
}


bool  ClearString(SString S)
{ // 初始條件:串S存在。操作結果:將S清為空串
S[0]=0;// 令串長為零
return true;
}


bool Concat(SString T,SString S1,SString S2) 
{ // 用T返回S1和S2聯接而成的新串。若未截斷，則返回TRUE，否則FALSE
int i;
if(S1[0]+S2[0]<=MAXSTRLEN)
{ // 未截斷
for(i=1;i<=S1[0];i++)
T[i]=S1[i];
for(i=1;i<=S2[0];i++)
T[S1[0]+i]=S2[i];
T[0]=S1[0]+S2[0];
return true;
}
else
{ // 截斷S2
for(i=1;i<=S1[0];i++)
T[i]=S1[i];
for(i=1;i<=MAXSTRLEN-S1[0];i++)
T[S1[0]+i]=S2[i];
T[0]=MAXSTRLEN;
return false;
}
}


bool SubString(SString Sub,SString S,int pos,int len)
{ // 用Sub返回串S的第pos個字元起長度為len的子串。演算法4.3
int i;
if(pos<1||pos>S[0]||len<0||len>S[0]-pos+1)
return false;
for(i=1;i<=len;i++)
Sub[i]=S[pos+i-1];
Sub[0]=len;
return true;
}


int Index(SString S,SString T,int pos)
{ // 返回子串T在主串S中第pos個字元之後的位置。若不存在,則函式值為0。
// 其中,T非空,1≤pos≤StrLength(S)。演算法4.5
int i,j;
if(1<=pos&&pos<=S[0])
{
i=pos;
j=1;
while(i<=S[0]&&j<=T[0])
if(S[i]==T[j]) // 繼續比較後繼字元
{
++i;
++j;
}
else // 指標後退重新開始匹配
{
i=i-j+2;
j=1;
}
if(j>T[0])
return i-T[0];
else
return 0;
}
else
return 0;
}


bool StrInsert(SString S,int pos,SString T)
{ // 初始條件: 串S和T存在,1≤pos≤StrLength(S)+1
// 操作結果: 在串S的第pos個字元之前插入串T。完全插入返回TRUE,部分插入返回FALSE
int i;
if(pos<1||pos>S[0]+1)
return false;
if(S[0]+T[0]<=MAXSTRLEN)
{ // 完全插入
for(i=S[0];i>=pos;i--)
S[i+T[0]]=S[i];
for(i=pos;i<pos+T[0];i++)
S[i]=T[i-pos+1];
S[0]=S[0]+T[0];
return true;
}
else
{ // 部分插入
for(i=MAXSTRLEN;i<=pos;i--)
S[i]=S[i-T[0]];
for(i=pos;i<pos+T[0];i++)
S[i]=T[i-pos+1];
S[0]=MAXSTRLEN;
return false;
}
}


bool StrDelete(SString S,int pos,int len)
{ // 初始條件: 串S存在,1≤pos≤StrLength(S)-len+1
// 操作結果: 從串S中刪除第pos個字元起長度為len的子串
int i;
if(pos<1||pos>S[0]-len+1||len<0)
return true;
for(i=pos+len;i<=S[0];i++)
S[i-len]=S[i];
S[0]-=len;
return false;
}


bool Replace(SString S,SString T,SString V)
{ // 初始條件: 串S,T和V存在,T是非空串（此函式與串的儲存結構無關）
// 操作結果: 用V替換主串S中出現的所有與T相等的不重疊的子串
int i=1; // 從串S的第一個字元起查詢串T
if(StrEmpty(T)) // T是空串
return false;
do
{
i=Index(S,T,i); // 結果i為從上一個i之後找到的子串T的位置
if(i) // 串S中存在串T
{
StrDelete(S,i,StrLength(T)); // 刪除該串T
StrInsert(S,i,V); // 在原串T的位置插入串V
i+=StrLength(V); // 在插入的串V後面繼續查詢串T
}
}while(i);
return true;
}


void DestroyString()
{ // 由於SString是定長型別,無法銷燬
}


void StrPrint(SString T)
{ // 輸出字串T。另加
int i;
for(i=1;i<=T[0];i++)
printf("%c",T[i]);
printf("\n");
}