嵌入式开发者社区

标题: C6747利用McASP发送中断方式完成音频输入信号的直接输出 [打印本页]

作者: yusijiangchengm    时间: 2016-3-15 16:07
标题: C6747利用McASP发送中断方式完成音频输入信号的直接输出
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
, b5 ?6 M: L1 Omain文件:
$ k2 C5 |, p( D3 _& Pinterrupt void interrupt4(void)  
: K( d$ v8 x/ Z* A" F& ]{
+ u0 q  g+ i. D* t7 l; o- y$ H; D  Uint32 sample;
9 F% H4 [+ I5 g- e, h2 }9 F' I' o" x+ u+ R4 X
  sample = input_sample(); // read L + R samples from ADC
9 n% }8 y$ B2 t: G  output_sample(sample);   // write L + R samples to DAC
' [5 T; Y7 m6 \7 t" e( C' |& \5 h  return;" H% Q% R* P5 Z9 P& N6 _
}2 v7 c9 ~, P1 b0 h( y

, H2 a+ b" n. r4 X% Iint main( void )
- @% {! k4 {/ K) M7 _7 q5 ~0 H& ^{
9 g, V- N, F. ]9 J' m" ~2 Q; q& d0 v$ o) }
    /* Initialize BSL */7 i8 }1 R8 N% s. O3 M+ N/ X
    EVMC6747_init( );( J; X3 @9 m( T. H
        /* Call evmc6747_intr function */) i1 Y  z: A$ m- j5 l
    aic3106_init( );
" X( S( N4 i$ `        while(1);
" m8 y2 `3 Y$ t" `}
3 s( ]% G6 q, L  Y- V! Q4 s( ]' V/ U, O. ]

* a$ ?  k. {7 j3 ?9 P6 }aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题; K' C$ E- V) t, B- h+ b; D
/* Initialize MCASP1 */
- n: Y8 g2 l# b" {- s* O    mcasp = &MCASP_MODULE_1;
* h( D- h5 I, g    mcasp->regs->GBLCTL  = 0;       // Reset
, A2 M* ^2 I! v; \    mcasp->regs->RGBLCTL = 0;       // Reset RX3 O5 N6 W/ W" }+ P
    mcasp->regs->XGBLCTL = 0;       // Reset TX
; @7 n) a1 Q# a    mcasp->regs->PWRDEMU = 1;       // Free-running! C) }& q. d+ a' t8 X
   // configure McASP0 receive registers' p0 H. ]! `, }; u; x- n
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used/ m# X" Z6 q4 G) Y$ H
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus3 ~# I# x' A* v+ T- V# H5 O# }* q- X
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word+ e8 o" c3 V, J& x2 B0 w
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)/ J# t& Y8 h. w# y+ C* V
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)3 |, _7 V, J1 W
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1' H( ?0 D2 Y5 F* B
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
4 Z- u, x$ r+ F! x) |    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
5 B" c; |3 ?( F3 G1 P: K- J4 P$ w  C1 W6 N/ {2 H; J, M
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
. N" ]0 |2 ]( z    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
( g* G) B5 ~) M3 x2 T    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
* A1 w( u4 V' {" P7 E. }2 e- V    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-169 |7 d: ]9 [4 D" Y
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK" {. z6 Z' [4 u% ^' I7 ~
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
1 ]* n# C, h! X9 ~5 }# \: Z    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit; U0 B1 y% c, s/ L- r
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
0 m4 X+ N0 b3 j
( k  F& c+ d9 }    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN$ E$ K; M( p, i  H
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT. ^& k- ], n5 z2 k" v8 [& R
    mcasp->regs->PFUNC      = 0;          // All MCASPs( a% Z2 w8 p6 R* M. Q& }% p
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1# k+ M9 ^, Q2 B  i% ?- V/ D$ B( k* G
, N# {9 P; s' b) h
    mcasp->regs->DITCTL     = 0x00000000; // Not used
( C, \: n/ X1 n) Q0 s    mcasp->regs->DLBCTL     = 0x00000000; // Not used# m+ i* g- k" e; h; s
    mcasp->regs->AMUTE      = 0x00000000; // Not used
+ H/ {, r: p: e; {& g" t( }) E
* B! ~& J5 k4 D/* Starting sections of the McASP*/' Q+ T. }2 M# C. j: }* ~; l
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
4 z+ w' O! |" f% D5 S7 v    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  : W8 A. z9 y% C" v* n9 R
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;   K- |7 A( c/ @; V! u1 {
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );* D3 u% ]+ s/ L4 L3 J) o- n! q
& |: o- ]. \) Y" G  E/ {
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; , h5 w* f& _, J* \8 X. b7 \3 l
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
; `0 ~" `4 e6 G" d3 X6 K2 N, @1 R    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; ; x: M( m- [5 _
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
# z0 ?0 y% X4 N# @; B$ k! R- G+ m5 x. V2 J. r( ^
    mcasp->regs->XSTAT = 0x0000ffff; 5 a1 h: H( b$ B# k' }- {
    mcasp->regs->RSTAT = 0x0000ffff;
& K- g$ e& K- c4 H4 Z) p' C, ^$ A
; E* |, f; z( [1 t2 J# U    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
: u, \% z5 w1 b) g% ?    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
, t) n: r6 S$ G4 T6 S9 i8 X6 G    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 1 b; p( P/ n) [% U7 ]- ?) |
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );' W- n1 {' s% K. M8 T: m
. e) z3 {4 X8 W& h. Z9 s  s* q6 `
    /* Write a 0, so that no underrun occurs after releasing the state machine */
/ z% e1 |/ W" x3 U1 K5 e( D    mcasp->regs->XBUF5 = 0;0 {& L- C; e7 X) k' G, ~
    mcasp->regs->RBUF0 = 0;
4 H3 R* I7 C9 n$ `4 t
0 }7 h) m2 x! f/ q" Z+ ]    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 9 _, I# i  B2 k# K" b' n
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );$ M4 h* o1 ?6 }. x
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; $ Y! w4 {! x9 J" W+ C
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
9 U' c" A% U+ i% l* U3 [
/ |' }2 k' ^1 ~  T    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; / `0 F( f/ b; R  F6 Z; K7 I  W
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
. p* [7 ~  z- M& V" L    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;   ~- w) [* u2 r6 G0 Z# W6 E
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
  Y; c2 N" a% p6 \
" q5 ]1 b/ m* v8 Y7 [$ X    CSR = 0x0000;4 `0 [9 V+ A% a2 J1 D4 u
    INTC_INTMUX1 = 0x3d;1 R9 {1 t( L2 j, J
    ISTP = (unsigned int)vectors;$ @) g  h4 b% K' F( U- W2 ^
    ICR = 0xFFF0;  
9 l  [8 j4 f" p9 l9 o/ I    IER |= 0x12;  
6 e+ V0 j# w9 S$ Y    CSR |= 0x01;  
8 v+ _* _- P! a! c0 |  |" K# ^9 E0 y! F- W# O6 x& f: @& g+ G% {
& g) T: }+ U4 w" v2 A% y

, S; V  Z* w- A4 {, X" [还有就是两个输入输出函数:
/ ^) M$ b/ e. v& W" \void output_sample(Int32 out_data)
% H5 P# H! c, \{
. k4 k; X# L+ l# r! T  AIC31_data.uint = out_data;  * l8 k  G3 F" T" a6 Z  r
  MCASP1_XBUF5_32BIT = AIC31_data.uint;9 u7 {- Z' B/ T' h; B
}5 p- h/ X2 H# s5 k
% P% I3 ?) M/ [, C
Int32 input_sample(void)' M' }5 }3 ~/ r5 h# S
{  
: v3 w1 V% i. ^8 p  M: K  AIC31_data.uint = MCASP1_RBUF0_32BIT;
' `) ]2 H2 G! }3 F# d. z: k  return (AIC31_data.uint);" Y' x6 _1 z. x1 b: `/ o2 a9 B
}
1 [+ u# c- W! Q% [4 \+ Q
/ |3 K. \+ w0 ~' r' B  k
作者: human    时间: 2016-3-16 11:55
可以参看创龙提供的例程:AUDIO_LINE_OUT_INTR——Line Out 音频输出(中断方式)




欢迎光临 嵌入式开发者社区 (https://www.51ele.net/) Powered by Discuz! X3.4