//--------------------------------------
//	file-cutter-win
//	windows-aplication...compile is...
//	>bcc32 -W file-cutter-win
//	etc.
//	2000/10/07(土)
//	2000 Copyright charlie, 
//	All rights reserved
//	http://www.geocities.co.jp/SiliconValley-Bay/6716/
// 	happypoint@geocities.co.jp
//
//	initial-file=cutter.txt
//
//infile
//cut-length
//outfile(0000.cut)



#include <windows.h>
#include <iostream.h>
#include <fstream.h>
#include <stdio.h>
#include <string.h>
#include <cstdlib>



char ThisName[]="file-cutter 2000";
char szWinName[] = "MyWin";
char str[255]="";

const int maxnamelen=257;
FILE *infile, *outfile;
char infname[maxnamelen];
char outfname0[maxnamelen];
char outfname[maxnamelen];
char dummy[maxnamelen];

const char initialfile[]= "cutter.txt";
const char kakutyoushi[]="cut";
long maxcount=10000;
int charH=23;
int Yzahyou=0;

//....................................

void header()

{
	cout<<"program sourse:"<< __FILE__<<endl;

	cout << "compile date:"<<__DATE__
	<<","<<__TIME__<<"\n"<<endl;

//	if ( __STDC__ ==0 ) cout << "no-";

//	cout << "ANSI\n"<<endl;



}


/****** file open ****************/

void getinfname()
{
	printf("input file:");
	scanf("%s",infname);
}

void getoutfname()
{
	static i=0;
	i++;
	sprintf(outfname,"%s%04d.%s",outfname0,i,kakutyoushi);
	

}


void getfname()
{
	getinfname();
	getoutfname();
}


/*.................................
*/

void initial()
{
	char ch;
	ifstream in(initialfile);
	in.get( dummy , maxnamelen, '\n' );
	sscanf(dummy,"%s",infname);
	in.get( ch );
	in.get( dummy , maxnamelen, '\n' );
	sscanf(dummy,"%d",&maxcount);
	in.get( ch );
	in.get( dummy , maxnamelen, '\n' );
	sscanf(dummy,"%s",outfname0);

}

/*.................................
*/

void sub(	HDC hdc,ifstream &from )
{
	long count;
	char ch;


	while (1)
		{
		getoutfname();
		TextOut(hdc,0,Yzahyou*charH,outfname,strlen(outfname));
		Yzahyou++;
		ofstream to(outfname,ios::binary);
		if(!to)
			{

				return;
			}
		count=0;
		while ( count++ < maxcount)
			{ 
				if(from.get(ch))
					to.put(ch);
				else
					{
		char str[]="ok.\n";
		TextOut(hdc,0,Yzahyou*charH,str,strlen(str));
		Yzahyou++;

					return;
					}
			}
		to.close();
		}

}

/*...................................
*/

void maincut( HWND hwnd) 
{
	HDC hdc;
	hdc=GetDC(hwnd);

	header();
	initial();
	TextOut(hdc,0,Yzahyou*charH,infname,strlen(infname));
	Yzahyou++;
	Yzahyou++;


	ifstream from(infname,ios::binary);
	if ( from )
		sub( hdc,from );
	else 
	{
		char str[]="can't open.";
		TextOut(hdc,0,Yzahyou*charH,str,strlen(str));
	}
}

/*...................................
*/
void	OnPaint(HDC	hdc)	//再描画、まだ手抜き
{
	if(Yzahyou==0)return;

	Yzahyou=0;
	strcpy(str,"input:");
	TextOut(hdc,0,Yzahyou*charH,str,strlen(str));
	Yzahyou++;
	TextOut(hdc,0,Yzahyou*charH,infname,strlen(infname));
	Yzahyou++;
	Yzahyou++;
	strcpy(str,"output:");
	TextOut(hdc,0,Yzahyou*charH,str,strlen(str));
	Yzahyou++;
	TextOut(hdc,0,Yzahyou*charH,outfname,strlen(outfname));
	Yzahyou++;
}

/*-------------------------------------------
*	ハーバートシルト
*	c++ windows 95 programming 2000.4.13 
*	charlie2000/10/07(土),wm_char
*/


LRESULT CALLBACK WindowFunc(HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
	HDC hdc;
	static unsigned j=0;
	PAINTSTRUCT	paintstruct;

	switch(message)
		{

			case WM_PAINT :
				hdc=BeginPaint(hwnd,&paintstruct);
				OnPaint(hdc);
				EndPaint(hwnd,&paintstruct);
				break;

			case WM_DESTROY :
				PostQuitMessage(0);
				break;
	
			default :
				return DefWindowProc(hwnd, message, wParam, lParam);
		}
	return 0;
}



/*..............................................*/

int WINAPI WinMain(HINSTANCE hThisInst, HINSTANCE hPrevInst, LPSTR lpszArgs, int nWinMode)
{
	HWND hwnd;
	MSG msg;
	WNDCLASSEX wcl;

	wcl.hInstance = hThisInst;
	wcl.lpszClassName = szWinName;
	wcl.lpfnWndProc = WindowFunc;
	wcl.style = 0;

	wcl.cbSize = sizeof(WNDCLASSEX);
	wcl.hIcon = LoadIcon(NULL, IDI_APPLICATION);
	wcl.hIconSm = LoadIcon(NULL, IDI_WINLOGO);
	wcl.hCursor = LoadCursor(NULL, IDC_ARROW);
	wcl.lpszMenuName = NULL;
	wcl.cbClsExtra = 0;
	wcl.cbWndExtra = 0;
	wcl.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);

	if (!RegisterClassEx(&wcl)) return 0;

	hwnd = CreateWindow(
		szWinName,
		ThisName,
		WS_OVERLAPPEDWINDOW,
		CW_USEDEFAULT,
		CW_USEDEFAULT,
		CW_USEDEFAULT,
		CW_USEDEFAULT,
		HWND_DESKTOP,
		NULL,
		hThisInst,
		NULL
	);

	ShowWindow(hwnd, nWinMode);
	UpdateWindow(hwnd);
	maincut(hwnd);

	while (GetMessage(&msg, NULL, 0, 0) )
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}

	return msg.wParam;
}