1f08c3bdfSopenharmony_ci/*
2f08c3bdfSopenharmony_ci *   Copyright (c) International Business Machines  Corp., 2001
3f08c3bdfSopenharmony_ci *
4f08c3bdfSopenharmony_ci *   This program is free software;  you can redistribute it and/or modify
5f08c3bdfSopenharmony_ci *   it under the terms of the GNU General Public License as published by
6f08c3bdfSopenharmony_ci *   the Free Software Foundation; either version 2 of the License, or
7f08c3bdfSopenharmony_ci *   (at your option) any later version.
8f08c3bdfSopenharmony_ci *
9f08c3bdfSopenharmony_ci *   This program is distributed in the hope that it will be useful,
10f08c3bdfSopenharmony_ci *   but WITHOUT ANY WARRANTY;  without even the implied warranty of
11f08c3bdfSopenharmony_ci *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
12f08c3bdfSopenharmony_ci *   the GNU General Public License for more details.
13f08c3bdfSopenharmony_ci *
14f08c3bdfSopenharmony_ci *   You should have received a copy of the GNU General Public License
15f08c3bdfSopenharmony_ci *   along with this program;  if not, write to the Free Software
16f08c3bdfSopenharmony_ci *   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
17f08c3bdfSopenharmony_ci */
18f08c3bdfSopenharmony_ci
19f08c3bdfSopenharmony_ci/******************************************************************************
20f08c3bdfSopenharmony_ci *  writen.c
21f08c3bdfSopenharmony_ci ******************************************************************************/
22f08c3bdfSopenharmony_ci
23f08c3bdfSopenharmony_ci#include <unistd.h>
24f08c3bdfSopenharmony_ci
25f08c3bdfSopenharmony_ci/* Write "n" bytes to a descriptor
26f08c3bdfSopenharmony_ci   Use instead of write() when fd is a stream socket. */
27f08c3bdfSopenharmony_ci
28f08c3bdfSopenharmony_ciint writen(int fd, char *ptr, int nbytes)
29f08c3bdfSopenharmony_ci{
30f08c3bdfSopenharmony_ci	int nleft, nwritten;
31f08c3bdfSopenharmony_ci
32f08c3bdfSopenharmony_ci	nleft = nbytes;
33f08c3bdfSopenharmony_ci	while (nleft > 0) {
34f08c3bdfSopenharmony_ci		nwritten = write(fd, ptr, nleft);
35f08c3bdfSopenharmony_ci		if (nwritten <= 0)
36f08c3bdfSopenharmony_ci			return (nwritten);	/* error */
37f08c3bdfSopenharmony_ci		nleft -= nwritten;
38f08c3bdfSopenharmony_ci		ptr += nwritten;
39f08c3bdfSopenharmony_ci	}
40f08c3bdfSopenharmony_ci	return (nbytes - nleft);
41f08c3bdfSopenharmony_ci}
42