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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:8 L& V! L( n5 J- b& q+ q
main文件:. [( Z3 f/ n/ B1 C3 r
interrupt void interrupt4(void)  
  ?* L3 E; ~, d0 C( E, u{
3 A+ V6 ?4 m6 G7 G  Uint32 sample;
  r, K# |2 [+ {+ n. k+ L8 A
! C% v: w% G' r& E# Y  sample = input_sample(); // read L + R samples from ADC7 V" L4 L+ A' _4 T( ~6 o: j
  output_sample(sample);   // write L + R samples to DAC
9 w1 _5 U- t% x  return;2 R: Y# S$ W" O% U8 U! m
}
  W, q& y: J( v. n+ N5 X" q( t" K5 X+ X/ [2 ?
int main( void )
/ E$ o( s+ o7 R' Y0 b{5 e, E* N" p" U3 M

; `7 L  i$ a! x2 _& X" A    /* Initialize BSL */
7 K7 r* }0 o5 i' g0 m" n. j# A6 z    EVMC6747_init( );/ ^2 s; v5 ~- z) ]3 [# l6 k. T
        /* Call evmc6747_intr function */+ l; Q  ~5 |% {0 M" O% Y: h
    aic3106_init( );" [1 A' B4 B9 `( }2 F, }; ]/ C
        while(1);
4 @4 k6 ?1 [6 S4 N}/ ]' Y4 i2 q3 Z, W) E" x* D% ~

# F7 h/ Q! c& W: \
6 K2 T+ S+ g/ v1 m+ ]4 }( _aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题: C4 I) W, S3 t2 a1 J& A
/* Initialize MCASP1 */( I$ g, P9 [3 j( v% R7 z: q. O
    mcasp = &MCASP_MODULE_1;3 p6 b9 v0 M5 u7 `8 o
    mcasp->regs->GBLCTL  = 0;       // Reset1 g% v/ q  y/ j: }0 h5 M  I" k$ F
    mcasp->regs->RGBLCTL = 0;       // Reset RX/ u" A5 t1 b4 i& q2 ^: u
    mcasp->regs->XGBLCTL = 0;       // Reset TX
$ K) m# p+ \- w  X    mcasp->regs->PWRDEMU = 1;       // Free-running! I: l. @5 g/ ^4 H" z
   // configure McASP0 receive registers. \2 D7 g. M$ Y$ h
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
# h7 L/ Z3 e5 {6 W; Z5 |    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus) O0 k. q; E, O! W3 b: |4 V
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word! {7 l. D* E' r; b$ b8 b; U
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
" C6 ]9 M' u1 j$ i9 E& i2 z7 @/ v    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)! B' G, k7 k- S+ G# r$ K
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1" k8 [4 C: V. }9 P
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
; A: m6 H) q% C5 e    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256) \: Q& }0 w4 g: X
; g+ N4 N1 H: c
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
1 ]* M, s& G2 a6 b4 [    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus, c) R  C' ~' W
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
- o3 e, s' x- n/ j# k  L    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
! B+ h, F8 B0 E, C/ s    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
7 l" H# m9 i1 b% r    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
' B! j$ {& ^6 e' P    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
, X8 N( ~# o. J; N5 G    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
# A; @9 Y8 U3 k6 g8 \) J# C% r) ?, U/ U! W$ l. A
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
* y) u5 p+ E: {, c3 |% @  f* ^    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
0 K$ |: ?( P% g$ ?5 h9 ]- U1 O    mcasp->regs->PFUNC      = 0;          // All MCASPs1 |. Y7 b  b1 ^8 u' E" c4 z4 h' \
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1- }5 c) ]& S$ Z3 o- V+ @  }
; l3 g% f# d7 B+ s7 U0 d
    mcasp->regs->DITCTL     = 0x00000000; // Not used+ M0 g0 l* H' e- a
    mcasp->regs->DLBCTL     = 0x00000000; // Not used- `) i8 @# e8 q5 y% t) a( \( |) q
    mcasp->regs->AMUTE      = 0x00000000; // Not used! ]- b: R8 f6 j$ h8 L" {( M8 k9 N

* x* q# k% t8 ?8 X1 h9 p- t# b4 i# X/* Starting sections of the McASP*/
2 ?( x; g9 S4 ?: ?& H/ N" F" i    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; " Q" O  W/ A" H. F% ]
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  , r2 z7 H1 {  I6 A# c3 a' w# f% f
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
6 N! U8 O# D2 A; @& B0 j# ]* q8 k3 [: z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );% C6 W3 x1 k: C1 l

& F$ }0 \( P2 j- @  e, k- J    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; , k/ i. @) a  M8 l0 F! f& Z0 h
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );$ T- {3 p& C$ h, r, d; X
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
8 L% Q. q* d; c5 o  b% h2 x8 `' J    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );% w  _" [" W1 V3 u4 f% k0 _

4 k: j$ M- B( u    mcasp->regs->XSTAT = 0x0000ffff; 5 O* D4 P! x1 l; e3 E
    mcasp->regs->RSTAT = 0x0000ffff; & ?1 P5 T) ^" ], b4 ^3 i2 s- T/ B
) [# ^, S) X8 W
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
, g8 h9 f7 v! K8 J    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );# P) f% b+ p: \. _3 O
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; : a# l- U# x' `6 m
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );: u. n8 `9 Q1 {1 L0 L+ ~& W, C9 e

( ~! Y. K' M/ ~: C! r8 U* m9 D* g    /* Write a 0, so that no underrun occurs after releasing the state machine */
7 c! ~! e0 S6 V    mcasp->regs->XBUF5 = 0;4 E/ M  m9 ?; ?) a
    mcasp->regs->RBUF0 = 0;
# V' u1 _' `+ _2 [! J5 F, E4 z2 w9 v& ~3 _
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
' I, g# h6 \, S2 a5 g" _+ E0 @( U2 @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
3 s, J6 w) ]# K    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 3 ~, d1 h( c% d' ^% J5 j* q
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );+ E" G1 D, {0 Q; x% u) f

* R2 l2 g  L) W+ w# ^. r$ w8 p    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; ) |4 `* [8 L; C; @% P
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
4 ]* i9 h; v) u4 d1 {* b    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
4 t- N! K! Z4 ?  _* ]    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
* \  E, R2 J& ?$ X
5 N0 Z3 F0 Q; G1 `& Q, C    CSR = 0x0000;. S. G1 X" _% [% U
    INTC_INTMUX1 = 0x3d;$ v% f" p- d# d4 `6 |, i' d
    ISTP = (unsigned int)vectors;
( N6 x% R( m7 }& O. q    ICR = 0xFFF0;  2 w: T8 U! z* I2 z. I5 }
    IER |= 0x12;  
8 B" u4 ~9 O( d  c    CSR |= 0x01;  
0 J9 O: X, b+ C; ~& s  n5 }* w; X: O, G0 d, m, N0 q4 U
/ \; \6 C! I  [8 p

8 G& {% J! t1 Z) z  J4 ?) r  |还有就是两个输入输出函数:4 K( c' n/ `4 E
void output_sample(Int32 out_data); ?4 |7 s; s3 ?3 Z7 ^6 B
{
$ G0 {! ]5 C: J1 w3 V5 Y) ~% p! M  AIC31_data.uint = out_data;  
+ Q7 f9 a. w' l; u: M+ x  MCASP1_XBUF5_32BIT = AIC31_data.uint;
1 S# N9 X2 F+ m8 m5 F4 E* s6 r}
- T* X7 x" y' G. \. n0 x! `
4 V- g( w' A! c, A  lInt32 input_sample(void)( f  N/ [9 l8 u. m
{  
2 t/ f4 l9 p; G  AIC31_data.uint = MCASP1_RBUF0_32BIT;/ `; t( h% o/ E& F
  return (AIC31_data.uint);
7 V; Z) o8 Z7 X. A}
3 t2 }6 [8 L7 z! h4 z9 w7 w8 i! N' b: l3 U: N3 o( a* A3 H( R9 [
分享到:  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-11-27 23:13 , Processed in 0.039453 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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