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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:, F- r1 {8 B- k' _9 Q4 u
main文件:) B5 K0 i3 o8 C; ~
interrupt void interrupt4(void)  
( r: M  e  H( i# D0 H6 f, h{
0 p5 H# P" w7 a% d5 A# a  Uint32 sample;
: z( a' t% V- F; ~8 @% |6 Y* j$ o: p/ {0 C. P6 U
  sample = input_sample(); // read L + R samples from ADC
8 h, Q& G) I. X3 `) ]  output_sample(sample);   // write L + R samples to DAC 6 ^- U2 v; g# V
  return;) I; d  l: s# L5 M/ @  F
}
2 Y1 j, R0 X% h2 @( j9 I. O) o2 W6 H( O! v3 q7 n
int main( void )
2 D3 T: Y- Q5 j7 R{
! i, ?6 `9 m% f/ f, g+ n$ ?8 A; }
    /* Initialize BSL */
# `3 U7 {) `* C0 Q    EVMC6747_init( );; @$ U+ k* l4 g/ ^% X; k9 t
        /* Call evmc6747_intr function */
  Q3 k5 K8 k9 p* v! R' x0 U. A    aic3106_init( );
9 D( m: {' k- n/ M        while(1);
$ g/ S; ]. ?& M}4 r6 W; D0 L% W" J; r8 r
" [& G9 N, i! ]5 T5 K
# X0 p0 x* k# s& {9 s/ ~% y
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题3 o3 f, C6 ]. A, C$ y, [
/* Initialize MCASP1 */6 u" Y: \) g5 }8 o/ @! k: c
    mcasp = &MCASP_MODULE_1;2 ^* w0 K9 e2 H1 u" M
    mcasp->regs->GBLCTL  = 0;       // Reset. S9 }+ H. Z' G/ a+ t# T2 o% N
    mcasp->regs->RGBLCTL = 0;       // Reset RX+ E6 k: q9 r4 M+ F
    mcasp->regs->XGBLCTL = 0;       // Reset TX
& h: V4 G( h5 G* {0 }% I* [0 l, i6 S    mcasp->regs->PWRDEMU = 1;       // Free-running
7 c8 b9 S" y/ U$ I; Q0 H   // configure McASP0 receive registers( Y$ d& G! E8 ^* f  z- S  `  m
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used  k5 g0 D; N- K3 ?( }) \
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
: p2 m. @7 P" K7 |  F( Y    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
1 r; g% s) I# t, u% v4 h) Q    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
8 j; d( h3 G3 Q( a* u2 b1 g4 y1 S    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)0 K% S3 F( i, f/ F, [" Y# \7 {& f
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,12 s: a0 c* K( {  [
    mcasp->regs->RINTCTL    = 0x00000000; // Not used( N# ]* `) s6 v7 x5 H5 G& s, Q
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
' c; R* O  ~. |; V2 n) b3 X1 \' U/ T2 Q, E+ _3 ?, J
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
- v( `* K/ c$ X: b    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
1 y9 Y4 Q0 }) k0 D2 ]    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
+ d, x2 n( F$ E7 D# j* V6 I    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-162 [: u7 Q1 z" U+ B' o" m
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK; c! t- z! q+ L( u( d" W
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
* E' d$ y% Q7 f9 C8 l. N    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
7 _6 ?. @, f6 O% t# W  o& f  v    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
4 Y" O6 z; Y7 ~  T. E) K7 B0 u% n# e* c3 Q3 }5 H( `) S1 A
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN9 r" W, |& W# v1 |0 {0 u
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT$ Y/ H6 t0 t2 |1 P& Q
    mcasp->regs->PFUNC      = 0;          // All MCASPs
7 h/ u7 H" k# A0 D    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
" z  U7 ~3 }5 e  q7 n- E, u
  B/ G) F( `( Q9 A3 O    mcasp->regs->DITCTL     = 0x00000000; // Not used$ m$ a' `; Z) G  J# }
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
- b5 I3 c! y" {' S5 Z9 u1 j    mcasp->regs->AMUTE      = 0x00000000; // Not used, c2 R: }# ^4 S

4 t- S( P8 _1 @7 x6 {/* Starting sections of the McASP*/: e( s# l3 F" o; o" e, k
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
1 e4 M3 s1 b# C1 _    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );    _! k2 @4 Z4 K) b, ~! O, s
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; $ d' A  ?9 k5 _' C& V( h/ X7 \
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
; S9 _- p8 g4 a1 z2 ^
; W1 H  U2 Z! w8 s, |    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
' g$ ]7 }5 O6 k9 E! M) |: q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );9 A/ w# p1 G. n! I% a5 d0 g
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
) R* h2 u. v" K. Y    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );6 z, |6 R4 `$ C7 I

3 l+ ?$ D+ G' B    mcasp->regs->XSTAT = 0x0000ffff;
: t' m7 a' X. d2 ~( H. W    mcasp->regs->RSTAT = 0x0000ffff;
- s' b; r0 c. J
$ }$ Q7 G# p, G$ L    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;% p; e8 k8 k/ b+ K( X) @- b1 t( ]) @
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );. }3 T$ j) E$ o+ F+ S# P
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; 3 c% |* o( M& n$ {& h6 D1 t
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
4 P  d. }1 c7 q( ~* l  {6 [- i3 @1 @) I; G
    /* Write a 0, so that no underrun occurs after releasing the state machine */2 ^( g5 g' X/ X. E2 R
    mcasp->regs->XBUF5 = 0;
7 J: \% H0 P& K# y3 u% p# m    mcasp->regs->RBUF0 = 0;
, L& u8 M0 j  n6 d9 H
' A: m) N! O- e; C4 Q    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
3 r5 ?2 M2 V' {! r$ s    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
4 F- g- \$ K# S: |    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
! U5 \: ~, L4 M3 o2 Z9 N" Y, @$ Q    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
7 H, m9 t+ Z+ r3 v
* N0 D3 z3 b( l- I: H) a    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 5 Y' g" [8 b: q
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
6 @( y* Y* E9 t( Z0 `2 {+ `0 {    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 6 f5 c( }' N6 g" i0 m2 q4 f5 {8 B
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );; w$ C- S6 ?( S" y$ f+ ?

+ r( @' t, m. q    CSR = 0x0000;
* v6 z+ ]  v- h; q    INTC_INTMUX1 = 0x3d;0 M2 P" T6 \% F) ?4 k$ O
    ISTP = (unsigned int)vectors;
3 L- b  o  U$ z) J% r7 v8 ~7 F/ ^$ L    ICR = 0xFFF0;  
& m* ]- V# J7 }3 Q    IER |= 0x12;  
- a6 y+ ~5 V9 @1 i/ ?/ C    CSR |= 0x01;  1 z' C5 V. u. i7 c' ^

  u2 }  U' M& Y# t0 v3 }5 L, @' g2 @. |: Y
# |' N5 |4 N5 k+ M
还有就是两个输入输出函数:
% [4 k2 r0 V8 m- j) r  i/ _# Hvoid output_sample(Int32 out_data)
; ~9 ^& k( O' J: h" S{7 ~9 @5 a& W, }/ n; c! S, P
  AIC31_data.uint = out_data;  7 q9 F4 F( m- I* U* v
  MCASP1_XBUF5_32BIT = AIC31_data.uint;
" G1 h& Y2 T. _+ j  c3 F1 e' M}* }" X% d6 @( a( a
3 M: {6 H# ?0 W+ ^
Int32 input_sample(void)
5 W1 [8 b# R1 h/ i% W, M{  # Z/ P# g7 {' G$ G- a
  AIC31_data.uint = MCASP1_RBUF0_32BIT;4 P/ Y4 q1 J! u5 Z9 o
  return (AIC31_data.uint);; ]# B: f6 D! ^/ d* |
}
, O* R4 K8 r: d" w( g8 P% Y
, @4 n: ^: X5 z- h) B1 T! b  r
分享到:  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-19 13:26 , Processed in 0.040997 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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