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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
: Y+ h( H. e  emain文件:2 h" b5 ^5 p* n8 W. q
interrupt void interrupt4(void)  
( l$ n, e* @" n$ Q0 p. @{
7 u& Q5 W0 q( O- x  Uint32 sample;
0 R( N# E( w7 h  N, R: f$ h/ ]4 j
: B7 }0 _6 U( H% P: K+ Z7 l# N  sample = input_sample(); // read L + R samples from ADC
# X/ o" x0 e$ a' _2 \4 u  output_sample(sample);   // write L + R samples to DAC
4 z6 c/ ]' A  ^& N$ @5 `  return;% ~; R: n! |3 W) H( a; E
}/ C0 `  R' _! J; `9 r, k! C

' W) m5 v: ?3 i8 a% B3 ?) b9 R+ N5 ~8 i# Pint main( void )5 a9 A; h0 I% @5 e
{
& D4 m7 M: B* b1 z" t1 B
" L5 [! m5 z( A* G" }3 o3 v    /* Initialize BSL */2 x- o1 o1 e; s$ ^% e
    EVMC6747_init( );
3 ~3 O3 c- g: ^2 p        /* Call evmc6747_intr function */
8 ]; A5 p! f/ B    aic3106_init( );- Z! N6 Q3 y5 \& ^
        while(1);; T* k+ N. ^* U) o
}
9 T8 u2 g3 L; c" C
, s# l* u+ X2 }2 ~4 `. H6 ~! u! u; u, X
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
$ w- l0 K8 z" S/* Initialize MCASP1 */
' W& Z# A1 Y2 [# P! U    mcasp = &MCASP_MODULE_1;
/ n4 q; ~6 a  n3 j" j, A    mcasp->regs->GBLCTL  = 0;       // Reset
( R+ W' L( u* e3 X% c0 C) ?& |    mcasp->regs->RGBLCTL = 0;       // Reset RX5 i! `9 @7 F, {* U
    mcasp->regs->XGBLCTL = 0;       // Reset TX4 P( D4 F" k8 B, A
    mcasp->regs->PWRDEMU = 1;       // Free-running  d+ [" {; B; j" F4 ]5 P
   // configure McASP0 receive registers8 A8 U' _# [  ^! d* K$ r  ^# _
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used  M9 @+ W/ O) {; a
    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus9 y0 T) Y6 m: h- m9 u0 R
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
1 T* t( U5 A* H    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
9 v. b/ g2 \, U+ Q    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)9 P; N9 D* N/ U
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1) x, U3 j; E1 m; i7 Q
    mcasp->regs->RINTCTL    = 0x00000000; // Not used( ?* }. W% i  \; T* v5 P& D# H
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
: ~! e) B0 F6 J2 ~' ?5 u% I4 E  g/ ]' s2 N& B6 L
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used. T: u: |& k: a* }2 i  o, e
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
5 o7 r9 W7 H0 E/ {    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word* W% W1 ?* w0 @6 J2 F
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
* W* Y2 X$ [1 `! }    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
% ~$ Y, _+ O6 o* e! Z6 y. F7 L    mcasp->regs->XTDM       = 0x00000003; // Slots 0,12 d# ^5 v) }5 d: M/ Z, o2 t
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
7 \: p0 Z: X9 E# Q    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256  r+ m4 @- t# F
' d& ]" M; a) j- b
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
' P6 G8 J# e  E% @    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
% {# A$ I8 a1 c& P  W! J2 L    mcasp->regs->PFUNC      = 0;          // All MCASPs
- T- B. c  T: L4 J- g. ~  C$ o& h0 ]/ n    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
, }3 \! F! q  s# I$ z7 r$ M7 T: Q. O: I
2 B. a+ T$ g% h    mcasp->regs->DITCTL     = 0x00000000; // Not used
5 G& f! l8 p; Y    mcasp->regs->DLBCTL     = 0x00000000; // Not used
) V0 `3 T6 t6 V, Z; L" `7 R    mcasp->regs->AMUTE      = 0x00000000; // Not used2 m( C; @) L' {* H# r$ k3 N9 K8 k
# o. @* Q/ o2 f8 ?5 J+ p
/* Starting sections of the McASP*/3 }! T! G( M; d5 Q; ~0 a. d
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
: Z, ^8 u" ~& m9 {$ v0 c! C    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  4 @. c2 b2 Y1 Y3 i* _8 s/ t
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
) \- [' a  e# o$ G& d    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
! K' P9 w& N8 K% u# x: g; R+ o  p, {" I3 ?" u, N1 ^
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
# ]! w! y- j$ T    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );7 q0 @1 S) F; J/ T* R& m
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 2 L; d( E" I1 P8 }: @
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
4 I- d# j( Q0 M" M+ F/ Q" e
: Q' }" K8 F6 e6 C% |    mcasp->regs->XSTAT = 0x0000ffff;
/ s" I3 A- m5 ~+ Q4 ~    mcasp->regs->RSTAT = 0x0000ffff; " [9 M7 V. N% J1 W
- O/ u7 m% N0 y3 t  e
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
. h5 I, r- [' c$ C    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
2 x& {# D7 J" G* C. O    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; # \% w7 j3 Z7 n. ^
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );; N) E) V% i5 E

2 V" r. j% V% |6 c0 @- u5 b3 h    /* Write a 0, so that no underrun occurs after releasing the state machine */
1 i/ y4 y8 a2 @6 s    mcasp->regs->XBUF5 = 0;
3 I+ g$ y& _  x* l; X    mcasp->regs->RBUF0 = 0;) w. ^; l3 U! C5 \, z
& s5 B) l, E* k9 N8 Q
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; # ]5 L3 k! w% M9 D, o
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );& X' O1 k& L; G7 W  a
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 2 U  J& V% P" x3 }
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
; [& P2 a$ B8 U  W
' {4 J. t8 g1 s$ h* u; e; h4 P. I    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; 2 |5 `& s. S% g& u! _+ b8 g# g* A
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );- b1 ~4 D6 r* e& I# @  b
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 7 U" C1 |0 l+ Z, T  U
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );: H6 t; X& ?) b

$ u) M0 B  p1 @. Q( \. H: l    CSR = 0x0000;$ n  D. T" g% w6 k
    INTC_INTMUX1 = 0x3d;0 p/ x" G. l  e2 ]9 J
    ISTP = (unsigned int)vectors;
( F$ R; u9 [6 H& p$ ~+ h  v    ICR = 0xFFF0;  + F/ n4 L  ^: Q+ ^5 Z9 I, ?
    IER |= 0x12;  0 Y7 b( q! ]1 o5 t% l+ N  n
    CSR |= 0x01;  ; Q) b. P7 W" G

; z5 K4 Z" C4 A. x$ ^# @  ?$ M4 B% V8 S
- n  S/ x! P) v2 B; ?: x
还有就是两个输入输出函数:
4 j7 k; A) h3 Pvoid output_sample(Int32 out_data)
: O6 i' `. F$ t5 v{6 D. K" d% c* i: a1 s
  AIC31_data.uint = out_data;  
7 @$ v' Y. q5 E! l  x# G0 w  MCASP1_XBUF5_32BIT = AIC31_data.uint;% z2 \* N/ _9 X# U* i% \
}
! w3 ?$ V: B9 Y0 W0 b4 @9 J3 Y; G# [4 E
Int32 input_sample(void)) p* x% D- Q6 Z" p7 [, q1 ?0 E
{  
5 T' F2 U; X/ i' O% d  AIC31_data.uint = MCASP1_RBUF0_32BIT;
; x6 ^3 E) G- \6 |  return (AIC31_data.uint);  f6 k0 `! Z  @* e4 ^
}2 h; ]/ g4 D8 X8 ?/ B  g

1 Q, N& A4 R" _; c* f4 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-3-10 11:11 , Processed in 0.040478 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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