17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
5a574db85Sraf * Common Development and Distribution License (the "License").
6a574db85Sraf * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate *
87c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate * and limitations under the License.
127c478bd9Sstevel@tonic-gate *
137c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate *
197c478bd9Sstevel@tonic-gate * CDDL HEADER END
207c478bd9Sstevel@tonic-gate */
21a574db85Sraf
227c478bd9Sstevel@tonic-gate /*
23a574db85Sraf * Copyright 2008 Sun Microsystems, Inc. All rights reserved.
247c478bd9Sstevel@tonic-gate * Use is subject to license terms.
257c478bd9Sstevel@tonic-gate */
267c478bd9Sstevel@tonic-gate
277c478bd9Sstevel@tonic-gate /* Copyright (c) 1988 AT&T */
287c478bd9Sstevel@tonic-gate /* All Rights Reserved */
297c478bd9Sstevel@tonic-gate
307257d1b4Sraf #include "lint.h"
317c478bd9Sstevel@tonic-gate #include "file64.h"
327c478bd9Sstevel@tonic-gate #include "mtlib.h"
337c478bd9Sstevel@tonic-gate #include <sys/types.h>
347c478bd9Sstevel@tonic-gate #include <stdio.h>
357c478bd9Sstevel@tonic-gate #include <values.h>
367c478bd9Sstevel@tonic-gate #include <memory.h>
377c478bd9Sstevel@tonic-gate #include <thread.h>
387c478bd9Sstevel@tonic-gate #include <synch.h>
397c478bd9Sstevel@tonic-gate #include <unistd.h>
407c478bd9Sstevel@tonic-gate #include "stdiom.h"
417c478bd9Sstevel@tonic-gate #include "mse.h"
427c478bd9Sstevel@tonic-gate
437c478bd9Sstevel@tonic-gate size_t
447c478bd9Sstevel@tonic-gate _fwrite_unlocked(const void *ptr, size_t size, size_t count, FILE *iop);
457c478bd9Sstevel@tonic-gate
467c478bd9Sstevel@tonic-gate size_t
fwrite(const void * ptr,size_t size,size_t count,FILE * iop)477c478bd9Sstevel@tonic-gate fwrite(const void *ptr, size_t size, size_t count, FILE *iop)
487c478bd9Sstevel@tonic-gate {
497c478bd9Sstevel@tonic-gate rmutex_t *lk;
507c478bd9Sstevel@tonic-gate size_t retval;
517c478bd9Sstevel@tonic-gate
527c478bd9Sstevel@tonic-gate FLOCKFILE(lk, iop);
537c478bd9Sstevel@tonic-gate
547c478bd9Sstevel@tonic-gate _SET_ORIENTATION_BYTE(iop);
557c478bd9Sstevel@tonic-gate
567c478bd9Sstevel@tonic-gate retval = _fwrite_unlocked(ptr, size, count, iop);
577c478bd9Sstevel@tonic-gate FUNLOCKFILE(lk);
587c478bd9Sstevel@tonic-gate
597c478bd9Sstevel@tonic-gate return (retval);
607c478bd9Sstevel@tonic-gate }
617c478bd9Sstevel@tonic-gate
627c478bd9Sstevel@tonic-gate size_t
_fwrite_unlocked(const void * ptr,size_t size,size_t count,FILE * iop)637c478bd9Sstevel@tonic-gate _fwrite_unlocked(const void *ptr, size_t size, size_t count, FILE *iop)
647c478bd9Sstevel@tonic-gate {
657c478bd9Sstevel@tonic-gate ssize_t s, n;
667c478bd9Sstevel@tonic-gate unsigned char *dptr = (unsigned char *)ptr;
677c478bd9Sstevel@tonic-gate unsigned char *bufend;
687c478bd9Sstevel@tonic-gate
697c478bd9Sstevel@tonic-gate if (_WRTCHK(iop))
707c478bd9Sstevel@tonic-gate return (0);
717c478bd9Sstevel@tonic-gate
727c478bd9Sstevel@tonic-gate /*
737c478bd9Sstevel@tonic-gate * This test is here to avoid the expensive multiply
747c478bd9Sstevel@tonic-gate */
757c478bd9Sstevel@tonic-gate if (count == 1)
767c478bd9Sstevel@tonic-gate s = size;
777c478bd9Sstevel@tonic-gate else if (size == 1)
787c478bd9Sstevel@tonic-gate s = count;
797c478bd9Sstevel@tonic-gate else
807c478bd9Sstevel@tonic-gate s = size * count;
817c478bd9Sstevel@tonic-gate
827c478bd9Sstevel@tonic-gate if (iop->_flag & _IOLBF) {
837c478bd9Sstevel@tonic-gate bufend = _bufend(iop);
847c478bd9Sstevel@tonic-gate iop->_cnt = iop->_base - iop->_ptr;
857c478bd9Sstevel@tonic-gate while (s > 0) {
867c478bd9Sstevel@tonic-gate ssize_t buflen = bufend - iop->_base;
877c478bd9Sstevel@tonic-gate if (--iop->_cnt >= (-buflen) && *dptr != '\n')
887c478bd9Sstevel@tonic-gate *iop->_ptr++ = *dptr++;
897c478bd9Sstevel@tonic-gate else if (__flsbuf(*dptr++, iop) == EOF)
907c478bd9Sstevel@tonic-gate break;
917c478bd9Sstevel@tonic-gate s--;
927c478bd9Sstevel@tonic-gate }
937c478bd9Sstevel@tonic-gate } else if (iop->_flag & _IONBF) {
947c478bd9Sstevel@tonic-gate ssize_t bytes;
957c478bd9Sstevel@tonic-gate ssize_t written = 0;
967c478bd9Sstevel@tonic-gate char *data;
977c478bd9Sstevel@tonic-gate
987c478bd9Sstevel@tonic-gate if (size < 1 || count < 1)
997c478bd9Sstevel@tonic-gate return (0);
1007c478bd9Sstevel@tonic-gate
1017c478bd9Sstevel@tonic-gate if (iop->_base != iop->_ptr) {
1027c478bd9Sstevel@tonic-gate /*
1037c478bd9Sstevel@tonic-gate * Flush any existing data. Doesn't count towards return
1047c478bd9Sstevel@tonic-gate * value.
1057c478bd9Sstevel@tonic-gate */
1067c478bd9Sstevel@tonic-gate bytes = iop->_ptr - iop->_base;
1077c478bd9Sstevel@tonic-gate data = (char *)iop->_base;
1087c478bd9Sstevel@tonic-gate
109*cd62a92dSRobert Mustacchi while ((n = _xwrite(iop, data, (size_t)bytes)) !=
110*cd62a92dSRobert Mustacchi bytes) {
111*cd62a92dSRobert Mustacchi if (n <= 0) {
112a574db85Sraf if (!cancel_active())
1137c478bd9Sstevel@tonic-gate iop->_flag |= _IOERR;
1147c478bd9Sstevel@tonic-gate return (0);
1157c478bd9Sstevel@tonic-gate } else {
1167c478bd9Sstevel@tonic-gate data += n;
1177c478bd9Sstevel@tonic-gate bytes -= n;
1187c478bd9Sstevel@tonic-gate }
1197c478bd9Sstevel@tonic-gate }
1207c478bd9Sstevel@tonic-gate iop->_cnt = 0;
1217c478bd9Sstevel@tonic-gate iop->_ptr = iop->_base;
1227c478bd9Sstevel@tonic-gate }
1237c478bd9Sstevel@tonic-gate /*
1247c478bd9Sstevel@tonic-gate * written is in bytes until the return.
1257c478bd9Sstevel@tonic-gate * Then it is divided by size to produce items.
1267c478bd9Sstevel@tonic-gate */
127*cd62a92dSRobert Mustacchi while ((n = _xwrite(iop, dptr, s)) != s) {
128*cd62a92dSRobert Mustacchi if (n <= 0) {
129a574db85Sraf if (!cancel_active())
1307c478bd9Sstevel@tonic-gate iop->_flag |= _IOERR;
1317c478bd9Sstevel@tonic-gate return (written / size);
1327c478bd9Sstevel@tonic-gate } else {
1337c478bd9Sstevel@tonic-gate dptr += n;
1347c478bd9Sstevel@tonic-gate s -= n;
1357c478bd9Sstevel@tonic-gate written += n;
1367c478bd9Sstevel@tonic-gate }
1377c478bd9Sstevel@tonic-gate }
1387c478bd9Sstevel@tonic-gate written += n;
1397c478bd9Sstevel@tonic-gate return (written / size);
1407c478bd9Sstevel@tonic-gate } else while (s > 0) {
1417c478bd9Sstevel@tonic-gate if (iop->_cnt < s) {
1427c478bd9Sstevel@tonic-gate if (iop->_cnt > 0) {
1437c478bd9Sstevel@tonic-gate (void) memcpy(iop->_ptr, (void *)dptr,
1447c478bd9Sstevel@tonic-gate iop->_cnt);
1457c478bd9Sstevel@tonic-gate dptr += iop->_cnt;
1467c478bd9Sstevel@tonic-gate iop->_ptr += iop->_cnt;
1477c478bd9Sstevel@tonic-gate s -= iop->_cnt;
1487c478bd9Sstevel@tonic-gate }
1497c478bd9Sstevel@tonic-gate if (_xflsbuf(iop) == EOF)
1507c478bd9Sstevel@tonic-gate break;
1517c478bd9Sstevel@tonic-gate }
1527c478bd9Sstevel@tonic-gate if (iop->_cnt >= s) {
1537c478bd9Sstevel@tonic-gate char *tmp = (char *)iop->_ptr;
1547c478bd9Sstevel@tonic-gate
1557c478bd9Sstevel@tonic-gate switch (s) {
1567c478bd9Sstevel@tonic-gate case 8:
1577c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1587c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1597c478bd9Sstevel@tonic-gate case 7:
1607c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1617c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1627c478bd9Sstevel@tonic-gate case 6:
1637c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1647c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1657c478bd9Sstevel@tonic-gate case 5:
1667c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1677c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1687c478bd9Sstevel@tonic-gate case 4:
1697c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1707c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1717c478bd9Sstevel@tonic-gate case 3:
1727c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1737c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1747c478bd9Sstevel@tonic-gate case 2:
1757c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1767c478bd9Sstevel@tonic-gate /*FALLTHRU*/
1777c478bd9Sstevel@tonic-gate case 1:
1787c478bd9Sstevel@tonic-gate *tmp++ = *dptr++;
1797c478bd9Sstevel@tonic-gate break;
1807c478bd9Sstevel@tonic-gate case 0:
1817c478bd9Sstevel@tonic-gate return (count);
1827c478bd9Sstevel@tonic-gate default:
1837c478bd9Sstevel@tonic-gate (void) memcpy(iop->_ptr, (void *)dptr, s);
1847c478bd9Sstevel@tonic-gate }
1857c478bd9Sstevel@tonic-gate iop->_ptr += s;
1867c478bd9Sstevel@tonic-gate iop->_cnt -= s;
1877c478bd9Sstevel@tonic-gate
1887c478bd9Sstevel@tonic-gate return (count);
1897c478bd9Sstevel@tonic-gate }
1907c478bd9Sstevel@tonic-gate }
1917c478bd9Sstevel@tonic-gate
1927c478bd9Sstevel@tonic-gate return (size != 0 ? count - ((s + size - 1) / size) : 0);
1937c478bd9Sstevel@tonic-gate }
194