C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
/ l% L2 I) {) Wmain文件:
: j0 ?/ f  f0 \& ]( d, qinterrupt void interrupt4(void)  
' ]- y3 h8 E' }; P{
3 R* R* X3 m- q/ C6 Z  k9 N' v$ F  Uint32 sample;
+ h5 P( }( X7 u2 c! s. W5 m+ M% R/ P: t/ i, D
  sample = input_sample(); // read L + R samples from ADC
& m" g& a( e% ]: w" y( U8 K2 D  output_sample(sample);   // write L + R samples to DAC $ }; h3 c3 i5 F3 t* j
  return;
% z5 f! X* Y; S- u8 ?5 j}
( f' J- c  k, c
+ ~) o! m$ ?9 _: Pint main( void )
: E2 E$ Z6 O/ x  ^. {" q; t. i* P{
' T* ^* v$ Y* C" b+ A/ l6 {' g% r9 u/ _/ u& l
    /* Initialize BSL */# N7 l9 p7 x, L
    EVMC6747_init( );
. S) O1 K% j4 z$ J        /* Call evmc6747_intr function */4 n0 T1 [' Q" a
    aic3106_init( );
* n2 M& L) N6 X- y" ?3 a        while(1);0 W1 v. h" B' g  ^
}  d( A& l9 i! T" ~, {

/ n5 Y( @1 M5 j+ F, O2 b8 I* J0 k9 d$ E+ k6 Y. A
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题( L  ]( G! g" ^$ ?( z
/* Initialize MCASP1 */
- x# q- {7 {# [6 e# r$ n    mcasp = &MCASP_MODULE_1;$ x! I! y( H$ |
    mcasp->regs->GBLCTL  = 0;       // Reset
# R- i4 \' R1 W6 E& F) [+ S    mcasp->regs->RGBLCTL = 0;       // Reset RX
8 W$ W; V  T+ F  C& t" X0 `    mcasp->regs->XGBLCTL = 0;       // Reset TX
" d/ N, I# x) ?, J: R    mcasp->regs->PWRDEMU = 1;       // Free-running
! I+ d7 x7 s0 k) q   // configure McASP0 receive registers8 u- i" j' `! m& k5 P1 U, ]% m/ i
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
# c, h" c; f& W    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus6 G7 e: P# s3 S  X! e/ ^
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
$ j  I# r% }* u6 F5 b: o2 d4 V    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)4 I3 {, s8 W' d; `. B: m2 z0 o
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)$ P: ]  E- T* c4 ^/ ^0 _( `9 U. V
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
% z8 Y) a6 G' R  n+ ^% N    mcasp->regs->RINTCTL    = 0x00000000; // Not used9 V) e9 ^4 {. d/ o3 F. A' x- D
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
6 c% K3 e4 C& E5 D( ~
9 s8 r( H+ g; Y& j3 g    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
3 I% f8 ^- s3 v% n. f# a2 k# m    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
; T$ t3 W' I( c4 g5 j, N# W    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word) X; n2 d9 h2 s9 f6 U8 p/ j
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
3 H6 O! J: \# k/ q    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
+ `; C$ U; @9 f; D! G    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
# U$ P' D6 ?; x! e& U    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit1 a6 N9 K) a( K. i! m% O
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
3 U- L; e0 F$ M3 U: x2 Y+ D2 v* ^  b& @7 t/ a/ k6 B0 ]6 i
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
( Y& O2 H; ~: C$ n+ `    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT1 n$ |. _/ F% w6 a, J9 B4 N
    mcasp->regs->PFUNC      = 0;          // All MCASPs: \  q% B3 C9 e: e* V# N5 l
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1' I. k4 P8 c8 }1 C, K

& |( D$ y/ Y9 A& q4 O% m' q    mcasp->regs->DITCTL     = 0x00000000; // Not used
, \! S' J5 i$ i    mcasp->regs->DLBCTL     = 0x00000000; // Not used0 _  X" v' y5 J, U; n
    mcasp->regs->AMUTE      = 0x00000000; // Not used) Q! R& l1 U# e$ L1 C( ]

; N. |6 N3 `+ W! s: w& b/* Starting sections of the McASP*/- s/ u' b( |# Q1 u' u7 b6 t
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ! v! g5 [- x0 y6 o3 C
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  / c/ V1 M# j# P$ p' U% m9 J4 I
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
2 n* x, Q# U- T/ u& C7 J    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );2 s& b( C: l9 q1 V
" f8 c: X0 \' \! b' H" w( I
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; $ [+ U' G7 V) r7 Z4 G! t! k
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
. ^9 m1 U/ [" [    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
" |# R' p3 m6 _4 }9 t- h    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
5 ?+ E; C8 O/ ^) B  A
; d4 i5 n5 z) `  f; C    mcasp->regs->XSTAT = 0x0000ffff;
. W- s7 T& R, L/ g0 e    mcasp->regs->RSTAT = 0x0000ffff;
! ]4 f6 J$ V( [2 G2 M) D7 `  D% ^
: C. N; P4 |& {/ U: z( c$ w    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
3 d0 b* H, ]/ g& M6 v    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );- I0 s4 _6 X0 \" I$ X3 k% D
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
7 m4 |) V0 y! H3 q- o; ?, \    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );' a, }3 y4 c' f% m: V" r

1 p- J2 E8 }9 Y0 x- ?$ r% J    /* Write a 0, so that no underrun occurs after releasing the state machine */5 n* ?  d( P- |) O/ z
    mcasp->regs->XBUF5 = 0;( y' U! P0 M* p' D, c# \& }* }
    mcasp->regs->RBUF0 = 0;" N6 A+ N9 R7 a

/ `0 A% k' A5 {    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
) ^3 Z( P' x8 m2 t& I3 _# p    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );4 w0 }/ g( N' t$ r: J
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
- c: J5 n& T/ L9 X( I. T0 w* R    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
  v- D6 \0 g( s$ A8 Y! q
, Z2 X  q# e1 ]5 F' k    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
  Z0 S+ M9 [- `% Q/ B, r8 j& T    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );0 `' i. M0 [0 \2 _2 A
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
1 S% I4 e  @) u2 p7 H/ l# {    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );$ M; i( \' T, }% D! X

% F3 r+ Y* A/ o. M" s! `  L0 L- y    CSR = 0x0000;
; l0 p7 y3 M5 [  R' F6 \8 H    INTC_INTMUX1 = 0x3d;9 p! |- i5 V, T/ C4 g' T) M
    ISTP = (unsigned int)vectors;# e3 o1 h$ G- `2 |8 `
    ICR = 0xFFF0;  , O" G* Z- l# m+ N% I8 V
    IER |= 0x12;  * e0 k2 U4 o6 E/ e9 |8 t% [8 O
    CSR |= 0x01;  
0 B$ P7 E* _6 D# R; L% {9 h' o/ F# B7 S2 q5 \+ s/ I; E% D/ u
) D3 |  k) `% H( o0 O

0 g) t3 E; [: R& Y, y还有就是两个输入输出函数:0 y* H; B- ~1 r  S5 a1 u; Z
void output_sample(Int32 out_data)
: i8 z3 W& d' {, f{% F9 ?5 n& M/ e
  AIC31_data.uint = out_data;  
3 t7 c6 n) s$ t( `0 Z9 u* n! A6 |: Z  MCASP1_XBUF5_32BIT = AIC31_data.uint;
  _& j/ L+ T; a7 I8 B}/ f  S% ~) z: i8 Y- u4 Y9 q
' {  H% _& ^; @: A
Int32 input_sample(void)
  z4 N4 d/ g3 ?' ]' u. ^1 z{  
" g( O4 V" ]+ s* S  AIC31_data.uint = MCASP1_RBUF0_32BIT;
. Y% I) z; |0 S5 W  return (AIC31_data.uint);
9 u9 l- E& x7 M: G) q  Q) n}5 a, i. G  `; E; ~5 a& r

7 Q5 g0 @9 e5 k) w2 L7 {
分享到:  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, 2025-7-4 11:43 , Processed in 0.043518 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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