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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:5 \( F$ g1 V8 S; H, T6 U/ Y
main文件:1 q3 q# V+ C% c
interrupt void interrupt4(void)  
+ f! P" ?! F$ z1 {; g{+ n8 F5 c6 R& ]2 Q% M; f
  Uint32 sample;
5 U' f) a5 F! V  e: w1 S$ [1 r0 m4 e6 {
  sample = input_sample(); // read L + R samples from ADC9 [  Z' H; t/ Z$ W5 Q' Y- N
  output_sample(sample);   // write L + R samples to DAC
  T+ V1 M6 h% D) |" {" C  return;
/ i3 Z4 Z6 O" u5 B8 m9 _1 H}' v7 P, `. X; q  s+ J/ `3 e' B! @

0 {, W- N% D+ Y6 k: k; S! I8 jint main( void )% O& A9 n- Y: S/ t8 }7 t" N7 ]
{
! ]# z' m) a6 t3 r9 ~5 Z5 m: r7 u7 k0 C! l
    /* Initialize BSL */
/ `; g5 `; H# J0 N, {9 z# a    EVMC6747_init( );/ |- @/ x4 I& ~1 Y
        /* Call evmc6747_intr function */
4 H, a: X6 b* [" k( X, c7 d    aic3106_init( );
3 w  d7 Q9 a- S# U1 Y        while(1);
. M/ M7 d& @8 O) y# p}
' s  w( R+ `7 A
6 h$ p6 t: {4 f" U. p& U: Y5 `* h3 S  S2 F8 D
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
; s6 s" R% S: b2 M  u& }/* Initialize MCASP1 */: q' l2 u% l* o. K) R; v, N- W
    mcasp = &MCASP_MODULE_1;
! C. f; _8 @% v1 Q    mcasp->regs->GBLCTL  = 0;       // Reset1 ~* G" W, A9 D2 C: T
    mcasp->regs->RGBLCTL = 0;       // Reset RX  w8 ?, X" m/ \1 D0 A, k
    mcasp->regs->XGBLCTL = 0;       // Reset TX
" C8 }1 g$ P. s    mcasp->regs->PWRDEMU = 1;       // Free-running  }/ ^1 p1 f% m$ p7 o/ R9 W
   // configure McASP0 receive registers2 [2 A, ]1 N6 X/ a
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used  ?0 h; I! A: j5 W- G7 e) T( K
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus, v  U5 @' u4 h
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
7 k# m5 E# L2 c4 ?$ |2 r, t% s    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
1 g- f( F# q0 J/ U    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
) x+ s) G6 e, Z) D+ T    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
" A  `9 ?* y- n* c8 X    mcasp->regs->RINTCTL    = 0x00000000; // Not used; b# Y& X% o3 H& W
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
* e! |! x5 u( \) [' L
. @( l) F6 G" y% ^) R    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
7 _- h1 C# ~* \8 k    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
8 [1 h5 S9 r0 [" M7 U0 J7 X# l    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
/ O1 Y! Q' k. t4 ]* h' M8 {    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16# R4 H! i& o& T8 t) x: ?' p
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK0 J8 N% S1 Q0 x7 Q( U
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
% `- ?/ `  s! A    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit- [" O- Y( O, G  n2 ]2 `
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
1 [0 ~+ }6 {) u0 s2 c
( N3 g6 i% y8 e    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
4 P6 e) h8 m1 v/ L- O( ]    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
. c/ A& q! T/ Y* Y# h* w6 V1 t    mcasp->regs->PFUNC      = 0;          // All MCASPs3 R. W  ^" t9 [# s
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1' k& K- R( T& n6 E+ Q
9 I1 A( W$ W, n3 C. S, {) r
    mcasp->regs->DITCTL     = 0x00000000; // Not used; @& q  U: J/ J8 e% M' R
    mcasp->regs->DLBCTL     = 0x00000000; // Not used/ F& e3 ~3 m6 S3 d% w
    mcasp->regs->AMUTE      = 0x00000000; // Not used
8 w- o2 P+ B) f( Y9 w
* g& b6 \" C, ^5 z/ ?/* Starting sections of the McASP*/
! f0 F7 E" K6 D    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
% h1 Q' v8 T! \: w  H8 q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  ) V2 R8 g$ h- B
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
) j# b6 m. f; s6 w, C    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
6 l) ~2 c% U0 a0 X* ?" c1 \% Z! _! [) G- \9 R
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
8 o4 q- @$ j" F% L+ F0 S0 u3 }    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );, t% e! Z6 y6 x; Q4 i& \* k% E
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; / W" T8 G4 d7 `1 W" Y" v
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
: C* M: S7 Y  Y& D$ I2 Z
0 n8 R6 A3 U/ t( G% c. S+ s/ a    mcasp->regs->XSTAT = 0x0000ffff;
9 X9 _8 O& d# v+ X    mcasp->regs->RSTAT = 0x0000ffff;
% j7 n7 p, v: f! {, ^
$ X9 |+ T7 m8 o7 K) I3 a3 S$ P    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;* d# o  [4 c4 X" m8 H
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );$ Y6 I) n3 o+ b* V/ y
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 8 q" r$ o8 F8 T1 y$ Y: s
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );# s- a: |  X) g7 x$ f3 ^: \0 \- Z
7 f3 C' l% q6 L+ w  r
    /* Write a 0, so that no underrun occurs after releasing the state machine */
! \4 J$ C# d: `0 z    mcasp->regs->XBUF5 = 0;" Z. m- G- @' d/ ]2 m5 g1 p: J
    mcasp->regs->RBUF0 = 0;
1 ?, |2 x' o* K# n8 ^: x- q0 E2 `% W
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
2 {5 P2 j/ E5 ^, W! K2 `    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
, o6 g: Y" [# s8 k" U    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; , r( b  S: e, c2 R# B
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );& n6 S/ k' o% [

: t% c( ~2 C" m2 p  z! m$ N    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; % r  q1 Y0 ?% m9 X/ r. V2 @- ]7 H
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );% g9 J; [* i6 N/ g3 w! I
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; ) y0 u0 e, @! j  S; f: v8 R% i9 l
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );$ v( J' H) ^9 L6 O* [

+ F  b4 a9 ]# r/ N    CSR = 0x0000;
- x, r: T8 O7 E    INTC_INTMUX1 = 0x3d;
3 P! I* v; e* K' E" q5 @    ISTP = (unsigned int)vectors;
& V% f' N# Y; P! t; ]! G" J; \. a    ICR = 0xFFF0;  8 @. V3 @% J5 x% B
    IER |= 0x12;  
+ t: Y* f: F  g7 J) b" @! ?    CSR |= 0x01;  
2 S8 ~$ I  K  p1 g1 H. Z; ]2 P- E1 j8 Z3 K
$ R+ J' W  c* b' U
0 |4 P7 s4 h, C! a" k& d7 Z
还有就是两个输入输出函数:
) Z: k( c7 n0 O0 W' z1 V! c5 h9 @5 Yvoid output_sample(Int32 out_data)
. g% o% B' V) v$ h7 l{
, i" I# Y) ?7 t2 z* l& `  J  AIC31_data.uint = out_data;  
7 F9 ^/ p4 P+ s. C  MCASP1_XBUF5_32BIT = AIC31_data.uint;
1 L8 R1 `, M. p/ E}* N$ E9 Q0 m' i1 {. c4 Y6 C* h9 e, ^5 s
' Y; ~6 ~$ p: ^: B' L
Int32 input_sample(void)# N: m4 n/ j" h, d. ]
{  
  i2 u: ~3 q7 r3 k" v) [$ O4 k: _  AIC31_data.uint = MCASP1_RBUF0_32BIT;! ]& [" G' v- [* ?! w9 N3 j
  return (AIC31_data.uint);! u& U0 s4 |7 O% _
}
$ b% s( K1 E5 \7 j* ~
4 o. |8 ^* K. I6 n, ]5 L
分享到:  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-4-7 21:52 , Processed in 0.039045 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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