/* io.c */
/* Last Change: 2019/06/02 (Sun) 23:53:02. */

#include<stdio.h>
#include"io.h"

short int W=MAXW, H=MAXH; // (問題で設定された) 盤面サイズ上限

short int w=0, h=0; // 使用する盤面サイズ

short int blocks=0; // ブロックの数

short int block_data[MAXBLOCK+1][5][3]; // ブロックの情報

short int board_data[MAXW][MAXH]; // 盤面情報

short int line_num=0;

void reset_parameters(void){
	int i,j,k;
	for(i=0;i<MAXBLOCK;i++)
		for(j=0;j<5;j++)
			for(k=0;k<3;k++)
				block_data[i][j][k]=-1;
	for(i=0;i<MAXW;i++)
		for(j=0;j<MAXH;j++)
			board_data[i][j]=0;
	return;
}

void read_problem(void){
	reset_parameters();
	int x,y; //size of block
	int i,j,k;
	int nowx=0,nowblock=1,num=0; //used for block reading
	char c,str[32]; // must be 20 or more
	scanf(" %s",str); //SIZE
	scanf(" %hd",&W);
	if(W>MAXW||W<=0)
		printf("Error: width\n");
	scanf(" %c",&c); //X
	scanf(" %hd",&H);
	if(H>MAXH||H<=0)
		printf("Error: height\n");
	scanf(" %s",str); //BLOCK_NUM
	scanf(" %hd",&blocks);
	if(blocks<0)
		printf("Error: blocks\n");
	for(i=1;i<=blocks;i++){
		scanf(" %s",str); //BLOCK#X
		scanf(" %d",&x);
		if(x>4||x<0)
			printf("Error: x\n");
		scanf(" %c",&c); //X
		scanf(" %d",&y);
		if(y>4||y<0)
			printf("Error: y\n");
		nowblock=1;
		gets(str);
		for(j=0;j<y;j++){ //=nowy
			nowx=num=0;
			gets(str);
			for(k=0;;k++){
				if(str[k]=='0' && num==0)
					num=-1;
				else if('0'<=str[k]&&str[k]<='9')
					num=num*10+str[k]-'0';
					if(num>line_num) line_num=num;
				else if(str[k]==','){
					if(num<0){
						num=0;
						nowx++;
						continue;
					}
					block_data[i][nowblock][0]=nowx;
					block_data[i][nowblock][1]=j;
					block_data[i][nowblock][2]=num;
					nowx++;
					num=0;
					nowblock++;
				}else if(str[k]=='\0'){
					if(num<0){
						num=0;
						break;
					}
					block_data[i][nowblock][0]=nowx;
					block_data[i][nowblock][1]=j;
					block_data[i][nowblock][2]=num;
					num=0;
					nowblock++;
					break;
				}
			}
			if(nowx!=x-1)
				printf("Error: block\n");
		}
	}
	return;
}

void print_answer(void){
	printf("\n --ANSWER-- \n"); //comment out this row
	int i,j;
	printf("SIZE %dX%d\n",w,h);
	for(i=0;i<h;i++){
		for(j=0;j<w;j++){
			printf("%3d",board_data[j][i]);
			if(j==w-1)
				printf("\n");
			else
				printf(",");
		}
	}
	for(i=1;i<=blocks;i++){
		printf("BLOCK#%d @(%d,%d)\n",i,block_data[i][0][0],block_data[i][0][1]);
	}
	return;
}