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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
$ A6 ~8 `- q+ a* F' m9 kmain文件:
) {! [8 @' _+ ~" k( [interrupt void interrupt4(void)  
. V% k( h/ ~! E4 l9 R{
! K* d+ O3 q. S, Y  Uint32 sample;+ D1 a3 j+ Q' a% E6 \! ^7 d) W
( K( Q7 W' x6 X) U8 k6 x
  sample = input_sample(); // read L + R samples from ADC
; O  q: z" Q$ R/ g/ z) d  output_sample(sample);   // write L + R samples to DAC : x- f$ y4 g; G' T1 u6 L7 _' x* ]5 }' ]% Z
  return;* G" T9 [; \1 b% y) G3 `
}3 T1 o8 ], Y6 y0 c! Q
; U# u- t" J: C+ ?5 n4 [2 n, R& f
int main( void )
% {2 d4 n, O, d2 a, d% S{4 I( U0 U& }7 C" j$ o7 Q  B

5 [: k# A- ?! z    /* Initialize BSL */
( }9 i0 C+ j% P% w0 O! H    EVMC6747_init( );
" Y4 w: @& }" }% c. }, C        /* Call evmc6747_intr function */
, t' f& R0 W0 a3 O$ {+ W    aic3106_init( );* o1 J* b* z8 G* g: R/ {% b# v
        while(1);1 ?9 |' F* o  H" w/ @( @
}
$ p1 O+ i, x; r+ W& K& h: ~1 [  [( l- z4 k* j% b+ E/ u
3 Q9 @5 ?4 i0 o, t7 g8 g/ N
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
" w; M: ]4 r0 _' y" K4 e# d3 W/* Initialize MCASP1 */
* E, j- y8 l  L; g4 S    mcasp = &MCASP_MODULE_1;
2 `2 J. ^) x  Z7 }% g" t9 b    mcasp->regs->GBLCTL  = 0;       // Reset! {/ C3 {8 m  ~1 q% r/ \4 b
    mcasp->regs->RGBLCTL = 0;       // Reset RX- A$ _7 q9 W+ o" v  z  C2 k
    mcasp->regs->XGBLCTL = 0;       // Reset TX, {! `; P9 e) p, L6 ^) ?
    mcasp->regs->PWRDEMU = 1;       // Free-running
' [9 i2 K! H9 F   // configure McASP0 receive registers
& q1 t/ s' C/ F! Y: y3 I$ S: r. G0 \    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
2 P; F! |, T0 a/ c! |" N# O4 E4 L( I    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
! q# T- z( k; V  v' j    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
  \+ i7 m* M* O1 \  ?0 O9 [    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)8 }/ ^( `0 S  f1 P! v4 E- {4 k
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)6 d; d. [/ l9 G% h# j( c7 Z
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
9 F2 L' f+ i; a  k. ^8 E5 ]2 n- a    mcasp->regs->RINTCTL    = 0x00000000; // Not used( ^; d+ P6 [: d# S, D# L4 E
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2561 L$ e) ^: g9 o* H
% i3 z4 Q$ D/ W
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
4 s$ N' l' R8 F" f/ P! g: [* ]    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
0 c6 R$ F, K2 ?" n9 q8 }    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
- V3 ?& `( b) {% b; Z& |    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-161 U7 L# B6 U, t
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK$ V7 P! n# C# n* a3 O) m
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1: H; E% z% Z, X- n
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit; U( [4 O' A9 S) C1 `7 w+ ?" p
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256, X+ y5 [% [, X: r' {# L- `

, ^/ o, J' s& b# j: Y* h9 y    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
' C, V  e/ U" e3 n    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT( s* Q6 O  l7 }$ l& V8 B2 a# G1 w
    mcasp->regs->PFUNC      = 0;          // All MCASPs
$ ^( ~; L2 ?8 m    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
* j' J  y2 {' @) b+ ]8 K
! V' l9 y9 j+ S+ ?    mcasp->regs->DITCTL     = 0x00000000; // Not used
) p- w5 X1 P" d    mcasp->regs->DLBCTL     = 0x00000000; // Not used8 N6 B& S2 s+ x8 `' u
    mcasp->regs->AMUTE      = 0x00000000; // Not used
; K" H: \4 O3 j4 \# o7 o' H, J5 r0 u8 @. o3 m
/* Starting sections of the McASP*/
8 J1 E# t# h6 q- ~    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
! ^6 T7 i2 p$ o' R    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  * f; o* |" c9 D
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; . t# c' d  n& U0 W" |6 v
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
  H2 Y, m7 P4 X5 n% l# Z" _2 }3 k5 B/ P# N& R% m# G
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; : O. i* u% |! ^5 p/ i# `. J
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );& t5 U& Y( K8 S- r. [4 b8 Z% \7 U% \& O
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; / {0 M. M6 P, x
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
6 w9 o  \+ w9 U: O0 g* F, W( P: c( p3 r
    mcasp->regs->XSTAT = 0x0000ffff; ' J3 f0 L4 p, e( e
    mcasp->regs->RSTAT = 0x0000ffff;
) s/ J( X; B) G" q! U5 c, ~% a8 |( ^
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;, }8 \- Y- i4 v0 }
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
  `% ~' h4 s% S! b9 R    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; # g6 A( g2 C2 t7 G: C1 V: t$ G1 B
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );- z4 f9 E: k8 B' s7 z( w/ d' W
2 r4 \8 ^% L) J3 }% L; q
    /* Write a 0, so that no underrun occurs after releasing the state machine */
0 |' j. w$ n9 t    mcasp->regs->XBUF5 = 0;7 P7 K5 ~! F& U
    mcasp->regs->RBUF0 = 0;
, @' b+ r5 \) ^8 P8 v
+ r8 W0 D- T6 ?# F2 {7 c    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
. B+ i  c% T1 M: Z' |    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
! b8 Z) I* ^4 a    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 6 M! g6 R! g# p2 K
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );7 [1 e2 P/ A  l# ~, E4 F* [' w( m+ Z* ]
7 j' n5 Q) {5 A# A
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
; Q7 S# H; b" P8 r# D    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
. H4 M# M, N! J9 g- B# k7 f    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
7 X0 r/ ^# D. h  G7 A    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
) k4 ?/ v) f: G# F  _0 L: P: B
" \) j* X, z7 J+ z  Z% B    CSR = 0x0000;
2 e  [3 U. ~: Z6 V- i- ]9 i    INTC_INTMUX1 = 0x3d;
3 ~+ u2 o, \$ T6 y: N    ISTP = (unsigned int)vectors;
+ W7 O$ U+ A; y6 {; l    ICR = 0xFFF0;  8 X" ]3 i/ w# j! Z- [3 o  U
    IER |= 0x12;  5 i; @* r) H4 P9 `
    CSR |= 0x01;  ' H7 h8 c0 X$ e; F
8 K4 l' B9 V+ D; G

+ H$ X+ |3 K0 X4 B; Y) A; P: l/ L4 A8 @) E% L
还有就是两个输入输出函数:, ?9 q) K3 A0 [  A/ y( [3 K
void output_sample(Int32 out_data)
; g- z$ o! `% f5 J% x" w3 d{/ `  w) s. a' G8 [
  AIC31_data.uint = out_data;  
* C" e% [  k( U( y  MCASP1_XBUF5_32BIT = AIC31_data.uint;
( }2 ?- _" e  y6 J}
- ]# U# \2 p- C$ ^: W) y2 K' u! i8 Z2 t$ c$ }: ?0 }
Int32 input_sample(void)
. Q( \2 @' ]1 t{  
9 h4 N' j0 k3 J1 {/ n5 N7 H  AIC31_data.uint = MCASP1_RBUF0_32BIT;. [2 s* H( S% @  t! G" V
  return (AIC31_data.uint);* s6 n; ~$ @: V+ [
}) b' K4 v' B+ O# J3 D1 V! h# Q

' d' V% Z6 Q3 @
分享到:  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-3 09:07 , Processed in 0.044210 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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