xref: /btstack/port/samv71-xplained-atwilc3000/ASF/common/utils/stdio/write.c (revision a06bcae0f7f63d9d69b2f846d04300ea7058ea66)
1 /**
2  * \file
3  *
4  * \brief System-specific implementation of the \ref _write function used by
5  *         the standard library.
6  *
7  * Copyright (c) 2009-2015 Atmel Corporation. All rights reserved.
8  *
9  * \asf_license_start
10  *
11  * \page License
12  *
13  * Redistribution and use in source and binary forms, with or without
14  * modification, are permitted provided that the following conditions are met:
15  *
16  * 1. Redistributions of source code must retain the above copyright notice,
17  *    this list of conditions and the following disclaimer.
18  *
19  * 2. Redistributions in binary form must reproduce the above copyright notice,
20  *    this list of conditions and the following disclaimer in the documentation
21  *    and/or other materials provided with the distribution.
22  *
23  * 3. The name of Atmel may not be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * 4. This software may only be redistributed and used in connection with an
27  *    Atmel microcontroller product.
28  *
29  * THIS SOFTWARE IS PROVIDED BY ATMEL "AS IS" AND ANY EXPRESS OR IMPLIED
30  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
31  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT ARE
32  * EXPRESSLY AND SPECIFICALLY DISCLAIMED. IN NO EVENT SHALL ATMEL BE LIABLE FOR
33  * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
34  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
35  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
37  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
38  * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
39  * POSSIBILITY OF SUCH DAMAGE.
40  *
41  * \asf_license_stop
42  *
43  */
44 /*
45  * Support and FAQ: visit <a href="http://www.atmel.com/design-support/">Atmel Support</a>
46  */
47 
48 #include "compiler.h"
49 
50 /**
51  * \addtogroup group_common_utils_stdio
52  *
53  * \{
54  */
55 
56 volatile void *volatile stdio_base;
57 int (*ptr_put)(void volatile*, char);
58 
59 
60 #if ( defined(__ICCAVR32__) || defined(__ICCAVR__) || defined(__ICCARM__))
61 
62 #include <yfuns.h>
63 
64 _STD_BEGIN
65 
66 #pragma module_name = "?__write"
67 
68 /*! \brief Writes a number of bytes, at most \a size, from the memory area
69  *         pointed to by \a buffer.
70  *
71  * If \a buffer is zero then \ref __write performs flushing of internal buffers,
72  * if any. In this case, \a handle can be \c -1 to indicate that all handles
73  * should be flushed.
74  *
75  * \param handle File handle to write to.
76  * \param buffer Pointer to buffer to read bytes to write from.
77  * \param size Number of bytes to write.
78  *
79  * \return The number of bytes written, or \c _LLIO_ERROR on failure.
80  */
81 size_t __write(int handle, const unsigned char *buffer, size_t size)
82 {
83 	size_t nChars = 0;
84 
85 	if (buffer == 0) {
86 		// This means that we should flush internal buffers.
87 		return 0;
88 	}
89 
90 	// This implementation only writes to stdout and stderr.
91 	// For all other file handles, it returns failure.
92 	if (handle != _LLIO_STDOUT && handle != _LLIO_STDERR) {
93 		return _LLIO_ERROR;
94 	}
95 
96 	for (; size != 0; --size) {
97 		if (ptr_put(stdio_base, *buffer++) < 0) {
98 			return _LLIO_ERROR;
99 		}
100 		++nChars;
101 	}
102 	return nChars;
103 }
104 
105 _STD_END
106 
107 
108 #elif (defined(__GNUC__) && !XMEGA && !MEGA)
109 
110 int __attribute__((weak))
111 _write (int file, const char *ptr, int len);
112 
113 int __attribute__((weak))
114 _write (int file, const char *ptr, int len)
115 {
116 	int nChars = 0;
117 
118 	if ((file != 1) && (file != 2) && (file!=3)) {
119 		return -1;
120 	}
121 
122 	for (; len != 0; --len) {
123 		if (ptr_put(stdio_base, *ptr++) < 0) {
124 			return -1;
125 		}
126 		++nChars;
127 	}
128 	return nChars;
129 }
130 
131 #elif (defined(__GNUC__) && (XMEGA || MEGA))
132 
133 int _write (char c, int *f);
134 
135 int _write (char c, int *f)
136 {
137 	if (ptr_put(stdio_base, c) < 0) {
138 		return -1;
139 	}
140 	return 1;
141 }
142 #endif
143 
144 /**
145  * \}
146  */
147 
148