head	1.3;
access;
symbols
	SFIO_1999:1.1.1.3
	SFIO_1998:1.1.1.2
	SFIO_1997:1.1.1.1
	ATT:1.1.1;
locks; strict;
comment	@ * @;


1.3
date	99.09.11.13.20.43;	author rse;	state Exp;
branches;
next	1.2;

1.2
date	99.09.11.12.42.11;	author rse;	state Exp;
branches;
next	1.1;

1.1
date	96.12.14.00.47.03;	author rse;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	96.12.14.00.47.03;	author rse;	state Exp;
branches;
next	1.1.1.2;

1.1.1.2
date	97.06.02.18.06.48;	author rse;	state Exp;
branches;
next	1.1.1.3;

1.1.1.3
date	99.06.04.19.12.42;	author rse;	state Exp;
branches;
next	;


desc
@@


1.3
log
@Merge in Sfio 1999 changes
@
text
@#include	"sftest.h"

int main()
{
	Sfio_t*	f;
	Sfio_t*	g;
	char*	s;
	char	buf[1024];
	int	n, i;

	if(!(f = sfopen(NIL(Sfio_t*), Kpv[0], "w")) )
		terror("Can't open file to write\n");
	sfputr(f,"1111",'\n');
	sfputr(f,"2222",'\n');
	sfputr(f,"3333",'\n');
	sfputr(f,"4444",'\n');

	if(!(f = sfopen(f, Kpv[0], "r")) )
		terror("Can't open file to read1\n");
	if(!(g = sfnew(NIL(Sfio_t*),NIL(Void_t*),SF_UNBOUND,sffileno(f),SF_READ)) )
		terror("Can't open file to read2\n");

	sfset(f,SF_SHARE|SF_PUBLIC,1);
	sfset(g,SF_SHARE|SF_PUBLIC,1);

	if(!(s = sfgetr(f,'\n',1)) || strcmp(s,"1111") != 0)
		terror("Wrong data1\n");
	sfsync(f);
	if(!(s = sfgetr(g,'\n',1)) || strcmp(s,"2222") != 0)
		terror("Wrong data2\n");
	sfsync(g);
	if(!(s = sfgetr(f,'\n',1)) || strcmp(s,"3333") != 0)
		terror("Wrong data3\n");
	sfsync(f);
	if(!(s = sfgetr(g,'\n',1)) || strcmp(s,"4444") != 0)
		terror("Wrong data4\n");
	sfsync(g);

	sfclose(f);
	sfclose(g);
	if(!(f = sfopen(NIL(Sfio_t*), Kpv[0], "r+")) )
		terror("Can't open file to write2\n");
	if(!(g = sfnew(NIL(Sfio_t*),NIL(char*),-1,sffileno(f),SF_READ)) )
		terror("Can't open file to read3\n");

	sfset(f,SF_SHARE|SF_PUBLIC,1);
	sfset(g,SF_SHARE|SF_PUBLIC,1);

	if(sfputr(f,"1111",'\n') <= 0)
		terror("bad write1\n");
	sfsync(f);
	if(!(s = sfgetr(g,'\n',1)) || strcmp(s,"2222") != 0)
		terror("Wrong data5\n");
	sfsync(g);
	if(sfputr(f,"3333",'\n') <= 0)
		terror("bad write2\n");
	sfsync(f);
	if(!(s = sfgetr(g,'\n',1)) || strcmp(s,"4444") != 0)
		terror("Wrong data6\n");
	sfsync(g);

	if(!(f = sfopen(f, Kpv[0], "w")) )
		terror("Can't open file to write3\n");

	for(i = 0; i < sizeof(buf); ++i)
		buf[i] = 0;
	for(i = 0; i < 256; ++i)
		if(sfwrite(f,buf,sizeof(buf)) != sizeof(buf))
			terror("Writing buffer0\n");

	for(i = 0; i < sizeof(buf); ++i)
		buf[i] = 1;
	for(i = 0; i < 256; ++i)
		if(sfwrite(f,buf,sizeof(buf)) != sizeof(buf))
			terror("Writing buffer1\n");

	if(!(f = sfopen(f, Kpv[0], "r")) )
		terror("Can't open file to read3\n");
	sfset(f,SF_SHARE|SF_PUBLIC,1);

	for(n = 0; n < 256; ++n)
	{	if(!(s = sfreserve(f,sizeof(buf),0)) )
			terror("Can't reserve buffer1\n");
		for(i = 0; i < sizeof(buf); ++i)
			if(s[i] != 0)
				terror("Bad data1\n");
	}

	for(n = 0; n < 256; ++n)
	{	if(!(s = sfreserve(f,sizeof(buf),0)) )
			terror("Can't reserve buffer2\n");
		for(i = 0; i < sizeof(buf); ++i)
			if(s[i] != 1)
				terror("Bad data2\n");
	}

	if((s = sfreserve(f,1,0)) )
		terror("Reading beyond eof\n");

	if(!(f = sfopen(f, Kpv[0], "w")) )
		terror("Can't open to write\n");
	if(sfwrite(f,"aaa\nbbb\nccc\n",12) != 12)
		terror("Can't write\n");
	sfclose(f);
	if(sfopen(sfstdin,Kpv[0],"r") != sfstdin)
		terror("Can't open file as sfstdin\n");
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),(Sfoff_t)SF_UNBOUND,'\n')) != 3)
		terror("sfmove wrong number of lines %d\n",n);
	if(sfseek(sfstdin,(Sfoff_t)0,0) != 0)
		terror("Can't seek back to 0\n");
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),(Sfoff_t)2,'\n')) != 2)
		terror("sfmove2 wrong number of lines %d\n",n);
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),(Sfoff_t)SF_UNBOUND,'\n')) != 1)
		terror("sfmove3 wrong number of lines %d\n",n);

	rmkpv();
	return 0;
}
@


1.2
log
@Incorporate stuff from RSE's Sfio98 variant
@
text
@d11 1
a11 1
	if(!(f = sfopen(NIL(Sfio_t*),"xxx","w")) )
d18 1
a18 1
	if(!(f = sfopen(f,"xxx","r")) )
d41 1
a41 1
	if(!(f = sfopen(NIL(Sfio_t*),"xxx","r+")) )
d62 1
a62 1
	if(!(f = sfopen(f,"xxx","w")) )
d77 1
a77 1
	if(!(f = sfopen(f,"xxx","r")) )
d100 2
a101 2
	if(!(f = sfopen(f,"xxx","w")) )
		terror("Can't open xxx to write\n");
d103 1
a103 1
		terror("Can't write to xxx\n");
d105 2
a106 2
	if(sfopen(sfstdin,"xxx","r") != sfstdin)
		terror("Can't open xxx as sfstdin\n");
d116 1
a116 1
	unlink("xxx");
@


1.1
log
@Initial revision
@
text
@d3 1
a3 1
main()
d107 1
a107 1
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),SF_UNBOUND,'\n')) != 3)
d113 1
a113 1
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),SF_UNBOUND,'\n')) != 1)
d116 1
a116 1
	system("rm xxx >/dev/null 2>&1");
@


1.1.1.1
log
@Import of Sfio1997
@
text
@@


1.1.1.2
log
@Import of Sfio1998
@
text
@d107 1
a107 1
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),(Sfoff_t)SF_UNBOUND,'\n')) != 3)
d113 1
a113 1
	if((n = (int)sfmove(sfstdin,NIL(Sfio_t*),(Sfoff_t)SF_UNBOUND,'\n')) != 1)
d116 1
a116 1
	unlink("xxx");
@


1.1.1.3
log
@Import of Sfio1999
@
text
@d11 1
a11 1
	if(!(f = sfopen(NIL(Sfio_t*), Kpv[0], "w")) )
d18 1
a18 1
	if(!(f = sfopen(f, Kpv[0], "r")) )
d41 1
a41 1
	if(!(f = sfopen(NIL(Sfio_t*), Kpv[0], "r+")) )
d62 1
a62 1
	if(!(f = sfopen(f, Kpv[0], "w")) )
d77 1
a77 1
	if(!(f = sfopen(f, Kpv[0], "r")) )
d100 2
a101 2
	if(!(f = sfopen(f, Kpv[0], "w")) )
		terror("Can't open to write\n");
d103 1
a103 1
		terror("Can't write\n");
d105 2
a106 2
	if(sfopen(sfstdin,Kpv[0],"r") != sfstdin)
		terror("Can't open file as sfstdin\n");
d116 1
a116 1
	rmkpv();
@