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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:6 A. a# z4 r2 O! K7 f+ c/ R5 N+ R) y
main文件:2 d# D' `* H2 P  f
interrupt void interrupt4(void)  
1 |0 l3 b/ J  t1 p6 c" }{
  U& D# H4 Y9 Q1 S% ?1 h+ [. H  U  Uint32 sample;
* X' B6 p$ s: o$ [/ k5 X( `
5 U* F& X. {$ u+ r$ y+ w  sample = input_sample(); // read L + R samples from ADC" {1 \+ m0 q4 s( V, ^: ]* v
  output_sample(sample);   // write L + R samples to DAC
" i, }  v- ]8 t$ ]1 ], ~6 s  return;
7 K* H& g! a! }) M: S/ H. H}
4 F- W; e. V/ G, R% d, Q
( M$ A% p; z2 ]& o( \1 y9 f# p: Hint main( void )0 l6 ~% |7 ?# a9 A, h5 v" i
{, r3 |' E+ d! c# @. ?8 d
* O+ g. n1 J) D% l/ R
    /* Initialize BSL */( q. v' P4 H: U' l
    EVMC6747_init( );
2 m$ c2 [8 M1 U) e" X        /* Call evmc6747_intr function */  V2 `5 ?0 ?0 ]" w( a6 q3 U
    aic3106_init( );) W/ B( w, }" _% y. L' }# Q8 q
        while(1);: g/ n7 x2 I. D$ _. B2 y, N
}6 Q4 z& L2 E; a; F# M2 W4 z

, x8 `- ]% W: K7 I/ T
: O; J7 m0 Z; z: b. Aaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题4 {& T8 q6 H; M, m, c
/* Initialize MCASP1 */
. L1 P. U4 X/ F2 W5 ?/ H    mcasp = &MCASP_MODULE_1;
; u5 d; z3 t5 U" o  L" ]/ @6 |    mcasp->regs->GBLCTL  = 0;       // Reset! a3 Y9 e( L& v" `1 U
    mcasp->regs->RGBLCTL = 0;       // Reset RX" t( M/ P& y0 x- G6 ]0 {" k6 S" }0 k
    mcasp->regs->XGBLCTL = 0;       // Reset TX4 M  V, O$ [1 r5 L/ b* K1 j
    mcasp->regs->PWRDEMU = 1;       // Free-running: W1 X' L4 |7 m$ b
   // configure McASP0 receive registers
4 ^; ]5 b3 Q& Q' A    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used( |, p- X- E$ o  u, n
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus5 F9 L* `1 @- H  D: W! E
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
( B6 [2 D4 K8 ]4 J    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
, M6 b+ G. a) i: A# _# f7 ?9 D+ N7 f    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)& e. j" u% c4 u8 ~3 i# Y, p$ H* v
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
+ N4 E* l5 Y6 C# A; x    mcasp->regs->RINTCTL    = 0x00000000; // Not used
2 @# O% J3 H* _/ P( ~    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
$ ~! E! e( s' j0 `9 ~; z7 V* I! R
9 \( o, Y: T8 @7 I% C- |, w9 L    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used( l9 y+ c" f1 c6 g- {' @+ z* Z; p
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
$ B5 F# B# ]& A3 _; v$ O1 n$ I    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
! \/ M3 P- C! e; n$ O) M    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-163 M( O7 H% c4 p' h8 i  m2 U' {
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK% Q$ M' {* `, _) v# p' B
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
7 I9 o+ O3 X4 S2 ^/ a+ b! j. r) n7 A    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
4 ~5 G& L% l6 a! ~5 f2 s2 H7 g, D( k) x+ `    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
" V  _; C! G7 q7 J3 Q5 [3 O" l% P
( H& ^0 t4 ~2 f' A" G" Y  w) K0 y    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN5 X/ T/ f# ~( e/ p2 b! h1 f2 l
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT4 h# I+ C2 k% a; z
    mcasp->regs->PFUNC      = 0;          // All MCASPs
1 ?2 L3 T) f0 j    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
+ [7 A, l$ a. }3 ~2 E, h5 f
8 K9 y/ ]$ p5 _' j  x    mcasp->regs->DITCTL     = 0x00000000; // Not used/ O$ t! E' p/ x- w) R9 J  m# ?
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
& \: H5 n# X& P. m$ Z    mcasp->regs->AMUTE      = 0x00000000; // Not used
2 S- J( Y" m7 ^- ?
% l' C$ G5 Q  b. f- b/* Starting sections of the McASP*/
7 y+ I6 a- ~, C* V2 I  n    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
; l3 }9 i2 [7 j, @0 a8 g3 ?    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
; ]" c4 I+ O3 d, M1 G) a    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; ! I' D, A$ w) u9 S
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
8 O( s2 V7 J$ t, [+ G5 m! t# E9 u( }" |( k/ G) P
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; - S3 r' _% E. L2 K. X/ r
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
2 L0 e+ v4 q% `* X4 v    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 2 |7 A. B' m! U, r/ A# e0 |
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );/ M' p. ?; \/ \2 V- B% c2 m

# j# U, W5 E) M& S+ o$ v5 [" O& P9 j    mcasp->regs->XSTAT = 0x0000ffff;
$ Z7 J* `5 P2 @+ L0 u* j" L% n    mcasp->regs->RSTAT = 0x0000ffff; 4 _! D2 d* P# O
# \! N# s! _/ Q4 A1 F
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
9 F0 O' w, l' r4 G    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );7 P1 ?  {; z& n- Q) B# r3 |  f( m; e
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
4 p/ d8 w/ B( @    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
" V4 o# c+ N  |5 i" L/ k9 L- W/ n# ~# s, p
    /* Write a 0, so that no underrun occurs after releasing the state machine */
9 G9 {$ X  U* ^! r$ K    mcasp->regs->XBUF5 = 0;" F/ D" p: Q; i/ x" g# V
    mcasp->regs->RBUF0 = 0;5 I! l  n5 |4 J" Z# Z# s- ~: ]
$ v0 B5 R" F) Z, {: ]
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; , B4 J+ D9 w) [8 U
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
$ o9 \+ h9 U8 T) v0 Z) W( m  ~    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;   u% Q4 i1 W; Z, ]6 y( e
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
6 Y4 G; V# T3 v. `3 }  t* D8 p' n1 A' _
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; ) E8 O5 @7 u9 |( `* k
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
4 S" {& z' C8 M    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
# o* K. G# U8 d8 u3 J! P; R    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );- t$ W" h9 E5 h  I8 z

$ p2 F$ G. ?$ {% K6 E7 t    CSR = 0x0000;0 j4 z8 _. \7 {' }. e( i' p
    INTC_INTMUX1 = 0x3d;5 t* W3 e3 ^% ]  `7 b0 k0 p" f
    ISTP = (unsigned int)vectors;" k( Q* }2 r6 a' G
    ICR = 0xFFF0;  
8 c4 p8 N" B# j0 P    IER |= 0x12;  
0 \% D0 x- i) k8 E* a    CSR |= 0x01;  
7 g2 v8 D" U, J+ C( j' `& \2 X- i) A3 Q1 B* F

+ b; @; O5 _8 j, f; g9 U4 D
, }2 b, Q; h6 j; a( c4 T1 }1 P4 [还有就是两个输入输出函数:- ^2 N  L9 w4 i' T( J0 E+ ^
void output_sample(Int32 out_data)
2 K! x( L5 f% F! W+ ]{
. [2 U9 S0 ], _) n  AIC31_data.uint = out_data;  
6 J2 e& U% w. C' {! P& G  MCASP1_XBUF5_32BIT = AIC31_data.uint;, R0 f$ v3 G. ]
}- t) G% I$ d& ]7 J' n% x' M' \
  e1 x% B+ Z  e8 T% q4 }3 y; A
Int32 input_sample(void)
" y, ~" N3 `) P& {( Y5 M2 d{  5 C# u$ `' Z; u1 g) L8 T* Y' h
  AIC31_data.uint = MCASP1_RBUF0_32BIT;. A+ [' T: _/ q
  return (AIC31_data.uint);
* i0 P( \; o4 S: r}
8 Z* ]7 [4 m$ Q" |* m) b0 T6 \8 o+ Z0 |  n: _' 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-29 06:38 , Processed in 0.041027 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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