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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:. ]( z" C8 t" V2 r: w
main文件:
- ]. n* k+ G. \* Q% Vinterrupt void interrupt4(void)  
# g+ s6 G) R- a% Z/ C1 W4 _{
! \1 }: s9 ?0 W# m  Uint32 sample;
! f) _, p: @1 c$ K/ o9 G7 [6 t$ r5 J& {4 D/ g: c
  sample = input_sample(); // read L + R samples from ADC
! j, t  v# x7 h* f& `  m  output_sample(sample);   // write L + R samples to DAC
' X, q  `: R. s% b+ p1 U' j* k  return;
4 t6 V3 Y) O% W) J/ {}5 G' X1 E2 i+ k+ N5 n1 W7 J
4 r# D/ Y* f: E. u8 X
int main( void )
- w2 P% @' f; @, W/ m& R% I3 ~{
8 Q6 p6 h: Y6 i8 V
" Y3 s- V: |- Z' Q: q7 {/ h    /* Initialize BSL */, k4 D7 f/ `8 f0 W
    EVMC6747_init( );8 F0 R- Q+ [; V! K, O8 B6 \$ q3 h
        /* Call evmc6747_intr function */
+ Y! X+ q$ k8 |    aic3106_init( );
2 D8 v. W7 L$ p9 Y  `2 f$ w, |        while(1);0 m0 r) ^7 l8 k# C- N8 c1 X
}
6 N! \3 w' Z& y* W1 c1 m" L: J! V  e! N' x* t5 ?, _1 [- u7 O
6 u( @# L* O% t2 ?
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
, Z% F! ]4 X$ m/* Initialize MCASP1 */* |6 {1 R% E( D! d
    mcasp = &MCASP_MODULE_1;
  A8 a( c* C/ P' `. w4 ~    mcasp->regs->GBLCTL  = 0;       // Reset
* Q+ O$ Y" B# h$ R( v2 Q3 R1 ]    mcasp->regs->RGBLCTL = 0;       // Reset RX
/ k( u. q# {* ?+ K8 [. N5 R1 e    mcasp->regs->XGBLCTL = 0;       // Reset TX% |9 x' }5 M' s& ?
    mcasp->regs->PWRDEMU = 1;       // Free-running
8 ]7 p3 _% @7 z" h% i( c   // configure McASP0 receive registers
* H; y# O/ [7 Q    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used/ s, a: F) C4 T$ a% n
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus# f) W+ J/ O7 z2 V) f
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word7 q* N; Z, a/ h8 Q9 [/ `
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
8 H4 k( G; s6 `, k/ [    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)6 e* u1 n. B& [6 x' S, z
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1* ~2 W/ S! w! A# Y' i% B
    mcasp->regs->RINTCTL    = 0x00000000; // Not used
  O4 O9 u3 e/ t    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2566 L; l5 z. @6 L; y, j" a1 }9 W
0 k# L0 s+ c! R
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
, F7 g6 l& G5 |( R# q    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
6 c! P% |) R1 m/ ^3 {5 i& y$ U    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
: u( w  d3 e. r' Y; I8 {    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
3 t" I) d, D  R. p! `' Z7 b    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
. \4 l# T' P4 t' s0 P) S& v: v    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1! Q. ]2 g/ n9 t; H7 t* I, z5 Y) v1 E
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit  [+ l% c$ w1 v
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2564 P, i- y7 H5 a# F5 i' V

6 _" T: L  v1 r5 ]9 i    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN& f& V7 p+ S' W/ k
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT8 J9 Q. C! S" T* ]
    mcasp->regs->PFUNC      = 0;          // All MCASPs
2 }' C9 t. f# |$ c& `+ D4 K5 c" e" f2 q    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
& i$ |$ `6 q; ?0 B+ H  ~" w
! |- y: X3 [+ @: J    mcasp->regs->DITCTL     = 0x00000000; // Not used; v+ K1 T5 H) F% G
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
$ |+ L# {3 L! j7 q6 H) [/ S3 t    mcasp->regs->AMUTE      = 0x00000000; // Not used" R+ T: Q: s' l  [1 N
5 l4 m3 n% f* t, q4 v8 m
/* Starting sections of the McASP*/
* {5 q* |/ h5 \! r, D& x    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
! v3 ]* W0 p/ U% A2 [, d5 q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
# {! l$ M; ?% x. M    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 6 x/ B( N2 B" M
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
& p, ~. Z! ~7 A; D/ y  N, c+ _- A/ g2 o) ~; e$ }
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
: n- R( `7 e7 U$ ~: {    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
: c/ N5 H! E: r5 @3 Q$ A+ X% d, Y    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; + v7 w- P" v3 v" J3 ]
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );! V+ y4 H1 f2 S7 }
) j  V3 ~2 ]$ }% p5 V7 n; `
    mcasp->regs->XSTAT = 0x0000ffff;
  T! K/ v, y% D$ W: ^" ^    mcasp->regs->RSTAT = 0x0000ffff; 4 I* J* J" B0 O9 b4 G

* R2 a6 @: x3 y) p( s8 a    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;: b7 Y% Y8 N8 {+ @
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
9 t: S# M* W4 v! Q7 m  `2 }! ?    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
6 A7 b# s8 j9 x) K: z9 @3 V8 v# t    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
+ c  u- b& W+ J  V" a8 z7 |! {! e4 k! ~5 D1 E5 A8 u
    /* Write a 0, so that no underrun occurs after releasing the state machine */# Y( [- j2 w9 R* F# C# R' }
    mcasp->regs->XBUF5 = 0;3 w& n' `/ v9 v' t% H8 B  [( O3 x
    mcasp->regs->RBUF0 = 0;& U( F& }9 X6 n3 G0 w  A4 H- L- e

" U" k1 h" ?1 X2 R" k$ n    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
3 Z7 b$ J3 V: ]0 t/ [5 x# L( l$ n    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
' _$ J' I+ C: H( T    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 5 g; i4 ^6 F  b6 Y! s$ g0 P
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );) H9 f0 M; h. X( }8 z1 `. t3 @

4 k! _$ l/ @8 o! H2 p% z: ^    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
1 e/ T1 W4 t& u: @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );5 m7 e2 Q" T0 d3 C5 ~# t% Z( M
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
( a) x2 @6 b' x9 }8 S$ Y    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
' }% D6 E% n1 d+ t+ H2 z# A3 m+ @: G
    CSR = 0x0000;7 E/ n' K( ~9 k
    INTC_INTMUX1 = 0x3d;% Z* Y- U+ x- a6 W8 G; T6 P2 n& v
    ISTP = (unsigned int)vectors;2 Z$ l9 C; T  l# t+ E
    ICR = 0xFFF0;  8 x/ g6 W5 i+ ]8 D
    IER |= 0x12;  
# q; V6 B. X2 E* c, F6 P, |    CSR |= 0x01;  7 w6 }+ c6 e8 N! ^
; N4 X& g- k' D6 m

6 W. y- U2 z% Z, ~3 l+ s/ S$ O
" r; j& t) B1 A0 E还有就是两个输入输出函数:
! z, t6 ?" \9 E; Q1 q3 h! B+ q& `# `void output_sample(Int32 out_data)
/ N7 d( P1 d  y2 {4 W7 y{
$ {+ v6 J1 H. y+ P  AIC31_data.uint = out_data;  0 F$ w0 r7 F0 ~( M4 h0 |
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
* n5 o& k" G% t/ ~8 n7 C}6 P6 P0 `* J3 P
% R) S; ]# j5 k7 \" u8 d
Int32 input_sample(void)- R3 J( ?' {. L
{  / e8 f2 d6 Q# [
  AIC31_data.uint = MCASP1_RBUF0_32BIT;0 N7 Z; P. p, }$ h
  return (AIC31_data.uint);
+ |/ V, V2 i! T  q9 Q; Y}" i& |& ~# F1 U7 O, v  ~+ Z

) E: u, z. \7 f- C  ~8 Z" M, x
分享到:  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-3-18 14:32 , Processed in 0.044548 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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