X-Git-Url: https://codewiz.org/gitweb?a=blobdiff_plain;f=mware%2Fformatwr.c;h=62fc342123641c9063d59569a884ae40a2b25aa9;hb=22dbb0cdd9a46c421a1c47bd33e1d564ce5ad44b;hp=9e85ce862508553cee6f7982633c4bbe010295ef;hpb=0f018838e0d5130255728bbf3aa69e44e4954239;p=bertos.git

diff --git a/mware/formatwr.c b/mware/formatwr.c
old mode 100755
new mode 100644
index 9e85ce86..62fc3421
--- a/mware/formatwr.c
+++ b/mware/formatwr.c
@@ -1,8 +1,33 @@
-/*!
+/**
  * \file
  * <!--
+ * This file is part of BeRTOS.
+ *
+ * Bertos 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 of the License, or
+ * (at your option) any later version.
+ *
+ * This program 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 program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+ *
+ * As a special exception, you may use this file as part of a free software
+ * library without restriction.  Specifically, if other files instantiate
+ * templates or use macros or inline functions from this file, or you compile
+ * this file and link it with other files to produce an executable, this
+ * file does not by itself 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.
+ *
  * Copyright 2003, 2004, 2005 Develer S.r.l. (http://www.develer.com/)
- * This file is part of DevLib - See README.devlib for information.
+ *
  * -->
  *
  * \version $Id$
@@ -53,6 +78,24 @@
 
 /*#*
  *#* $Log$
+ *#* Revision 1.19  2006/09/20 13:58:17  marco
+ *#* Added z modifier in string format.
+ *#*
+ *#* Revision 1.18  2006/07/19 12:56:27  bernie
+ *#* Convert to new Doxygen style.
+ *#*
+ *#* Revision 1.17  2005/11/04 17:43:27  bernie
+ *#* Fix for LP64 architectures; Add some more tests.
+ *#*
+ *#* Revision 1.16  2005/07/19 07:25:46  bernie
+ *#* Use appconfig.h instead of cfg/config.h.
+ *#*
+ *#* Revision 1.15  2005/04/11 19:10:28  bernie
+ *#* Include top-level headers from cfg/ subdir.
+ *#*
+ *#* Revision 1.14  2005/03/01 23:26:22  bernie
+ *#* Use shared hextab.
+ *#*
  *#* Revision 1.13  2005/02/18 12:33:25  bernie
  *#* Avoid strlen().
  *#*
@@ -73,18 +116,18 @@
  *#*/
 
 #include "formatwr.h"
-#include "pgm.h"
-//#include <compiler.h> /* progmem macros */
-#include <config.h> /* CONFIG_ macros */
-#include <debug.h> /* ASSERT */
+#include <mware/pgm.h>
+#include <mware/hex.h>
+#include <cfg/debug.h> /* ASSERT */
+#include <appconfig.h> /* CONFIG_ macros */
 
 #ifndef CONFIG_PRINTF_N_FORMATTER
-	/*! Disable the arcane %n formatter. */
+	/** Disable the arcane %n formatter. */
 	#define CONFIG_PRINTF_N_FORMATTER 0
 #endif
 
 #ifndef CONFIG_PRINTF_OCTAL_FORMATTER
-	/*! Disable the %o formatter. */
+	/** Disable the %o formatter. */
 	#define CONFIG_PRINTF_OCTAL_FORMATTER 0
 #endif
 
@@ -308,7 +351,7 @@ CLEAN_UP:
 
 #endif /* CONFIG_PRINTF > PRINTF_NOFLOAT */
 
-/*!
+/**
  * This routine forms the core and entry of the formatter.
  *
  * The conversion performed conforms to the ANSI specification for "printf".
@@ -403,7 +446,7 @@ PGM_FUNC(_formatted_write)(const char * PGM_ATTR format,
 		flags.progmem = false;
 #endif
 		ptr = buf_pointer = &buf[0];
-		hex = "0123456789ABCDEF";
+		hex = HEX_tab;
 
 		/* check for leading '-', '+', ' ','#' or '0' flags  */
 		for (;;)
@@ -483,11 +526,12 @@ NEXT_FLAG:
 		flags.l_L_modifier = false;
 		flags.h_modifier = false;
 
-		/* Optional 'l','L' r 'h' modifier? */
+		/* Optional 'l','L','z' or 'h' modifier? */
 		switch (PGM_READ_CHAR(format))
 		{
 			case 'l':
 			case 'L':
+			case 'z':
 				flags.l_L_modifier = true;
 				format++;
 				break;
@@ -575,7 +619,7 @@ NEXT_FLAG:
 					precision++;
 #endif
 			case 'x':
-				hex = "0123456789abcdef";
+				hex = hex_tab;
 			case 'u':
 			case 'p':
 			case 'X':
@@ -583,15 +627,15 @@ NEXT_FLAG:
 #if defined(__AVR__) || defined(__I196__) /* 16bit pointers */
 					ulong = (unsigned long)(unsigned short)va_arg(ap, char *);
 #else /* 32bit pointers */
-				ulong = (unsigned long)va_arg(ap, char *);
+					ulong = (unsigned long)va_arg(ap, char *);
 #endif /* 32bit pointers */
-				else if (sizeof(short) == sizeof(int))
-					ulong = flags.l_L_modifier ?
-						va_arg(ap, unsigned long) : (unsigned long)va_arg(ap, unsigned int);
+				else if (flags.l_L_modifier)
+					ulong = va_arg(ap, unsigned long);
+				else if (flags.h_modifier)
+					ulong = (unsigned long)(unsigned short)va_arg(ap, unsigned int);
 				else
-					ulong = flags.h_modifier ?
-						(unsigned long)(unsigned short) va_arg(ap, int)
-						: (unsigned long)va_arg(ap, int);
+					ulong = va_arg(ap, unsigned int);
+
 				flags.div_factor =
 #if CONFIG_PRINTF_OCTAL_FORMATTER
 					(format_flag == 'o') ? DIV_OCT :
@@ -602,32 +646,18 @@ NEXT_FLAG:
 
 			case 'd':
 			case 'i':
-				if (sizeof(short) == sizeof(long))
-				{
-					if ( (long)(ulong = va_arg(ap, unsigned long)) < 0)
-					{
-						flags.plus_space_flag = PSF_MINUS;
-						ulong = (unsigned long)(-((signed long)ulong));
-					}
-				}
-				else if (sizeof(short) == sizeof(int))
-				{
-					if ( (long)(ulong = flags.l_L_modifier ?
-								va_arg(ap,unsigned long) : (unsigned long)va_arg(ap,int)) < 0)
-					{
-						flags.plus_space_flag = PSF_MINUS;
-						ulong = (unsigned long)(-((signed long)ulong));
-					}
-				}
+				if (flags.l_L_modifier)
+					ulong = (unsigned long)(long)va_arg(ap, long);
 				else
+					ulong = (unsigned long)(long)va_arg(ap, int);
+
+				/* Extract sign */
+				if ((signed long)ulong < 0)
 				{
-					if ( (signed long)(ulong = (unsigned long) (flags.h_modifier ?
-									(short) va_arg(ap, int) : va_arg(ap,int))) < 0)
-					{
-						flags.plus_space_flag = PSF_MINUS;
-						ulong = (unsigned long)(-((signed long)ulong));
-					}
+					flags.plus_space_flag = PSF_MINUS;
+					ulong = (unsigned long)(-((signed long)ulong));
 				}
+
 				flags.div_factor = DIV_DEC;
 
 				/* Now convert to digits */
@@ -819,7 +849,7 @@ FLOATING_CONVERSION:
 #else /* PRINTF_REDUCED starts here */
 
 #if CONFIG_PRINTF > PRINTF_NOMODIFIERS
-	char l_modifier, h_modifier;
+	bool l_modifier, h_modifier;
 	unsigned long u_val, div_val;
 #else
 	unsigned int u_val, div_val;
@@ -845,16 +875,16 @@ FLOATING_CONVERSION:
 		/*=================================*/
 		/* Optional 'l' or 'h' modifiers ? */
 		/*=================================*/
-		l_modifier = h_modifier = 0;
+		l_modifier = h_modifier = false;
 		switch (PGM_READ_CHAR(format))
 		{
 			case 'l':
-				l_modifier = 1;
+				l_modifier = true;
 				format++;
 				break;
 
 			case 'h':
-				h_modifier = 1;
+				h_modifier = true;
 				format++;
 				break;
 		}