#pragma once
#include"trans.h"


#define LEN 50


struct user_pwC *na0, *pw0;
//struct userna_pw *na1, *pw1;

void loginAD();
void ADMIN();
void COMMON();
void PRINTF1_1();
void PRINTF2_1();
void PRINTF3_1();
void IMPORT();
void VIEW();
void LOANDMA();
void WORD_CO(struct w_word *inpu);
void FWORD_CO();
void QUE(struct w_word *input);
void FQUE();

void REGISTCOM() {                                                  //用户注册
	system("cls");
	struct userna_pw *regi1=(struct userna_pw*)malloc(sizeof(struct userna_pw));
	FILE *fp;
	fp = fopen("username_pwCOM.txt", "a+");  //******************* //将用户名用结构数组存入文件
	printf("\t*************************\n");
	printf("\t*  请输入你的用户名     *\n");
	gets_s(regi1->name1);	                 
	while (1) {
		printf("\t*  请输入你的密码       *\n");
		gets_s(regi1->passd1);                                   //将密码用相同结构数组存入文件
		printf("\t*  请再一次输入的的密码: *\n");
		gets_s(regi1->passd2);

		if (strcmp(regi1->passd1, regi1->passd2)) {
			printf("\t*您的二次密码不符合*\n");
			printf("\t*  请重新输入      *\n");
		}
		else {
			fwrite(regi1,sizeof(struct userna_pw),1 ,fp);
			printf("*注册成功*\n");
			system("pause");
			fclose(fp);
			break;
		}
	}                //与第一次密码进行比对
	return ;
}             
void loginCOM()                                          //用户登入
{
	system("cls");
	struct userna_pw *log1 = (struct userna_pw*)malloc(sizeof(struct userna_pw));
	struct userna_pw *t=(struct userna_pw*)malloc(sizeof(struct userna_pw));
	//memset(log1->name1, 0, 101 * sizeof(char));
	//memset(log1->passd1, 0, 101 * sizeof(char));
	//memset(log1->passd2, 0, 101 * sizeof(char));
	printf("\t**********************\n");
	printf("\t*    请输入用户名：  *\n");
	gets_s(log1->name1);
	printf("\t*    请输入密码      *\n");
	gets_s(log1->passd2);                                          //文件录入密码 文件结构比对 
	//strcat(log1->passd2, "\n");
	//strcat(log1->name1, "\n");
	FILE *fp1;
	fp1 = fopen("username_pwCOM.txt", "r");
	if (fp1 == NULL) {
		printf("无打开文件夹\n");
		return;
	}
	int ok = 0;
	while (!feof(fp1)) {
		//fread(t.name1, sizeof(struct userna_pw), 1, fp1);
		//fread(t.passd1, sizeof(struct userna_pw), 1, fp1);
		while (fread(t, sizeof(struct userna_pw), 1, fp1) != NULL) {
			//fgets(t.passd1, sizeof(t.passd1), fp1);
			if (!strcmp(t->name1, log1->name1) && !strcmp(t->passd1, log1->passd2)) {
				ok = 1;
			}
		}
	}
	if (ok == 1) {
		printf("登入成功");
		printf("\t*     回车进入下一步        *\n");
		system("pause");
		COMMON();
	}
	else {
	printf("登入失败");
	system("pause");
	fclose(fp1);
}
	return;
}

void REGISTAD() {                                                  //管理员注册
	system("cls");
	
	memset(regi.name1, 0, 101 * sizeof(char));
	memset(regi.passd1, 0, 101 * sizeof(char));
	memset(regi.passd2, 0, 101 * sizeof(char));
	FILE *fp;
		fp = fopen("username_pwAD.txt", "a+");  //*******************
	printf("\t*************************\n");
	printf("\t*  请输入你的用户名     *\n");
	gets_s(regi.name1);
	//na1 = &uni1;
	//pw1 = na1;
	while (1) {
		printf("\t*  请输入你的密码       *\n");
		gets_s(regi.passd1);                                   //将密码用相同结构数组存入文件
		printf("\t*  请再一次输入的的密码: *\n");
		gets_s(regi.passd2);


		if (strcmp(regi.passd1, regi.passd2)) {
			printf("\t*您的二次密码不符合*\n");
			printf("\t*  请重新输入      *\n");
		}
		else {

			//strcpy(regin->name, regi.name1);
			//strcpy(regin->pw, regi.passd1);

			fputs(regi.name1, fp);
			fputs("\n", fp);
			fputs(regi.passd1, fp);
			fputs("\n", fp);
			printf("*注册成功*\n");
			system("pause");
			fclose(fp);
			loginAD();
			break;
		}
	}                //与第一次密码进行比对
	return;
}
void loginAD()                                          //管理员登入
{
	system("cls");
	struct userna_pw log,t1;
	memset(log.name1, 0, 101 * sizeof(char));
	memset(log.passd1, 0, 101 * sizeof(char));
	memset(log.passd2, 0, 101 * sizeof(char));
	printf("\t**********************\n");
	printf("\t*    请输入用户名：  *\n");
	printf("\t**********************\n");
	gets_s(log.name1);                      //文件查找用户
	printf("\t*    请输入密码      *\n");
	gets_s(log.passd2);                                          //文件录入密码 文件结构比对 
	strcat(log.passd2, "\n");
	strcat(log.name1, "\n");
	FILE *fp1;
	fp1 = fopen("username_pwAD.txt", "r");
	 if (fp1 == NULL) {
		 printf("无打开文件夹\n");
		 return ;
	}
	 int ok=0;
	 while (!feof(fp1)) {
		 fgets(t1.name1, sizeof(t1.name1), fp1);
		 fgets(t1.passd1, sizeof(t1.passd1), fp1);
		 if (!strcmp(t1.name1, log.name1) && !strcmp(t1.passd1, log.passd2)) {
			  ok = 1;
		 }
	
	 }
	 if (ok == 1) {
		 printf("登入成功\n\n\n");
		 printf("\t*     回车进入下一步        *\n");
		 system("pause");
			 ADMIN();

	 }
	 else {
		 printf("登入失败");
		 printf("\t*     回车进入下一步        *\n");
		 system("pause");
		 fclose(fp1);
	 }
		 return;
	 
}


char PRINTF1() {
	char key = 'a';
	while(1){
		do
		{
			system("cls");
			printf("\t*****************************\n");
			printf("\t*   1.游客进入              *\n");
			printf("\t*                           *\n");
			printf("\t*   2.普通用户登入和注册    *\n");
			printf("\t*                           *\n");
			printf("\t*   3.管理员登入和注册      *\n");
			printf("\t*                 4.退出    *\n");
			printf("\t*****************************\n");
			printf("请输入您要进行的处理的数字：\n");
			key = getch();
		} while (key != '1' && key != '2' &&key != '3'&&key !='4');
		switch (key)
		{
		case '1':
			PRINTF1_1(); break;
		case '2':
			PRINTF2_1(); break;
		case '3':
			PRINTF3_1(); break;
		case '4':
			exit(0);
		default:
			printf("错误");
			break;
		}
	}
}
//查询单词
void PRINTF1_1()
{
	
	int x = 0;
	FILE *fp;
	fp = fopen("wordd.txt", "r");
	char tempor[100];
	struct w_word *check = (struct w_word *)malloc(sizeof(struct w_word));
	struct w_word *chec = (struct w_word *)malloc(sizeof(struct w_word));
	memset(tempor, 0, 100 * sizeof(char));
	system("cls");
	printf("\t*****************************************\n");
	printf("\t*      1.请输入您要查询的单词           *\n");
	printf("\t*****************************************\n");
	int i = 0;
	scanf("%s", tempor);
	while (fread(chec, sizeof(struct w_word), 1, fp) != NULL) {
		if (strstr(chec->word_, tempor) !=NULL) {
			printf("\n");
			printf("%s", chec->word_);
			printf("\n");
		}
	}
	rewind(fp);
		while (fread(check, sizeof(struct w_word),1, fp) != NULL) {
			if (strstr(check->word_, tempor) == (char *)(check->word_)) {
				printf("\n");
				printf("%s: ",check->word_);
				//fread(strstr(((struct w_word *)check)->trans_, tempor), sizeof(struct w_word), 20, fp);
				puts(check->trans_);
				//printf("\n");
				printf("例句.\t");
				//fwrite(((struct w_word *)check)->setence, sizeof(struct w_word),20, fp);
				puts(check->setence);
				printf("\n");
				x = 1;
				break;
			}
		}
		system("pause");
	
	if(x==0) {
		printf("\t*    找不到此单词翻译     *\n");
		system("pause");

		return ;
	}
	else {

		QUE(check);
		char key;
		do {
			printf("\t*****************************************\n");
			printf("\t*      是否要将此单词记录到单词记录本   *\n");
			printf("\t*              1.是                     *\n");
			printf("\t*              2.否                     *\n");
			printf("\t*****************************************\n");
			key = getch();
		} while (key == '1'&&key == '2');
		if (key == '1') {
			WORD_CO(check);          //存单词收藏本
			printf("\t*          已存入         *\n");
			system("pause");
		}
	}	fclose(fp);
		return ;
}


//登录和注册界面
void PRINTF2_1() {
	
	char key2_1=0;
	do
	{
		system("cls");
		printf("\t***********************************\n");
		printf("\t*          普通用户               *\n");
		printf("\t*           1.登入                *\n");
		printf("\t*           2.注册                *\n");
		printf("\t*                           3.退出*\n");
		printf("\t***********************************\n");
		key2_1 = getch();
	} while (key2_1 != '1' && key2_1 != '2'&& key2_1 != '3');
	if (key2_1 == '1') {
		loginCOM();
		return;
	}
	else if (key2_1 == '2') {
		REGISTCOM();
		printf("*          请按回车健登入         *\n");
		system("pause");
		loginCOM();
		return;
	}
	else
		return;
		

}
void PRINTF3_1() {
	
	char key3_1=0;
	do
	{
		system("cls");
		printf("\t*****************************\n");
		printf("\t*           管理员          *\n");
		printf("\t*          1.登入           *\n");
		printf("\t*          2.注册           *\n");
		printf("\t*                     3.退出*\n");
		printf("\t*****************************\n");
		key3_1 = getch();
	} while (key3_1 != '1'&&key3_1 != '2'&&key3_1 != '3');
	if (key3_1 == '1') {
		loginAD();
		return;
	}
	else if (key3_1 == '2') {
		REGISTAD();
		printf("\t *       登入       *\n");
		system("pause");
		loginAD();
		return;
	}
	else
		return;
}

//管理员功能
void ADMIN() {
	char keyA=0;
	while (1) {
		
		do
		{
			system("cls");
			printf("\t*****************************************\n");
			printf("\t*          1.查询单词                   *\n");
			printf("\t*          2.导入单词                   *\n");
			printf("\t*          3.查看单词信息               *\n");
			printf("\t*          4.查看和管理用户             *\n");
			printf("\t*                             5.退出    *\n");
			printf("\t*****************************************\n");
			keyA = getch();
		} while (keyA != '1'&&keyA != '2'&&keyA != '3'&&keyA != '4'&&keyA != '5');
		switch (keyA)
		{
		case '1':
			PRINTF1_1();
			break;
		case '2':
			IMPORT();
			break;
		case '3':
			VIEW();
			break;
		case '4':
			LOANDMA();
			break;
		case '5':
			return;
		default:
			printf("\t\t错误");
			break;
		}
	}
}
//普通用户功能
void COMMON() {
	char keyC=0;
	while(1){
		do
		{
			system("cls");
			printf("\t*****************************\n");
			printf("\t*     1.查询单词            *\n");
			printf("\t*     2.单词收藏本          *\n");
			printf("\t*     3.查询记录            *\n");
			printf("\t*                   4.退出  *\n");
			printf("\t*****************************\n");
			keyC = getch();
		} while (keyC != '1'&&keyC != '2'&&keyC != '3'&&keyC != '4');
		switch (keyC)
		{
		case '1':
			PRINTF1_1();
		
		break;
		case '2':
			FILE *fp0;
			fp0 = fopen("wordd_coll.txt", "a");
			char bbb[5];
			if (fgets(bbb,1,fp0) == NULL) {
				printf("\t*      您没有存入单词  收藏本为空      *\n");
				system("pause");
			}
			else {
				fclose(fp0);
				FWORD_CO();
			}
			break;
		case '3':
			FILE *fp_;
			fp_ = fopen("query log.txt", "a");
				char ccc[5];
			if ((fgets(ccc, 1, fp_) == NULL)){

				printf("\t*      您没有查询单词  记录为空      *\n");
				system("pause");
			}
			else {
				fclose(fp_);
				FQUE();
			}
			
			break;
		case '4':
			return;
		default:
			printf("\t\t错误");
			break;
		}
	}
}

//导入单词
void IMPORT() {                    //导入单词
	system("cls");

	FILE *fp2;
	fp2 = fopen("wordd.txt", "a+");
	int n,x=0;
	printf("\t*****************************************\n");
	printf("\t*      需要导入多少个单词               *\n");
	printf("\t*****************************************\n");
	scanf("%d",&n);
	tr = (struct w_word*)malloc( n * sizeof(struct w_word));
	wd = (struct w_word*)malloc(n * sizeof(struct w_word));
	for (int i = 0; i < n; i++) {
		printf("********      %d    *********\n",i+1);
		printf("\n");
		printf("\t*         请输入单词              *\n");
		scanf("%s",&(tr + i)->word_);
		printf("\t*         请输入前面单词的翻译    *\n");
		scanf("%s", &(tr + i)->trans_);
		getchar();
		printf("\n");
		printf("\t*         请输入前面单词的例句    *\n");
		gets_s((tr+ i)->setence);
		rewind(fp2);
		while (feof(fp2) != EOF) {
			while (fread(wd, sizeof(struct w_word), 1, fp2) != NULL) {
				if ((tr + i)->word_ == wd->word_) {
					printf("\t*     此单词已经被输入  请不要重复输入     \t");
					system("pause");
					x = 1;
				}
			}
			break;
		}
		if (x == 0)
			fseek(fp2, 0L, SEEK_END);
			fwrite((tr+i),sizeof(struct w_word),1,fp2);
		printf("\n");
	}
	
	fclose(fp2);
	return;
}                           
//查看所有单词表
void VIEW() {              //查看所有单词信息
	struct w_word *exi=(struct w_word *)malloc(sizeof(struct w_word));
	FILE *fp4;
	fp4 = fopen("wordd.txt", "r");
	if (fp4 == NULL) {
		printf("\t**      文件未录入单词     **\n ");
		return;
	}
	else {
		while (feof(fp4) != EOF) {
			while (fread(exi, sizeof(struct w_word), 1, fp4) !=NULL){
				printf("%s：  ", exi->word_);
				puts(exi->trans_);
				puts("\n");
			}
			break;
		}
	}
	fclose(fp4);
	system("pause");
	return;
}
//查看和管理用户
void LOANDMA() {
	int x = 0,at=0;
	struct userna_pw *usp=(struct userna_pw*)malloc(sizeof(struct userna_pw));
	char number[100];
	//char n[20];
	FILE *fp5;
	fp5 = fopen("username_pwCOM.txt", "r");
	if (fp5== NULL) {
		printf("\t**      无用户     **\n ");
		while (getchar() != '\n')
			continue;
		return;
	}
	else {
		while (!feof(fp5)) {
			if(fread(usp,sizeof(struct userna_pw),1,fp5) != NULL) {
				printf("****用户名：");
				puts(usp->name1);
				printf("****密码：");
				puts(usp->passd1);
				at = 1;
			}
		}
		
	}
	fclose(fp5);
	//system("pause");
	if (at == 1) {
		printf("\t*     是否选择删除用户       *\n");
		printf("\t*   1.是           2.否      *\n");
		char keyy = getch();
		if (keyy == '1') {
			FILE *fpp;
			fpp = fopen("username_pwCOM.txt", "r");
			rewind(fpp);
			//struct userna_pw asd;
			struct userna_pw  us[105];
			int i = 0, m1 = (-1), qu = 0;
			while (1) {
				printf("\t*      请输入用户的用户名      *\n");
				scanf("%s", number);
				if (number[0] == '\0') {
					printf("    错误！！    请重新输入       ");
					continue;
				}
				else
					break;
			}
			while (!feof(fpp)) {
				if (fread(&us[i], sizeof(struct userna_pw), 1, fpp) != NULL) {
					i++;
				}
			}
			fclose(fpp);
			if (i == 0) {
				printf("*    无用户    *");
				system("pause");
				return;
			}
			for (int m = 0; m < i; m++) {
				if (strcmp(us[m].name1, number) == 0) {
					m1 = m;
					break;
				}
			}
			if (m1 == -1) {
				printf("*    用户不存在    *");
				qu = 1;

			}
			else {
				for (int s = m1; s < i; s++) {
					us[s] = us[s + 1];
				}
				i--;
				if ((fpp = fopen("username_pwCOM.txt", "w")) == NULL) {
					return;
				}
				for (int k = 0; k < i; k++) {
					if (fwrite(&us[k], sizeof(struct userna_pw), 1, fpp) != 1) {
						printf("*      删除失败      *");
						system("pause");
						x = 1;
					}
				}
				//printf("*      删除成功      *");
			}
			if (x == 0) {
				printf("\t*      删除成功        *\n");
				printf("\t*       回车进入下一步  *\n");
				system("pause");
			}

			return;
		}
	}
	else {
		printf("\t************-无用户-**************\n");
		system("pause");
	}
	return;
}
//存单词记录本
void WORD_CO(struct w_word *inpu) {
	FILE *fp6;
	fp6 = fopen("word_coll.txt", "a");
	fwrite(inpu,sizeof(struct w_word),1, fp6);
	fclose(fp6);
	return;

}
//显示单词记录本
void FWORD_CO() {
	system("cls");
	printf("\t*****************************************\n");
	printf("\t*       单词记录本                      *\n");
	printf("\t*****************************************\n");
	struct w_word *fword=(struct w_word *)malloc(sizeof(struct w_word));
	char input[50];
	FILE *fp7;
	fp7 = fopen("word_coll.txt", "r");
	if (fp7 == NULL) {
		printf("\t*        单纯记录本无单词      *\n");
		system("pause");
		return;
	}
	while (!feof(fp7)) {
		if(fread(fword, sizeof(struct w_word), 1, fp7) != NULL && input[0] != '\0') {
			printf("\t");
			puts(fword->word_);
			printf("\t");
			puts(fword->trans_);
		}
	}
	printf("\t**************回车键返回*****************\n");
	system("pause");
	return;
}
//存查询记录
void QUE(struct w_word *input) {
	FILE *fps;
	fps = fopen("query log.txt", "a");
	fwrite(input,sizeof(struct w_word),1,fps);
	fclose(fps);
	return;
}
//显示查询记录
void FQUE() {
	int n=1;
	system("cls");
	printf("\t*****************************************\n");
	printf("\t*              查询记录               *\n");
	printf("\t*****************************************\n");
	struct w_word *fque = (struct w_word *)malloc(sizeof(struct w_word));
	FILE *fp7;
	fp7 = fopen("query log.txt", "r");
	while (!feof(fp7)) {
		if(fread(fque, sizeof(struct w_word), 1,fp7) != NULL) {
			printf("********%d********\n", n);
			n++;
			printf("\t");
			puts(fque->word_);
			printf("\t");
			puts(fque->trans_);
		}
	}
	printf("\t**************回车键返回*****************\n");
	system("pause");
	return;
}
//排序并显示单词表
void SORT() {
	char *ptsw[10000], *ptst[10000];
	int a=5;
	//a = sizeof(wd) / sizeof(struct w_word);

	for (int i = 0; i < a; ++i) {
	//	ptsw[i] = (wd -i)->word_;
		ptst[i] = (tr - i)->trans_;
	}
	char*temp,*temp1;
	int top, seek;
	for (top = 0; top < a - 1; top++) {
		for (seek = top + 1; seek < a; seek++) {
			if (strcmp(ptsw[top], ptsw[seek]) > 0) {
				temp = ptsw[top];
				ptsw[top] = ptsw[seek];
				ptsw[seek] = temp;

				temp1 = ptst[top];
				ptst[top] = ptst[seek];
				ptst[seek] = temp1;
			}
		}
	}
	for (int k = 0; k < a; k++) {
		puts(ptsw[k]);
		printf("\t");
		puts(ptsw[k]);
		printf("\n");
	}
	return;
}


int main() {
 PRINTF1();             //主界面
		return 0;
}