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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:- r) z6 \9 {; X- y
main文件:, V# F# E: Q% E9 x6 J, B
interrupt void interrupt4(void)  4 E: a  T6 [* R7 R. m# v
{/ k  b% i- n4 W! Z# }5 f; M
  Uint32 sample;" F1 V' M6 b* [
: x+ |7 Z6 M) A# X
  sample = input_sample(); // read L + R samples from ADC! y) w8 K& `  Q: l+ @  u) Q
  output_sample(sample);   // write L + R samples to DAC
. n. c( [% }3 U& l2 y, C3 ~  return;
7 T5 F# C: L8 v: B}
9 V! m& a" k$ H# K7 o+ H* U# V
! k9 a. R" F1 \int main( void )
! z% e3 T) ]: u8 V{: b, O5 ]0 u7 ~7 g( k- }  r! n3 i
$ o5 c# g0 [$ v% M
    /* Initialize BSL */3 d$ j' u4 Y  D  @8 G! `3 z# k$ N
    EVMC6747_init( );+ C$ r$ i) K9 f4 F5 F4 h
        /* Call evmc6747_intr function */5 g) \1 h, \: v: i
    aic3106_init( );
+ }6 K' J* s! C  X( L8 S; V( G! A4 Q        while(1);
# y* d4 m( ?. G+ q}
! r$ d$ i+ W' k1 Y. g! L5 U7 U/ n& q3 b8 [% L( Q/ ~6 Y9 M

! r+ G' {: `  G( paic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
0 a8 S0 E. V' c1 h5 Z5 h2 y/* Initialize MCASP1 */% b: h/ H7 S6 E# d, Y! Y+ J& ]
    mcasp = &MCASP_MODULE_1;
) j! D+ J# K/ ^    mcasp->regs->GBLCTL  = 0;       // Reset
# N; S$ I8 n! K+ p; z& [0 C( J    mcasp->regs->RGBLCTL = 0;       // Reset RX
0 _1 U, ^- z- _4 g% f    mcasp->regs->XGBLCTL = 0;       // Reset TX
7 H6 C1 A8 ]" n# _- [$ s$ u    mcasp->regs->PWRDEMU = 1;       // Free-running
8 a7 h! X- t: N  g' X8 y   // configure McASP0 receive registers- j* }% `2 `: r4 e7 v. O- }
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used+ z0 j6 j+ X8 ^7 J; a
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
1 S) w. d% H, z, }2 h9 u    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
3 g5 c, V( N2 {8 D1 Z    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
* G% ^+ r$ ]/ _! `) k' N    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side); l$ g4 e% {# V2 B+ g3 T8 g
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
7 X8 W/ m' n  {+ k3 B( w9 }3 R    mcasp->regs->RINTCTL    = 0x00000000; // Not used3 a9 z! p# i" o2 ^
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
7 q  b% m3 K0 _' o! M! D+ _3 z, }! q7 M$ M) K( r1 l
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used& b, L) f8 P" B. }# ]
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
+ w' @! a) k3 ~# I! X% \$ D    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word1 _7 ?: S; i! _6 y& c
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
( O! a+ V7 |8 P- F& ]: J: P- J$ d2 c    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK8 \3 `- C2 L0 D2 X6 F
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
* v0 |% i8 s/ s1 P6 _    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
& D; k: H* v/ v    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
2 z7 Y7 a" \+ j! d% X* P. ^" U
, q7 K+ |8 w; B! ]. \    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
6 p, l9 h  `: }    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
2 w$ j9 f- y% u- W    mcasp->regs->PFUNC      = 0;          // All MCASPs! [2 c) i  h" [! _" l
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1. W8 z1 u4 X8 W4 `

0 o2 ?" Z, z8 @* E+ x9 n. J    mcasp->regs->DITCTL     = 0x00000000; // Not used
+ X: t# Z1 R) U) \    mcasp->regs->DLBCTL     = 0x00000000; // Not used
$ _# ]( g" k. F, Z* d1 D    mcasp->regs->AMUTE      = 0x00000000; // Not used
' o: n; }* u* W" |8 D5 u0 X% w( Z% B5 V& Q0 D1 P* |1 P
/* Starting sections of the McASP*/& w3 M9 i. E. C# G1 ]) n+ ~# T3 \0 c
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ' ^5 {" R5 O# U, T$ _. O2 B' \% p" c
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  " U1 C6 o5 s6 z( {/ G, |
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
2 }  U# p/ p, C7 a5 Z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );# {' E' E$ E2 x3 Z
, D0 t8 L3 X: J4 A* p* z2 ]) E
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; ( W2 \* P: t* q7 w% x9 j% I& [
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
" c5 d7 t, W3 M# m- D& W* `    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
# A# K& s  ~" P+ Z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
: ?8 p* M  |- P3 r' j6 n  s
/ b% s7 `0 z: k* N- c$ C    mcasp->regs->XSTAT = 0x0000ffff;
" G# Z2 [. M4 L9 F    mcasp->regs->RSTAT = 0x0000ffff;
2 H; G2 ~  ~  c# L6 ~( ^: o8 Y, d
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
% i! o6 D) W- z! e    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );) A, P8 \  s, f- R
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; - q. T# s, P  _
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
- O  d- Y8 K# l& X4 M9 ^
# i& h/ t. L) E1 ?    /* Write a 0, so that no underrun occurs after releasing the state machine */
( V, \) P0 t7 b' ^% j    mcasp->regs->XBUF5 = 0;
* j, Y- c6 W, c$ H9 t    mcasp->regs->RBUF0 = 0;+ l  Q1 H: a! s% I/ r8 m
' a5 N5 n' b- B4 \6 e! ?+ H- Y
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; # A0 s0 Y# n8 A' E. l7 `
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );. [& e$ c  R# n3 I
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
! A/ h6 `5 |! `  ^* A$ B    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );2 _5 u/ \6 Q, T+ S4 V# [% _, P

1 k, X0 T8 e% n9 Z7 T7 ]+ y    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 0 f7 v& F. f' E, {
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
3 e2 k1 h+ n& I+ {( K" \; o( z    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
/ w- |1 a5 J; h  f1 w- a: p    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );! L2 p& i/ k6 b' e8 }' Q+ o6 c

( p4 w! H5 x3 h$ E+ F( ]; S1 ~    CSR = 0x0000;+ c' T8 P+ a9 p8 C
    INTC_INTMUX1 = 0x3d;
, K/ G9 {# D! R: \    ISTP = (unsigned int)vectors;" m' W8 r3 O, W& _# N  j
    ICR = 0xFFF0;  1 K- j- U+ N* H/ T! u' s
    IER |= 0x12;  8 I9 `) A  n1 ~4 I5 @& U
    CSR |= 0x01;  0 `8 }! f: G$ V# S; d% X; C

0 `* w: p4 {9 C1 [  c, O
4 n6 `' X6 n( E0 _7 O- [8 q% f6 Q. A4 s3 M/ ~
还有就是两个输入输出函数:% _+ k, ?% g$ ]+ h: }
void output_sample(Int32 out_data)
) F  j9 e$ i7 `3 W{2 W# i2 C' I, F4 l+ _& A
  AIC31_data.uint = out_data;  
+ o5 q) M) K; e" }  MCASP1_XBUF5_32BIT = AIC31_data.uint;- f2 m1 c0 H6 G, u
}& D! o8 k3 ~4 Z" u
. K$ o& D8 `4 `  W* B5 w/ r) K9 e$ K3 ?* y
Int32 input_sample(void)8 L7 p7 N5 m6 ^8 T
{  ) L% E$ R0 t) ?4 z+ ]) n6 X
  AIC31_data.uint = MCASP1_RBUF0_32BIT;2 w7 A9 f8 s% r8 p/ a3 F, S
  return (AIC31_data.uint);& I3 K7 K* a! s) z4 p
}
8 x9 L2 a! w- x, J) d7 p
5 J" u" p* v5 n( B# Q4 p
分享到:  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-13 04:06 , Processed in 0.041045 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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