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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:/ U9 b2 @- e" o. ~% n4 ?9 F
main文件:6 m( X. Q- B8 y
interrupt void interrupt4(void)  
0 M( F8 ~  n( l1 H1 B{3 F/ l: w) _" Z5 ?( |- W% |
  Uint32 sample;( A: x' |2 _/ r& W3 W

7 g7 |4 h' b/ d5 v# K; V  sample = input_sample(); // read L + R samples from ADC
/ q; x' t( t2 v. p, k0 {, s  output_sample(sample);   // write L + R samples to DAC " |% Z; q# o% ?% G5 N8 `% q
  return;7 A3 n: p4 o6 Z6 [
}; ^, M5 X) L3 @3 c: k, a. \& I. \

* Q1 w  T6 n7 Y6 ]int main( void )  D! J6 x' n3 s* P) R
{& E0 g; a, Q7 U4 K+ G6 O3 P% H6 m
+ w; ]0 f# L/ G, R6 {
    /* Initialize BSL */
5 V0 X7 ^% g& T$ A( r    EVMC6747_init( );, d8 o6 H4 K- T& U7 @! r9 a/ E
        /* Call evmc6747_intr function */
; x1 @. ~% y7 d, T) B    aic3106_init( );
9 h" ?7 j2 F9 _  [3 l' ~1 \        while(1);
0 z0 p' Y  A! w  f0 N}9 |( [8 G4 P3 Y6 l( x5 S# D7 P/ o

* Y6 p& g9 V" g. s; B! `( H9 L' d
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题( i5 t6 M5 H+ u3 T4 m" I2 [# G
/* Initialize MCASP1 */
5 y" D! k8 `4 A0 N6 i9 A+ |    mcasp = &MCASP_MODULE_1;
" N0 Y1 S8 ^' J3 j1 Q    mcasp->regs->GBLCTL  = 0;       // Reset
( B. {6 r4 w; N6 L    mcasp->regs->RGBLCTL = 0;       // Reset RX! u+ |) _0 j$ l% X, p/ G/ d
    mcasp->regs->XGBLCTL = 0;       // Reset TX8 A2 _9 {8 D5 _
    mcasp->regs->PWRDEMU = 1;       // Free-running6 M, I. e' l" H, P
   // configure McASP0 receive registers  _% H" h0 ~! X4 K
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used5 ]: R9 t! u1 J8 J4 Y
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
6 D. {% _) I. n    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
7 N' a) d  X, }( Z1 k- C    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
* H" M- N* ^' U& [    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)* {3 U8 ]( v9 x  I3 v" [
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
: n6 R# `5 |3 @" r& e    mcasp->regs->RINTCTL    = 0x00000000; // Not used
; [; L4 q; \1 c( _1 |3 P6 |    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
0 ~5 ]! t7 x6 C) ~9 x, ~
- x1 O9 T1 s2 u7 Q) C1 Y    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
% n, f% u/ p$ R$ z1 q    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus+ N$ @7 V+ U% C: V6 I1 H
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word! ~7 ]: i& |& h2 Y/ s% P
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
) C* L# O/ a6 G. K, w, r    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK7 c0 ^1 s4 D7 C5 R: l; h
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1  _3 A9 w4 b0 |$ }
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
$ d: s: P9 q. o6 J& j  s3 Y4 q- W1 X    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2563 ]9 z) V( e7 `* n! X

1 B6 r& j5 W( D+ Y$ l! f    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN$ n& S2 n# W1 b( ~" Z
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
$ ^; i# B/ E* X  |8 H" [    mcasp->regs->PFUNC      = 0;          // All MCASPs
/ a: r$ W) U8 r3 M7 s& C    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1  K# |% x/ `# g( M, L

. Q) I0 F; c9 o3 c5 S: R5 u    mcasp->regs->DITCTL     = 0x00000000; // Not used+ o7 \& v% D" f- |  [* V
    mcasp->regs->DLBCTL     = 0x00000000; // Not used
* N/ X/ }- X, y; U    mcasp->regs->AMUTE      = 0x00000000; // Not used  X5 {& E5 M, h) O" d
3 u9 m5 M* i3 L7 H! g9 `# s' x
/* Starting sections of the McASP*/9 o6 {0 q/ h% I* v( E$ E9 o
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; ) f4 j6 t5 A/ f' O, T1 y' r% m1 |
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  6 C. }* f- h9 \$ ^5 b2 b
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; 0 X0 W1 B( h* M/ y+ a/ |5 P
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );+ z9 ~4 [; Q7 Q6 i1 w# V! b

( u; ~* l4 o; ^- N- k    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
5 M0 d+ ]& C! Y1 k/ Q2 D5 C    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );3 x% A" S7 z2 G- H5 ?
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; " z/ Y7 p' z2 x( f* V( x5 P/ \
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
$ B5 }, s9 Q2 J7 K/ @  C. j# F, N& Y
    mcasp->regs->XSTAT = 0x0000ffff; 4 B, T; N) `6 l" W
    mcasp->regs->RSTAT = 0x0000ffff; ! y* y- f  J# u/ B- I

- O8 d  y  |' ^. R    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
% N. P: q! q* b# H. \    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
7 }: k- ~. ~" i    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
+ H0 U5 I8 W# U$ r6 P" p5 |    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );* b6 L% a/ c4 x1 M, I0 a0 d4 x: d

* k2 k! M( b& K9 g    /* Write a 0, so that no underrun occurs after releasing the state machine */6 m$ o5 Y4 E4 |% g8 t6 ?2 f
    mcasp->regs->XBUF5 = 0;
) x1 ~7 d% h2 k5 L6 w* {    mcasp->regs->RBUF0 = 0;
3 \' D2 L, W$ C4 y# t
# X2 k8 M. h7 d9 ^    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
% W  H; V. h$ T    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
/ i  x. N7 e+ j$ ?3 u1 [6 H1 Y3 m    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;   B3 k8 S6 P4 e4 [1 a# e3 ~
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );9 d3 g: o& L( U6 o! ~/ I* H7 w

- E  r) a/ u4 u( l# n) T- v    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
" i2 o* Z6 O7 a/ Y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
1 y/ m+ K$ m" U% r1 j' K; Q  ^    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
8 c; V6 m. l  p% j2 P    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );6 P+ U3 J; e) O2 M

8 R; {9 j/ C1 E1 G    CSR = 0x0000;
$ x' V# ]% ]; p/ i    INTC_INTMUX1 = 0x3d;
8 p/ O9 v" p) v. V    ISTP = (unsigned int)vectors;: W  V! O/ W! R$ z
    ICR = 0xFFF0;  
' y9 M; k0 t7 }! `9 }; P( b" }  r    IER |= 0x12;  2 i* x$ Q/ U0 H8 b# }! f, i
    CSR |= 0x01;  . V5 s) S+ x% d) v8 L

8 K2 o! H  q- _3 m. U. ]5 o7 x! w  @! L! W2 Z8 D' o, M
' ^" q; z  F9 o. p+ {8 J. t
还有就是两个输入输出函数:
- j; ?# J' l6 w6 e2 |: S% Hvoid output_sample(Int32 out_data)1 u+ ^" @# {. v" p: R/ |* F
{
2 Z: B/ G0 S7 J  d3 o  AIC31_data.uint = out_data;  
# b3 e0 P+ ~: S- {4 Z* `  MCASP1_XBUF5_32BIT = AIC31_data.uint;/ N+ v! g! |7 v5 T7 M2 u; ?2 E
}5 x# v& b7 U" e8 m/ L

% D8 F) {$ u" h" }" `; pInt32 input_sample(void)
; T; U; \0 i' b$ m+ B& Z6 y  o{  * j0 u+ q$ H. }1 {# ?" W
  AIC31_data.uint = MCASP1_RBUF0_32BIT;4 r$ j- V, t8 N' p& `- \. Q
  return (AIC31_data.uint);
- @' h4 i$ ^- f! H$ z% p; ]- B: V}' a0 k4 e% |! g4 I7 S( W' M5 Y, R
- B8 G8 U5 u1 d# t
分享到:  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-12 02:00 , Processed in 0.040066 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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