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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
0 M- `- d: |$ p# t5 z5 E5 ]main文件:2 A0 |( R) O. C
interrupt void interrupt4(void)  
1 e$ E  i5 V/ Y" e( ~{; \  X6 k% y# s( G
  Uint32 sample;
6 Y0 U, V# i% |/ q' b0 n6 J. T1 n$ a, S; u& |+ d" S/ b
  sample = input_sample(); // read L + R samples from ADC
2 i, X/ |" O3 \" S" H  output_sample(sample);   // write L + R samples to DAC / m; \, l8 w# f9 ?% g( v' I$ f! ^& k
  return;
; g7 g% A( ^& Z4 j}$ ]5 k* }" K3 n+ w" f
, _+ Q- z9 }/ a# K* N# M3 K
int main( void ). C( H' g0 V4 j
{
' H: r$ X3 A; |
6 c% ~* c- L! d, v8 ?/ v    /* Initialize BSL */
' f  Z" m7 M8 b/ n1 I# N0 I    EVMC6747_init( );' |1 z$ u1 H/ \( c( l
        /* Call evmc6747_intr function */
/ J- q4 u: W& m- g7 e    aic3106_init( );
9 |6 F- A4 }' w0 ?% h' v! P        while(1);
9 Z* t: P0 z0 E+ E}8 K5 O$ A' a0 ~! m4 R, V) g

# q7 G* V, h& V/ q& k  X" N$ ?8 R, Z+ V+ Q
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
; s) l% s6 N" U( F  M' L- J/* Initialize MCASP1 */
* z4 O' N  c" f/ |0 Q7 y' B    mcasp = &MCASP_MODULE_1;
2 L8 X: Q3 b/ x3 V4 f) u    mcasp->regs->GBLCTL  = 0;       // Reset) _- Q7 z/ ]! @
    mcasp->regs->RGBLCTL = 0;       // Reset RX% O& W" p* P- T* G! j+ @& ?
    mcasp->regs->XGBLCTL = 0;       // Reset TX' C! \8 p- }8 U- x2 c1 S- d' s. T
    mcasp->regs->PWRDEMU = 1;       // Free-running7 e( m9 G" P' Q' S9 f. X. G) s, `
   // configure McASP0 receive registers6 i/ v0 ^1 d3 ^6 A' i+ w, E
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
' V) a6 L0 I/ g8 O7 n    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
* m( `) \, I: h1 J$ x8 q# Z3 Q    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word% M8 j& `- k* ~: S6 T+ s; R6 _, _
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)2 z! }  Y6 g" q2 X% ]$ O
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side). m( |4 E2 m5 v+ ~
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
; w: f1 R# {( B! x* ?  d% Z    mcasp->regs->RINTCTL    = 0x00000000; // Not used
! t8 H8 p2 I$ a% I" L    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256$ b$ o6 N$ p6 t

4 o3 K0 b) ?- U( w. r% p- t    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
  d2 S" u" f) b+ S; ^7 V7 V    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus7 Y/ i& n3 R' R6 W$ G4 Y, U
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word' `2 `1 Z# _: y3 _' ?4 q
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
' w; p: T! T3 U* B1 c+ E    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
8 {+ O& n& Q) n4 N    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1- @) ]" j8 V, E' o. u
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit( t4 V7 ^, x$ m4 _4 r
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
4 n% a; Z5 u2 y/ Q0 n$ h! h% c; Q% Q2 p7 M
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
/ Q- N: v7 E" x# V    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
4 n7 |# T7 m8 W! `  {+ @) I    mcasp->regs->PFUNC      = 0;          // All MCASPs
  ]% m& l( ?0 z+ t    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
9 X0 @- G6 P* ^. e5 }
1 {! P6 ~. l9 U0 L( G) ^    mcasp->regs->DITCTL     = 0x00000000; // Not used
, E- r. x! G$ D/ q: L    mcasp->regs->DLBCTL     = 0x00000000; // Not used
$ |9 ~, n6 x! ^8 y; f    mcasp->regs->AMUTE      = 0x00000000; // Not used
. u: d, r; J/ }+ B) I! G1 j/ q4 p* u2 v4 {7 r
/* Starting sections of the McASP*/! G* W; `9 T# p9 W# e
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
4 |  g2 h9 ]' ^( W# y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
  R! K2 b2 U7 q* T+ C4 Z) X6 z2 t    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 1 f8 ~; ^6 j2 u
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );3 G. D1 O1 m% H- ]7 {  C

$ E% E  j9 g+ I6 ~1 B    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
# x5 I6 k7 w5 `- P, o' ~, D    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
9 g& N. y9 l, s7 _+ p    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
9 v* I- p% ~8 U( B- g/ e    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );6 d" k( `- O4 j9 l' m

) X9 P2 l* v) m3 |" r6 U  y$ v    mcasp->regs->XSTAT = 0x0000ffff; : @/ T$ R5 c( ?2 e
    mcasp->regs->RSTAT = 0x0000ffff; " ^8 q& J- q- V5 N, o7 W
0 @4 y# _! v! |: W+ X7 {, s0 @
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
2 T  H! K+ F; q+ i" t1 o9 X: u9 I6 l    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );# r5 j  U$ y  h( J' h6 G7 k' \) Y
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
6 N; Q1 `% `$ L* I    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );6 }6 U9 m% a$ u4 p; w& I
) I+ I, ~! G7 G2 t; z; y
    /* Write a 0, so that no underrun occurs after releasing the state machine */1 w! |+ }* _$ k$ \) {, ~
    mcasp->regs->XBUF5 = 0;
1 e7 k% g% u6 W4 }' F) x% j5 p4 O    mcasp->regs->RBUF0 = 0;7 o- R3 V0 ?: J, c# {1 w4 P

) e" f; H7 v4 G) j    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 3 o8 t) S  o/ Z$ U2 l- Q) V
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
/ G. g4 }0 w* z* L. J: H- T* l7 a    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
& ?  H2 m1 `7 |$ L+ R$ e    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
) P7 f; [* C: z" g: ^& I/ [7 u. a; L7 j
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 4 M/ a# l9 P2 S, A# q6 R# o
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
4 T* k2 A7 `, ^! Y) l$ x    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; : G" o  F  ]2 a7 x
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );4 S$ O' r$ K  u9 O- ]7 {

0 P; D- d1 O6 H. U    CSR = 0x0000;3 l' a* R* n+ O9 M/ g
    INTC_INTMUX1 = 0x3d;
: S0 N  W1 v' ?9 _# Q3 N7 e6 o    ISTP = (unsigned int)vectors;6 g3 f% B+ l" o3 s1 i6 T
    ICR = 0xFFF0;  
7 w4 E8 M7 I- T2 |: C3 k$ i    IER |= 0x12;  + x, J& u4 V5 w$ h
    CSR |= 0x01;  ( P, _/ E# u7 e/ m6 p; @
: e& r! M9 h" a

% ^0 `! ~0 Y# B+ k0 \! m- W( c3 x% E1 X* O: G. R( r. w4 o) e
还有就是两个输入输出函数:
" M" b2 y! Q1 C* Q0 r: g8 xvoid output_sample(Int32 out_data)  }% m* U$ t* I3 X
{8 W# `5 |. ?; B/ j) v% R9 L
  AIC31_data.uint = out_data;  
% u4 x; q5 ]( }- ?( L9 ~  MCASP1_XBUF5_32BIT = AIC31_data.uint;: h, `8 `5 O0 c
}: C6 s& w# i! M& X6 B

+ G& v- C% A6 W% L  {/ N5 vInt32 input_sample(void)0 k  P! I( y% o, _* m; |9 ?( X
{  + q8 d. x5 g' ?3 }
  AIC31_data.uint = MCASP1_RBUF0_32BIT;9 H- E  ?" T: U, v2 J# a7 }
  return (AIC31_data.uint);
% G( j. q* e; r0 u. T+ i3 G1 L}4 w, F" M7 N8 ~- ?+ _

) Z% u3 S# d$ o7 L1 o! x  M+ v
分享到:  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-12-1 20:04 , Processed in 0.042667 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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