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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:. v3 M2 z# C, S8 \  Z1 k
main文件:
- u& u# |1 ^; |' P0 uinterrupt void interrupt4(void)  ( R* g" i" z& Q; \# e* `! B3 Z
{9 \  H# m9 Y' c  P/ V1 j
  Uint32 sample;: i! E, u' A6 o" ^' O

9 T- m0 x7 {/ I& F- m/ l. o  sample = input_sample(); // read L + R samples from ADC" A! ~  y2 @2 ?- [
  output_sample(sample);   // write L + R samples to DAC * q9 s& V4 i2 F/ B5 k
  return;
" _& e6 \& o$ F6 s$ l5 k}
5 v7 H- e2 V* B  h) P9 W" ~1 S: i& M& |% S9 t2 s2 F
int main( void )1 K( r: }; d/ N+ N) p
{% n" J. o  c6 h& \1 }3 A% K+ A

+ Y; ?9 g+ e+ w    /* Initialize BSL */0 |- m. r: t0 r1 p
    EVMC6747_init( );
$ `2 j7 s1 }' z: R        /* Call evmc6747_intr function */; r) s  ?( P. B
    aic3106_init( );
% |. B* Y! z% X7 w# u! X# B        while(1);/ C0 D/ k, X0 N5 I" m- C$ [
}
: w! P5 v' V5 T% x4 w; `' [$ ~4 `8 T/ @6 i2 O

  {7 I- I! B/ j# x8 \aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
. C0 A% V. E1 x$ P/* Initialize MCASP1 */  @+ y$ v7 }  v
    mcasp = &MCASP_MODULE_1;; y: s$ K3 K4 T' _' n% x8 J& {
    mcasp->regs->GBLCTL  = 0;       // Reset6 G+ V- ?) x. u  G2 O. Q! C2 U
    mcasp->regs->RGBLCTL = 0;       // Reset RX- s' S3 @' i# ~* I: D
    mcasp->regs->XGBLCTL = 0;       // Reset TX
  V2 f8 X3 V' E, W9 d- m, |" u    mcasp->regs->PWRDEMU = 1;       // Free-running
; |' E2 D3 M& v7 p4 S/ s   // configure McASP0 receive registers& o8 k" P7 j4 n2 k9 F% y$ x
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
* K( w3 \* n5 s! J) O1 X4 l$ {2 i    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
0 O4 s8 Q! S; i4 F" t    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
- {( f7 X# ~6 {( r" ^& [: _    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
9 _+ P+ ]$ d' z+ o& \    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
& l- T2 W+ p8 d3 J+ o, \    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
2 R1 K9 k. ~9 X  \! u    mcasp->regs->RINTCTL    = 0x00000000; // Not used7 u" Q" j/ `  B$ B% S0 r" K+ r
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2565 ^0 c: ]: G: L6 k/ V

" j3 B# y) c1 o+ `8 T; t    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
6 g9 g. g% a  J3 C( t" f    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus9 g7 D! O& x! c5 S' t- s
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word% ?8 Q# L0 @  B- o
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16$ p# A4 ?1 w6 m
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK  x. n! I) L8 H; q" V( C8 @. ?
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1- ?2 b0 a( ^; x6 L/ ~% g: A
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
" M0 {) Y. o) i! [( i- ?7 L    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
  I) D! L/ J3 p, k& `
  Y7 [1 C# U( w! A# _9 {2 t    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
; p$ c" r- m# Y+ y. B9 w  ]9 m    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT! E5 `4 l' [+ k: h6 R8 q  Z
    mcasp->regs->PFUNC      = 0;          // All MCASPs" U2 ~' y$ B8 d- V4 S1 O3 H
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
: h# i. [  a# ^" o4 R7 Y$ _' r: q  r5 N/ p  R" v+ ]4 ?
    mcasp->regs->DITCTL     = 0x00000000; // Not used( C- a0 S" A- D
    mcasp->regs->DLBCTL     = 0x00000000; // Not used, B2 r* y; A# x0 C7 w' m" D  O2 {5 g
    mcasp->regs->AMUTE      = 0x00000000; // Not used3 z" L6 \  V" t: Q& W
3 t* u7 o7 g! X; H, b
/* Starting sections of the McASP*/
! N) E' }8 H, a) z    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; , _( b1 f' ]( Y7 l# T+ k6 S; s" y# u
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  - B" I6 @3 }+ P0 }3 Q  @
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
2 h& `# Q) f# D/ A8 J0 l    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );6 E+ i9 o  a$ v& G7 w$ I/ ]
4 `9 X/ y5 |# D& ^3 ]
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
0 @. t. x- m, w# K0 Q8 h    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
6 }8 m% _$ b2 g, D$ M. R: Q    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
; l# |( x2 X+ C/ W* z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
# n8 J+ ~% q  V, z% W* e2 {$ ^2 y6 `. t; f& d3 z0 ~6 m
    mcasp->regs->XSTAT = 0x0000ffff;
7 J( q" \* _" _$ V5 v9 \3 y( `" [    mcasp->regs->RSTAT = 0x0000ffff; $ C3 q' x: a, V& l# N- {: ]% X

8 F' ~0 E& c$ w" S" X' h: L5 v    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
: q7 f" d% L* p! k7 ]! m    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
( `& Y. b7 [" d* k, N8 T. y8 }2 V    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 0 t; Y# }9 d. p! w- ~9 t- R% y
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );# Z: B* M6 K) S: b, @
* _8 ~$ I2 g/ N
    /* Write a 0, so that no underrun occurs after releasing the state machine */
! g# r; s6 G, P- k0 j5 e+ \    mcasp->regs->XBUF5 = 0;7 }( b3 {( d" D& G6 d
    mcasp->regs->RBUF0 = 0;7 D6 Y& c$ [( @) S5 x

3 A8 p* g8 _2 g9 I# B( c6 a    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
6 J6 O# W0 f' E& h: N$ S+ U0 a    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );% I) Q0 A, b- S& X( ?! v+ \
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;   G$ i5 \( Y8 g- ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
3 M$ e+ s. {5 u# Y+ ^
/ V( R& Y9 x+ E" T, _9 o' C    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
6 B/ ^7 Y  z3 Q" Q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );0 s# D6 }. h8 C+ J. D, D
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
5 p, x- Y: }/ t3 [    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
9 _8 a5 f& x0 C  u
& u) e( u6 p  h    CSR = 0x0000;
8 i# ^+ s8 i% _& v: Q    INTC_INTMUX1 = 0x3d;( f( P( Q0 e& b
    ISTP = (unsigned int)vectors;
7 d& @! Q$ ~( U    ICR = 0xFFF0;  2 x. m: T3 [) w2 q, z4 y% U) j+ w
    IER |= 0x12;  
2 F1 i5 t. U2 W& {    CSR |= 0x01;  ( h* A1 l: Y+ m& Z$ b+ }

) |- g$ ^# t/ W
  m3 l1 z. V# |1 Y& ?: X4 k; m. u+ D( t; R
还有就是两个输入输出函数:
0 \. N) Y, T7 \1 J1 rvoid output_sample(Int32 out_data)9 Y( V, O8 w- @, b
{8 }* v( D. N6 C+ N
  AIC31_data.uint = out_data;    d0 n: b: {$ _& q
  MCASP1_XBUF5_32BIT = AIC31_data.uint;: w4 ?3 L$ E' {" K  D3 |
}
4 m9 w3 ?; k8 o0 L- o  |5 N2 r9 ^+ K5 l( ]
Int32 input_sample(void)
( q' u" b% M" z" P+ `6 ^4 h5 Z{  
- E1 Y  W+ e% I- P% I0 j, r' f3 z; O  AIC31_data.uint = MCASP1_RBUF0_32BIT;. i: K) `: Z3 |0 F) I+ E& {+ X
  return (AIC31_data.uint);
* t, g, Z  b! }! I/ e: K}4 }7 S$ w9 _7 _- ]9 D

7 W7 N8 X6 ^4 `  y) `$ e4 P
分享到:  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-2-10 01:14 , Processed in 0.041309 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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