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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:: P% T% O" \. \  c* q  @9 J
main文件:, U) b0 y* `* K9 A. ^4 Q0 X
interrupt void interrupt4(void)  
; J, _3 ^0 f& E" e1 K( U8 {" E/ o{5 {3 V/ _* x4 O3 ?" c
  Uint32 sample;* p! r9 M9 N; X
# p1 h$ H4 a. z. h. m& |% i. |
  sample = input_sample(); // read L + R samples from ADC
2 t7 l6 s0 q5 S$ c  output_sample(sample);   // write L + R samples to DAC # G$ P  }, m: s! A7 d0 j2 h4 \* E
  return;
" R3 p8 e- i( f$ p}
3 V$ ^5 v  W' q0 ~" }0 @" u
' E+ j  }- ~4 F& d% eint main( void ); B  `7 z- |/ Z$ E% h' d6 n
{* L& g- `! G' E, g

; n7 o( B- Z( X" E    /* Initialize BSL */
% h) A7 P: R7 P, Q0 D    EVMC6747_init( );
' Y' b$ A' M% q; s; `: ^        /* Call evmc6747_intr function */
7 Q' f+ E2 V2 \6 u+ X/ N    aic3106_init( );
5 h4 A2 w8 r0 q8 l5 N. _        while(1);  N8 S" O3 j5 i9 o2 C2 }) R
}
0 k: \0 D$ v, T* V  H7 {4 x0 S$ V

" s2 h# {/ f! i+ c( z6 S( @aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
7 E# P. f$ x. u0 ?7 c- f8 a8 S+ |. O/* Initialize MCASP1 */
7 n/ w: }* W8 _1 _1 L" x" _4 }" k    mcasp = &MCASP_MODULE_1;8 Z, y7 J9 f- c- c
    mcasp->regs->GBLCTL  = 0;       // Reset9 H5 `- T6 B% f
    mcasp->regs->RGBLCTL = 0;       // Reset RX  U9 u+ w" V& q
    mcasp->regs->XGBLCTL = 0;       // Reset TX
( ?% t! A' N+ c0 h# E+ Z    mcasp->regs->PWRDEMU = 1;       // Free-running) q( O. d/ k/ \
   // configure McASP0 receive registers0 u7 J8 }  w$ j* |' n
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used) c! x  }/ r/ A0 f+ u9 }! r" v% f7 m
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
! w* u* m# e4 |' C. }    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word& K7 {/ U  n! U% A1 E1 O' d* _
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)4 W; V3 u  R  a$ v( J% S+ ^, F
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
$ r# O( s" l2 q5 S    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
5 A1 L0 q( y4 X" U* N3 L( @  m9 d    mcasp->regs->RINTCTL    = 0x00000000; // Not used) j& g0 Q9 F7 `) d8 p
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256/ C$ _9 J0 c8 |  `, j& W- N
6 x+ a- r! W; \3 ^4 H" G/ u2 W
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used  K8 T; x) E; t6 Q5 ^& f! K
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus/ n! q8 l6 l2 V- E
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word( f% d, d6 y: K  O3 k9 @
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
5 `- p, b* ~+ H    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
4 T+ E$ N, ~" j8 C( K7 M/ t' \    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1  z  M% l3 i# g% w8 j( N
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
* F3 y, h4 E4 t/ h    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256" @' K5 j7 o' j# G$ q3 S" f  y0 m
* P0 p  s1 [6 L
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
; @6 E7 v# G5 W" n2 F    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
2 s& z5 r7 O& y! R* p    mcasp->regs->PFUNC      = 0;          // All MCASPs
9 u) R$ j6 G! K! @, K, {    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
2 w6 t1 i1 k, C* N+ K
5 x% E! G3 G5 F& A% U% J    mcasp->regs->DITCTL     = 0x00000000; // Not used  h. W/ L- R0 a( x
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
! f" x1 h0 w2 b: i+ V    mcasp->regs->AMUTE      = 0x00000000; // Not used
! G% e: s0 ^2 U; i! V* r8 G1 i
* o7 \- ^% l. R" t$ a' @/* Starting sections of the McASP*/
9 A8 i: J  |. d" Y' [9 |; v    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
' r- p  V: L- d2 v6 ^. T/ Y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
7 ~2 u0 e8 O) z. L    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
) e2 v# H" I0 f4 J2 l    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );7 Q( B. K* s6 R  a/ B" r9 P

0 u) `9 J. R9 F+ u1 Z2 U    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 7 x  w( U# w4 L9 F/ R, T4 d
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );6 p- h* U% W) j
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; + K; H, ]1 T% O: c
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );& Z" G/ K5 S7 U) b4 u* o

1 {9 V" m6 d/ R* t$ m7 G8 T    mcasp->regs->XSTAT = 0x0000ffff;
" _  `* V% \+ A. R2 o. ~! l) J    mcasp->regs->RSTAT = 0x0000ffff; 3 B& ?6 V1 t! \

' f; d& S! \1 z+ F$ E    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
) l! F7 |* f. z" f. q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
$ y: G. r+ Q! x- H    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; + ?- o, V- o9 W: d6 T
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
& w2 I; R: e8 |5 x1 }  q& n( \3 l+ P1 a, `) Y4 S% _, h  W# K; [
    /* Write a 0, so that no underrun occurs after releasing the state machine */
# w3 {: Y6 p( @    mcasp->regs->XBUF5 = 0;9 E( v6 ~  z3 }2 x
    mcasp->regs->RBUF0 = 0;! T6 |* f* h# B; a& x
& h5 q, f: T+ ~" e7 Z
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
- m1 v: l* Y, i& M% X    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );# Q9 R3 a; b4 t7 `
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; ; \) A1 K# K& j3 |
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
4 U: O; p9 W7 {4 l, \& k1 ?$ e* w0 [& F
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 2 G! d' i* W) j; \" }1 H+ A9 T9 W
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
: b& i! d' e- \! F    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 8 w; `6 W8 W( x+ f' g  F) {& |- @
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
; o- G& Q- P! E  m6 C4 E  k
7 ?+ m0 i. L9 I  f! g+ \* @    CSR = 0x0000;
; {. c$ p. R$ |5 h    INTC_INTMUX1 = 0x3d;  ]0 Y( o: p( v, B+ t& \( @
    ISTP = (unsigned int)vectors;  b" a: w! v7 g- g6 b; F# i4 i
    ICR = 0xFFF0;  ' ^. x+ I  X1 ]7 t
    IER |= 0x12;  
3 Z+ E) h7 T! U0 |  T# d6 w7 w) }, \    CSR |= 0x01;  
" \4 O$ J/ Y( _) l: k1 H+ r. ^3 C2 V  L8 g4 m
' Q  P' F) |% s* a' \
" P0 ~! k& L% E" ~! j
还有就是两个输入输出函数:0 u: W' v; }5 y0 I* K
void output_sample(Int32 out_data)
2 U5 k* U( `1 d: v4 F3 o{  p4 ?: w3 c1 ~
  AIC31_data.uint = out_data;  # p- r# r/ H+ w8 S2 C
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
2 b* @+ f2 v' ]}
$ i8 _! @6 Y$ O8 h# ?
0 T* s6 W' m3 x( RInt32 input_sample(void)
& M4 j8 R, }" R. s7 k, A  R- o{  ! y+ r& \7 W" @9 A+ t" s& c
  AIC31_data.uint = MCASP1_RBUF0_32BIT;, N6 I  \5 K0 W$ n, d
  return (AIC31_data.uint);
5 V: S6 ?: k% ^- p}
" F/ |( ~2 z( Q+ l, |* E; M* X: G; n  B/ O
分享到:  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-1 05:07 , Processed in 0.041413 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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