|
Packit |
6c4009 |
/* Copyright (C) 1993-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
Written by Ulrich Drepper <drepper@cygnus.com>.
|
|
Packit |
6c4009 |
Based on the single byte version by Per Bothner <bothner@cygnus.com>.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
As a special exception, if you link the code in this file with
|
|
Packit |
6c4009 |
files compiled with a GNU compiler to produce an executable,
|
|
Packit |
6c4009 |
that does not cause the resulting executable to be covered by
|
|
Packit |
6c4009 |
the GNU Lesser General Public License. This exception does not
|
|
Packit |
6c4009 |
however invalidate any other reasons why the executable file
|
|
Packit |
6c4009 |
might be covered by the GNU Lesser General Public License.
|
|
Packit |
6c4009 |
This exception applies to code released by its copyright holders
|
|
Packit |
6c4009 |
in files containing the exception. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Generic or default I/O operations. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include "libioP.h"
|
|
Packit |
6c4009 |
#include <stdlib.h>
|
|
Packit |
6c4009 |
#include <string.h>
|
|
Packit |
6c4009 |
#include <wchar.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
static int save_for_wbackup (FILE *fp, wchar_t *end_p) __THROW;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Return minimum _pos markers
|
|
Packit |
6c4009 |
Assumes the current get area is the main get area. */
|
|
Packit |
6c4009 |
ssize_t
|
|
Packit |
6c4009 |
_IO_least_wmarker (FILE *fp, wchar_t *end_p)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
ssize_t least_so_far = end_p - fp->_wide_data->_IO_read_base;
|
|
Packit |
6c4009 |
struct _IO_marker *mark;
|
|
Packit |
6c4009 |
for (mark = fp->_markers; mark != NULL; mark = mark->_next)
|
|
Packit |
6c4009 |
if (mark->_pos < least_so_far)
|
|
Packit |
6c4009 |
least_so_far = mark->_pos;
|
|
Packit |
6c4009 |
return least_so_far;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_least_wmarker)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Switch current get area from backup buffer to (start of) main get area. */
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_switch_to_main_wget_area (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *tmp;
|
|
Packit |
6c4009 |
fp->_flags &= ~_IO_IN_BACKUP;
|
|
Packit |
6c4009 |
/* Swap _IO_read_end and _IO_save_end. */
|
|
Packit |
6c4009 |
tmp = fp->_wide_data->_IO_read_end;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_end = fp->_wide_data->_IO_save_end;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end= tmp;
|
|
Packit |
6c4009 |
/* Swap _IO_read_base and _IO_save_base. */
|
|
Packit |
6c4009 |
tmp = fp->_wide_data->_IO_read_base;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base = fp->_wide_data->_IO_save_base;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_base = tmp;
|
|
Packit |
6c4009 |
/* Set _IO_read_ptr. */
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = fp->_wide_data->_IO_read_base;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_switch_to_main_wget_area)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Switch current get area from main get area to (end of) backup area. */
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_switch_to_wbackup_area (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *tmp;
|
|
Packit |
6c4009 |
fp->_flags |= _IO_IN_BACKUP;
|
|
Packit |
6c4009 |
/* Swap _IO_read_end and _IO_save_end. */
|
|
Packit |
6c4009 |
tmp = fp->_wide_data->_IO_read_end;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_end = fp->_wide_data->_IO_save_end;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end = tmp;
|
|
Packit |
6c4009 |
/* Swap _IO_read_base and _IO_save_base. */
|
|
Packit |
6c4009 |
tmp = fp->_wide_data->_IO_read_base;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base = fp->_wide_data->_IO_save_base;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_base = tmp;
|
|
Packit |
6c4009 |
/* Set _IO_read_ptr. */
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = fp->_wide_data->_IO_read_end;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_switch_to_wbackup_area)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_wsetb (FILE *f, wchar_t *b, wchar_t *eb, int a)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (f->_wide_data->_IO_buf_base && !(f->_flags2 & _IO_FLAGS2_USER_WBUF))
|
|
Packit |
6c4009 |
free (f->_wide_data->_IO_buf_base);
|
|
Packit |
6c4009 |
f->_wide_data->_IO_buf_base = b;
|
|
Packit |
6c4009 |
f->_wide_data->_IO_buf_end = eb;
|
|
Packit |
6c4009 |
if (a)
|
|
Packit |
6c4009 |
f->_flags2 &= ~_IO_FLAGS2_USER_WBUF;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
f->_flags2 |= _IO_FLAGS2_USER_WBUF;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wsetb)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
_IO_wdefault_pbackfail (FILE *fp, wint_t c)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr > fp->_wide_data->_IO_read_base
|
|
Packit |
6c4009 |
&& !_IO_in_backup (fp)
|
|
Packit |
6c4009 |
&& (wint_t) fp->_IO_read_ptr[-1] == c)
|
|
Packit |
6c4009 |
--fp->_IO_read_ptr;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Need to handle a filebuf in write mode (switch to read mode). FIXME!*/
|
|
Packit |
6c4009 |
if (!_IO_in_backup (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* We need to keep the invariant that the main get area
|
|
Packit |
6c4009 |
logically follows the backup area. */
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr > fp->_wide_data->_IO_read_base
|
|
Packit |
6c4009 |
&& _IO_have_wbackup (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (save_for_wbackup (fp, fp->_wide_data->_IO_read_ptr))
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (!_IO_have_wbackup (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* No backup buffer: allocate one. */
|
|
Packit |
6c4009 |
/* Use nshort buffer, if unused? (probably not) FIXME */
|
|
Packit |
6c4009 |
int backup_size = 128;
|
|
Packit |
6c4009 |
wchar_t *bbuf = (wchar_t *) malloc (backup_size
|
|
Packit |
6c4009 |
* sizeof (wchar_t));
|
|
Packit |
6c4009 |
if (bbuf == NULL)
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_base = bbuf;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end = (fp->_wide_data->_IO_save_base
|
|
Packit |
6c4009 |
+ backup_size);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_backup_base = fp->_wide_data->_IO_save_end;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base = fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
_IO_switch_to_wbackup_area (fp);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (fp->_wide_data->_IO_read_ptr <= fp->_wide_data->_IO_read_base)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Increase size of existing backup buffer. */
|
|
Packit |
6c4009 |
size_t new_size;
|
|
Packit |
6c4009 |
size_t old_size = (fp->_wide_data->_IO_read_end
|
|
Packit |
6c4009 |
- fp->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
wchar_t *new_buf;
|
|
Packit |
6c4009 |
new_size = 2 * old_size;
|
|
Packit |
6c4009 |
new_buf = (wchar_t *) malloc (new_size * sizeof (wchar_t));
|
|
Packit |
6c4009 |
if (new_buf == NULL)
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
__wmemcpy (new_buf + (new_size - old_size),
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base, old_size);
|
|
Packit |
6c4009 |
free (fp->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
_IO_wsetg (fp, new_buf, new_buf + (new_size - old_size),
|
|
Packit |
6c4009 |
new_buf + new_size);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_backup_base = fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
*--fp->_wide_data->_IO_read_ptr = c;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
return c;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_pbackfail)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_wdefault_finish (FILE *fp, int dummy)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
struct _IO_marker *mark;
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_buf_base && !(fp->_flags2 & _IO_FLAGS2_USER_WBUF))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
free (fp->_wide_data->_IO_buf_base);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_buf_base = fp->_wide_data->_IO_buf_end = NULL;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
for (mark = fp->_markers; mark != NULL; mark = mark->_next)
|
|
Packit |
6c4009 |
mark->_sbuf = NULL;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fp->_IO_save_base)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
free (fp->_wide_data->_IO_save_base);
|
|
Packit |
6c4009 |
fp->_IO_save_base = NULL;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#ifdef _IO_MTSAFE_IO
|
|
Packit |
6c4009 |
if (fp->_lock != NULL)
|
|
Packit |
6c4009 |
_IO_lock_fini (*fp->_lock);
|
|
Packit |
6c4009 |
#endif
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
_IO_un_link ((struct _IO_FILE_plus *) fp);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_finish)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
_IO_wdefault_uflow (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wint_t wch;
|
|
Packit |
6c4009 |
wch = _IO_UNDERFLOW (fp);
|
|
Packit |
6c4009 |
if (wch == WEOF)
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
return *fp->_wide_data->_IO_read_ptr++;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_uflow)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
__woverflow (FILE *f, wint_t wch)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (f->_mode == 0)
|
|
Packit |
6c4009 |
_IO_fwide (f, 1);
|
|
Packit |
6c4009 |
return _IO_OVERFLOW (f, wch);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (__woverflow)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
__wuflow (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (fp->_mode < 0 || (fp->_mode == 0 && _IO_fwide (fp, 1) != 1))
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fp->_mode == 0)
|
|
Packit |
6c4009 |
_IO_fwide (fp, 1);
|
|
Packit |
6c4009 |
if (_IO_in_put_mode (fp))
|
|
Packit |
6c4009 |
if (_IO_switch_to_wget_mode (fp) == EOF)
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr < fp->_wide_data->_IO_read_end)
|
|
Packit |
6c4009 |
return *fp->_wide_data->_IO_read_ptr++;
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
_IO_switch_to_main_wget_area (fp);
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr < fp->_wide_data->_IO_read_end)
|
|
Packit |
6c4009 |
return *fp->_wide_data->_IO_read_ptr++;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if (_IO_have_markers (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (save_for_wbackup (fp, fp->_wide_data->_IO_read_end))
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (_IO_have_wbackup (fp))
|
|
Packit |
6c4009 |
_IO_free_wbackup_area (fp);
|
|
Packit |
6c4009 |
return _IO_UFLOW (fp);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (__wuflow)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
__wunderflow (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (fp->_mode < 0 || (fp->_mode == 0 && _IO_fwide (fp, 1) != 1))
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fp->_mode == 0)
|
|
Packit |
6c4009 |
_IO_fwide (fp, 1);
|
|
Packit |
6c4009 |
if (_IO_in_put_mode (fp))
|
|
Packit |
6c4009 |
if (_IO_switch_to_wget_mode (fp) == EOF)
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr < fp->_wide_data->_IO_read_end)
|
|
Packit |
6c4009 |
return *fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
_IO_switch_to_main_wget_area (fp);
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr < fp->_wide_data->_IO_read_end)
|
|
Packit |
6c4009 |
return *fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if (_IO_have_markers (fp))
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (save_for_wbackup (fp, fp->_wide_data->_IO_read_end))
|
|
Packit |
6c4009 |
return WEOF;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (_IO_have_backup (fp))
|
|
Packit |
6c4009 |
_IO_free_wbackup_area (fp);
|
|
Packit |
6c4009 |
return _IO_UNDERFLOW (fp);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (__wunderflow)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
size_t
|
|
Packit |
6c4009 |
_IO_wdefault_xsputn (FILE *f, const void *data, size_t n)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
const wchar_t *s = (const wchar_t *) data;
|
|
Packit |
6c4009 |
size_t more = n;
|
|
Packit |
6c4009 |
if (more <= 0)
|
|
Packit |
6c4009 |
return 0;
|
|
Packit |
6c4009 |
for (;;)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Space available. */
|
|
Packit |
6c4009 |
ssize_t count = (f->_wide_data->_IO_write_end
|
|
Packit |
6c4009 |
- f->_wide_data->_IO_write_ptr);
|
|
Packit |
6c4009 |
if (count > 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if ((size_t) count > more)
|
|
Packit |
6c4009 |
count = more;
|
|
Packit |
6c4009 |
if (count > 20)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
f->_wide_data->_IO_write_ptr =
|
|
Packit |
6c4009 |
__wmempcpy (f->_wide_data->_IO_write_ptr, s, count);
|
|
Packit |
6c4009 |
s += count;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (count <= 0)
|
|
Packit |
6c4009 |
count = 0;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *p = f->_wide_data->_IO_write_ptr;
|
|
Packit |
6c4009 |
ssize_t i;
|
|
Packit |
6c4009 |
for (i = count; --i >= 0; )
|
|
Packit |
6c4009 |
*p++ = *s++;
|
|
Packit |
6c4009 |
f->_wide_data->_IO_write_ptr = p;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
more -= count;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if (more == 0 || __woverflow (f, *s++) == WEOF)
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
more--;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
return n - more;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_xsputn)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
size_t
|
|
Packit |
6c4009 |
_IO_wdefault_xsgetn (FILE *fp, void *data, size_t n)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
size_t more = n;
|
|
Packit |
6c4009 |
wchar_t *s = (wchar_t*) data;
|
|
Packit |
6c4009 |
for (;;)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Data available. */
|
|
Packit |
6c4009 |
ssize_t count = (fp->_wide_data->_IO_read_end
|
|
Packit |
6c4009 |
- fp->_wide_data->_IO_read_ptr);
|
|
Packit |
6c4009 |
if (count > 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if ((size_t) count > more)
|
|
Packit |
6c4009 |
count = more;
|
|
Packit |
6c4009 |
if (count > 20)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
s = __wmempcpy (s, fp->_wide_data->_IO_read_ptr, count);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr += count;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (count <= 0)
|
|
Packit |
6c4009 |
count = 0;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *p = fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
int i = (int) count;
|
|
Packit |
6c4009 |
while (--i >= 0)
|
|
Packit |
6c4009 |
*s++ = *p++;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = p;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
more -= count;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
if (more == 0 || __wunderflow (fp) == WEOF)
|
|
Packit |
6c4009 |
break;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
return n - more;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_xsgetn)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_wdoallocbuf (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_buf_base)
|
|
Packit |
6c4009 |
return;
|
|
Packit |
6c4009 |
if (!(fp->_flags & _IO_UNBUFFERED))
|
|
Packit |
6c4009 |
if ((wint_t)_IO_WDOALLOCATE (fp) != WEOF)
|
|
Packit |
6c4009 |
return;
|
|
Packit |
6c4009 |
_IO_wsetb (fp, fp->_wide_data->_shortbuf,
|
|
Packit |
6c4009 |
fp->_wide_data->_shortbuf + 1, 0);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdoallocbuf)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
_IO_wdefault_doallocate (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *buf;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
buf = malloc (BUFSIZ);
|
|
Packit |
6c4009 |
if (__glibc_unlikely (buf == NULL))
|
|
Packit |
6c4009 |
return EOF;
|
|
Packit |
6c4009 |
_IO_wsetb (fp, buf, buf + BUFSIZ, 1);
|
|
Packit |
6c4009 |
return 1;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_wdefault_doallocate)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
_IO_switch_to_wget_mode (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_write_ptr > fp->_wide_data->_IO_write_base)
|
|
Packit |
6c4009 |
if ((wint_t)_IO_WOVERFLOW (fp, WEOF) == WEOF)
|
|
Packit |
6c4009 |
return EOF;
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base = fp->_wide_data->_IO_backup_base;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base = fp->_wide_data->_IO_buf_base;
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_write_ptr > fp->_wide_data->_IO_read_end)
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_end = fp->_wide_data->_IO_write_ptr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = fp->_wide_data->_IO_write_ptr;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_write_base = fp->_wide_data->_IO_write_ptr
|
|
Packit |
6c4009 |
= fp->_wide_data->_IO_write_end = fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
fp->_flags &= ~_IO_CURRENTLY_PUTTING;
|
|
Packit |
6c4009 |
return 0;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_switch_to_wget_mode)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_free_wbackup_area (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
_IO_switch_to_main_wget_area (fp); /* Just in case. */
|
|
Packit |
6c4009 |
free (fp->_wide_data->_IO_save_base);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_base = NULL;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end = NULL;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_backup_base = NULL;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_free_wbackup_area)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
static int
|
|
Packit |
6c4009 |
save_for_wbackup (FILE *fp, wchar_t *end_p)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
/* Append [_IO_read_base..end_p] to backup area. */
|
|
Packit |
6c4009 |
ssize_t least_mark = _IO_least_wmarker (fp, end_p);
|
|
Packit |
6c4009 |
/* needed_size is how much space we need in the backup area. */
|
|
Packit |
6c4009 |
size_t needed_size = ((end_p - fp->_wide_data->_IO_read_base)
|
|
Packit |
6c4009 |
- least_mark);
|
|
Packit |
6c4009 |
/* FIXME: Dubious arithmetic if pointers are NULL */
|
|
Packit |
6c4009 |
size_t current_Bsize = (fp->_wide_data->_IO_save_end
|
|
Packit |
6c4009 |
- fp->_wide_data->_IO_save_base);
|
|
Packit |
6c4009 |
size_t avail; /* Extra space available for future expansion. */
|
|
Packit |
6c4009 |
ssize_t delta;
|
|
Packit |
6c4009 |
struct _IO_marker *mark;
|
|
Packit |
6c4009 |
if (needed_size > current_Bsize)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wchar_t *new_buffer;
|
|
Packit |
6c4009 |
avail = 100;
|
|
Packit |
6c4009 |
new_buffer = (wchar_t *) malloc ((avail + needed_size)
|
|
Packit |
6c4009 |
* sizeof (wchar_t));
|
|
Packit |
6c4009 |
if (new_buffer == NULL)
|
|
Packit |
6c4009 |
return EOF; /* FIXME */
|
|
Packit |
6c4009 |
if (least_mark < 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
__wmempcpy (__wmempcpy (new_buffer + avail,
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end + least_mark,
|
|
Packit |
6c4009 |
-least_mark),
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base,
|
|
Packit |
6c4009 |
end_p - fp->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
__wmemcpy (new_buffer + avail,
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base + least_mark,
|
|
Packit |
6c4009 |
needed_size);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
free (fp->_wide_data->_IO_save_base);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_base = new_buffer;
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end = new_buffer + avail + needed_size;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
avail = current_Bsize - needed_size;
|
|
Packit |
6c4009 |
if (least_mark < 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
__wmemmove (fp->_wide_data->_IO_save_base + avail,
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_save_end + least_mark,
|
|
Packit |
6c4009 |
-least_mark);
|
|
Packit |
6c4009 |
__wmemcpy (fp->_wide_data->_IO_save_base + avail - least_mark,
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base,
|
|
Packit |
6c4009 |
end_p - fp->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else if (needed_size > 0)
|
|
Packit |
6c4009 |
__wmemcpy (fp->_wide_data->_IO_save_base + avail,
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_base + least_mark,
|
|
Packit |
6c4009 |
needed_size);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_backup_base = fp->_wide_data->_IO_save_base + avail;
|
|
Packit |
6c4009 |
/* Adjust all the streammarkers. */
|
|
Packit |
6c4009 |
delta = end_p - fp->_wide_data->_IO_read_base;
|
|
Packit |
6c4009 |
for (mark = fp->_markers; mark != NULL; mark = mark->_next)
|
|
Packit |
6c4009 |
mark->_pos -= delta;
|
|
Packit |
6c4009 |
return 0;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
_IO_sputbackwc (FILE *fp, wint_t c)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wint_t result;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr > fp->_wide_data->_IO_read_base
|
|
Packit |
6c4009 |
&& (wchar_t)fp->_wide_data->_IO_read_ptr[-1] == (wchar_t) c)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr--;
|
|
Packit |
6c4009 |
result = c;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
result = _IO_PBACKFAIL (fp, c);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (result != WEOF)
|
|
Packit |
6c4009 |
fp->_flags &= ~_IO_EOF_SEEN;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return result;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
libc_hidden_def (_IO_sputbackwc)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
wint_t
|
|
Packit |
6c4009 |
_IO_sungetwc (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
wint_t result;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (fp->_wide_data->_IO_read_ptr > fp->_wide_data->_IO_read_base)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr--;
|
|
Packit |
6c4009 |
result = *fp->_wide_data->_IO_read_ptr;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
result = _IO_PBACKFAIL (fp, EOF);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (result != WEOF)
|
|
Packit |
6c4009 |
fp->_flags &= ~_IO_EOF_SEEN;
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
return result;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
unsigned
|
|
Packit |
6c4009 |
_IO_adjust_wcolumn (unsigned start, const wchar_t *line, int count)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
const wchar_t *ptr = line + count;
|
|
Packit |
6c4009 |
while (ptr > line)
|
|
Packit |
6c4009 |
if (*--ptr == L'\n')
|
|
Packit |
6c4009 |
return line + count - ptr - 1;
|
|
Packit |
6c4009 |
return start + count;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_init_wmarker (struct _IO_marker *marker, FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
marker->_sbuf = fp;
|
|
Packit |
6c4009 |
if (_IO_in_put_mode (fp))
|
|
Packit |
6c4009 |
_IO_switch_to_wget_mode (fp);
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
marker->_pos = fp->_wide_data->_IO_read_ptr - fp->_wide_data->_IO_read_end;
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
marker->_pos = (fp->_wide_data->_IO_read_ptr
|
|
Packit |
6c4009 |
- fp->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Should perhaps sort the chain? */
|
|
Packit |
6c4009 |
marker->_next = fp->_markers;
|
|
Packit |
6c4009 |
fp->_markers = marker;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#define BAD_DELTA EOF
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Return difference between MARK and current position of MARK's stream. */
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
_IO_wmarker_delta (struct _IO_marker *mark)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
int cur_pos;
|
|
Packit |
6c4009 |
if (mark->_sbuf == NULL)
|
|
Packit |
6c4009 |
return BAD_DELTA;
|
|
Packit |
6c4009 |
if (_IO_in_backup (mark->_sbuf))
|
|
Packit |
6c4009 |
cur_pos = (mark->_sbuf->_wide_data->_IO_read_ptr
|
|
Packit |
6c4009 |
- mark->_sbuf->_wide_data->_IO_read_end);
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
cur_pos = (mark->_sbuf->_wide_data->_IO_read_ptr
|
|
Packit |
6c4009 |
- mark->_sbuf->_wide_data->_IO_read_base);
|
|
Packit |
6c4009 |
return mark->_pos - cur_pos;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
int
|
|
Packit |
6c4009 |
_IO_seekwmark (FILE *fp, struct _IO_marker *mark, int delta)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (mark->_sbuf != fp)
|
|
Packit |
6c4009 |
return EOF;
|
|
Packit |
6c4009 |
if (mark->_pos >= 0)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (_IO_in_backup (fp))
|
|
Packit |
6c4009 |
_IO_switch_to_main_wget_area (fp);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = (fp->_wide_data->_IO_read_base
|
|
Packit |
6c4009 |
+ mark->_pos);
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
else
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
if (!_IO_in_backup (fp))
|
|
Packit |
6c4009 |
_IO_switch_to_wbackup_area (fp);
|
|
Packit |
6c4009 |
fp->_wide_data->_IO_read_ptr = fp->_wide_data->_IO_read_end + mark->_pos;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
return 0;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
void
|
|
Packit |
6c4009 |
_IO_unsave_wmarkers (FILE *fp)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
struct _IO_marker *mark = fp->_markers;
|
|
Packit |
6c4009 |
if (mark)
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
fp->_markers = 0;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
if (_IO_have_backup (fp))
|
|
Packit |
6c4009 |
_IO_free_wbackup_area (fp);
|
|
Packit |
6c4009 |
}
|