1N/A/***********************************************************************
1N/A* *
1N/A* This software is part of the ast package *
1N/A* Copyright (c) 1985-2011 AT&T Intellectual Property *
1N/A* and is licensed under the *
1N/A* Common Public License, Version 1.0 *
1N/A* by AT&T Intellectual Property *
1N/A* *
1N/A* A copy of the License is available at *
1N/A* http://www.opensource.org/licenses/cpl1.0.txt *
1N/A* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
1N/A* *
1N/A* Information and Software Systems Research *
1N/A* AT&T Research *
1N/A* Florham Park NJ *
1N/A* *
1N/A* Glenn Fowler <gsf@research.att.com> *
1N/A* David Korn <dgk@research.att.com> *
1N/A* Phong Vo <kpv@research.att.com> *
1N/A* *
1N/A***********************************************************************/
1N/A#pragma prototyped
1N/A
1N/A#include "stdhdr.h"
1N/A
1N/Aint
1N/Avfwprintf(Sfio_t* f, const wchar_t* fmt, va_list args)
1N/A{
1N/A char* m;
1N/A char* x;
1N/A wchar_t*w;
1N/A size_t n;
1N/A int v;
1N/A Sfio_t* t;
1N/A
1N/A STDIO_INT(f, "vfwprintf", int, (Sfio_t*, const wchar_t*, va_list), (f, fmt, args))
1N/A
1N/A FWIDE(f, WEOF);
1N/A n = wcstombs(NiL, fmt, 0);
1N/A if (m = malloc(n + 1))
1N/A {
1N/A if (t = sfstropen())
1N/A {
1N/A wcstombs(m, fmt, n + 1);
1N/A sfvprintf(t, m, args);
1N/A free(m);
1N/A if (!(x = sfstruse(t)))
1N/A v = -1;
1N/A else
1N/A {
1N/A n = mbstowcs(NiL, x, 0);
1N/A if (w = (wchar_t*)sfreserve(f, n * sizeof(wchar_t) + 1, 0))
1N/A v = mbstowcs(w, x, n + 1);
1N/A else
1N/A v = -1;
1N/A }
1N/A sfstrclose(t);
1N/A }
1N/A else
1N/A v = -1;
1N/A }
1N/A else
1N/A v = -1;
1N/A return v;
1N/A}