#include <stdio.h>
#include <stdlib.h>
#include <string.h>

/***************************************************
  分割するファイルの拡張子は三文字のみ
  .jpeg .htmlじゃなくて.jpg .htmってな感じ
  って内装されてないけどw
***************************************************/

void main(void)
{
	FILE *fin,*fout,*info;
	char filename1[20],filename2[20];
	int c;
	int size;
	int start=0;
	char kakutyousi[]=".jpg";
	int switch_flug;
	int a=0;
	int i=0;
	char cfs[4];
	int ifs;
	char fn[50];
	int iinfo;
	char config[20];
	char *p;


	
	printf("1：分割　2：結合　");
	scanf("%d",&switch_flug);
	

	switch(switch_flug){
	case 1:  //分割
		(void *)getchar();
		printf("入力ファイル : ");
		scanf("%s",filename1);
		if((fin=fopen(filename1,"rb")) == NULL){
			printf("ファイルがありません\n");
			exit(123);
		}
//info.iniから情報取得
		if((info=fopen("config.ini","rb")) == NULL){
			printf("info.ini(分割設定ファイル)がありません。\n");
			printf("同じディレクトリにinfo.iniファイルがあるかどうか調べて下さい\n");
			exit(12);
		}
		while((iinfo=fgetc(info)) != EOF){
			if(iinfo=='#'){
				if((iinfo=fgetc(info)) == 's'){  //#sizeだった時
					p=config;
					for(int i=0;i<5;i++){
						iinfo=fgetc(info);
					}
					while(iinfo != ';'){
						sprintf(p,"%c",iinfo);
						p++;
						iinfo=fgetc(info);
					}
					size=atoi(config);
					size=1024*size;
				}
			}
		}
		printf("size = %d \n",size);

		/*現在保留中
		fseek(info,SEEK_SET,0);
		while((iinfo=fgetc(info)) != EOF){
			if(iinfo=='#'){
				if((iinfo=fgetc(info)) == 'e'){  //#extensionだった時
					p=kakutyousi;
					for(int i=0;i<10;i++){
						iinfo=fgetc(info);
					}
					while(iinfo != ';'){
						sprintf(p,"%c",iinfo);
						p++;
						iinfo=fgetc(info);
					}
				}
			}
		}
		printf("kakutyousi = %s\n",kakutyousi);
		*/
//		
		while(1){
			if(filename1[a] == '.') break;
			a++;
		}
		printf("ファイル名文字数は %d \n",a);
		//exit(1234);

		sprintf(filename2,"%04d",start);
		strcat(filename2,kakutyousi);
		fout=fopen(filename2,"wb");
		for(i=0;i<size;i++){
			c=fgetc(fin);
			if(c==EOF) exit(123);
			fputc(c,fout);
		}
		start++;
		fprintf(fout,"%s",filename1);
		fprintf(fout,"%02d",a);  //ファイル名（拡張子含まない）文字数


		while(1){
			sprintf(filename2,"%04d",start);
			strcat(filename2,kakutyousi);
			fout=fopen(filename2,"wb");
			for(int i=0;i<size;i++){
				c=fgetc(fin);
				if(c==EOF) exit(123);
				fputc(c,fout);
			}
			start++;
		}
		break;

	case 2:  //結合
		(void *)getchar();

//一回目（0000.拡張子）
		sprintf(filename1,"%04d",start);
		strcat(filename1,kakutyousi);
		//printf("filename1==%s\n",filename1);
		if((fin=fopen(filename1,"rb")) == NULL){
			printf("ファイルがない\n");
			exit(123);
		}
	  
	  //ファイル名長を調べる
		fseek(fin,-2,SEEK_END);
		fgets(cfs,3,fin);
		ifs=atoi(cfs);

	  //ファイル名を調べる
	  //-(2+(ifs+4))....(結合ファイル文字数)+((結合ファイル)+(拡張子))
		fseek(fin,-(2+(ifs+4)),SEEK_END);

	  //1+(ifs+4)...1プラスしているのはgetsは第二引数-1文字しか取らないため
	  //ifs+4だけではファイル名は正確に取れないから。
		fgets(fn,1+(ifs+4),fin);

		strcpy(filename2,fn);
		fout=fopen(filename2,"wb+");
		fseek(fin,0,SEEK_SET);
		
	  //一回目はファイル0000.拡張子に結合後のファイル名が含まれているため
	  //それを取り除かないとダメだから、こんな処理になる
		
	  //0000.拡張子のファイルサイズを調べる
		while((c=fgetc(fin)) != EOF){
			a++;
		}
		fseek(fin,0,SEEK_SET);

	  //ファイル名長とファイル名を取り除くための処理
		a=a-(2+ifs+4);
		for(i=0;i<a;i++){
			c=fgetc(fin);
			fputc(c,fout);
		}
		start++;
		printf("%s\n",filename1);
		fclose(fout);


//二回目以降（0001.拡張子以降）
//二回目以降はただ単に上書きしていくだけ
		fout=fopen(filename2,"ab");
		while(1){
			sprintf(filename1,"%04d",start);
			strcat(filename1,kakutyousi);
			
			if((fin=fopen(filename1,"rb")) == NULL){
				printf("結合完了\n");
				exit(123);
			}
			while((c=fgetc(fin)) != EOF){
				fputc(c,fout);
			}
			start++;
			printf("%s\n",filename1);
		}

		printf("結合ファイル名 %s\n",fn);
		printf("ファイル名長 %d\n",ifs);
		printf("ファイルサイズ %d \n",a);
		break;

	default:
		break;
	}

}