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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
4 l! t8 u; }8 r: L% {2 Ymain文件:6 f+ v  e2 r2 _' L
interrupt void interrupt4(void)  
2 f$ e- N, G% _6 H, b{
. v2 u7 L. G! @# z* Q  Uint32 sample;
% G' {" H) D$ F1 ]$ W. ]& S
3 ?: G* X# I% [  r0 y  sample = input_sample(); // read L + R samples from ADC
7 t# d% X( R7 ]: F( K! u7 H+ s  output_sample(sample);   // write L + R samples to DAC
4 z! X1 n* J/ k6 t: m# n# c" E  return;
; o" H2 I5 I5 Q# j" ]. N2 {! C}
6 r( S8 e- ^6 b
. L& L; x0 {6 I' y" hint main( void )+ N& t! {" B/ D; _0 O# [' @
{
6 R1 z' l- S8 N8 k5 }8 x) J) [  l+ v3 J3 ~
    /* Initialize BSL */
# l5 R, }( f& s* o  U    EVMC6747_init( );8 B" C5 J' z9 D' q1 ], J4 Y! [
        /* Call evmc6747_intr function */
- S" F  ~2 q9 g  h" Z    aic3106_init( );: |! Q8 m) M( C* C; X) G& y
        while(1);! C- o8 t, W. [! G
}
6 I% J' M' K0 m& K
  R" j9 t: n  x) m& {
+ C$ P1 k# t7 Q4 ~) L  ]7 Oaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
" v8 Q7 V# `$ f+ O. {$ E+ K& y4 a! g$ `/* Initialize MCASP1 */& U4 O' E* k& \3 E
    mcasp = &MCASP_MODULE_1;
% t1 t# X: ?3 V1 B/ s    mcasp->regs->GBLCTL  = 0;       // Reset( b8 k" X1 W! ]* {3 Y( u
    mcasp->regs->RGBLCTL = 0;       // Reset RX
/ ]1 Q) ]" `. C$ a  v    mcasp->regs->XGBLCTL = 0;       // Reset TX
6 F- Z$ j. |* Z& p0 y    mcasp->regs->PWRDEMU = 1;       // Free-running2 f3 `$ _! f) Y! v( |
   // configure McASP0 receive registers4 {5 l9 f5 M! v% t9 X
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used4 _% N* {! n6 \6 f. C- Y
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus5 U. C0 j! A' ^' o
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
- |2 ^& N, y6 y6 L    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
$ t# t9 l) x( U5 p6 P: N  @    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
; ^2 F; c( [2 {. V. E8 n    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1+ ]- s  y! r( o4 x6 X* W- ?2 i3 Q
    mcasp->regs->RINTCTL    = 0x00000000; // Not used# ~2 m5 G9 C6 s& t3 y
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2568 _. q$ p+ @  b. e' q6 v2 j- Q& y

5 ]# S+ ^3 v9 a; o* ?9 @! @    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
' ?+ d6 _6 g: X0 X4 P1 o    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
9 p4 B- x- [! @, F+ y3 F    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word* ^; c7 D9 [/ T# A
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16& r& [' d0 l4 c: s1 R1 C
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK* e$ K3 K  N; v
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,11 Y! T! S  c: m+ S! p9 R
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit* x) I- Q) n$ q: l; L7 @% v
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
# q5 ]; Z$ i1 p' h0 ~
2 k. r* N; n1 H    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
: R9 g1 G9 l1 T8 L# w# }) ]    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
0 r" f7 b0 y$ e8 b+ G$ B    mcasp->regs->PFUNC      = 0;          // All MCASPs8 L. l  u- u+ g0 A5 S/ q- e$ G
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1" j7 J' V" ?  a" _/ T+ j

9 J9 e5 B$ W9 @+ w( a# }3 i    mcasp->regs->DITCTL     = 0x00000000; // Not used; ?2 D) E9 B( n' q1 C5 B5 p! N& C
    mcasp->regs->DLBCTL     = 0x00000000; // Not used, `# b4 ?, P# ?3 s
    mcasp->regs->AMUTE      = 0x00000000; // Not used
8 J$ N% k* A' j! s/ |1 R, h
, X: {! M$ A6 D* G/* Starting sections of the McASP*/
. t- i9 P( g1 m! I2 ?0 g    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
7 S2 W# {" o. I- A6 l" l( K    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
/ E; |& A5 v9 s' X  D  ]8 ~    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
9 E* [* |4 F: \% Q. K9 T    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
( @7 j1 R& n7 e0 {" I4 n1 f3 _) k. u# ~) a! A0 g3 s8 B% c
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 3 |: c1 w3 M; u2 `- q& a* o: F, E, K; N
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );/ d+ s( Q* a, S6 V5 S5 T; G8 `
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 5 [) y% l  @& A8 y9 m$ l6 }3 h- p
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
- F+ d3 K5 f( b) X7 o0 j, Y$ g% V* j( C$ a% W& y( P
    mcasp->regs->XSTAT = 0x0000ffff; 0 T/ e7 D; G7 V$ o  h4 Q  k2 N
    mcasp->regs->RSTAT = 0x0000ffff; & f& W3 ?/ m% |: n# w7 R
% f  C0 y5 E0 P8 F1 O2 e
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
$ F7 X; L& L  u$ O    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );8 @5 z* y& ~) i, \
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
! a9 S3 l) T, U- W6 r    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );; v% N3 u+ N5 y8 z9 d
) @- h! t2 H9 x" s+ n( Y
    /* Write a 0, so that no underrun occurs after releasing the state machine */
) ~& ~  J; ^4 i: \7 l7 @    mcasp->regs->XBUF5 = 0;1 ^; {6 e0 W' P5 b- G2 @# G1 J8 K* y9 A
    mcasp->regs->RBUF0 = 0;
8 M3 F! }; n, K6 A2 K: \) ^; `6 w% w% V# y+ x0 z
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 5 S* ^( D# i5 X3 |
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );4 C# `6 a$ V" k3 k7 Q' I* ~' b
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; & }- m3 S$ X% z9 }7 O
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
; n( D7 D- X% u" V. Q! n* {, r$ L: w, w
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
/ t& h- r& q7 d4 d# P    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
& e# X: e+ z0 l- W* V" g    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; * _4 T" j5 L) N, }* u
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );, k+ h! i; e2 Q# E' a
* i' H& f5 J  D0 A: v- P
    CSR = 0x0000;
* Y  h* h  L8 j; h' ~    INTC_INTMUX1 = 0x3d;( f: L- U9 @# T$ }9 h" n
    ISTP = (unsigned int)vectors;: {8 K7 w8 i" w4 i- j
    ICR = 0xFFF0;  * }% c1 x0 x( Z2 J: ^: n. @% i! o
    IER |= 0x12;  
+ `0 j. \: s' W2 Q7 ~) v    CSR |= 0x01;  
; l  y- U0 ]6 ^( }( v1 L
0 u0 F0 G. B8 I; ?# k/ i
3 @+ v# `& _! [2 x, Z8 q3 [. J  O7 C9 e. y
还有就是两个输入输出函数:
* y6 ^9 b) ?1 o2 Pvoid output_sample(Int32 out_data)7 I- @. }% V8 t! g; L8 l6 R
{" A9 O6 }! @* |6 i
  AIC31_data.uint = out_data;  : T2 A1 b& l1 _# k; r' D% b& ?8 N
  MCASP1_XBUF5_32BIT = AIC31_data.uint;! |# ~; [% r# l4 A  Z, f
}3 i* f% n6 Z9 s8 _7 ?& k- B, [( B

7 ?# K: B' G! z+ E7 F( lInt32 input_sample(void)
$ z; m+ H# I# P- v) d2 r! N9 m{  
* @; N% j3 Q  s2 n+ l0 u2 F  AIC31_data.uint = MCASP1_RBUF0_32BIT;) N: P9 X9 ^) R  r( s+ S, }5 y
  return (AIC31_data.uint);% S. L& V9 t/ w/ Y& [! f: Q# {4 T5 h
}/ ?3 t) [4 }& w" H# ~

! h9 z% e" `3 E9 }( m3 `  T# @" 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-1-27 05:32 , Processed in 0.047940 second(s), 26 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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