← Back to branch summary

~ubuntu-branches/ubuntu/lucid/cdrdao/lucid

« back to all changes in this revision

Viewing changes to scsilib/libschily/stdio/fcons.c

  • Committer: Bazaar Package Importer
  • Author(s): Andrew Suffield
  • Date: 2004-06-24 22:33:16 UTC
  • Revision ID: james.westby@ubuntu.com-20040624223316-534onzugaeeyq61j
Tags: upstream-1.1.9
Import upstream version 1.1.9

Show diffs side-by-side

added added

removed removed

Lines of Context:
scsilib/libschily/stdio/fcons.c
 
1
/* @(#)fcons.c  2.16 03/06/15 Copyright 1986, 1995-2003 J. Schilling */
 
2
/*
 
3
 *      Copyright (c) 1986, 1995-2003  J. Schilling
 
4
 */
 
5
/*
 
6
 * This program is free software; you can redistribute it and/or modify
 
7
 * it under the terms of the GNU General Public License as published by
 
8
 * the Free Software Foundation; either version 2, or (at your option)
 
9
 * any later version.
 
10
 *
 
11
 * This program is distributed in the hope that it will be useful,
 
12
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 
13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
14
 * GNU General Public License for more details.
 
15
 *
 
16
 * You should have received a copy of the GNU General Public License along with
 
17
 * this program; see the file COPYING.  If not, write to the Free Software
 
18
 * Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
19
 */
 
20
 
 
21
#include "io.h"
 
22
 
 
23
/*
 
24
 * Note that because of a definition in io.h we are using fseeko()/ftello()
 
25
 * instead of fseek()/ftell() if available.
 
26
 */
 
27
 
 
28
LOCAL   char    *fmtab[] = {
 
29
                        "",     /* 0    FI_NONE                         */
 
30
                        "r",    /* 1    FI_READ                         */
 
31
                        "w",    /* 2    FI_WRITE                **1)    */
 
32
                        "r+",   /* 3    FI_READ  | FI_WRITE             */
 
33
                        "b",    /* 4    FI_NONE  | FI_BINARY            */
 
34
                        "rb",   /* 5    FI_READ  | FI_BINARY            */
 
35
                        "wb",   /* 6    FI_WRITE | FI_BINARY    **1)    */
 
36
                        "r+b",  /* 7    FI_READ  | FI_WRITE | FI_BINARY */
 
37
 
 
38
/* + FI_APPEND  */      "",     /* 0    FI_NONE                         */
 
39
/* ...          */      "r",    /* 1    FI_READ                         */
 
40
                        "a",    /* 2    FI_WRITE                **1)    */
 
41
                        "a+",   /* 3    FI_READ  | FI_WRITE             */
 
42
                        "b",    /* 4    FI_NONE  | FI_BINARY            */
 
43
                        "rb",   /* 5    FI_READ  | FI_BINARY            */
 
44
                        "ab",   /* 6    FI_WRITE | FI_BINARY    **1)    */
 
45
                        "a+b",  /* 7    FI_READ  | FI_WRITE | FI_BINARY */
 
46
                };
 
47
/*
 
48
 * NOTES:
 
49
 *      1)      fdopen() guarantees not to create/trunc files in this case
 
50
 *
 
51
 *      "w"     will create/trunc files with fopen()
 
52
 *      "a"     will create files with fopen()
 
53
 */
 
54
 
 
55
 
 
56
EXPORT FILE *
 
57
_fcons(fd, f, flag)
 
58
        register FILE   *fd;
 
59
                int     f;
 
60
                int     flag;
 
61
{
 
62
        int     my_gflag = _io_glflag;
 
63
 
 
64
        if (fd == (FILE *)NULL)
 
65
                fd = fdopen(f,
 
66
                        fmtab[flag&(FI_READ|FI_WRITE|FI_BINARY | FI_APPEND)]);
 
67
 
 
68
        if (fd != (FILE *)NULL) {
 
69
                if (flag & FI_APPEND) {
 
70
                        (void) fseek(fd, (off_t)0, SEEK_END);
 
71
                }
 
72
                if (flag & FI_UNBUF) {
 
73
                        setbuf(fd, NULL);
 
74
                        my_gflag |= _IOUNBUF;
 
75
                }
 
76
                set_my_flag(fd, my_gflag); /* must clear it if fd is reused */
 
77
                return (fd);
 
78
        }
 
79
        if (flag & FI_CLOSE)
 
80
                close(f);
 
81
 
 
82
        return ((FILE *) NULL);
 
83
}