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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:2 i0 w4 j6 r: q" V& D% ^# w; ?
main文件:
2 E* R* Q, f+ Qinterrupt void interrupt4(void)  
) p: I6 w. C  K! T! h& A{" y2 s) L  P4 t( z; K
  Uint32 sample;
, \( M+ u" }- Y" s
2 N. C4 c: G4 K1 d4 `& J# j  sample = input_sample(); // read L + R samples from ADC
0 }3 _: Z) y% X" w2 k* X& g1 F3 t  output_sample(sample);   // write L + R samples to DAC
! D0 b5 f+ Z1 U$ U# E) {! c7 H  return;- {' l) F9 y* [, ~4 Q9 H/ y
}
4 u( s0 v; z' y7 W3 n$ |7 E/ e% B$ y
int main( void )
& s6 I: u. P* z" P. M0 r{
( y+ K: @/ v6 E( O. A0 g; ~! ^) w. W2 F( |; ~6 \
    /* Initialize BSL */& |. N8 F. d+ l8 r) k7 [: l# n% `% Q
    EVMC6747_init( );
# b* l8 f: I9 a# y/ C        /* Call evmc6747_intr function */! A0 C! B/ O4 c8 S5 |4 I/ P3 Z
    aic3106_init( );
/ |! [: Y- O9 f4 b1 V9 @- a# s! K        while(1);
5 s, F, d0 o; Y' k# g: |# Y4 S}
8 z. h7 g* n* e( X* A$ `" f9 D4 ]; |1 q; `4 y- f6 |7 A

0 v5 h$ g) M8 ]aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题+ ]1 `* a# G2 h- S8 _
/* Initialize MCASP1 */
6 c. h: G( z* ]3 L9 Y' q    mcasp = &MCASP_MODULE_1;+ t# X/ P+ C+ g/ W
    mcasp->regs->GBLCTL  = 0;       // Reset" k, A; ^* W3 r4 R3 [/ C7 n* W
    mcasp->regs->RGBLCTL = 0;       // Reset RX: |2 h+ b5 A# l9 u
    mcasp->regs->XGBLCTL = 0;       // Reset TX
! \( V2 Y6 W5 ]: K    mcasp->regs->PWRDEMU = 1;       // Free-running+ X2 D8 _7 Y+ R' q( H+ x7 X  j$ ~
   // configure McASP0 receive registers+ l% F7 N4 b/ f3 L- D% D( {& Z
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
0 y- ~1 s) [( q3 [    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
6 I$ p6 {8 A2 O. z5 s    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
7 G. o5 Q# S& n0 m$ v. k    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)5 S$ g/ c, y; a8 V4 D
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)" W& d4 v1 c# v
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
+ j. @4 n# g) [3 }    mcasp->regs->RINTCTL    = 0x00000000; // Not used
$ a- \, R( e& A* g    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
$ Z, X# x3 h+ B5 w- x
: B+ v$ E0 O0 w: b7 i1 a    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
( C) e2 x+ H# R" O    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
" S; B" \  g: j6 O    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
- q" ^' Q4 {/ H& @    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16& s" o& I/ ~+ B. c: L  I
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK" |0 a7 h; m+ H) O) C. `
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
0 F% z; M# Z& H0 j5 r& `. w5 G& C    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit9 O5 \2 U3 J+ p+ H, E+ A
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
  C" x7 N* t! {# n' r% |4 R( N  T
: Q0 y6 |8 @% `) q# p0 z    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
  W2 |. L- S0 j! x. P+ n& X1 {    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
, r( Z( k  u' [9 Y; d    mcasp->regs->PFUNC      = 0;          // All MCASPs
' C5 z$ b, v) d! [; k& {    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
! n! w$ Z- k* o! N5 N. g- b! o
/ V! ^) k. I' N* t    mcasp->regs->DITCTL     = 0x00000000; // Not used$ Y: @. S! V( l7 h2 @9 U, I9 m0 g
    mcasp->regs->DLBCTL     = 0x00000000; // Not used0 e" ?( ~/ x) q) n; P; {( @$ ?" U
    mcasp->regs->AMUTE      = 0x00000000; // Not used( Y* B2 h5 M! X+ V  l

; I, F/ F8 m4 X, |2 S5 ^/* Starting sections of the McASP*/
! }* F( L8 W" |4 U. k  r+ F5 V    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
4 Y$ F: d+ b# x    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  $ Q' C+ Z, q9 a% W6 U
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; $ [; e; v/ z0 v: U
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
* K: ]0 O$ ~/ W- a8 K, \6 \' w6 Z6 @' o! C
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; & x4 ]# X& I; b% e* n$ ?' M* e
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
  Y" L) U8 G, k7 w/ ^1 F2 B    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
  J8 N$ A. h6 `8 W2 Y    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );1 u1 W, a  e. ~9 c- Q( J( G

: E+ R  T8 K' G    mcasp->regs->XSTAT = 0x0000ffff;
" ^# o9 n$ d5 F( K6 ^' \    mcasp->regs->RSTAT = 0x0000ffff;   T* q8 W5 v) B1 [6 }1 I

; d3 Y) M$ ~+ R5 G* z    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;' A' @6 o8 c# X/ Z
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
+ ~: G+ z& e/ h$ X# v$ g    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 4 v) o2 |' A1 N, M& u
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );. o9 [# j/ [& |3 M
7 M/ C& A' G3 K) i
    /* Write a 0, so that no underrun occurs after releasing the state machine */$ w/ ~6 I" T: Y. T2 z; `- Q
    mcasp->regs->XBUF5 = 0;5 E: p" ^) u% W0 l( `% [- ~. M
    mcasp->regs->RBUF0 = 0;, a  R: n. ~4 T' V4 O: z
  a! b/ u1 ^' I7 u5 l: R  z* ^/ i7 v
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
; C5 b. E' A% x9 p/ S    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );6 j' l  A2 G3 z2 {
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
6 ?8 I7 c' q# P% [5 J    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );; B  z/ R! A- s

4 V7 b. z- N% s) p! Y8 V6 [    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 7 F. P* H( j' q, ]3 I" y
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );" N7 l/ [* @7 L9 X
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
- m: m" l/ Y4 K9 V1 }    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );! S" H8 S/ b- L2 @2 v. `- d

! Z2 `  U1 I6 T, t    CSR = 0x0000;
% {1 M- f0 T: d  d    INTC_INTMUX1 = 0x3d;6 m6 S: C! v# R2 D' }
    ISTP = (unsigned int)vectors;
- n& j4 H4 Z$ i0 e    ICR = 0xFFF0;  ' G0 y5 q+ s# Q4 E
    IER |= 0x12;  
" n1 Z6 |' K, f0 Y    CSR |= 0x01;  
+ ?5 r2 O) c  K3 W6 h. k
/ J) n1 [8 n+ E1 p0 u0 p& b( D; P8 w3 @1 a' C2 p! _( E

$ t" H4 X) @1 f6 V3 D+ d还有就是两个输入输出函数:
( E+ W3 T* J; P* @void output_sample(Int32 out_data)* O  o1 W" N, t
{& W( w  Q; x  Z) D( H( ]1 l
  AIC31_data.uint = out_data;  
4 u; c" o% b( P* L  MCASP1_XBUF5_32BIT = AIC31_data.uint;" S- v9 p5 k$ I. h, ?  h5 R
}" D8 _- b# D- n- h4 p- g
2 l: Q& a" ~) l% R
Int32 input_sample(void)
6 v9 {% J0 m0 U4 K4 `2 ?{  
+ P; E9 c% n+ @, k5 E: }  AIC31_data.uint = MCASP1_RBUF0_32BIT;
% |4 \: d( ?! T- q  return (AIC31_data.uint);
# C. e0 F' G7 u* R}9 w6 L0 d. R1 f

+ g) L5 L5 T) U+ [3 |1 G9 t
分享到:  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-26 01:27 , Processed in 0.042763 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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