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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:; f9 p/ P5 n; R  B2 m5 K; |
main文件:+ c$ g* h0 X/ c7 ?$ h1 U% L- [5 D6 P  P
interrupt void interrupt4(void)  
% ~' d; t2 P! n' G5 _1 I{, Y0 Z. T# f2 f0 z7 @+ f* q8 Q
  Uint32 sample;
8 N/ s9 c4 B7 _; V6 @4 c1 I9 r0 G3 I% z5 i  A5 R: X, I
  sample = input_sample(); // read L + R samples from ADC
8 Y9 i# G+ e2 }  output_sample(sample);   // write L + R samples to DAC / b* p/ g+ Z, d* u
  return;
5 u) \- s9 G) F& J}
& m2 h0 T) S' K; x
; }3 h$ I% Z' u3 T$ M$ f/ Y! Pint main( void )) M7 w' y( R" P5 |! H
{
1 b0 C& L  Q! I, K% K
' U5 @4 G7 T  A" I+ b1 e    /* Initialize BSL */
1 ~# X9 o8 o% w! N8 m    EVMC6747_init( );
0 w3 ^1 |: I3 b9 {# A5 O        /* Call evmc6747_intr function */8 h. J6 o9 H, _5 O" v3 V9 t
    aic3106_init( );
4 a8 s* t8 l' l0 }; e4 s4 _. t        while(1);
- I2 K+ d  c" s) p6 D2 G}
+ {8 w, _3 B' ?3 }7 d3 W$ {- \8 F
0 @' i* v. u5 W" A+ L- {1 d* s
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题0 ]3 e6 z/ j  x5 c2 d/ u
/* Initialize MCASP1 */
: ?3 {1 H  G9 B$ J/ k' ^    mcasp = &MCASP_MODULE_1;" K# g( f. p( I% f
    mcasp->regs->GBLCTL  = 0;       // Reset
. m" q: G3 ~# T9 p    mcasp->regs->RGBLCTL = 0;       // Reset RX, }6 J- Q) E5 i7 ~5 ]! Q
    mcasp->regs->XGBLCTL = 0;       // Reset TX3 d% W* G% e, p/ k
    mcasp->regs->PWRDEMU = 1;       // Free-running
  F# |7 W+ L, S# J7 m   // configure McASP0 receive registers$ o2 O  `! i( }$ m. s( g* F
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
( u: b0 c# }. u' ^) Z# U& @    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus3 G: U0 q9 D7 S, O4 q
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
. ^: N+ Y0 u1 P    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
, u8 x, P0 K. D2 O  C: ?4 ^* x    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)  C8 W# V+ M5 `3 e' H" n4 L* Q
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
. Q2 x! X# b  t* X    mcasp->regs->RINTCTL    = 0x00000000; // Not used9 x6 T2 G3 x, Q4 I; t( V6 a  b2 D
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2560 S- Y' F( T# v' x0 O. ~2 L

" e- }6 i5 c2 J    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used  C- g1 ^/ P  R# T9 X
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
: v8 d& w  J. m+ G6 p7 S    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
# ?; ~6 I: J" k: P    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
- T( C+ }; Q' z7 _8 J% V    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
6 Z9 [" E" g0 T& H( S" O1 X    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
! ]8 M$ c# s3 U7 E8 p    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit6 q$ _2 c2 ^) W: w; d/ Q6 H1 y
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
) Z$ Q6 V$ t( F3 _
9 I) H6 a8 B" S    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
  X. S8 w# Q2 I( Q$ S3 h    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT1 F8 @- c' ~; P" S+ ?
    mcasp->regs->PFUNC      = 0;          // All MCASPs1 K: `! B7 O) V. G* I) c
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
/ ?2 q# d8 x9 Y  r1 j, j" k8 n/ o# A# [) o1 t
    mcasp->regs->DITCTL     = 0x00000000; // Not used
0 n1 l' J8 U4 u5 r  A1 N; \    mcasp->regs->DLBCTL     = 0x00000000; // Not used' F7 d9 ~7 h1 G) a, I3 z8 ~$ u
    mcasp->regs->AMUTE      = 0x00000000; // Not used
/ v6 L" a8 X3 @: S/ L2 D: [2 y. e) M+ I$ B+ K% i$ _
/* Starting sections of the McASP*/$ E; ]% {/ P* q$ V
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
9 f, `# `( f( n$ |) u  J7 Y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
7 ?% b" p4 o+ i9 V# E    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
3 \1 u- {6 C, ^* t    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );. l) C6 ~) g- `$ Z- L1 z, Q0 h* [

- g( E: Z- |6 W    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; 8 x0 d" k1 U/ q$ ^
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
# l9 s* M4 T2 M' y% C- u    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; & p0 m- `+ [! t
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );9 ]: c- b! e' v% t4 A. e2 }/ B
* \: U! {% `7 c9 `: M
    mcasp->regs->XSTAT = 0x0000ffff;
* l: W4 ?9 |/ L$ d4 ^    mcasp->regs->RSTAT = 0x0000ffff;
3 L6 Y. {, X- d4 O! \2 _' [2 Y4 j7 ?0 d+ i, ?1 }, x
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;- M& t" N- C4 U# \4 R; A( ]
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );; u7 X* B1 y* L8 c
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; ( e' C6 H# }7 t& M9 k* b5 l3 f! D
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );4 Y6 t2 B( [* D/ U: C9 i

9 E9 H6 u* S: D; P0 @+ \3 x    /* Write a 0, so that no underrun occurs after releasing the state machine */
- K/ g2 z$ z* ~7 O% G# B! z    mcasp->regs->XBUF5 = 0;
0 p  p/ q* g- R4 w    mcasp->regs->RBUF0 = 0;5 n; m4 o: J& ^6 K. l3 b! E( F

- l: w# X8 Z# i    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
# }$ ~3 i% {5 O. {( v" _, a9 i1 t    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
6 z  _" u* j, E1 f& t    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
) ]. o2 o9 _0 a2 ^: H# z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );( j3 D# R3 D5 d) s

8 ^2 X7 {  D( t2 P& M8 Q    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; # _. x* b9 c0 [/ L; H/ x0 ?  S  u
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
+ i) H, |! s. d    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
4 [: B4 @4 J$ ~    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
8 I3 i; Y/ L. Z+ h! w( M; ?8 [1 Y; n+ I8 ?. i/ ?% g5 G# K' M3 Z
    CSR = 0x0000;) o8 E% y# a. v3 E5 z1 @! |
    INTC_INTMUX1 = 0x3d;
, u% F4 J# f- @/ G9 r( ^    ISTP = (unsigned int)vectors;" s3 C! E1 j% z0 A  r
    ICR = 0xFFF0;  
  M' v7 Z" r, e* b    IER |= 0x12;  
! K. A/ o) B4 D7 f  n4 z* U0 M    CSR |= 0x01;  
8 C. z* \/ n  I, t4 }5 Q2 _4 Z& M$ x; l
; E- h1 W6 t2 E8 C* ]
7 m4 u& L; y- Y" R! {" v4 Z' q1 d
还有就是两个输入输出函数:
- R1 b& d; W+ Dvoid output_sample(Int32 out_data)+ U% k7 @, K" J' [" i# W2 ^
{8 F8 q  l9 M. r$ G3 F! W' i
  AIC31_data.uint = out_data;  ; @/ s+ v. o; [' ~+ P* E- h/ `
  MCASP1_XBUF5_32BIT = AIC31_data.uint;! R/ b: }+ V% y" r4 w( i! [, L
}8 ~6 E* v" s3 S, I* H, N6 c

; T/ U- F, a0 t% z3 p0 T/ TInt32 input_sample(void)+ c7 U0 N. q# G3 ]; `* _7 M" {
{  . Q, Z) q( U- i% k. U  a+ O
  AIC31_data.uint = MCASP1_RBUF0_32BIT;4 d- H6 v8 C9 n, S% S& c
  return (AIC31_data.uint);( Q, W1 ^2 T# |5 T$ A! J
}6 i" X5 s, n' o0 w

5 F0 Z, [& J- e. b/ F9 v) k7 z; ]
分享到:  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-2-19 04:59 , Processed in 0.057319 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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