← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to mysys/my_fstream.c

  • Committer: brian
  • Date: 2008-06-25 05:29:13 UTC
  • Revision ID: brian@localhost.localdomain-20080625052913-6upwo0jsrl4lnapl
clean slate

Show diffs side-by-side

added added

removed removed

Lines of Context:
mysys/my_fstream.c
 
1
/* Copyright (C) 2000 MySQL AB
 
2
 
 
3
   This program is free software; you can redistribute it and/or modify
 
4
   it under the terms of the GNU General Public License as published by
 
5
   the Free Software Foundation; version 2 of the License.
 
6
 
 
7
   This program is distributed in the hope that it will be useful,
 
8
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
9
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
10
   GNU General Public License for more details.
 
11
 
 
12
   You should have received a copy of the GNU General Public License
 
13
   along with this program; if not, write to the Free Software
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
/* USE_MY_STREAM isn't set because we can't thrust my_fclose! */
 
17
 
 
18
#include "mysys_priv.h"
 
19
#include "mysys_err.h"
 
20
#include <errno.h>
 
21
#include <stdio.h>
 
22
 
 
23
#ifdef HAVE_FSEEKO
 
24
#undef ftell
 
25
#undef fseek
 
26
#define ftell(A) ftello(A)
 
27
#define fseek(A,B,C) fseeko((A),(B),(C))
 
28
#endif
 
29
 
 
30
/*
 
31
  Read a chunk of bytes from a FILE
 
32
 
 
33
  SYNOPSIS
 
34
   my_fread()
 
35
   stream       File descriptor
 
36
   Buffer       Buffer to read to
 
37
   Count        Number of bytes to read
 
38
   MyFlags      Flags on what to do on error
 
39
 
 
40
  RETURN
 
41
    (size_t) -1 Error
 
42
    #           Number of bytes read
 
43
 */
 
44
 
 
45
size_t my_fread(FILE *stream, uchar *Buffer, size_t Count, myf MyFlags)
 
46
{
 
47
  size_t readbytes;
 
48
  DBUG_ENTER("my_fread");
 
49
  DBUG_PRINT("my",("stream: 0x%lx  Buffer: 0x%lx  Count: %u  MyFlags: %d",
 
50
                   (long) stream, (long) Buffer, (uint) Count, MyFlags));
 
51
 
 
52
  if ((readbytes= fread(Buffer, sizeof(char), Count, stream)) != Count)
 
53
  {
 
54
    DBUG_PRINT("error",("Read only %d bytes", (int) readbytes));
 
55
    if (MyFlags & (MY_WME | MY_FAE | MY_FNABP))
 
56
    {
 
57
      if (ferror(stream))
 
58
        my_error(EE_READ, MYF(ME_BELL+ME_WAITTANG),
 
59
                 my_filename(fileno(stream)),errno);
 
60
      else
 
61
      if (MyFlags & (MY_NABP | MY_FNABP))
 
62
        my_error(EE_EOFERR, MYF(ME_BELL+ME_WAITTANG),
 
63
                 my_filename(fileno(stream)),errno);
 
64
    }
 
65
    my_errno=errno ? errno : -1;
 
66
    if (ferror(stream) || MyFlags & (MY_NABP | MY_FNABP))
 
67
      DBUG_RETURN((size_t) -1);                 /* Return with error */
 
68
  }
 
69
  if (MyFlags & (MY_NABP | MY_FNABP))
 
70
    DBUG_RETURN(0);                             /* Read ok */
 
71
  DBUG_RETURN(readbytes);
 
72
} /* my_fread */
 
73
 
 
74
 
 
75
/*
 
76
  Write a chunk of bytes to a stream
 
77
 
 
78
   my_fwrite()
 
79
   stream       File descriptor
 
80
   Buffer       Buffer to write from
 
81
   Count        Number of bytes to write
 
82
   MyFlags      Flags on what to do on error
 
83
 
 
84
  RETURN
 
85
    (size_t) -1 Error
 
86
    #           Number of bytes written
 
87
*/
 
88
 
 
89
size_t my_fwrite(FILE *stream, const uchar *Buffer, size_t Count, myf MyFlags)
 
90
{
 
91
  size_t writtenbytes =0;
 
92
  my_off_t seekptr;
 
93
#if !defined(NO_BACKGROUND) && defined(USE_MY_STREAM)
 
94
  uint errors;
 
95
#endif
 
96
  DBUG_ENTER("my_fwrite");
 
97
  DBUG_PRINT("my",("stream: 0x%lx  Buffer: 0x%lx  Count: %u  MyFlags: %d",
 
98
                   (long) stream, (long) Buffer, (uint) Count, MyFlags));
 
99
 
 
100
#if !defined(NO_BACKGROUND) && defined(USE_MY_STREAM)
 
101
  errors=0;
 
102
#endif
 
103
  seekptr= ftell(stream);
 
104
  for (;;)
 
105
  {
 
106
    size_t written;
 
107
    if ((written = (size_t) fwrite((char*) Buffer,sizeof(char),
 
108
                                   Count, stream)) != Count)
 
109
    {
 
110
      DBUG_PRINT("error",("Write only %d bytes", (int) writtenbytes));
 
111
      my_errno=errno;
 
112
      if (written != (size_t) -1)
 
113
      {
 
114
        seekptr+=written;
 
115
        Buffer+=written;
 
116
        writtenbytes+=written;
 
117
        Count-=written;
 
118
      }
 
119
#ifdef EINTR
 
120
      if (errno == EINTR)
 
121
      {
 
122
        VOID(my_fseek(stream,seekptr,MY_SEEK_SET,MYF(0)));
 
123
        continue;
 
124
      }
 
125
#endif
 
126
#if !defined(NO_BACKGROUND) && defined(USE_MY_STREAM)
 
127
#ifdef THREAD
 
128
      if (my_thread_var->abort)
 
129
        MyFlags&= ~ MY_WAIT_IF_FULL;            /* End if aborted by user */
 
130
#endif
 
131
      if ((errno == ENOSPC || errno == EDQUOT) &&
 
132
          (MyFlags & MY_WAIT_IF_FULL))
 
133
      {
 
134
        if (!(errors++ % MY_WAIT_GIVE_USER_A_MESSAGE))
 
135
          my_error(EE_DISK_FULL,MYF(ME_BELL | ME_NOREFRESH),
 
136
                   "[stream]",my_errno,MY_WAIT_FOR_USER_TO_FIX_PANIC);
 
137
        VOID(sleep(MY_WAIT_FOR_USER_TO_FIX_PANIC));
 
138
        VOID(my_fseek(stream,seekptr,MY_SEEK_SET,MYF(0)));
 
139
        continue;
 
140
      }
 
141
#endif
 
142
      if (ferror(stream) || (MyFlags & (MY_NABP | MY_FNABP)))
 
143
      {
 
144
        if (MyFlags & (MY_WME | MY_FAE | MY_FNABP))
 
145
        {
 
146
          my_error(EE_WRITE, MYF(ME_BELL+ME_WAITTANG),
 
147
                   my_filename(fileno(stream)),errno);
 
148
        }
 
149
        writtenbytes= (size_t) -1;        /* Return that we got error */
 
150
        break;
 
151
      }
 
152
    }
 
153
    if (MyFlags & (MY_NABP | MY_FNABP))
 
154
      writtenbytes= 0;                          /* Everything OK */
 
155
    else
 
156
      writtenbytes+= written;
 
157
    break;
 
158
  }
 
159
  DBUG_RETURN(writtenbytes);
 
160
} /* my_fwrite */
 
161
 
 
162
 
 
163
/* Seek to position in file */
 
164
 
 
165
my_off_t my_fseek(FILE *stream, my_off_t pos, int whence,
 
166
                  myf MyFlags __attribute__((unused)))
 
167
{
 
168
  DBUG_ENTER("my_fseek");
 
169
  DBUG_PRINT("my",("stream: 0x%lx  pos: %lu  whence: %d  MyFlags: %d",
 
170
                   (long) stream, (long) pos, whence, MyFlags));
 
171
  DBUG_RETURN(fseek(stream, (off_t) pos, whence) ?
 
172
              MY_FILEPOS_ERROR : (my_off_t) ftell(stream));
 
173
} /* my_seek */
 
174
 
 
175
 
 
176
/* Tell current position of file */
 
177
 
 
178
my_off_t my_ftell(FILE *stream, myf MyFlags __attribute__((unused)))
 
179
{
 
180
  off_t pos;
 
181
  DBUG_ENTER("my_ftell");
 
182
  DBUG_PRINT("my",("stream: 0x%lx  MyFlags: %d", (long) stream, MyFlags));
 
183
  pos=ftell(stream);
 
184
  DBUG_PRINT("exit",("ftell: %lu",(ulong) pos));
 
185
  DBUG_RETURN((my_off_t) pos);
 
186
} /* my_ftell */