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 30*7257d1b4Sraf #pragma ident "%Z%%M% %I% %E% SMI" 317c478bd9Sstevel@tonic-gate 32*7257d1b4Sraf #include "lint.h" 337c478bd9Sstevel@tonic-gate #include "file64.h" 347c478bd9Sstevel@tonic-gate #include "mtlib.h" 357c478bd9Sstevel@tonic-gate #include <sys/types.h> 367c478bd9Sstevel@tonic-gate #include <stdio.h> 377c478bd9Sstevel@tonic-gate #include <values.h> 387c478bd9Sstevel@tonic-gate #include <memory.h> 397c478bd9Sstevel@tonic-gate #include <thread.h> 407c478bd9Sstevel@tonic-gate #include <synch.h> 417c478bd9Sstevel@tonic-gate #include <unistd.h> 427c478bd9Sstevel@tonic-gate #include "stdiom.h" 437c478bd9Sstevel@tonic-gate #include "mse.h" 447c478bd9Sstevel@tonic-gate 457c478bd9Sstevel@tonic-gate size_t 467c478bd9Sstevel@tonic-gate _fwrite_unlocked(const void *ptr, size_t size, size_t count, FILE *iop); 477c478bd9Sstevel@tonic-gate 487c478bd9Sstevel@tonic-gate size_t 497c478bd9Sstevel@tonic-gate fwrite(const void *ptr, size_t size, size_t count, FILE *iop) 507c478bd9Sstevel@tonic-gate { 517c478bd9Sstevel@tonic-gate rmutex_t *lk; 527c478bd9Sstevel@tonic-gate size_t retval; 537c478bd9Sstevel@tonic-gate 547c478bd9Sstevel@tonic-gate FLOCKFILE(lk, iop); 557c478bd9Sstevel@tonic-gate 567c478bd9Sstevel@tonic-gate _SET_ORIENTATION_BYTE(iop); 577c478bd9Sstevel@tonic-gate 587c478bd9Sstevel@tonic-gate retval = _fwrite_unlocked(ptr, size, count, iop); 597c478bd9Sstevel@tonic-gate FUNLOCKFILE(lk); 607c478bd9Sstevel@tonic-gate 617c478bd9Sstevel@tonic-gate return (retval); 627c478bd9Sstevel@tonic-gate } 637c478bd9Sstevel@tonic-gate 647c478bd9Sstevel@tonic-gate size_t 657c478bd9Sstevel@tonic-gate _fwrite_unlocked(const void *ptr, size_t size, size_t count, FILE *iop) 667c478bd9Sstevel@tonic-gate { 677c478bd9Sstevel@tonic-gate ssize_t s, n; 687c478bd9Sstevel@tonic-gate unsigned char *dptr = (unsigned char *)ptr; 697c478bd9Sstevel@tonic-gate unsigned char *bufend; 707c478bd9Sstevel@tonic-gate 717c478bd9Sstevel@tonic-gate if (_WRTCHK(iop)) 727c478bd9Sstevel@tonic-gate return (0); 737c478bd9Sstevel@tonic-gate 747c478bd9Sstevel@tonic-gate /* 757c478bd9Sstevel@tonic-gate * This test is here to avoid the expensive multiply 767c478bd9Sstevel@tonic-gate */ 777c478bd9Sstevel@tonic-gate if (count == 1) 787c478bd9Sstevel@tonic-gate s = size; 797c478bd9Sstevel@tonic-gate else if (size == 1) 807c478bd9Sstevel@tonic-gate s = count; 817c478bd9Sstevel@tonic-gate else 827c478bd9Sstevel@tonic-gate s = size * count; 837c478bd9Sstevel@tonic-gate 847c478bd9Sstevel@tonic-gate if (iop->_flag & _IOLBF) { 857c478bd9Sstevel@tonic-gate bufend = _bufend(iop); 867c478bd9Sstevel@tonic-gate iop->_cnt = iop->_base - iop->_ptr; 877c478bd9Sstevel@tonic-gate while (s > 0) { 887c478bd9Sstevel@tonic-gate ssize_t buflen = bufend - iop->_base; 897c478bd9Sstevel@tonic-gate if (--iop->_cnt >= (-buflen) && *dptr != '\n') 907c478bd9Sstevel@tonic-gate *iop->_ptr++ = *dptr++; 917c478bd9Sstevel@tonic-gate else if (__flsbuf(*dptr++, iop) == EOF) 927c478bd9Sstevel@tonic-gate break; 937c478bd9Sstevel@tonic-gate s--; 947c478bd9Sstevel@tonic-gate } 957c478bd9Sstevel@tonic-gate } else if (iop->_flag & _IONBF) { 967c478bd9Sstevel@tonic-gate ssize_t bytes; 977c478bd9Sstevel@tonic-gate ssize_t written = 0; 987c478bd9Sstevel@tonic-gate char *data; 997c478bd9Sstevel@tonic-gate 1007c478bd9Sstevel@tonic-gate if (size < 1 || count < 1) 1017c478bd9Sstevel@tonic-gate return (0); 1027c478bd9Sstevel@tonic-gate 1037c478bd9Sstevel@tonic-gate if (iop->_base != iop->_ptr) { 1047c478bd9Sstevel@tonic-gate /* 1057c478bd9Sstevel@tonic-gate * Flush any existing data. Doesn't count towards return 1067c478bd9Sstevel@tonic-gate * value. 1077c478bd9Sstevel@tonic-gate */ 1087c478bd9Sstevel@tonic-gate bytes = iop->_ptr - iop->_base; 1097c478bd9Sstevel@tonic-gate data = (char *)iop->_base; 1107c478bd9Sstevel@tonic-gate 1117c478bd9Sstevel@tonic-gate while ((n = write(fileno(iop), data, (size_t)bytes)) 1127c478bd9Sstevel@tonic-gate != bytes) { 1137c478bd9Sstevel@tonic-gate if (n == -1) { 114a574db85Sraf if (!cancel_active()) 1157c478bd9Sstevel@tonic-gate iop->_flag |= _IOERR; 1167c478bd9Sstevel@tonic-gate return (0); 1177c478bd9Sstevel@tonic-gate } else { 1187c478bd9Sstevel@tonic-gate data += n; 1197c478bd9Sstevel@tonic-gate bytes -= n; 1207c478bd9Sstevel@tonic-gate } 1217c478bd9Sstevel@tonic-gate } 1227c478bd9Sstevel@tonic-gate iop->_cnt = 0; 1237c478bd9Sstevel@tonic-gate iop->_ptr = iop->_base; 1247c478bd9Sstevel@tonic-gate } 1257c478bd9Sstevel@tonic-gate /* 1267c478bd9Sstevel@tonic-gate * written is in bytes until the return. 1277c478bd9Sstevel@tonic-gate * Then it is divided by size to produce items. 1287c478bd9Sstevel@tonic-gate */ 1297c478bd9Sstevel@tonic-gate while ((n = write(fileno(iop), dptr, s)) != s) { 1307c478bd9Sstevel@tonic-gate if (n == -1) { 131a574db85Sraf if (!cancel_active()) 1327c478bd9Sstevel@tonic-gate iop->_flag |= _IOERR; 1337c478bd9Sstevel@tonic-gate return (written / size); 1347c478bd9Sstevel@tonic-gate } else { 1357c478bd9Sstevel@tonic-gate dptr += n; 1367c478bd9Sstevel@tonic-gate s -= n; 1377c478bd9Sstevel@tonic-gate written += n; 1387c478bd9Sstevel@tonic-gate } 1397c478bd9Sstevel@tonic-gate } 1407c478bd9Sstevel@tonic-gate written += n; 1417c478bd9Sstevel@tonic-gate return (written / size); 1427c478bd9Sstevel@tonic-gate } else while (s > 0) { 1437c478bd9Sstevel@tonic-gate if (iop->_cnt < s) { 1447c478bd9Sstevel@tonic-gate if (iop->_cnt > 0) { 1457c478bd9Sstevel@tonic-gate (void) memcpy(iop->_ptr, (void *)dptr, 1467c478bd9Sstevel@tonic-gate iop->_cnt); 1477c478bd9Sstevel@tonic-gate dptr += iop->_cnt; 1487c478bd9Sstevel@tonic-gate iop->_ptr += iop->_cnt; 1497c478bd9Sstevel@tonic-gate s -= iop->_cnt; 1507c478bd9Sstevel@tonic-gate } 1517c478bd9Sstevel@tonic-gate if (_xflsbuf(iop) == EOF) 1527c478bd9Sstevel@tonic-gate break; 1537c478bd9Sstevel@tonic-gate } 1547c478bd9Sstevel@tonic-gate if (iop->_cnt >= s) { 1557c478bd9Sstevel@tonic-gate char *tmp = (char *)iop->_ptr; 1567c478bd9Sstevel@tonic-gate 1577c478bd9Sstevel@tonic-gate switch (s) { 1587c478bd9Sstevel@tonic-gate case 8: 1597c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1607c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1617c478bd9Sstevel@tonic-gate case 7: 1627c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1637c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1647c478bd9Sstevel@tonic-gate case 6: 1657c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1667c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1677c478bd9Sstevel@tonic-gate case 5: 1687c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1697c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1707c478bd9Sstevel@tonic-gate case 4: 1717c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1727c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1737c478bd9Sstevel@tonic-gate case 3: 1747c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1757c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1767c478bd9Sstevel@tonic-gate case 2: 1777c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1787c478bd9Sstevel@tonic-gate /*FALLTHRU*/ 1797c478bd9Sstevel@tonic-gate case 1: 1807c478bd9Sstevel@tonic-gate *tmp++ = *dptr++; 1817c478bd9Sstevel@tonic-gate break; 1827c478bd9Sstevel@tonic-gate case 0: 1837c478bd9Sstevel@tonic-gate return (count); 1847c478bd9Sstevel@tonic-gate default: 1857c478bd9Sstevel@tonic-gate (void) memcpy(iop->_ptr, (void *)dptr, s); 1867c478bd9Sstevel@tonic-gate } 1877c478bd9Sstevel@tonic-gate iop->_ptr += s; 1887c478bd9Sstevel@tonic-gate iop->_cnt -= s; 1897c478bd9Sstevel@tonic-gate 1907c478bd9Sstevel@tonic-gate return (count); 1917c478bd9Sstevel@tonic-gate } 1927c478bd9Sstevel@tonic-gate } 1937c478bd9Sstevel@tonic-gate 1947c478bd9Sstevel@tonic-gate return (size != 0 ? count - ((s + size - 1) / size) : 0); 1957c478bd9Sstevel@tonic-gate } 196