/* io.c */
/* Last Change: 2019/07/23 (Tue) 17:17:57. */

#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]; // 盤面情報

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,nonzero=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=nonzero=0;
			gets(str);
			for(k=0;;k++){
				if('1'<=str[k]&&str[k]<='9'){
					num=num*10+str[k]-'0';
					nonzero=1;
				}else if(str[k]=='+')
					num=0;
				else if(str[k]=='0')
					if(nonzero)
						num=num*10+str[k]-'0';
					else
						num=-1;
				else if(str[k]==','){
					if(num<0){
						num=0;
						nowx++;
						nonzero=0;
						continue;
					}
					block_data[i][nowblock][0]=nowx;
					block_data[i][nowblock][1]=j;
					block_data[i][nowblock][2]=num;
					nowx++;
					num=0;
					nowblock++;
					nonzero=0;
				}else if(str[k]=='\0'){
					if(num<0){
						num=0;
						nonzero=0;
						break;
					}
					block_data[i][nowblock][0]=nowx;
					block_data[i][nowblock][1]=j;
					block_data[i][nowblock][2]=num;
					num=0;
					nowblock++;
					nonzero=0;
					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;
}