1*84d9c625SLionel Sambuc /* $NetBSD: compat_fsetpos.c,v 1.2 2012/10/17 16:09:03 drochner Exp $ */
2f14fb602SLionel Sambuc
3f14fb602SLionel Sambuc /*-
4f14fb602SLionel Sambuc * Copyright (c) 1990, 1993
5f14fb602SLionel Sambuc * The Regents of the University of California. All rights reserved.
6f14fb602SLionel Sambuc *
7f14fb602SLionel Sambuc * This code is derived from software contributed to Berkeley by
8f14fb602SLionel Sambuc * Chris Torek.
9f14fb602SLionel Sambuc *
10f14fb602SLionel Sambuc * Redistribution and use in source and binary forms, with or without
11f14fb602SLionel Sambuc * modification, are permitted provided that the following conditions
12f14fb602SLionel Sambuc * are met:
13f14fb602SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
14f14fb602SLionel Sambuc * notice, this list of conditions and the following disclaimer.
15f14fb602SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16f14fb602SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
17f14fb602SLionel Sambuc * documentation and/or other materials provided with the distribution.
18f14fb602SLionel Sambuc * 3. Neither the name of the University nor the names of its contributors
19f14fb602SLionel Sambuc * may be used to endorse or promote products derived from this software
20f14fb602SLionel Sambuc * without specific prior written permission.
21f14fb602SLionel Sambuc *
22f14fb602SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23f14fb602SLionel Sambuc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24f14fb602SLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25f14fb602SLionel Sambuc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26f14fb602SLionel Sambuc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27f14fb602SLionel Sambuc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28f14fb602SLionel Sambuc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29f14fb602SLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30f14fb602SLionel Sambuc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31f14fb602SLionel Sambuc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32f14fb602SLionel Sambuc * SUCH DAMAGE.
33f14fb602SLionel Sambuc *
34f14fb602SLionel Sambuc * Original version ID:
35f14fb602SLionel Sambuc * NetBSD: fsetpos.c,v 1.10 2003/08/07 16:43:25 agc Exp
36f14fb602SLionel Sambuc */
37f14fb602SLionel Sambuc
38f14fb602SLionel Sambuc #include <sys/cdefs.h>
39f14fb602SLionel Sambuc #if defined(LIBC_SCCS) && !defined(lint)
40*84d9c625SLionel Sambuc __RCSID("$NetBSD: compat_fsetpos.c,v 1.2 2012/10/17 16:09:03 drochner Exp $");
41f14fb602SLionel Sambuc #endif /* LIBC_SCCS and not lint */
42f14fb602SLionel Sambuc
43f14fb602SLionel Sambuc #define __LIBC12_SOURCE__
44f14fb602SLionel Sambuc
45f14fb602SLionel Sambuc #include "namespace.h"
46f14fb602SLionel Sambuc #include <sys/types.h>
47f14fb602SLionel Sambuc
48f14fb602SLionel Sambuc #include <assert.h>
49f14fb602SLionel Sambuc #include <stdio.h>
50f14fb602SLionel Sambuc #include <compat/include/stdio.h>
51f14fb602SLionel Sambuc
52f14fb602SLionel Sambuc #ifdef __warn_references
53f14fb602SLionel Sambuc __warn_references(fsetpos,
54f14fb602SLionel Sambuc "warning: reference to compatibility fsetpos(); include <stdio.h> for correct reference")
55f14fb602SLionel Sambuc #endif
56f14fb602SLionel Sambuc
57f14fb602SLionel Sambuc
58f14fb602SLionel Sambuc /*
59f14fb602SLionel Sambuc * fsetpos: like fseek.
60f14fb602SLionel Sambuc */
61f14fb602SLionel Sambuc int
fsetpos(FILE * __restrict iop,const off_t * __restrict pos)62f14fb602SLionel Sambuc fsetpos(FILE * __restrict iop, const off_t * __restrict pos)
63f14fb602SLionel Sambuc {
64f14fb602SLionel Sambuc _DIAGASSERT(iop != NULL);
65f14fb602SLionel Sambuc _DIAGASSERT(pos != NULL);
66f14fb602SLionel Sambuc
67f14fb602SLionel Sambuc return fseeko(iop, *pos, SEEK_SET) == (off_t)-1;
68f14fb602SLionel Sambuc }
69