Loading...
stdio/FreeBSD/vfprintf.c.patch Libc-391.5.22 Libc-391
--- Libc/Libc-391.5.22/stdio/FreeBSD/vfprintf.c.patch
+++ Libc/Libc-391/stdio/FreeBSD/vfprintf.c.patch
@@ -1,5 +1,5 @@
 --- vfprintf.c.orig	2004-11-25 11:38:35.000000000 -0800
-+++ vfprintf.c	2005-11-08 22:43:11.000000000 -0800
++++ vfprintf.c	2005-02-24 15:16:20.000000000 -0800
 @@ -40,6 +40,8 @@
  #include <sys/cdefs.h>
  __FBSDID("$FreeBSD: src/lib/libc/stdio/vfprintf.c,v 1.68 2004/08/26 06:25:28 des Exp $");
@@ -17,25 +17,24 @@
  
  #include <stdarg.h>
  #include "un-namespace.h"
-@@ -66,6 +69,13 @@
+@@ -66,6 +69,12 @@
  #include "local.h"
  #include "fvwrite.h"
  
-+#ifdef VECTORS
-+typedef __attribute__ ((vector_size(16))) unsigned char VECTORTYPE;
-+#ifdef __SSE2__
-+#define V64TYPE
-+#endif /* __SSE2__ */
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++#include <machine/cpu_capabilities.h>
++
++#define VECTORTYPE    vector unsigned char
++#endif /* ALTIVEC */
 +
  union arg {
  	int	intarg;
  	u_int	uintarg;
-@@ -93,6 +103,21 @@
+@@ -93,6 +102,16 @@
  #endif
  	wint_t	wintarg;
  	wchar_t	*pwchararg;
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +	VECTORTYPE		vectorarg;
 +	unsigned char		vuchararg[16];
 +	signed char		vchararg[16];
@@ -44,24 +43,19 @@
 +	unsigned int		vuintarg[4];
 +	signed int		vintarg[4];
 +	float			vfloatarg[4];
-+#ifdef V64TYPE
-+	double			vdoublearg[2];
-+	unsigned long long	vulonglongarg[2];
-+	long long		vlonglongarg[2];
-+#endif /* V64TYPE */
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  };
  
  /*
-@@ -103,16 +128,20 @@
+@@ -103,19 +122,56 @@
  	T_LONG, T_U_LONG, TP_LONG, T_LLONG, T_U_LLONG, TP_LLONG,
  	T_PTRDIFFT, TP_PTRDIFFT, T_SIZET, TP_SIZET,
  	T_INTMAXT, T_UINTMAXT, TP_INTMAXT, TP_VOID, TP_CHAR, TP_SCHAR,
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +	T_DOUBLE, T_LONG_DOUBLE, T_WINT, TP_WCHAR, T_VECTOR
-+#else /* ! VECTORS */
++#else /* ! ALTIVEC */
  	T_DOUBLE, T_LONG_DOUBLE, T_WINT, TP_WCHAR
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  };
  
  static int	__sprint(FILE *, struct __suio *);
@@ -76,7 +70,43 @@
  static void	__find_arguments(const char *, va_list, union arg **);
  static void	__grow_type_table(int, enum typeid **, int *);
  
-@@ -141,7 +170,7 @@
++	/*
++	 * Get the argument indexed by nextarg.   If the argument table is
++	 * built, use it to get the argument.  If its not, get the next
++	 * argument (and arguments must be gotten sequentially).
++	 */
++#define GETARG(type) \
++	((argtable != NULL) ? *((type*)(&argtable[nextarg++])) : \
++	    (nextarg++, va_arg(ap, type)))
++
++#ifdef ALTIVEC
++#define hasAltivec	(_cpu_capabilities & kHasAltivec)
++/*-----------------------------------------------------------------------
++ * getvec() must be a real subroutine.  If it is a #define, then __vfprintf()
++ * would have its calling sequence changed by Altivec so that a non-Altivec
++ * processor would crash on illegal instruction.  By isolating the calling
++ * sequence in getvec(), __vprintf() is callable by a non-Altivec processor.
++ *-----------------------------------------------------------------------*/
++static va_list getvec(union arg *, const union arg *, int, va_list) __attribute__((noinline));
++
++static va_list
++getvec(union arg *dst, const union arg *argtable, int nextarg, va_list ap)
++{
++	dst->vectorarg = GETARG(VECTORTYPE);
++	return ap;
++}
++
++#define SETVEC(dst)	\
++{ \
++	ap = getvec(&dst, argtable, nextarg, ap); \
++	nextarg++; \
++}
++#endif /* ALTIVEC */
++
+ /*
+  * Flush out all the vectors defined by the given uio,
+  * then reset it so that it can be reused.
+@@ -141,7 +197,7 @@
   * worries about ungetc buffers and so forth.
   */
  static int
@@ -85,7 +115,7 @@
  {
  	int ret;
  	FILE fake;
-@@ -160,7 +189,7 @@
+@@ -160,7 +216,7 @@
  	fake._lbfsize = 0;	/* not actually used, but Just In Case */
  
  	/* do the work, then copy any error status */
@@ -94,7 +124,7 @@
  	if (ret >= 0 && __fflush(&fake))
  		ret = EOF;
  	if (fake._flags & __SERR)
-@@ -336,7 +365,7 @@
+@@ -336,7 +392,7 @@
   * that the wide char. string ends in a null character.
   */
  static char *
@@ -103,7 +133,7 @@
  {
  	static const mbstate_t initial;
  	mbstate_t mbs;
-@@ -354,7 +383,7 @@
+@@ -354,7 +410,7 @@
  		p = wcsarg;
  		mbs = initial;
  		for (;;) {
@@ -112,7 +142,7 @@
  			if (clen == 0 || clen == (size_t)-1 ||
  			    nbytes + clen > prec)
  				break;
-@@ -363,7 +392,7 @@
+@@ -363,7 +419,7 @@
  	} else {
  		p = wcsarg;
  		mbs = initial;
@@ -121,7 +151,7 @@
  		if (nbytes == (size_t)-1)
  			return (NULL);
  	}
-@@ -378,7 +407,7 @@
+@@ -378,7 +434,7 @@
  	p = wcsarg;
  	mbs = initial;
  	while (mbp - convbuf < nbytes) {
@@ -130,7 +160,7 @@
  		if (clen == 0 || clen == (size_t)-1)
  			break;
  		mbp += clen;
-@@ -402,7 +431,21 @@
+@@ -402,7 +458,21 @@
  	int ret;
  
  	FLOCKFILE(fp);
@@ -153,13 +183,13 @@
  	FUNLOCKFILE(fp);
  	return (ret);
  }
-@@ -451,12 +494,15 @@
+@@ -451,12 +521,15 @@
  #define	PTRDIFFT	0x800		/* ptrdiff_t */
  #define	INTMAXT		0x1000		/* intmax_t */
  #define	CHARINT		0x2000		/* print char using int format */
-+#ifdef VECTORS
-+#define	VECTOR		0x4000		/* Altivec or SSE vector */
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++#define	VECTOR		0x4000		/* Altivec vector */
++#endif /* ALTIVEC */
  
  /*
   * Non-MT-safe version
@@ -171,11 +201,11 @@
  {
  	char *fmt;		/* format string */
  	int ch;			/* character from fmt */
-@@ -502,6 +548,11 @@
+@@ -502,6 +575,11 @@
  	int nseps;		/* number of group separators with ' */
  	int nrepeats;		/* number of repeats of the last group */
  #endif
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +	union arg vval;		/* Vector argument. */
 +	char *pct;		/* Pointer to '%' at beginning of specifier. */
 +	char vsep;		/* Vector separator character. */
@@ -183,7 +213,23 @@
  	u_long	ulval;		/* integer arguments %[diouxX] */
  	uintmax_t ujval;	/* %j, %ll, %q, %t, %z integers */
  	int base;		/* base for [diouxX] conversion */
-@@ -633,22 +684,23 @@
+@@ -574,15 +652,6 @@
+ }
+ 
+ 	/*
+-	 * Get the argument indexed by nextarg.   If the argument table is
+-	 * built, use it to get the argument.  If its not, get the next
+-	 * argument (and arguments must be gotten sequentially).
+-	 */
+-#define GETARG(type) \
+-	((argtable != NULL) ? *((type*)(&argtable[nextarg++])) : \
+-	    (nextarg++, va_arg(ap, type)))
+-
+-	/*
+ 	 * To extend shorts properly, we need both signed and unsigned
+ 	 * argument extraction methods.
+ 	 */
+@@ -633,22 +702,23 @@
  		val = GETARG (int); \
  	}
  
@@ -211,39 +257,39 @@
  
  	fmt = (char *)fmt0;
  	argtable = NULL;
-@@ -675,6 +727,9 @@
+@@ -675,6 +745,9 @@
  		}
  		if (ch == '\0')
  			goto done;
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		pct = fmt;
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  		fmt++;		/* skip over '%' */
  
  		flags = 0;
-@@ -683,6 +738,9 @@
+@@ -683,6 +756,9 @@
  		prec = -1;
  		sign = '\0';
  		ox[1] = '\0';
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		vsep = 'X'; /* Illegal value, changed to defaults later. */
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  
  rflag:		ch = *fmt++;
  reswitch:	switch (ch) {
-@@ -698,6 +756,11 @@
+@@ -698,6 +774,11 @@
  		case '#':
  			flags |= ALT;
  			goto rflag;
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		case ',': case ';': case ':': case '_':
 +			vsep = ch;
 +			goto rflag;
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  		case '*':
  			/*-
  			 * ``A negative field width argument is taken as a
-@@ -718,8 +781,8 @@
+@@ -718,8 +799,8 @@
  			goto rflag;
  		case '\'':
  			flags |= GROUPING;
@@ -254,14 +300,16 @@
  			goto rflag;
  		case '.':
  			if ((ch = *fmt++) == '*') {
-@@ -793,14 +856,18 @@
+@@ -793,14 +874,20 @@
  			flags |= LONGINT;
  			/*FALLTHROUGH*/
  		case 'c':
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (flags & LONGINT) {
  				static const mbstate_t initial;
  				mbstate_t mbs;
@@ -275,31 +323,34 @@
  				if (mbseqlen == (size_t)-1) {
  					fp->_flags |= __SERR;
  					goto error;
-@@ -817,6 +884,10 @@
+@@ -817,6 +904,12 @@
  			/*FALLTHROUGH*/
  		case 'd':
  		case 'i':
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (flags & INTMAX_SIZE) {
  				ujval = SJARG();
  				if ((intmax_t)ujval < 0) {
-@@ -835,6 +906,12 @@
+@@ -835,6 +928,13 @@
  #ifndef NO_FLOATING_POINT
  		case 'a':
  		case 'A':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR) {
 +				flags |= FPT;
-+				break;
-+			}
-+#endif /* VECTORS */
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (ch == 'a') {
  				ox[1] = 'x';
  				xdigs = xdigs_lower;
-@@ -848,6 +925,12 @@
+@@ -848,6 +948,12 @@
  				prec++;
  			if (dtoaresult != NULL)
  				freedtoa(dtoaresult);
@@ -312,7 +363,7 @@
  			if (flags & LONGDBL) {
  				fparg.ldbl = GETARG(long double);
  				dtoaresult = cp =
-@@ -859,6 +942,7 @@
+@@ -859,6 +965,7 @@
  				    __hdtoa(fparg.dbl, xdigs, prec,
  				    &expt, &signflag, &dtoaend);
  			}
@@ -320,43 +371,46 @@
  			if (prec < 0)
  				prec = dtoaend - cp;
  			if (expt == INT_MAX)
-@@ -866,6 +950,12 @@
+@@ -866,6 +973,13 @@
  			goto fp_common;
  		case 'e':
  		case 'E':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR) {
 +				flags |= FPT;
-+				break;
-+			}
-+#endif /* VECTORS */
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			expchar = ch;
  			if (prec < 0)	/* account for digit before decpt */
  				prec = DEFPREC + 1;
-@@ -874,10 +964,22 @@
+@@ -874,10 +988,24 @@
  			goto fp_begin;
  		case 'f':
  		case 'F':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR) {
 +				flags |= FPT;
-+				break;
-+			}
-+#endif /* VECTORS */
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			expchar = '\0';
  			goto fp_begin;
  		case 'g':
  		case 'G':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR) {
 +				flags |= FPT;
-+				break;
-+			}
-+#endif /* VECTORS */
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			expchar = ch - ('g' - 'e');
  			if (prec == 0)
  				prec = 1;
-@@ -886,6 +988,14 @@
+@@ -886,6 +1014,14 @@
  				prec = DEFPREC;
  			if (dtoaresult != NULL)
  				freedtoa(dtoaresult);
@@ -371,7 +425,7 @@
  			if (flags & LONGDBL) {
  				fparg.ldbl = GETARG(long double);
  				dtoaresult = cp =
-@@ -899,6 +1009,7 @@
+@@ -899,6 +1035,7 @@
  				if (expt == 9999)
  					expt = INT_MAX;
  			}
@@ -379,29 +433,33 @@
  fp_common:
  			if (signflag)
  				sign = '-';
-@@ -993,6 +1104,10 @@
+@@ -993,6 +1130,12 @@
  			flags |= LONGINT;
  			/*FALLTHROUGH*/
  		case 'o':
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (flags & INTMAX_SIZE)
  				ujval = UJARG();
  			else
-@@ -1007,6 +1122,10 @@
+@@ -1007,6 +1150,12 @@
  			 * defined manner.''
  			 *	-- ANSI X3J11
  			 */
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			ujval = (uintmax_t)(uintptr_t)GETARG(void *);
  			base = 16;
  			xdigs = xdigs_lower;
-@@ -1025,7 +1144,7 @@
+@@ -1025,7 +1174,7 @@
  				if ((wcp = GETARG(wchar_t *)) == NULL)
  					cp = "(null)";
  				else {
@@ -410,45 +468,52 @@
  					if (convbuf == NULL) {
  						fp->_flags |= __SERR;
  						goto error;
-@@ -1056,6 +1175,10 @@
+@@ -1056,6 +1205,12 @@
  			flags |= LONGINT;
  			/*FALLTHROUGH*/
  		case 'u':
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (flags & INTMAX_SIZE)
  				ujval = UJARG();
  			else
-@@ -1068,6 +1191,10 @@
+@@ -1068,6 +1223,12 @@
  		case 'x':
  			xdigs = xdigs_lower;
  hex:
-+#ifdef VECTORS
-+			if (flags & VECTOR)
-+				break;
-+#endif /* VECTORS */
++#ifdef ALTIVEC
++			if (flags & VECTOR) {
++				SETVEC(vval);
++				break;
++			}
++#endif /* ALTIVEC */
  			if (flags & INTMAX_SIZE)
  				ujval = UJARG();
  			else
-@@ -1112,6 +1239,11 @@
+@@ -1112,6 +1273,14 @@
  			if (size > BUF)	/* should never happen */
  				abort();
  			break;
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		case 'v':
-+			flags |= VECTOR;
-+			goto rflag;
-+#endif /* VECTORS */
++			if (hasAltivec) {
++				flags |= VECTOR;
++				goto rflag;
++			}
++			/* drap through */
++#endif /* ALTIVEC */
  		default:	/* "%?" prints ?, unless ? is NUL */
  			if (ch == '\0')
  				goto done;
-@@ -1123,6 +1255,290 @@
+@@ -1123,6 +1292,184 @@
  			break;
  		}
  
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		if (flags & VECTOR) {
 +			/*
 +			 * Do the minimum amount of work necessary to construct
@@ -458,32 +523,24 @@
 +			int i, j;	/* Counter. */
 +			int vcnt;	/* Number of elements in vector. */
 +			char *vfmt;	/* Pointer to format specifier. */
-+#define EXTRAHH 2
-+			char vfmt_buf[32 + EXTRAHH]; /* Static buffer for format spec. */
++			char vfmt_buf[32]; /* Static buffer for format spec. */
 +			int vwidth = 0;	/* Width specified via '*'. */
 +			int vprec = 0;	/* Precision specified via '*'. */
++			union {		/* Element. */
++				int i;
++				float f;
++			} velm;
 +			char *vstr;	/* Used for asprintf(). */
 +			int vlen;	/* Length returned by asprintf(). */
-+			enum {
-+			    V_CHAR, V_SHORT, V_INT,
-+			    V_PCHAR, V_PSHORT, V_PINT,
-+			    V_FLOAT,
-+#ifdef V64TYPE
-+			    V_LONGLONG, V_PLONGLONG,
-+			    V_DOUBLE,
-+#endif /* V64TYPE */
-+			} vtype;
-+
-+			vval.vectorarg = GETARG(VECTORTYPE);
++
 +			/*
 +			 * Set vfmt.  If vfmt_buf may not be big enough,
 +			 * malloc() space, taking care to free it later.
-+			 * (EXTRAHH is for possible extra "hh")
 +			 */
-+			if (&fmt[-1] - pct + EXTRAHH < sizeof(vfmt_buf))
++			if (&fmt[-1] - pct < sizeof(vfmt_buf))
 +				vfmt = vfmt_buf;
 +			else
-+				vfmt = (char *)malloc(&fmt[-1] - pct + EXTRAHH + 1);
++				vfmt = (char *)malloc(&fmt[-1] - pct + 1);
 +
 +			/* Set the separator character, if not specified. */
 +			if (vsep == 'X') {
@@ -516,57 +573,13 @@
 +			 * finish up the format specifier.
 +			 */
 +			if (flags & SHORTINT) {
-+				switch (ch) {
-+				case 'c':
-+					vtype = V_SHORT;
-+					break;
-+				case 'p':
-+					vtype = V_PSHORT;
-+					break;
-+				default:
++				if (ch != 'c')
 +					vfmt[j++] = 'h';
-+					vtype = V_SHORT;
-+					break;
-+				}
 +				vcnt = 8;
 +			} else if (flags & LONGINT) {
++				if (ch != 'c')
++					vfmt[j++] = 'l';
 +				vcnt = 4;
-+				vtype = (ch == 'p') ? V_PINT : V_INT;
-+#ifdef V64TYPE
-+			} else if (flags & LLONGINT) {
-+				switch (ch) {
-+				case 'a':
-+				case 'A':
-+				case 'e':
-+				case 'E':
-+				case 'f':
-+				case 'g':
-+				case 'G':
-+					vcnt = 2;
-+					vtype = V_DOUBLE;
-+					break;
-+				case 'd':
-+				case 'i':
-+				case 'u':
-+				case 'o':
-+				case 'p':
-+				case 'x':
-+				case 'X':
-+					vfmt[j++] = 'l';
-+					vfmt[j++] = 'l';
-+					vcnt = 2;
-+					vtype = (ch == 'p') ? V_PLONGLONG : V_LONGLONG;
-+					break;
-+				default:
-+					/*
-+					 * The default case should never
-+					 * happen.
-+					 */
-+				case 'c':
-+					vcnt = 16;
-+					vtype = V_CHAR;
-+				}
-+#endif /* V64TYPE */
 +			} else {
 +				switch (ch) {
 +				case 'a':
@@ -577,150 +590,96 @@
 +				case 'g':
 +				case 'G':
 +					vcnt = 4;
-+					vtype = V_FLOAT;
 +					break;
 +				default:
 +					/*
 +					 * The default case should never
 +					 * happen.
 +					 */
++				case 'c':
 +				case 'd':
 +				case 'i':
 +				case 'u':
 +				case 'o':
++				case 'p':
 +				case 'x':
 +				case 'X':
-+					vfmt[j++] = 'h';
-+					vfmt[j++] = 'h';
-+					/* drop through */
-+				case 'p':
-+				case 'c':
 +					vcnt = 16;
-+					vtype = (ch == 'p') ? V_PCHAR : V_CHAR;
 +				}
 +			}
 +			vfmt[j++] = ch;
 +			vfmt[j++] = '\0';
 +
 +/* Get a vector element. */
-+#ifdef V64TYPE
-+#define VPRINT(type, ind, args...) do {					\
-+	switch (type) {							\
-+	case V_CHAR:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vuchararg[ind]); \
-+		break;							\
-+	case V_PCHAR:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vuchararg[ind]); \
-+		break;							\
-+	case V_SHORT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vushortarg[ind]); \
-+		break;							\
-+	case V_PSHORT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vushortarg[ind]); \
-+		break;							\
-+	case V_INT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vuintarg[ind]); \
-+		break;							\
-+	case V_PINT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vuintarg[ind]); \
-+		break;							\
-+	case V_LONGLONG:						\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vulonglongarg[ind]); \
-+		break;							\
-+	case V_PLONGLONG:						\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vulonglongarg[ind]); \
-+		break;							\
-+	case V_FLOAT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vfloatarg[ind]); \
-+		break;							\
-+	case V_DOUBLE:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vdoublearg[ind]); \
-+		break;							\
++#define VPRINT(cnt, ind, args...) do {					\
++	if (flags & FPT) {						\
++		velm.f = vval.vfloatarg[ind];				\
++		vlen = asprintf_l(&vstr, loc, vfmt , ## args, velm.f);	\
++	} else {							\
++		switch (cnt) {						\
++		default:						\
++		/* The default case should never happen. */		\
++		case 4:							\
++			velm.i = (unsigned)vval.vintarg[ind];		\
++			break;						\
++		case 8:							\
++			velm.i = (unsigned short)vval.vshortarg[ind];	\
++			break;						\
++		case 16:						\
++			velm.i = (unsigned char)vval.vchararg[ind];	\
++			break;						\
++		}							\
++		vlen = asprintf_l(&vstr, loc, vfmt , ## args, velm.i);	\
 +	}								\
 +	ret += vlen;							\
 +	PRINT(vstr, vlen);						\
 +	FLUSH();							\
 +	free(vstr);							\
 +} while (0)
-+#else /* !V64TYPE */
-+#define VPRINT(type, ind, args...) do {					\
-+	switch (type) {							\
-+	case V_CHAR:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vuchararg[ind]); \
-+		break;							\
-+	case V_PCHAR:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vuchararg[ind]); \
-+		break;							\
-+	case V_SHORT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vushortarg[ind]); \
-+		break;							\
-+	case V_PSHORT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vushortarg[ind]); \
-+		break;							\
-+	case V_INT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vuintarg[ind]); \
-+		break;							\
-+	case V_PINT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, (void *)(long)vval.vuintarg[ind]); \
-+		break;							\
-+	case V_FLOAT:							\
-+		vlen = asprintf_l(&vstr, loc, vfmt , ## args, vval.vfloatarg[ind]); \
-+		break;							\
-+	}								\
-+	ret += vlen;							\
-+	PRINT(vstr, vlen);						\
-+	FLUSH();							\
-+	free(vstr);							\
-+} while (0)
-+#endif /* V64TYPE */
 +
 +			/* Actually print. */
 +			if (vwidth == 0) {
 +				if (vprec == 0) {
 +					/* First element. */
-+					VPRINT(vtype, 0);
++					VPRINT(vcnt, 0);
 +					for (i = 1; i < vcnt; i++) {
 +						/* Separator. */
-+						if(vsep)
-+							PRINT(&vsep, 1);
++						PRINT(&vsep, 1);
 +
 +						/* Element. */
-+						VPRINT(vtype, i);
++						VPRINT(vcnt, i);
 +					}
 +				} else {
 +					/* First element. */
-+					VPRINT(vtype, 0, prec);
++					VPRINT(vcnt, 0, prec);
 +					for (i = 1; i < vcnt; i++) {
 +						/* Separator. */
-+						if(vsep)
-+							PRINT(&vsep, 1);
++						PRINT(&vsep, 1);
 +
 +						/* Element. */
-+						VPRINT(vtype, i, prec);
++						VPRINT(vcnt, i, prec);
 +					}
 +				}
 +			} else {
 +				if (vprec == 0) {
 +					/* First element. */
-+					VPRINT(vtype, 0, width);
++					VPRINT(vcnt, 0, width);
 +					for (i = 1; i < vcnt; i++) {
 +						/* Separator. */
-+						if(vsep)
-+							PRINT(&vsep, 1);
++						PRINT(&vsep, 1);
 +
 +						/* Element. */
-+						VPRINT(vtype, i, width);
++						VPRINT(vcnt, i, width);
 +					}
 +				} else {
 +					/* First element. */
-+					VPRINT(vtype, 0, width, prec);
++					VPRINT(vcnt, 0, width, prec);
 +					for (i = 1; i < vcnt; i++) {
 +						/* Separator. */
-+						if(vsep)
-+							PRINT(&vsep, 1);
++						PRINT(&vsep, 1);
 +
 +						/* Element. */
-+						VPRINT(vtype, i, width, prec);
++						VPRINT(vcnt, i, width, prec);
 +					}
 +				}
 +			}
@@ -731,27 +690,27 @@
 +
 +			continue;
 +		}
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  		/*
  		 * All reasonable formats wind up here.  At this point, `cp'
  		 * points to a string which (if not flags&LADJUST) should be
-@@ -1406,6 +1822,11 @@
+@@ -1406,6 +1753,11 @@
  			if (flags & LONGINT)
  				ADDTYPE(T_WINT);
  			else
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  				ADDTYPE(T_INT);
  			break;
  		case 'D':
-@@ -1413,6 +1834,11 @@
+@@ -1413,6 +1765,11 @@
  			/*FALLTHROUGH*/
  		case 'd':
  		case 'i':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
@@ -759,51 +718,51 @@
  			ADDSARG();
  			break;
  #ifndef NO_FLOATING_POINT
-@@ -1423,6 +1849,11 @@
+@@ -1423,6 +1780,11 @@
  		case 'f':
  		case 'g':
  		case 'G':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  			if (flags & LONGDBL)
  				ADDTYPE(T_LONG_DOUBLE);
  			else
-@@ -1451,9 +1882,19 @@
+@@ -1451,9 +1813,19 @@
  			flags |= LONGINT;
  			/*FALLTHROUGH*/
  		case 'o':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  			ADDUARG();
  			break;
  		case 'p':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  			ADDTYPE(TP_VOID);
  			break;
  		case 'S':
-@@ -1471,6 +1912,11 @@
+@@ -1471,6 +1843,11 @@
  		case 'u':
  		case 'X':
  		case 'x':
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +			if (flags & VECTOR)
 +				ADDTYPE(T_VECTOR);
 +			else
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  			ADDUARG();
  			break;
  		default:	/* "%?" prints ?, unless ? is NUL */
-@@ -1537,7 +1983,7 @@
+@@ -1537,7 +1914,7 @@
  			(*argtable) [n].sizearg = va_arg (ap, size_t);
  			break;
  		    case TP_SIZET:
@@ -812,15 +771,16 @@
  			break;
  		    case T_INTMAXT:
  			(*argtable) [n].intmaxarg = va_arg (ap, intmax_t);
-@@ -1556,6 +2002,11 @@
+@@ -1556,6 +1933,12 @@
  			(*argtable) [n].longdoublearg = va_arg (ap, long double);
  			break;
  #endif
-+#ifdef VECTORS
++#ifdef ALTIVEC
 +		    case T_VECTOR:
-+			(*argtable) [n].vectorarg = va_arg (ap, VECTORTYPE);
++			if (hasAltivec)
++				ap = getvec( &((*argtable) [n]), NULL, 0, ap );
 +			break;
-+#endif /* VECTORS */
++#endif /* ALTIVEC */
  		    case TP_CHAR:
  			(*argtable) [n].pchararg = va_arg (ap, char *);
  			break;