C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站
点击跳转“创龙科技服务通”

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 6519|回复: 1
打印 上一主题 下一主题

C6747利用McASP发送中断方式完成音频输入信号的直接输出

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
5 E8 u/ E/ f4 Z: i/ T, A3 Z2 \main文件:; O+ L! ?( F/ m7 \7 ~
interrupt void interrupt4(void)  ; f' c7 |; }0 h  ~& A# F7 w( J
{
4 s1 O, _% P0 Q! ]( b  y  R6 P  Uint32 sample;/ w5 y$ ~5 d, Q$ V! c

& _) \) C8 e9 q0 q. L  sample = input_sample(); // read L + R samples from ADC
# a. t5 C% |, e7 ~6 v# H( b- z  output_sample(sample);   // write L + R samples to DAC 0 P0 y6 \( S- b& c/ a4 l
  return;) ~) y7 S/ k! E- {) L1 P
}
6 J! }2 m: v9 {( r: A2 j; c6 @0 t; R3 C  H6 H
int main( void )5 ~! o1 F$ _# z
{
$ e/ i( g* W8 c9 R3 `; ?- o! F6 n5 X2 {6 e. L$ q
    /* Initialize BSL */. ~- o8 U# Q8 l9 a
    EVMC6747_init( );
  Z, ~% c4 ^& m4 o8 i$ ~+ I, n. X. m        /* Call evmc6747_intr function */8 t1 p! M  Y" x  I: x
    aic3106_init( );9 B) m$ h, a5 C( H
        while(1);
$ v. ^2 W$ Z8 B' g; p% m}  q4 e; C0 J# `8 a' c
+ s' ^9 |( P: ?# A% z
# }2 a6 T0 R$ ~" @* j" m8 i
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题% \, p- \" `5 ^: J
/* Initialize MCASP1 */
7 A) ]2 i0 V! ^: q4 {    mcasp = &MCASP_MODULE_1;
4 O/ W2 {- U0 X  h0 w    mcasp->regs->GBLCTL  = 0;       // Reset
/ @* |: E" g3 v0 w- \    mcasp->regs->RGBLCTL = 0;       // Reset RX
& L. ?$ O4 {3 p( n: L( _( s    mcasp->regs->XGBLCTL = 0;       // Reset TX
7 n" T  i  T: n. Q: V3 I    mcasp->regs->PWRDEMU = 1;       // Free-running$ s* ^$ ?/ p7 g
   // configure McASP0 receive registers
( N# ~1 u" z, S. l    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used- M: ^, Y9 m8 ]8 i2 L8 M: I
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
+ b( R6 R9 a5 O0 F! ]    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word7 x. R2 ~. b; Q+ C5 g* b2 x( g
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
! _4 A4 b$ q6 g2 U. a* B# I    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
! G1 d8 \. [  w; b! ~3 N  t    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
2 W; ~6 M6 h; m5 c" }5 g& q    mcasp->regs->RINTCTL    = 0x00000000; // Not used+ N# J7 ?* U$ S5 Q: _
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256; z  l/ l4 \, E) G/ C
# a, H" O  ~, _3 a: z' K
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used4 s9 w& e. N' I! a
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus5 J% q  k8 T- t
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
) r* A9 l  \# A6 E0 Z+ n% _5 Y    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16" P4 t' p4 G9 S+ b- M
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
, T+ T- o; c3 E8 F& |, k; d4 t    mcasp->regs->XTDM       = 0x00000003; // Slots 0,13 C- L, t: L% z
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit2 I- D8 j  j3 N1 O- u+ N
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
8 k* R' I" Z3 p8 v; w1 C+ X* v4 t. ?* o. ?; d
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
7 `: Z2 S+ o. y% {7 M9 ]    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
; G$ B3 r6 L- l! b5 L/ Q: j    mcasp->regs->PFUNC      = 0;          // All MCASPs' C# P" Q1 C) m1 c
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
' U0 U0 c2 g# A- d( L8 @" L  d" v
4 M' Z. V7 O  a8 x  d, x    mcasp->regs->DITCTL     = 0x00000000; // Not used
, A- A2 k9 n6 q" T) _" [" X" Q    mcasp->regs->DLBCTL     = 0x00000000; // Not used( b0 w1 K) M5 [
    mcasp->regs->AMUTE      = 0x00000000; // Not used( l6 }3 j. i5 G" L  k2 Y
+ C/ z+ i& V* ~* R8 G
/* Starting sections of the McASP*/3 g' E# f& s8 {0 ^4 ]
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
* |5 l2 ?5 Q9 h6 A- c) I    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  # z4 u( E  z6 i7 B2 V
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 0 Y8 o5 N% J& l! B( C
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );9 m7 d$ i' S+ r6 P4 |

& U! X4 _& o2 i. T- p    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 7 w/ ]' w4 H& ?3 r
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );* K1 B  `6 b) g# |4 F( B
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
, f% d/ b' w+ E5 Z: r' x    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );. `  \, ]' ~) X! n

5 K: {5 ~" f1 ^8 ~    mcasp->regs->XSTAT = 0x0000ffff;
- \% Q$ X8 y/ {# o; p, d4 R    mcasp->regs->RSTAT = 0x0000ffff;
6 w/ e) K6 M+ y/ f) j. f' w; A
) i" x, N) f# m: s    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;. F; H0 y0 E( P* d* `: h
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
2 p4 o9 Q  `5 Y0 y1 f) w7 M6 \6 c    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 4 y8 d; n6 J! {! |# |% ^: l0 c* x, {
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
" \' k" p) [! p( S" y9 ~3 V+ U' Z* _
    /* Write a 0, so that no underrun occurs after releasing the state machine */
; D, k" D0 ]- z: i6 Z& i: R    mcasp->regs->XBUF5 = 0;7 W3 G1 x/ c. p* V! ]3 `
    mcasp->regs->RBUF0 = 0;
, U4 B' k; v7 ?- {: V" M/ L  d5 h5 P4 y# T
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; + C# S( [5 a. j  d! L' O( p
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
; T9 L# L1 ~1 ~3 Q, E0 l    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; : [9 c- S* q; `1 V5 ~- |9 ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );* a) `0 t( l5 O# E1 h# j

( l; [. I3 H; T! ^" f2 ?& \    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 3 Q7 Z, \9 Y9 s1 S+ g9 I
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );! ^; I/ K/ e( F) b7 C, r
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 6 T1 s: N( S( T6 Z6 O! Y8 C5 M
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );( r" o" |; T$ s+ A5 }! k6 \

. c! e/ o% |4 a; e2 J    CSR = 0x0000;; r) }- Y% h# i% E3 [1 _- w
    INTC_INTMUX1 = 0x3d;
, x/ A+ `: _6 K/ I9 U, v    ISTP = (unsigned int)vectors;
  E/ V& }2 O9 X6 Y0 h    ICR = 0xFFF0;  
" x: r2 K8 r! D' U1 ~& u! H    IER |= 0x12;  
! T* i( T! s! ^+ S# d% l    CSR |= 0x01;  # @# l/ a# ]) [+ b5 Q4 s4 |

" a9 k8 M9 \! i3 h& Z2 `. G4 _, O
; l1 ]  y0 t2 O% s; ~2 J( y, O2 h* u1 m
还有就是两个输入输出函数:
7 v* L) i; P/ K  D1 Bvoid output_sample(Int32 out_data)( C8 j) {5 ?/ J
{
+ M# _' Z) g  N- a2 C- {1 x. w) b  AIC31_data.uint = out_data;  
  s& M4 n$ d6 K( R7 t  MCASP1_XBUF5_32BIT = AIC31_data.uint;
* t) ~0 C% h% W, ~* R; Z" M}
9 h' J7 i6 X/ E. O
3 y3 v. `$ ]  C7 u" Z5 ^Int32 input_sample(void)7 W% n, J$ G8 s
{  
' P$ X# i6 Q( E1 c% r+ ?& g: x  AIC31_data.uint = MCASP1_RBUF0_32BIT;
4 b$ h" a" G* `# P9 m  return (AIC31_data.uint);
; v+ B% E# x$ w* U6 [+ U}
1 [! }) X# J; ?/ V
3 U/ j1 ~, V: D# g/ H' r
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖
回复

使用道具 举报

3

主题

852

帖子

3538

积分

创龙

Rank: 8Rank: 8

积分
3538
沙发
发表于 2016-3-16 11:55:59 | 只看该作者
可以参看创龙提供的例程:AUDIO_LINE_OUT_INTR——Line Out 音频输出(中断方式)
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

点击跳转“创龙科技服务通”

QQ|手机版|小黑屋|嵌入式开发者社区 ( 粤ICP备15055271号

GMT+8, 2026-3-9 23:07 , Processed in 0.040186 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

快速回复 返回顶部 返回列表