C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
& V2 @& X# v4 |main文件:% S% {4 w5 {5 C+ N% V# D7 B1 {1 Y
interrupt void interrupt4(void)  5 C8 Z/ t  R8 y2 Z. P' G
{
/ M# k# s6 m( ?  |1 I  Uint32 sample;
- _' g) ^. ^. T" K
& P  j' R( p+ d3 a" ?  sample = input_sample(); // read L + R samples from ADC( r$ {6 r6 t6 Y- W4 i: N7 `
  output_sample(sample);   // write L + R samples to DAC
8 c6 ?/ u: i8 J# r, [# t! w) P1 i  return;
" u2 D% Y+ j1 F% `, ~$ K0 o# K}( N8 f" D5 f# {4 ^$ \1 b9 N7 V# Y0 o

  p) Z2 Z6 l1 C4 X$ i& Eint main( void )
3 A9 H. h( t4 a9 j9 W4 \{" a) \5 ~& ?% C+ F3 S! X

; X2 e2 J' c1 x; R    /* Initialize BSL */% Y' `- H# A! f; C2 r3 B$ p/ }! y
    EVMC6747_init( );
/ V5 l- J. n: N        /* Call evmc6747_intr function */% o. u! `- _; O8 y: Q
    aic3106_init( );; Q8 K" ^: J) [5 M! n( ~" p' J
        while(1);+ S- ~* s# R8 v! h4 |
}9 ]+ f. D8 v- ?) I) x4 }' T$ H

; m3 |$ |9 W; D6 G/ X, U: O/ b' j8 s* I* @: \: n
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
  R! z  E1 x' g& R& K' r! k, \/* Initialize MCASP1 */
0 \4 ]' F: c& N& C  {6 v    mcasp = &MCASP_MODULE_1;: W2 N! O( {3 B- u3 H
    mcasp->regs->GBLCTL  = 0;       // Reset/ G/ ]0 j3 \# \4 f
    mcasp->regs->RGBLCTL = 0;       // Reset RX
# Z/ i5 j- b  z8 T& [- W' }    mcasp->regs->XGBLCTL = 0;       // Reset TX
' Z3 v2 ~- f0 d5 O    mcasp->regs->PWRDEMU = 1;       // Free-running6 y2 A" R- Q, h; @
   // configure McASP0 receive registers/ s+ m6 |1 }/ p
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used' n: d+ c, n" `& W6 D5 z: s" U
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus- d& [. ]! ?2 b. A
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
5 R! p+ R# a( ^$ C1 }  e    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
, U6 l) ~& W4 L- b/ r! o0 B" G    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)3 |$ ]7 Y( p3 d
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
4 c& f9 p2 R- m2 b    mcasp->regs->RINTCTL    = 0x00000000; // Not used- Q, _0 X  j# H% m
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
! b8 K' p& g0 w+ `7 Q
% x, l% i! L( J% S* ]% f    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
5 E8 b8 E  V' ~5 G2 o    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus6 z  U3 w& |& u% a9 O
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word5 P7 g2 @* v" W% j, i
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16. ^  u9 M& F+ n5 q3 b1 R
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
4 L( s3 m) Z$ n" ?7 a; b& V* e3 T) ?% h    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
6 ^3 O7 q" O" D0 k4 q# y    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit" |# g$ x& s# j: ]+ r' R
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2560 _6 {8 I) D) G2 J
- j) n* L8 G7 y( ]: U" t
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN/ Q! R& B- K! u
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
# |/ l. N  |7 w" o3 `2 h9 A1 Z% \2 N4 n    mcasp->regs->PFUNC      = 0;          // All MCASPs" q2 T# u# [' V2 u
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1% S. t, o+ w' ]7 [- g

' s) U8 E3 n+ C2 x1 [2 @    mcasp->regs->DITCTL     = 0x00000000; // Not used) F- O! A; F$ C# O4 m+ [/ t7 s
    mcasp->regs->DLBCTL     = 0x00000000; // Not used0 P" _( i1 v) j% t* Q
    mcasp->regs->AMUTE      = 0x00000000; // Not used+ @1 V- }% T9 m. ^
1 t9 C* w" A! o
/* Starting sections of the McASP*/$ o& N, T) ~9 n" @' N: m0 E
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
7 P& X, E' e! l) `, v* m2 }    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  ' _$ k) k$ o0 f/ K0 u* G. Q  ?
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
$ t  W! Z  H2 {2 N# P    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
7 Y" o2 H& C3 U# @( h0 n; _* D
2 K" f( A" z+ [' h    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; ( m" j+ N/ S/ N; r! r  p
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
' x" n  l; @6 \1 R% J- _* }    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
+ c3 C+ E; V' v# C) ~5 L+ l    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );; G. T. i9 a4 Z# M! P' w
, H. y& Y2 F; s0 F6 I
    mcasp->regs->XSTAT = 0x0000ffff; - R! O( V. _; r5 E& X4 w3 L' G
    mcasp->regs->RSTAT = 0x0000ffff;
; L0 x5 M2 `) K4 g, V6 d( |
2 T: M7 G2 i/ I  f    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
$ C$ a. [$ Z' M; A* @$ s% Q    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );1 T( S, e7 W6 ~( n1 I
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; & s$ k" z7 c) z2 I. U
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
: k! M8 T! v! M# B# ]- O
/ {" h) ^  l1 ~1 a3 }1 P; Q+ k    /* Write a 0, so that no underrun occurs after releasing the state machine */' @% ~2 K8 C( `; s+ K
    mcasp->regs->XBUF5 = 0;
1 B( y! l+ i& m    mcasp->regs->RBUF0 = 0;
" o" n( F" I2 J3 }9 n% `, \; M, S) m* }9 b- r2 i
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
6 ~8 z8 h. n, F$ H    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );8 R  ~  L5 F2 z9 W$ J# T; w. q
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 3 e, E2 N2 W% X" B9 y
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
5 I# O* _3 a1 ?/ F5 H
- n  q$ [! X: n" l* x    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
, f# ]) _- k2 b5 Z    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
" |9 u/ z2 X5 L0 O' W! o6 v/ s    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 5 D( ]  U7 _) N
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );$ y$ _! P! r: u. S

3 i% }5 `2 M. @0 v, f" N' |    CSR = 0x0000;
3 b& E. \; C" q0 S0 t    INTC_INTMUX1 = 0x3d;. A  q& b; b3 w, K
    ISTP = (unsigned int)vectors;* H7 O/ [6 P& o# l9 R
    ICR = 0xFFF0;    f, b0 G1 i2 T$ H, {* ?- y% @7 q
    IER |= 0x12;  # d% n& U, J2 \3 J' \
    CSR |= 0x01;  
; ~1 t# l: @, p9 P3 q  Q4 R6 }7 _4 m) o  G9 \, }

# U( E; Z- S% y, [, v' X: H
/ n# A" e7 ^% V1 j9 @, N还有就是两个输入输出函数:6 x7 J. Y+ h: X
void output_sample(Int32 out_data)' P5 Q9 H3 u+ }% M: `9 h0 }
{7 C: K5 i8 L- P  W" B
  AIC31_data.uint = out_data;  : ^* N' B# `3 K- @
  MCASP1_XBUF5_32BIT = AIC31_data.uint;* e1 t# ~9 V# j5 {6 Q  g
}! Q' Q+ u6 ?& M7 k3 U/ P0 r

4 L0 g( e% R3 Q. uInt32 input_sample(void)
5 [: f9 d. A- p. b{  7 b/ f3 I% @0 M0 ]0 n* f) y
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
6 o( u7 z4 C( y- o  O  return (AIC31_data.uint);
- W: g- V, P# B/ {& C}+ w/ {9 T; S& i' F. |

4 z+ Z* z' ?% n! y6 O1 R# I, [) b
分享到:  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, 2025-12-1 17:04 , Processed in 0.037036 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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