sfstdio.c

su 的源代码库

	printf("#endif\n\n");
#endif

#ifdef NAME_overflow
	printf("#if _do_flsbuf\n"); /* not a bug! */
	printf("#pragma weak %s =	_%s\n",NAME_overflow,NAME_overflow);
	printf("#define %s	_%s\n",NAME_overflow,NAME_overflow);
	printf("#endif\n\n");
#endif

#ifdef NAME_srget
	printf("#if _do_filbuf\n"); /* not a bug! */
	printf("#pragma weak %s =	_%s\n",NAME_srget,NAME_srget);
	printf("#define %s	_%s\n",NAME_srget,NAME_srget);
	printf("#endif\n\n");
#endif

#ifdef NAME_swbuf
	printf("#if _do_flsbuf\n"); /* not a bug! */
	printf("#pragma weak %s =	_%s\n",NAME_swbuf,NAME_swbuf);
	printf("#define %s	_%s\n",NAME_swbuf,NAME_swbuf);
	printf("#endif\n\n");
#endif

#endif/*_pragma_weak*/

#ifdef _NFILE
#define N_FILE	_NFILE
#else
#ifdef FOPEN_MAX
#define N_FILE	FOPEN_MAX
#else
#define N_FILE	3
#endif
#endif
	printf("#define _NFILE	%d\n\n", N_FILE);

	printf("/* preventing FILE to be defined in silly places */\n");
	printf("#define\t_FILE_DEFINED\t1\t/* Windows */\n");
	printf("#define\t_FILEDEFED\t1\t/* SUNOS5.8 */\n\n");

	printf("#undef\tFILE\n");
	printf("typedef struct _std_s\tFILE;\n\n");

	printf("/* Linux7.2 requires __FILE in wchar.h - we fake it here */\n");
	printf("#include	\"FEATURE/sfio\"\n");
	printf("#if _typ___FILE\n");
	printf("typedef FILE	*__FILE;\n");
	printf("#endif\n\n");

	/* now get what we need from sfio */
	printf("#include\t\"sfhdr.h\"\n");
	printf("#include\t\"FEATURE/stdio\"\n\n");

#ifdef _siz_fpos_t
	if(_siz_fpos_t == sizeof(short))
		printf("#define stdfpos_t	short\n");
	else if(_siz_fpos_t == sizeof(int))
		printf("#define stdfpos_t	int\n");
#if _typ_long_long
	else if(_siz_fpos_t == sizeof(long long))
		printf("#define stdfpos_t	long long\n");
#endif
	else
#endif /*_siz_fpos_t*/
		printf("#define stdfpos_t	long\n");
	printf("\n");

#ifdef _siz_off_t
	if(_siz_off_t == sizeof(short))
		printf("#define stdoff_t	short\n");
	else if(_siz_off_t == sizeof(int))
		printf("#define stdoff_t	int\n");
#if _typ_long_long
	else if(_siz_off_t == sizeof(long long))
		printf("#define stdoff_t	long long\n");
#endif
	else
#endif /*_siz_off_t*/
		printf("#define stdoff_t	long\n");
	printf("\n");

	/* output FILE structure */
	printf("\nstruct _std_s\n{\n");
	gap = pos = 0;
	for(f = list; f; f = f->next)
	{	if((s = f->offset - pos) > 0) /* fill the gap */
			printf("\tuchar\tstd_gap%d[%d];\n",gap++,s);

		switch(f->type)
		{
		case STD_CNT :
			fldprint(f->size,"std_cnt",NIL(char*));
			break;
		case STD_R :
			fldprint(f->size,"std_r",NIL(char*));
			break;
		case STD_W :
			fldprint(f->size,"std_w",NIL(char*));
			break;
		case STD_PTR :
			fldprint(f->size,"std_ptr","uchar*");
			break;
		case STD_FLAG :
			fldprint(f->size,"std_flag",NIL(char*));
			break;
		case STD_FILE :
			fldprint(f->size,"std_file",NIL(char*));
			break;
		case STD_READPTR :
			fldprint(f->size,"std_readptr","uchar*");
			break;
		case STD_READEND :
			fldprint(f->size,"std_readend","uchar*");
			break;
		case STD_WRITEPTR :
			fldprint(f->size,"std_writeptr","uchar*");
			break;
		case STD_WRITEEND :
			fldprint(f->size,"std_writeend","uchar*");
			break;
		}

		pos = f->size+f->offset;
	}

	if((s = sizeof(FILE) - pos) > 0) /* last gap */	
		printf("\tuchar\tstd_gap%d[%d];\n",gap++,s);

	printf("};\n\n");

	/* default values for a few typical stdio constants */
#ifndef BUFSIZ
#define BUFSIZ	1024
#endif
#ifndef _IOERR
#	ifdef _ERR
#		define _IOERR	_ERR
#	else
#		ifdef _IO_ERR_SEEN
#		define _IOERR	_IO_ERR_SEEN
#		else
#			ifdef __SERR
#			define _IOERR	__SERR
#			else
#			define _IOERR	0
#			endif
#		endif
#	endif
#endif
#ifndef _IOEOF
#	ifdef _EOF
#		define _IOEOF	_EOF
#	else
#		ifdef _IO_EOF_SEEN
#		define _IOEOF	_IO_EOF_SEEN
#		else
#			ifdef __SEOF
#			define _IOEOF	__SEOF
#			else
#			define _IOEOF	0
#			endif
#		endif
#	endif
#endif
#ifndef _IONBF
#	ifdef _UNBUF
#		define _IONBF	_UNBUF
#	else
#		ifdef _IO_UNBUFFERED
#		define _IO_NBF	_IO_UNBUFFERED
#		else
#			ifdef __SNBF
#			define _IONBF	__SNBF
#			else
#			define _IONBF	0
#			endif
#		endif
#	endif
#endif
#ifndef _IOLBF
#	ifdef _LINBUF
#		define _IOLBF	_LINBUF
#	else
#		ifdef _IO_LINE_BUF
#		define _IOLBF	_IO_LINE_BUF
#		else
#			ifdef __SLBF
#			define _IOLBF	__SLBF
#			else
#			define _IOLBF	0
#			endif
#		endif
#	endif
#endif
#ifndef _IOFBF
#	define _IOFBF	0
#endif
	printf("#define BUFSIZ\t\t%d\n",BUFSIZ);
	printf("#define _IOERR\t\t%#o\n",_IOERR);
	printf("#define _IOEOF\t\t%#o\n",_IOEOF);
	printf("#define _IONBF\t\t%#o\n",_IONBF);
	printf("#define _IOLBF\t\t%#o\n",_IOLBF);
	printf("#define _IOFBF\t\t%#o\n\n",_IOFBF);

#ifdef std_flag
	printf("#define _seteof(fp)\t((fp)->std_flag |= _IOEOF)\n");
	printf("#define _seterr(fp)\t((fp)->std_flag |= _IOERR)\n\n");

	printf("#define _stdclrerr(fp)\t((fp)->std_flag &= ~(_IOEOF|_IOERR))\n");
	printf("#define _stdseterr(fp,sp)\t((sfeof(sp) ? _seteof(fp) : 0), ");
	printf(				   "(sferror(sp) ? _seterr(fp) : 0) )\n\n" );
#else
	printf("#define _stdclrerr(fp)\t(0)\n");
	printf("#define _stdseterr(fp,sp)\t(0)\n\n");
#endif

	printf("\n_BEGIN_EXTERNS_\n\n");
	printf("#if _BLD_sfio && defined(__EXPORT__)\n");
	printf("#define extern\t__EXPORT__\n");
	printf("#endif\n");


#if defined(NAME_iob) || _msft_iob
#define _have_streams	1
#if _msft_iob
	printf("\n#define _iob		(__p__iob())\n");
	printf("_CRTIMP extern FILE * __cdecl __p__iob(void);\n\n");
#else
	printf("\nextern FILE		_iob[];\n");
#endif
	printf("#define stdin		(&(_iob[0]))\n");
	printf("#define stdout		(&(_iob[1]))\n");
	printf("#define stderr		(&(_iob[2]))\n\n");
#endif

#if defined(NAME_sf) && !_have_streams
#define _have_streams	1
	printf("\nextern FILE		_sf[];\n");
	printf("#define stdin		(&(_sf[0]))\n");
	printf("#define stdout		(&(_sf[1]))\n");
	printf("#define stderr		(&(_sf[2]))\n\n");
#endif

#if defined(NAME_swbuf) && defined(NAME_srget) && !_have_streams
#define _have_streams	1
	printf("\nextern FILE		__sstdin, __sstdout, __sstderr;\n");
	printf("#define stdin		(&__sstdin)\n");
	printf("#define stdout		(&__sstdout)\n");
	printf("#define stderr		(&__sstderr)\n\n");
#endif

/* Linux varieties */
#if SELF_stdin && !_have_streams
#define _have_streams	1
	printf("#define _do_self_stdin\t1\n");
	printf("\nextern FILE		*stdin, *stdout, *stderr;\n\n");
#endif

#if AMPERSAND_IO_stdin && !_have_streams
#define _have_streams	1
	printf("#define _do_ampersand_stdin\t1\n");
	printf("\nextern FILE		_IO_stdin_, _IO_stdout_, _IO_stderr_;\n");
	printf("#define stdin		(&_IO_stdin_)\n");
	printf("#define stdout		(&_IO_stdout_)\n");
	printf("#define stderr		(&_IO_stderr_)\n\n");
#endif

#if STAR_IO_stdin && !_have_streams
#define _have_streams	1
	printf("#define _do_star_stdin\t1\n");
	printf("\nextern FILE		*_IO_stdin_, *_IO_stdout_, *_IO_stderr_;\n");
	printf("#define stdin		_IO_stdin_\n");
	printf("#define stdout		_IO_stdout_\n");
	printf("#define stderr		_IO_stderr_\n\n");
#endif

	printf("extern void\t\t_sfunmap _ARG_((FILE*));\n");
	printf("extern Sfio_t*\t\t_sfstream _ARG_((FILE*));\n");
	printf("extern FILE*\t\t_stdstream _ARG_((Sfio_t*, FILE*));\n");
	printf("extern char*\t\t_stdgets _ARG_((Sfio_t*,char*,int,int));\n");
	printf("extern void\t\tclearerr _ARG_((FILE*));\n");
	printf("extern int\t\t_doprnt _ARG_((const char*, va_list, FILE*));\n");
	printf("extern int\t\t_doscan _ARG_((FILE*, const char*, va_list));\n");
	printf("extern int\t\tfclose _ARG_((FILE*));\n");
	printf("extern FILE*\t\tfdopen _ARG_((int, const char*));\n");
	printf("extern int\t\tfeof _ARG_((FILE*));\n");
	printf("extern int\t\tferror _ARG_((FILE*));\n");
	printf("extern int\t\tfflush _ARG_((FILE*));\n");
	printf("extern int\t\tfgetc _ARG_((FILE*));\n");
	printf("extern char*\t\tfgets _ARG_((char*, int, FILE*));\n");
	printf("extern int\t\t_filbuf _ARG_((FILE*));\n");
	printf("extern int\t\t_uflow _ARG_((FILE*));\n");
	printf("extern int\t\t_srget _ARG_((FILE*));\n");
	printf("extern int\t\t_sgetc _ARG_((FILE*));\n");
	printf("extern int\t\tfileno _ARG_((FILE*));\n");
	printf("extern int\t\t_flsbuf _ARG_((int, FILE*));\n");
	printf("extern int\t\t_overflow _ARG_((FILE*,int));\n");
	printf("extern int\t\t_swbuf _ARG_((int,FILE*));\n");
	printf("extern int\t\t_sputc _ARG_((int,FILE*));\n");
	printf("extern void\t\t_cleanup _ARG_((void));\n");
	printf("extern FILE*\t\tfopen _ARG_((char*, const char*));\n");
	printf("extern int\t\tfprintf _ARG_((FILE*, const char* , ...));\n");
	printf("extern int\t\tfputc _ARG_((int, FILE*));\n");
	printf("extern int\t\tfputs _ARG_((const char*, FILE*));\n");
	printf("extern size_t\t\tfread _ARG_((void*, size_t, size_t, FILE*));\n");
	printf("extern FILE*\t\tfreopen _ARG_((char*, const char*, FILE*));\n");
	printf("extern int\t\tfscanf _ARG_((FILE*, const char* , ...));\n");
	printf("extern int\t\tfseek _ARG_((FILE*, long , int));\n");
	printf("extern long\t\tftell _ARG_((FILE*));\n");
	printf("extern int\t\tfgetpos _ARG_((FILE*,stdfpos_t*));\n");
	printf("extern int\t\tfsetpos _ARG_((FILE*,stdfpos_t*));\n");
	printf("extern int\t\tfpurge _ARG_((FILE*));\n");
	printf("extern size_t\t\tfwrite _ARG_((const void*, size_t, size_t, FILE*));\n");
	printf("extern int\t\tgetc _ARG_((FILE*));\n");
	printf("extern int\t\tgetchar _ARG_((void));\n");
	printf("extern char*\t\tgets _ARG_((char*));\n");
	printf("extern int\t\tgetw _ARG_((FILE*));\n");
	printf("extern int\t\tpclose _ARG_((FILE*));\n");
	printf("extern FILE*\t\tpopen _ARG_((const char*, const char*));\n");
	printf("extern int\t\tprintf _ARG_((const char* , ...));\n");
	printf("extern int\t\tputc _ARG_((int, FILE*));\n");
	printf("extern int\t\tputchar _ARG_((int));\n");
	printf("extern int\t\tputs _ARG_((const char*));\n");
	printf("extern int\t\tputw _ARG_((int, FILE*));\n");
	printf("extern void\t\trewind _ARG_((FILE*));\n");
	printf("extern int\t\tscanf _ARG_((const char* , ...));\n");
	printf("extern void\t\tsetbuf _ARG_((FILE*, char*));\n");
	printf("extern int\t\tsetbuffer _ARG_((FILE*, char*, size_t));\n");
	printf("extern int\t\tsetlinebuf _ARG_((FILE*));\n");
	printf("extern int\t\tsetvbuf _ARG_((FILE*,char*,int,size_t));\n");
	printf("extern int\t\tsprintf _ARG_((char*, const char* , ...));\n");
	printf("extern int\t\tsscanf _ARG_((const char*, const char* , ...));\n");
	printf("extern FILE*\t\ttmpfile _ARG_((void));\n");
	printf("extern int\t\tungetc _ARG_((int,FILE*));\n");
	printf("extern int\t\tvfprintf _ARG_((FILE*, const char* , va_list));\n");
	printf("extern int\t\tvfscanf _ARG_((FILE*, const char* , va_list));\n");
	printf("extern int\t\tvprintf _ARG_((const char* , va_list));\n");
	printf("extern int\t\tvscanf _ARG_((const char* , va_list));\n");
	printf("extern int\t\tvsprintf _ARG_((char*, const char* , va_list));\n");
	printf("extern int\t\tvsscanf _ARG_((char*, const char* , va_list));\n");
	printf("extern void\t\tflockfile _ARG_((FILE*));\n");
	printf("extern void\t\tfunlockfile _ARG_((FILE*));\n");
	printf("extern int\t\tftrylockfile _ARG_((FILE*));\n");
	printf("extern int\t\tsnprintf _ARG_((char*, size_t, const char*, ...));\n");
	printf("extern int\t\tvsnprintf _ARG_((char*, size_t, const char*, va_list));\n");
	printf("extern int\t\t__snprintf _ARG_((char*, size_t, const char*, ...));\n");
	printf("extern int\t\t__vsnprintf _ARG_((char*, size_t, const char*, va_list));\n");

	printf("\n_END_EXTERNS_\n");

	printf("\n#endif /* _SFSTDIO_H */\n");

	return 0;
}