mirror of
git://gcc.gnu.org/git/gcc.git
synced 2025-03-21 22:51:06 +08:00
More stuff from Uli.
From-SVN: r15487
This commit is contained in:
parent
e693cc28bb
commit
382738969d
2
config/mt-linux
Normal file
2
config/mt-linux
Normal file
@ -0,0 +1,2 @@
|
||||
# When using glibc 2 on Linux we must always use vtable thunks.
|
||||
CXXFLAGS=-O2 -g -fvtable-thunks
|
26
libio/config/linuxlibc1.mt
Normal file
26
libio/config/linuxlibc1.mt
Normal file
@ -0,0 +1,26 @@
|
||||
# Since the Linux C library has libio, we have to be very careful.
|
||||
|
||||
# By default, we build libio and use it. If someone wants to not
|
||||
# build it, let them go to extra work. The reason is that the user
|
||||
# may want a newer, bug fixed libio, also on a linux 1.0.8 system
|
||||
# things just won't build with the bottom section uncommented.
|
||||
|
||||
# Comment this out to avoid including the stdio functions in libiostream.a:
|
||||
LIBIOSTREAM_OBJECTS = $(IO_OBJECTS) $(IOSTREAM_OBJECTS) $(STDIO_WRAP_OBJECTS) $(OSPRIM_OBJECTS)
|
||||
LIBIOSTREAM_DEP = $(LIBIOSTREAM_OBJECTS) stmp-stdio
|
||||
LIBIOSTREAM_USE = $(LIBIOSTREAM_OBJECTS) `cat stdio.list`
|
||||
|
||||
# Comment the above and uncomment the below to use the code in the Linux libc:
|
||||
# We have _G_config.h in /usr/include.
|
||||
# _G_CONFIG_H=
|
||||
|
||||
# We have those in libc.a.
|
||||
# IO_OBJECTS=
|
||||
# STDIO_WRAP_OBJECTS=
|
||||
# OSPRIM_OBJECTS=
|
||||
|
||||
# We have the rest in /usr/include.
|
||||
# USER_INCLUDES=PlotFile.h SFile.h builtinbuf.h editbuf.h fstream.h \
|
||||
# indstream.h iomanip.h iostream.h istream.h ostream.h \
|
||||
# parsestream.h pfstream.h procbuf.h stdiostream.h stream.h \
|
||||
# streambuf.h strfile.h strstream.h
|
168
libio/stdio/obprintf.c
Normal file
168
libio/stdio/obprintf.c
Normal file
@ -0,0 +1,168 @@
|
||||
/* Print output of stream to given obstack.
|
||||
Copyright (C) 1996, 1997 Free Software Foundation, Inc.
|
||||
This file is part of the GNU C Library.
|
||||
Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
|
||||
|
||||
The GNU C Library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU Library General Public License as
|
||||
published by the Free Software Foundation; either version 2 of the
|
||||
License, or (at your option) any later version.
|
||||
|
||||
The GNU C Library is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
Library General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU Library General Public
|
||||
License along with the GNU C Library; see the file COPYING.LIB. If not,
|
||||
write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
||||
Boston, MA 02111-1307, USA. */
|
||||
|
||||
|
||||
#ifdef __STDC__
|
||||
#include <stdlib.h>
|
||||
#endif
|
||||
#include "libioP.h"
|
||||
#include <string.h>
|
||||
#include <errno.h>
|
||||
#include <obstack.h>
|
||||
#include <stdarg.h>
|
||||
|
||||
|
||||
struct _IO_obstack_file
|
||||
{
|
||||
struct _IO_FILE file;
|
||||
const void *vtable;
|
||||
struct obstack *obstack;
|
||||
};
|
||||
|
||||
|
||||
static int
|
||||
_IO_obstack_overflow (_IO_FILE *fp, int c)
|
||||
{
|
||||
struct obstack *obstack = ((struct _IO_obstack_file *) fp)->obstack;
|
||||
|
||||
/* Make room for another character. This might as well allocate a
|
||||
new chunk a memory and moves the old contents over. */
|
||||
if (c != EOF)
|
||||
obstack_1grow (obstack, c);
|
||||
|
||||
/* Setup the buffer pointers again. */
|
||||
fp->_IO_write_base = obstack_base (obstack);
|
||||
fp->_IO_write_ptr = obstack_next_free (obstack);
|
||||
fp->_IO_write_end = fp->_IO_write_base + obstack_room (obstack);
|
||||
/* Now allocate the rest of the current chunk. */
|
||||
obstack_blank_fast (obstack, fp->_IO_write_end - fp->_IO_write_ptr);
|
||||
|
||||
return c;
|
||||
}
|
||||
|
||||
|
||||
static _IO_size_t
|
||||
_IO_obstack_xsputn (_IO_FILE *fp, const void *data, _IO_size_t n)
|
||||
{
|
||||
struct obstack *obstack = ((struct _IO_obstack_file *) fp)->obstack;
|
||||
|
||||
if (fp->_IO_write_ptr + n > fp->_IO_write_end)
|
||||
{
|
||||
/* We need some more memory. First shrink the buffer to the
|
||||
space we really currently need. */
|
||||
obstack_blank (obstack, fp->_IO_write_ptr - fp->_IO_write_end);
|
||||
|
||||
/* Now grow for N bytes. */
|
||||
obstack_blank (obstack, n);
|
||||
|
||||
/* Setup the buffer pointers again. */
|
||||
fp->_IO_write_base = obstack_base (obstack);
|
||||
fp->_IO_write_ptr = obstack_next_free (obstack);
|
||||
fp->_IO_write_end = (fp->_IO_write_base + obstack_room (obstack));
|
||||
/* Now allocate the rest of the current chunk. */
|
||||
obstack_blank_fast (obstack, fp->_IO_write_end - fp->_IO_write_ptr);
|
||||
}
|
||||
else
|
||||
{
|
||||
memcpy (fp->_IO_write_ptr, data, n);
|
||||
fp->_IO_write_ptr += n;
|
||||
}
|
||||
|
||||
return n;
|
||||
}
|
||||
|
||||
|
||||
/* the jump table. */
|
||||
static struct _IO_jump_t _IO_obstack_jumps =
|
||||
{
|
||||
JUMP_INIT_DUMMY,
|
||||
JUMP_INIT(finish, NULL),
|
||||
JUMP_INIT(overflow, _IO_obstack_overflow),
|
||||
JUMP_INIT(underflow, NULL),
|
||||
JUMP_INIT(uflow, NULL),
|
||||
JUMP_INIT(pbackfail, NULL),
|
||||
JUMP_INIT(xsputn, _IO_obstack_xsputn),
|
||||
JUMP_INIT(xsgetn, NULL),
|
||||
JUMP_INIT(seekoff, NULL),
|
||||
JUMP_INIT(seekpos, NULL),
|
||||
JUMP_INIT(setbuf, NULL),
|
||||
JUMP_INIT(sync, NULL),
|
||||
JUMP_INIT(doallocate, NULL),
|
||||
JUMP_INIT(read, NULL),
|
||||
JUMP_INIT(write, NULL),
|
||||
JUMP_INIT(seek, NULL),
|
||||
JUMP_INIT(close, NULL),
|
||||
JUMP_INIT(stat, NULL)
|
||||
};
|
||||
|
||||
|
||||
int
|
||||
_IO_obstack_vprintf (struct obstack *obstack, const char *format, va_list args)
|
||||
{
|
||||
struct obstack_FILE
|
||||
{
|
||||
struct _IO_obstack_file ofile;
|
||||
#ifdef _IO_MTSAFE_IO
|
||||
_IO_lock_t lock;
|
||||
#endif
|
||||
} new_f;
|
||||
int result;
|
||||
|
||||
#ifdef _IO_MTSAFE_IO
|
||||
new_f.ofile.file._lock = &new_f.lock;
|
||||
#endif
|
||||
|
||||
_IO_init ((_IO_FILE *) &new_f.ofile, 0);
|
||||
_IO_JUMPS (&new_f.ofile.file) = &_IO_obstack_jumps;
|
||||
_IO_str_init_static (&new_f.ofile.file, obstack_base (obstack),
|
||||
(obstack_object_size (obstack) +
|
||||
obstack_room (obstack)), obstack_next_free (obstack));
|
||||
/* Now allocate the rest of the current chunk. */
|
||||
obstack_blank_fast (obstack,
|
||||
(new_f.ofile.file._IO_write_end
|
||||
- new_f.ofile.file._IO_write_ptr));
|
||||
new_f.ofile.obstack = obstack;
|
||||
|
||||
result = _IO_vfprintf ((_IO_FILE *) &new_f, format, args);
|
||||
|
||||
/* Shrink the buffer to the space we really currently need. */
|
||||
obstack_blank (obstack, (new_f.ofile.file._IO_write_ptr
|
||||
- new_f.ofile.file._IO_write_end));
|
||||
|
||||
return result;
|
||||
}
|
||||
#ifdef weak_alias
|
||||
weak_alias (_IO_obstack_vprintf, obstack_vprintf)
|
||||
#endif
|
||||
|
||||
|
||||
int
|
||||
_IO_obstack_printf (struct obstack *obstack, const char *format, ...)
|
||||
{
|
||||
int result;
|
||||
va_list ap;
|
||||
va_start (ap, format);
|
||||
result = _IO_obstack_vprintf (obstack, format, ap);
|
||||
va_end (ap);
|
||||
return result;
|
||||
}
|
||||
#ifdef weak_alias
|
||||
weak_alias (_IO_obstack_printf, obstack_printf)
|
||||
#endif
|
72
libio/stdio/vasprintf.c
Normal file
72
libio/stdio/vasprintf.c
Normal file
@ -0,0 +1,72 @@
|
||||
/* Copyright (C) 1995, 1997 Free Software Foundation, Inc.
|
||||
This file is part of the GNU IO Library.
|
||||
|
||||
This library is free software; you can redistribute it and/or
|
||||
modify it under the terms of the GNU General Public License as
|
||||
published by the Free Software Foundation; either version 2, or (at
|
||||
your option) any later version.
|
||||
|
||||
This library is distributed in the hope that it will be useful, but
|
||||
WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
||||
General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this library; see the file COPYING. If not, write to
|
||||
the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
|
||||
MA 02111-1307, USA.
|
||||
|
||||
As a special exception, if you link this library with files
|
||||
compiled with a GNU compiler to produce an executable, this does
|
||||
not cause the resulting executable to be covered by the GNU General
|
||||
Public License. This exception does not however invalidate any
|
||||
other reasons why the executable file might be covered by the GNU
|
||||
General Public License. */
|
||||
|
||||
#include <malloc.h>
|
||||
#include "libioP.h"
|
||||
#include "stdio.h"
|
||||
#include "strfile.h"
|
||||
|
||||
int
|
||||
_IO_vasprintf (result_ptr, format, args)
|
||||
char **result_ptr;
|
||||
const char *format;
|
||||
_IO_va_list args;
|
||||
{
|
||||
/* Initial size of the buffer to be used. Will be doubled each time an
|
||||
overflow occurs. */
|
||||
const _IO_size_t init_string_size = 100;
|
||||
char *string;
|
||||
_IO_strfile sf;
|
||||
#ifdef _IO_MTSAFE_IO
|
||||
_IO_lock_t lock;
|
||||
#endif
|
||||
int ret;
|
||||
string = (char *) malloc (init_string_size);
|
||||
if (string == NULL)
|
||||
return -1;
|
||||
#ifdef _IO_MTSAFE_IO
|
||||
sf._sbf._f._lock = &lock;
|
||||
#endif
|
||||
_IO_init ((_IO_FILE *) &sf, 0);
|
||||
_IO_JUMPS ((_IO_FILE *) &sf) = &_IO_str_jumps;
|
||||
_IO_str_init_static ((_IO_FILE *) &sf, string, init_string_size, string);
|
||||
sf._sbf._f._flags &= ~_IO_USER_BUF;
|
||||
sf._s._allocate_buffer = (_IO_alloc_type) malloc;
|
||||
sf._s._free_buffer = (_IO_free_type) free;
|
||||
ret = _IO_vfprintf ((_IO_FILE *) &sf, format, args);
|
||||
if (ret < 0)
|
||||
return ret;
|
||||
*result_ptr = (char *) realloc (sf._sbf._f._IO_buf_base,
|
||||
(sf._sbf._f._IO_write_ptr
|
||||
- sf._sbf._f._IO_write_base) +1);
|
||||
if (*result_ptr == NULL)
|
||||
*result_ptr = sf._sbf._f._IO_buf_base;
|
||||
(*result_ptr)[sf._sbf._f._IO_write_ptr-sf._sbf._f._IO_write_base] = '\0';
|
||||
return ret;
|
||||
}
|
||||
|
||||
#ifdef weak_alias
|
||||
weak_alias (_IO_vasprintf, vasprintf)
|
||||
#endif
|
1
libstdc++/config/linux.mt
Normal file
1
libstdc++/config/linux.mt
Normal file
@ -0,0 +1 @@
|
||||
MT_CFLAGS = -D_PTHREADS
|
Loading…
x
Reference in New Issue
Block a user