#include <stdio.h>

#include "Matrix.h"

short WriteMatrix(matrix *m, FILE *file);
short StringToNum(char*,long*,char);


/* 3 arguemnts: first - file to store data
	second # of rows
	third # of columns */
main(int argc, char *argv[])
{	short	c;
	short	hi, low;
	short	nl, len;
	FILE	*file;
	long	size;
	matrix	m;
	long	Rows, Cols;
	short	row, col;

if(argc!=4) {printf("Opps!\n");return;}
/*Rows=argv[2];a*/
len=StringToNum(argv[2],&Rows,10);
if(len<=0) {printf("Second argument not a number.");return;}
len=StringToNum(argv[3],&Cols,10);
if(len<=0) {printf("Third argument not a number.");return;}
NewMatrix(&m,Rows,Cols);
for(row=0;row<Rows;row++) {
 for(col=0;col<Cols;col++) {
	m.st[row*m.cols+col]=1.01*(row+2*col);
	}}
file=fopen(argv[1],"w");
if(file==0) {printf("Failed to create file  %s.\n",argv[1]);return;}
len=WriteMatrix(&m,file);
fclose(file);
}

short WriteMatrix(matrix *m, FILE *file)
{	long	size;
size=fwrite((void*)&m->rows,sizeof(m->rows),1,file);
if(size!=1) return(-1);
size=fwrite((void*)&m->cols,sizeof(m->cols),1,file);
if(size!=1) return(-1);
size=fwrite((void*)m->st,sizeof(m->st[0]),m->rows*m->cols,file);
if(size!=m->rows*m->cols) return(-1);
return (1);
}

short ReadMatrix(matrix *m, FILE *file);
short ReadMatrix(matrix *m, FILE *file)
{	long	size;
size=fread((void*)&m->rows,sizeof(m->rows),1,file);
if(size!=1) return (-1);
size=fread((void*)&m->cols,sizeof(m->cols),1,file);
if(size!=1) return (-1);
NewMatrix(m,m->rows,m->cols);
size=fread((void*)m->st,sizeof(m->st[0]),m->rows*m->cols,file);
if(size!=m->rows*m->cols) return (-1);
return (1);
}