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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:8 Z! i& O5 l8 \' p3 i
main文件:6 `: q7 G& e% _( w" o
interrupt void interrupt4(void)  
9 m# X& C! q, e: f# N( P+ [  G9 ^{/ \2 U1 \* D$ T4 R8 f- _. p
  Uint32 sample;. L1 ^4 \' `- }

4 U: U8 D( l9 m  sample = input_sample(); // read L + R samples from ADC
! o5 ^# r: ?$ A( N8 g7 x. k0 @  output_sample(sample);   // write L + R samples to DAC # m5 {5 P8 z8 r5 {# b: N, a
  return;# L" z; P8 h6 v* c. ~5 p' f) V" X7 Y
}3 i, M% ?0 f4 B$ j9 A

9 `: e, A) h) K% ~9 rint main( void )
# f3 x! |/ R6 q, k{
  r( S) j/ Y! I# j# F* v& Q# y) ?
    /* Initialize BSL */
: I) A# M( x4 s    EVMC6747_init( );6 q( u3 Z  B0 x' m  Q* R+ Z
        /* Call evmc6747_intr function */
3 h% p) h9 T/ ^* m1 I5 ]5 ^    aic3106_init( );3 ?; |) J5 V* O0 W0 B. a* A" _8 e
        while(1);
2 H% Z% L, w# }, I}- ^$ J/ F! o# U/ v
% B, G. K8 A$ N  F( N
" u9 O0 \+ g; b- r; ^! w5 u3 u: c
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
4 _3 M* l0 i) ?9 F% [/* Initialize MCASP1 */
& m2 [$ G' G  e  H# Q' g    mcasp = &MCASP_MODULE_1;/ }( w8 j6 K$ N6 [
    mcasp->regs->GBLCTL  = 0;       // Reset
# Y4 q6 B' }6 @3 E3 }' E! Y    mcasp->regs->RGBLCTL = 0;       // Reset RX
: u+ f) W4 k2 V1 M/ f! p8 e    mcasp->regs->XGBLCTL = 0;       // Reset TX# P- I1 e- }" v4 r* ~* ?, C
    mcasp->regs->PWRDEMU = 1;       // Free-running' I2 c  V$ C8 ]7 t- \+ S; _9 o
   // configure McASP0 receive registers8 a8 Y% @8 d1 Y" x
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
! k7 Q/ ]- w/ ~; q3 o3 E, Z    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus! y) y1 P2 n; s$ ?; a
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
5 s. y) O7 x) `2 M    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
* N! Q. C) f5 y9 P    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
& m' Q  E4 \3 e# @$ H    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1) A7 x) `9 G" s; s6 n5 m) y
    mcasp->regs->RINTCTL    = 0x00000000; // Not used- }- Z' Q/ Q! @
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256# U' e$ t3 O% q3 F1 J
) K2 i+ A9 N  V. N3 C- G. i
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
/ J! a2 r8 t: _8 I    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
+ G, P1 f+ W- i$ Z5 Z7 T- H8 u    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word4 j# ]- d& x( s" V; l. t. i5 e7 h
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-165 r7 c( L) ~% p. A7 J: @
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
1 ]9 s( C4 J( O; s! v  m+ R    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
' ~0 |7 R; D7 b7 N: }    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
3 }  m8 f1 u* V- N: J0 V1 V4 ?# g    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
0 H# [! R2 r" S5 v/ r9 }5 J
# K+ c/ J' P1 k$ m    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN) V2 s& m- y7 E! C) @3 T
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
9 K; B4 _, ?" O+ @    mcasp->regs->PFUNC      = 0;          // All MCASPs8 _3 g! R8 o. Q1 _0 ?0 i% O
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
8 d$ ]% f6 ?8 `1 ^& r. s8 X
+ g' D2 c3 ^- Y( ~    mcasp->regs->DITCTL     = 0x00000000; // Not used2 i- P- M( O  A* [$ p. t( H
    mcasp->regs->DLBCTL     = 0x00000000; // Not used3 Q. o& ?8 U/ t/ T% }9 p
    mcasp->regs->AMUTE      = 0x00000000; // Not used
( ~8 I+ m2 q( E9 [. v1 W: G' e. `  |, H5 B; U
/* Starting sections of the McASP*/
1 A& J- _) ^+ G: k! B    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ( e. z4 Z) ~/ o0 O0 h2 F
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );    T& Z8 D0 W+ [0 p( q
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
+ {1 b5 L- C3 T+ y! b. ?0 T3 k+ |    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
" q# B" Z6 b% R7 T+ k3 _1 Z& U# |' k; g7 _( u
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
1 u& L% k9 B% O1 w    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
4 Y: Z4 ~- V; S$ ?    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 3 \, j4 ?& ^/ D9 Z  R% O/ n- Q6 d7 j
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
+ q, X0 s8 U  p5 H4 }8 q2 O
6 J. Q& c" i! v, p$ c% ^    mcasp->regs->XSTAT = 0x0000ffff; 3 N' ?+ F5 R# v4 T- t7 e0 B' F
    mcasp->regs->RSTAT = 0x0000ffff; 2 V4 @% h( e" z* k& Z

1 A" b9 f; d0 S. q6 h/ F    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;/ ^  Q/ K9 X+ n9 |7 ]& M
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );0 z  h2 }. ^0 s( y5 w: g% p
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; # f0 t7 l% ^2 S' \' J1 {' u$ D
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );, K2 w  A/ ], v2 r3 m2 z% k

, v0 a! ?0 o+ \7 G; r% `    /* Write a 0, so that no underrun occurs after releasing the state machine *// H4 x5 q5 n5 Q6 o, \! M- o
    mcasp->regs->XBUF5 = 0;. H1 Q( X0 `1 X5 I
    mcasp->regs->RBUF0 = 0;) d' S/ ?& F" V" i3 g. `0 ?$ I

: k1 C1 z! l1 L% B. N    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
0 `4 Q: C: z: Q4 d5 |: H4 T    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );2 M5 w( ]0 `. G  Z% x
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
2 A/ J8 B$ m$ k" y1 }) ]* A( D  G2 i: ^& l( Z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );& |! e. P: v& f! O9 p8 A8 o
( q' V, S+ u$ o$ x* }- \
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 9 T  S0 x' [# ]" k& n
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
% r0 H; h  L$ e9 T3 r    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; : j" e# H. S/ ^8 ]+ M8 f# d7 O
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
# g/ ^' `* \2 Y0 s- G2 I" O
2 F+ M  u$ S. p% o    CSR = 0x0000;3 Q, R* g& Y3 H) O# T. K
    INTC_INTMUX1 = 0x3d;, @. L  R" I- k. T, i& L, @( `& g
    ISTP = (unsigned int)vectors;
+ u* m  f( C4 i; D% C; L    ICR = 0xFFF0;  
  w  y$ ]7 Q9 @; O; J1 @    IER |= 0x12;  
* _% G( q/ T. G0 _% ?) j6 o# P    CSR |= 0x01;  
* L% ?+ \: X  j; v3 {  J6 J4 \1 S
$ \  k! ^7 [  L2 h1 T! z+ ?  A1 R4 m/ E! ~0 I

+ `, r5 x& r  a  z8 M" a还有就是两个输入输出函数:
- k5 _& l* H; B4 z% }0 i5 |void output_sample(Int32 out_data)2 g. E" w  j+ E) G5 `
{# Q, Z& G4 o" L6 V9 T: x
  AIC31_data.uint = out_data;  
& f* k% c9 [2 M$ ?7 d  MCASP1_XBUF5_32BIT = AIC31_data.uint;! }0 G! R8 H3 E2 h
}! u* u8 n: N& |8 I' c
$ }* m5 r! F  F4 n2 @1 q
Int32 input_sample(void)
* v9 X& ^" f; _# A' N- j, T" j{  
! O9 K+ a: k) H( G' P  AIC31_data.uint = MCASP1_RBUF0_32BIT;
0 r% n# O' `3 Q, k' B  return (AIC31_data.uint);7 f1 ]  [5 n6 _. x1 w
}
' H8 m5 Y' S% z+ C9 ]) ?3 }, f. F* I
$ F& A, z( z- x$ _4 d0 c5 _# y6 ~
分享到:  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-14 21:12 , Processed in 0.039237 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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