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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:( v( R4 @0 ]1 k/ Z& u% {, Z
main文件:
1 D% z  m9 X3 `' Ainterrupt void interrupt4(void)  * I* ~/ C' w7 m8 T) u
{
8 ]0 |" c5 W, [! s  Uint32 sample;
4 B" _4 a. E: Z
' x" q, O) q% b" x  sample = input_sample(); // read L + R samples from ADC* p0 U/ L& Y# d8 t- M# W. G) A
  output_sample(sample);   // write L + R samples to DAC . j: \+ ?3 _2 m& }' |; B" z4 z; k
  return;
7 a  ?& ^& U2 N( D: b/ W}
" W+ e) K/ K+ K! m8 E3 U5 `  ]) k  z/ @
int main( void )4 _4 ^& w& a( I/ A: c9 l$ K
{" e7 F+ F& N1 z3 e' F0 J. H

, s- @, ]5 B3 o. \+ R    /* Initialize BSL */
9 d4 W" g! N/ I8 @4 w0 I    EVMC6747_init( );3 w! ^5 [# S; z7 u" K* C+ S1 n4 Y
        /* Call evmc6747_intr function */, T+ u' r; Z3 F8 {. n5 i5 [2 q
    aic3106_init( );
8 _! M6 R6 N2 c, V! w        while(1);6 x. `/ Y* y& x4 [6 {9 d
}
/ M9 m" m$ k4 Y* M$ q
1 ?5 D3 W5 B) `* Q) ~1 Q; d7 D" c2 O% e$ d5 @: J5 M6 D
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题# w1 x6 \; m  ~# I
/* Initialize MCASP1 */
8 c( g0 l. i: x  y7 w. {7 {. B; [    mcasp = &MCASP_MODULE_1;
1 Y$ x9 v+ L- I% `    mcasp->regs->GBLCTL  = 0;       // Reset
% T" z: G5 s+ l# \9 G& w    mcasp->regs->RGBLCTL = 0;       // Reset RX+ X. L: k8 J8 o( S4 F
    mcasp->regs->XGBLCTL = 0;       // Reset TX
9 m) G! @5 U2 F& E    mcasp->regs->PWRDEMU = 1;       // Free-running. h% Z1 G0 |( ]  D9 \
   // configure McASP0 receive registers& L) `: ^! T7 j% F5 H8 e  ^
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
+ B8 g; d: r  J( h; S    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
# Q3 r+ v  o2 d8 Z+ b- d    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
  x; W3 i( l9 ^5 `% }) I1 L  Z    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)/ T5 l( s7 M. f: b
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
% S( r7 ?9 D* \- [    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
8 C( o1 e- z! S: x+ d" h& q    mcasp->regs->RINTCTL    = 0x00000000; // Not used  ?) U& }0 H' [- n- b. i
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256- y# [5 m  E6 ]1 p$ v: _2 X/ v

( q/ v6 u. K( U1 ?. t' ~    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
6 n( h1 D' G( V; `; V7 _  p* G4 @    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
5 N9 P' [: A, p  z+ T  u: A    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
- ]- Q: @0 _0 C; j    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-168 V) ]+ B  D# Z* ^; J- v! Q( Q
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
& y6 d( ?/ M6 ^2 e8 |4 {    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
8 }1 Y& u. }  Y) L4 a* r* l    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit5 ?" n* T8 D) @: [1 \9 X! a& r
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2569 {# Y1 Q; j  k6 F& ^; a6 S
4 {1 k2 J4 K$ l: A. u$ s! o7 d, T1 u/ X
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
6 r! S, y( f; H+ i" w" k    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
% x7 _+ j% P3 O' e7 c% o3 I5 ]+ B    mcasp->regs->PFUNC      = 0;          // All MCASPs
) I6 b8 S) u1 c9 h7 e" ~8 ?; W    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
- ]1 w% q  M* E3 T/ f! b1 w
& l5 b9 w1 C  U7 d* W6 ^# C$ ?    mcasp->regs->DITCTL     = 0x00000000; // Not used1 [% m9 l9 S$ ]! F8 x
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
3 e8 ^2 b" Q( A" ]: }3 o5 F    mcasp->regs->AMUTE      = 0x00000000; // Not used
) k3 f6 u- f2 m( g/ P
& V& W  a7 O' R( ?/ O( `/* Starting sections of the McASP*/
9 u% l- j. ^  S# c9 K/ u# }    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
0 u. i, c& ]) B. \, u* H- [* B/ S    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
% X9 \" E/ k! v/ L. n% x    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
% M8 `& m& `; q* O( X$ K" P3 Q    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
, H, D9 c% c: Q* [4 z6 z" A- P6 m( A! h6 k/ r
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; ! I' \- ?- S- x. {8 v; @7 q
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );  \8 ^& C: j; S! R) [$ p
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
" P. }: F) ^( Z: x) p' L" U    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
' s: W/ [; W- _, r1 u3 v" W$ F1 o' m1 x$ o: J$ k' C* V& t" q6 v
    mcasp->regs->XSTAT = 0x0000ffff; ( ~. u, K5 m5 C( q
    mcasp->regs->RSTAT = 0x0000ffff;
% l* t1 f  e1 |7 I( Y% m/ E/ n& s. F: K# y0 c9 n! L7 ?
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
; u# E' j7 X; T4 R/ O, @    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );; l8 `% U4 Q0 j5 U; b
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; . q/ F( g" M# {: y, C
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
( Q* F) y: f0 u
: U+ n% z5 S* Y) U; ^. \0 L% j    /* Write a 0, so that no underrun occurs after releasing the state machine */' {' t( c2 r5 p- s5 [: Z
    mcasp->regs->XBUF5 = 0;
9 u! K% D& M1 q* l    mcasp->regs->RBUF0 = 0;
$ o4 m+ r% t. {# \. u2 ?1 n
3 \( t4 ?! T! N+ X) _8 X$ ?- b    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
" E' _* ?7 H& J5 E( F    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );& b9 N+ [$ l( ^1 U$ j
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
; z2 r0 R/ `, ~& k( a1 E; m/ b    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
/ w8 ]: P  J1 F% R+ u0 R( i* B6 e, X. n! F
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 5 q: ]7 c! @  @% y# k6 \
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );7 i: l& E5 [" u8 K
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
- X4 J' a- H0 S2 s3 R. L# J6 p    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
8 d  i& L* |! g( k) e! R1 u: a6 N5 u/ E/ R/ w
    CSR = 0x0000;0 F) y( K2 _4 r: L6 T
    INTC_INTMUX1 = 0x3d;/ H- n9 ]" u$ M
    ISTP = (unsigned int)vectors;) D' A$ ?/ i8 R4 }6 _6 q: y8 j
    ICR = 0xFFF0;  1 _  b% m! \9 y; V. d! r, T# N! L
    IER |= 0x12;  2 f# z$ M* v2 G. o$ i3 ~3 n, g
    CSR |= 0x01;  
+ L# s8 H* L% b4 b
2 V! \% b  ]+ q9 N0 G) n
2 R" u1 }5 I' r; ]  N/ C8 @, X. y5 m  g$ A, Y( E! @& Z' j9 G
还有就是两个输入输出函数:) Z8 S) P" y8 b
void output_sample(Int32 out_data); F: x; l+ K; A* k! ?
{  v9 P/ E! x8 ?" h3 Z
  AIC31_data.uint = out_data;  
+ S( c6 P% E1 r6 _  MCASP1_XBUF5_32BIT = AIC31_data.uint;, u( W! i. Y8 ]5 j3 ^& O6 T' i
}5 B6 z, c8 x5 q$ C0 i+ \4 V  H/ W: S) w

) {2 |, ~' f) V. G- u6 x2 LInt32 input_sample(void)
5 J% [" F0 S) `2 V9 ~( v) _{  
, D& ?/ X  n& Y  AIC31_data.uint = MCASP1_RBUF0_32BIT;
2 R% v7 m9 n8 M0 S9 V1 B; m; ^. Q: t: `  return (AIC31_data.uint);
7 h6 ~* D7 ^6 D2 l3 _1 j# Z, K3 p# M}- w( a- A* j: ], e1 c

3 V+ y  m5 F0 f$ }* \; }0 U
分享到:  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-11 04:14 , Processed in 0.041869 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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