source: azure_iot_hub_riscv/trunk/asp_baseplatform/pdic/k210/spi_reg.c@ 453

Last change on this file since 453 was 453, checked in by coas-nagasima, 4 years ago

ファイルを追加
  • Property svn:eol-style set to native
  • Property svn:mime-type set to text/x-csrc;charset=UTF-8
File size: 5.5 KB
Line 
1/*
2 * TOPPERS/ASP Kernel
3 * Toyohashi Open Platform for Embedded Real-Time Systems/
4 * Advanced Standard Profile Kernel
5 *
6 * Copyright (C) 2008-2011 by Embedded and Real-Time Systems Laboratory
7 * Graduate School of Information Science, Nagoya Univ., JAPAN
8 * Copyright (C) 2015-2019 by TOPPERS PROJECT Educational Working Group.
9 *
10 * 上記著作権者は，以下の(1)～(4)の条件を満たす場合に限り，本ソフトウェ
11 * ア（本ソフトウェアを改変したものを含む．以下同じ）を使用・複製・改
12 * 変・再配布（以下，利用と呼ぶ）することを無償で許諾する．
13 * (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
14 * 権表示，この利用条件および下記の無保証規定が，そのままの形でソー
15 * スコード中に含まれていること．
16 * (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
17 * 用できる形で再配布する場合には，再配布に伴うドキュメント（利用
18 * 者マニュアルなど）に，上記の著作権表示，この利用条件および下記
19 * の無保証規定を掲載すること．
20 * (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
21 * 用できない形で再配布する場合には，次のいずれかの条件を満たすこ
22 * と．
23 * (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
24 * 作権表示，この利用条件および下記の無保証規定を掲載すること．
25 * (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
26 * 報告すること．
27 * (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
28 * 害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
29 * また，本ソフトウェアのユーザまたはエンドユーザからのいかなる理
30 * 由に基づく請求からも，上記著作権者およびTOPPERSプロジェクトを
31 * 免責すること．
32 *
33 * 本ソフトウェアは，無保証で提供されているものである．上記著作権者お
34 * よびTOPPERSプロジェクトは，本ソフトウェアに関して，特定の使用目的
35 * に対する適合性も含めて，いかなる保証も行わない．また，本ソフトウェ
36 * アの利用により直接的または間接的に生じたいかなる損害に関しても，そ
37 * の責任を負わない．
38 *
39 * @(#) $Id$
40 */
41/*
42 *
43 * SPIレガシードライバ関数群
44 *
45 */
46#include "kernel.h"
47#include <t_syslog.h>
48#include <t_stdlib.h>
49#include <stdlib.h>
50#include <string.h>
51#include "device.h"
52#include "spi.h"
53
54/*
55 * SPI受信実行関数
56 * parameter1 hspi: SPIハンドラへのポインタ
57 * parameter2 pdata: 受信バッファへのポインタ
58 * parameter3 length: 受信サイズ
59 * return ERコード
60 */
61ER
62spi_transmit(SPI_Handle_t *hspi, uint8_t *ptxData, uint16_t length)
63{
64 uint32_t *pTx;
65 int32_t ss;
66 uint32_t i;
67 ER ercd = E_OK;
68
69 if(hspi == NULL)
70 return E_PAR;
71 ss = hspi->Init.SsNo;
72 if(hspi->hdmatx != NULL){
73 pTx = malloc(length * sizeof(uint32_t));
74 if(pTx == NULL)
75 return E_OBJ;
76 for(i = 0 ; i < length ; i++)
77 pTx[i] = ptxData[i];
78 }
79 else
80 pTx = (uint32_t *)ptxData;
81
82#if SPI_WAIT_TIME != 0
83 ercd = spi_core_transmit(hspi, ss, (uint8_t*)pTx, length);
84#else
85 if((ercd = spi_core_transmit(hspi, ss, (uint8_t*)pTx, length)) == E_OK){
86 ercd = spi_wait(hspi, 50);
87 }
88#endif
89 if(hspi->hdmatx != NULL)
90 free(pTx);
91 return ercd;
92}
93
94/*
95 * SPI送信実行関数
96 * parameter1 hspi: SPIハンドラへのポインタ
97 * parameter2 pdata: 送信バッファへのポインタ
98 * parameter3 length: 送信サイズ
99 * return ERコード
100 */
101ER
102spi_receive(SPI_Handle_t *hspi, uint8_t *pdata, uint16_t length)
103{
104 uint32_t *pRx;
105 int32_t ss;
106 uint32_t i;
107 ER ercd = E_OK;
108
109 if(hspi == NULL)
110 return E_PAR;
111 ss = hspi->Init.SsNo;
112 pRx = malloc(length * sizeof(uint32_t));
113 if(pRx == NULL)
114 return E_OBJ;
115#if SPI_WAIT_TIME != 0
116 ercd = spi_core_receive(hspi, ss, pRx, length);
117#else
118 if((ercd = spi_core_receive(hspi, ss, pRx, length)) == E_OK)
119 ercd = spi_wait(hspi, 50);
120#endif
121 for(i = 0 ; i < length ; i++)
122 pdata[i] = pRx[i];
123 free(pRx);
124 return ercd;
125}
126
127/*
128 * SPI送受信実行関数
129 * parameter1 hspi: SPIハンドラへのポインタ
130 * parameter2 ptxdata: 送信バッファへのポインタ
131 * parameter3 prxdata: 受信バッファへのポインタ
132 * parameter4 length: 送受信サイズ
133 * return ERコード
134 */
135ER
136spi_transrecvx(SPI_Handle_t *hspi, uint8_t *ptxdata, uint8_t *prxdata, uint16_t length)
137{
138 uint32_t *pTx, *pRx;
139 int32_t ss;
140 uint32_t i;
141 ER ercd = E_OK;
142
143 if(hspi == NULL)
144 return E_PAR;
145 ss = hspi->Init.SsNo;
146 if(hspi->hdmatx != NULL){
147 pRx = malloc(length * sizeof(uint32_t) * 2);
148 if(pRx == NULL)
149 return E_OBJ;
150 pTx = pRx + length;
151 for(i = 0 ; i < length ; i++)
152 pTx[i] = ptxdata[i];
153 }
154 else{
155 pRx = malloc(length * sizeof(uint32_t));
156 if(pRx == NULL)
157 return E_OBJ;
158 pTx = (uint32_t *)ptxdata;
159 }
160#if SPI_WAIT_TIME != 0
161 ercd = spi_core_transrecv(hspi, ss, (uint8_t *)pTx, (uint8_t *)pRx, length);
162#else
163 if((ercd = spi_core_transrecv(hspi, ss, (uint8_t *)pTx, (uint8_t *)pRx, length)) == E_OK)
164 ercd = spi_wait(hspi, 50);
165#endif
166 for(i = 0 ; i < length ; i++)
167 prxdata[i] = pRx[i];
168 free(pRx);
169 return ercd;
170}
171
Note: See TracBrowser for help on using the repository browser.