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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:* h& p! Z/ h9 g  A$ S3 C1 }, H- V
main文件:# x8 T  b7 o. u, c8 ~4 Y( Z' @; ^
interrupt void interrupt4(void)  % Z9 k4 N( s' {
{; p. g% x3 N& T9 c% D
  Uint32 sample;
; L% G+ V) x) v, R+ V& W8 U( Q0 X* ~2 n) r1 h3 P1 Y
  sample = input_sample(); // read L + R samples from ADC  E% q8 f4 W2 ~
  output_sample(sample);   // write L + R samples to DAC
( ~  s5 o$ x3 M$ j! e4 l/ e2 n7 c  return;, G& Y0 j# c, q% o* B
}
8 [: U$ i6 t& A6 S0 v7 I0 L
1 @1 r+ t5 `3 v+ A9 Kint main( void )3 `9 N6 u& E  H$ o3 D% G
{
# e/ J* t$ v2 C+ c
, a# I' b5 v# J5 r, G    /* Initialize BSL */
9 \' ]% c; k9 `7 {& P    EVMC6747_init( );
2 ]8 v( x5 g- d0 \7 Z6 m9 e        /* Call evmc6747_intr function */
6 {$ U. _/ ~' i6 m  U    aic3106_init( );1 R5 [' d0 B0 x2 w
        while(1);5 k3 W% a" h' A2 J+ d5 L) F& Q
}1 A: {0 b6 D& D6 o- M

4 O; H: e  m  W6 O$ E& K
0 ]& C9 v" s: U; r0 ^& h. R, faic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
3 B, n( [# K( T5 i/* Initialize MCASP1 */9 `! T' P, ]/ T% q- j
    mcasp = &MCASP_MODULE_1;5 M2 {1 O/ v9 H( O
    mcasp->regs->GBLCTL  = 0;       // Reset
8 c, h+ a' c3 K# Y& t1 M, l    mcasp->regs->RGBLCTL = 0;       // Reset RX1 y( Z8 P  y" Y4 D( F8 T# P
    mcasp->regs->XGBLCTL = 0;       // Reset TX2 l2 [6 u* Q" h: }4 E
    mcasp->regs->PWRDEMU = 1;       // Free-running0 Y' x9 m! y! {9 s, f2 K4 u! e% n9 [
   // configure McASP0 receive registers
- u5 {( j" A1 S8 i& S; j8 q: G    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
3 Q7 G9 \4 ~$ v5 i1 F9 y    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
8 u9 v9 H  u9 c! ^1 b    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word; ~; J/ E' D, h/ H% B
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)! W4 \) ^6 Y3 I% {8 m$ M7 u5 a
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)  K; H, o" d& O0 L& @
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
3 V+ A% c3 I1 u4 |6 p8 U* d* H5 ?    mcasp->regs->RINTCTL    = 0x00000000; // Not used% o# y" }, T0 S: g, o2 a
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-2561 ^/ c3 t4 t1 T2 b- N
( d: V% @2 Z0 Q
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used4 D6 P3 y8 F! G) v
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
. H; \! p5 E0 |4 @) r) @, l    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
& E$ p" V9 L4 t0 e    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16  y' `3 o* c* B8 C4 @4 V
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
7 {& I1 i6 C# W! g    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
) A* Y4 d" e) q    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit* r% z+ k4 S$ J, m3 @
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
& |* H' v( W( X5 H9 \- p* f
* J7 {0 V5 V+ ?( m' v( X    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN  E4 A6 |+ l, B0 i8 O2 K" |
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT( o" C9 s8 y/ b" K
    mcasp->regs->PFUNC      = 0;          // All MCASPs
  i* V! M1 q' I1 b& b6 T    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1) c  [3 C; J, U5 L

$ z+ \, w; b9 Y3 N" N    mcasp->regs->DITCTL     = 0x00000000; // Not used
0 t( N, B  R' L( T    mcasp->regs->DLBCTL     = 0x00000000; // Not used5 a+ e3 R+ i+ p% F9 d. g1 i3 S! A
    mcasp->regs->AMUTE      = 0x00000000; // Not used  y1 S! `' V2 J' }& |3 i! B
0 h" Z4 E! Y. E+ v5 Q
/* Starting sections of the McASP*/
* n, R0 F) v# F    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
$ k1 V2 }7 p6 |3 i+ I( U$ J    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
+ e  l2 L) W/ _. ]    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
* t3 w* m0 `0 ~    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
0 ]( V* `  |6 @4 I5 q6 s: a- N: t8 [# ~" ^- ]! J
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
% D* B0 e: W# B# q. G* n! z& _    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
$ {6 d/ T  d: V2 q* p    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; 9 ?5 y' E& v0 B, b' L$ o
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );0 B/ d* O7 U# Z; P' ^- l& v' ]
. Z6 D, w- [$ U3 C
    mcasp->regs->XSTAT = 0x0000ffff; 3 [) J2 f% B4 N- y, }) i5 l3 u
    mcasp->regs->RSTAT = 0x0000ffff;
6 ~% N7 f: S8 v2 |& A! j5 W/ C5 X
3 a/ j0 L. K! P6 m7 _    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
, h* t, X) g6 u5 G6 ^! [/ o    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
4 K4 g1 v- h0 c: O# u    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; ' H% z  g8 ?* }2 c, G. X# X
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );% \; U" q+ U, `8 O/ o: U
- V5 w% Y; H8 }% f! K
    /* Write a 0, so that no underrun occurs after releasing the state machine */3 B" p( o3 R* c# v; D' u/ v/ u
    mcasp->regs->XBUF5 = 0;9 B, M# l* Y* y; k& J0 \5 P. m
    mcasp->regs->RBUF0 = 0;
: n3 M4 |0 f8 f& C" w3 Z- E# ^
7 Z$ S8 [$ @% `/ t- T    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; * C' v% L' v: ?4 z
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );9 n" W0 N  P: }' v
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
6 A3 N5 j) O6 q. e, A5 o    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );- X, W3 ~, y3 ?+ d# p2 g
# K4 n3 `6 b' Q! s" O
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON; # n1 U3 Q9 \$ P4 d* J% U7 w
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );9 J! O3 I1 X- N/ Y6 q' F/ N
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; 9 x: [" ^, Y7 o* E! Q  a. k( o& e
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );1 Q3 A3 e7 R7 J! f( M$ Z

* z, D% _+ n" q  F9 C( ?    CSR = 0x0000;
% |9 {2 s- g# t" e7 K    INTC_INTMUX1 = 0x3d;
/ f' f' z; ]+ K1 u3 Q    ISTP = (unsigned int)vectors;1 Y( ]" O% M7 E& e7 i/ m! l' P5 U  _
    ICR = 0xFFF0;  1 @0 U- @0 K* ]
    IER |= 0x12;  
4 w8 `6 m: u- J2 L    CSR |= 0x01;  : F, m' ^3 n7 w! Y9 O
/ R. s- n) E4 D3 ~( o  L

; p3 d9 M5 t) h  h6 Y, A  f9 t4 G8 w' j, y
还有就是两个输入输出函数:
* Y2 V! \0 M  U' r6 k5 h. Tvoid output_sample(Int32 out_data)9 D! R0 f2 k! A, u2 f
{
* W; L) Q( F4 z! _0 K  AIC31_data.uint = out_data;  , Z7 _( \+ v' Z2 D/ Z9 ]7 t  q
  MCASP1_XBUF5_32BIT = AIC31_data.uint;! P: n& x1 H  D. B* O% u. P
}- q2 D# s; L2 u: c- \- }0 Z& }& P& r

4 B+ b7 v8 v4 V/ ~  s0 K0 W3 ?Int32 input_sample(void)3 t8 j4 ~) r1 T* o
{  
' l( x2 V7 T& q4 O; V- v7 Z  AIC31_data.uint = MCASP1_RBUF0_32BIT;
* t# `, k% X2 t$ n9 s- u/ O& w  return (AIC31_data.uint);" [  B4 [& _! T0 y" m. s
}& h! K  ]4 N6 @4 A
6 Y/ |; B! P( m5 x
分享到:  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-10 15:17 , Processed in 0.042181 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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