1N/A/*
1N/A * Copyright (c) 2000-2001 Sendmail, Inc. and its suppliers.
1N/A * All rights reserved.
1N/A * Copyright (c) 1990, 1993
1N/A * The Regents of the University of California. All rights reserved.
1N/A *
1N/A * This code is derived from software contributed to Berkeley by
1N/A * Chris Torek.
1N/A *
1N/A * By using this file, you agree to the terms and conditions set
1N/A * forth in the LICENSE file which can be found at the top level of
1N/A * the sendmail distribution.
1N/A */
1N/A
1N/A#pragma ident "%Z%%M% %I% %E% SMI"
1N/A
1N/A#include <sm/gen.h>
1N/ASM_RCSID("@(#)$Id: makebuf.c,v 1.26 2001/10/31 16:04:08 ca Exp $")
1N/A#include <stdlib.h>
1N/A#include <unistd.h>
1N/A#include <sys/types.h>
1N/A#include <sys/stat.h>
1N/A#include <sm/io.h>
1N/A#include <sm/heap.h>
1N/A#include <sm/conf.h>
1N/A#include "local.h"
1N/A
1N/A/*
1N/A** SM_MAKEBUF -- make a buffer for the file
1N/A**
1N/A** Parameters:
1N/A** fp -- the file to be buffered
1N/A**
1N/A** Returns:
1N/A** nothing
1N/A**
1N/A** Allocate a file buffer, or switch to unbuffered I/O.
1N/A** By default tty devices default to line buffered.
1N/A*/
1N/A
1N/Avoid
1N/Asm_makebuf(fp)
1N/A register SM_FILE_T *fp;
1N/A{
1N/A register void *p;
1N/A register int flags;
1N/A size_t size;
1N/A int couldbetty;
1N/A
1N/A if (fp->f_flags & SMNBF)
1N/A {
1N/A fp->f_bf.smb_base = fp->f_p = fp->f_nbuf;
1N/A fp->f_bf.smb_size = 1;
1N/A return;
1N/A }
1N/A flags = sm_whatbuf(fp, &size, &couldbetty);
1N/A if ((p = sm_malloc(size)) == NULL)
1N/A {
1N/A fp->f_flags |= SMNBF;
1N/A fp->f_bf.smb_base = fp->f_p = fp->f_nbuf;
1N/A fp->f_bf.smb_size = 1;
1N/A return;
1N/A }
1N/A if (!Sm_IO_DidInit)
1N/A sm_init();
1N/A flags |= SMMBF;
1N/A fp->f_bf.smb_base = fp->f_p = p;
1N/A fp->f_bf.smb_size = size;
1N/A if (couldbetty && isatty(fp->f_file))
1N/A flags |= SMLBF;
1N/A fp->f_flags |= flags;
1N/A}
1N/A
1N/A/*
1N/A** SM_WHATBUF -- determine proper buffer for a file (internal)
1N/A**
1N/A** Plus it fills in 'bufsize' for recommended buffer size and
1N/A** fills in flag to indicate if 'fp' could be a tty (nothing
1N/A** to do with "betty" :-) ).
1N/A**
1N/A** Parameters:
1N/A** fp -- file pointer to be buffered
1N/A** bufsize -- new buffer size (a return)
1N/A** couldbetty -- could be a tty (returns)
1N/A**
1N/A** Returns:
1N/A** Success:
1N/A** on error:
1N/A** SMNPT -- not seek opimized
1N/A** SMOPT -- seek opimized
1N/A*/
1N/A
1N/Aint
1N/Asm_whatbuf(fp, bufsize, couldbetty)
1N/A register SM_FILE_T *fp;
1N/A size_t *bufsize;
1N/A int *couldbetty;
1N/A{
1N/A struct stat st;
1N/A
1N/A if (fp->f_file < 0 || fstat(fp->f_file, &st) < 0)
1N/A {
1N/A *couldbetty = 0;
1N/A *bufsize = SM_IO_BUFSIZ;
1N/A return SMNPT;
1N/A }
1N/A
1N/A /* could be a tty iff it is a character device */
1N/A *couldbetty = S_ISCHR(st.st_mode);
1N/A if (st.st_blksize == 0)
1N/A {
1N/A *bufsize = SM_IO_BUFSIZ;
1N/A return SMNPT;
1N/A }
1N/A
1N/A#if SM_IO_MAX_BUF_FILE > 0
1N/A if (S_ISREG(st.st_mode) && st.st_blksize > SM_IO_MAX_BUF_FILE)
1N/A st.st_blksize = SM_IO_MAX_BUF_FILE;
1N/A#endif /* SM_IO_MAX_BUF_FILE > 0 */
1N/A
1N/A#if SM_IO_MAX_BUF > 0 || SM_IO_MIN_BUF > 0
1N/A if (!S_ISREG(st.st_mode))
1N/A {
1N/A# if SM_IO_MAX_BUF > 0
1N/A if (st.st_blksize > SM_IO_MAX_BUF)
1N/A st.st_blksize = SM_IO_MAX_BUF;
1N/A# if SM_IO_MIN_BUF > 0
1N/A else
1N/A# endif /* SM_IO_MIN_BUF > 0 */
1N/A# endif /* SM_IO_MAX_BUF > 0 */
1N/A# if SM_IO_MIN_BUF > 0
1N/A if (st.st_blksize < SM_IO_MIN_BUF)
1N/A st.st_blksize = SM_IO_MIN_BUF;
1N/A# endif /* SM_IO_MIN_BUF > 0 */
1N/A }
1N/A#endif /* SM_IO_MAX_BUF > 0 || SM_IO_MIN_BUF > 0 */
1N/A
1N/A /*
1N/A ** Optimise fseek() only if it is a regular file. (The test for
1N/A ** sm_std_seek is mainly paranoia.) It is safe to set _blksize
1N/A ** unconditionally; it will only be used if SMOPT is also set.
1N/A */
1N/A
1N/A if ((fp->f_flags & SMSTR) == 0)
1N/A {
1N/A *bufsize = st.st_blksize;
1N/A fp->f_blksize = st.st_blksize;
1N/A }
1N/A else
1N/A *bufsize = SM_IO_BUFSIZ;
1N/A if ((st.st_mode & S_IFMT) == S_IFREG &&
1N/A fp->f_seek == sm_stdseek)
1N/A return SMOPT;
1N/A else
1N/A return SMNPT;
1N/A}