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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:3 `. H9 B/ Y& R+ Z0 [3 K* V( V6 G, c
main文件:$ O' j1 A- A" x
interrupt void interrupt4(void)  
) P/ C+ ^; X% _  S1 D{# n* I) N& \  ^0 p! N" E( `( u
  Uint32 sample;
* \% Y" H9 E7 q( N
$ n1 r) \( D+ S/ a! l  sample = input_sample(); // read L + R samples from ADC
9 t: h# s, e0 i; I& O+ ~  output_sample(sample);   // write L + R samples to DAC
8 e2 e% E( e" u5 a9 t  return;7 i* Q1 }! ?* v0 `* D& J* d
}2 n0 B& R) f9 g1 ~. Q

* V$ U. Z: [" f+ x8 x' t) Zint main( void )2 v% u: ?' b0 O! H
{
) k, }' @( R! ^8 ]7 C4 Q! a7 U" T3 _: m, N" Z2 @0 p  G8 p
    /* Initialize BSL */9 M0 X1 B8 P7 ?- @3 ^5 A  E
    EVMC6747_init( );
6 Q& u) x& y: q% H8 L9 X5 k# B        /* Call evmc6747_intr function */; E0 v6 f! g# p
    aic3106_init( );( t/ Q! l, D1 N+ [. _# W$ u
        while(1);" l# ^3 {( O' k5 z  x
}
: Z9 |) V1 p! h% l9 f) l. P" `4 S- I0 h: e3 {6 P9 d
1 D4 Q7 l3 [# C0 F& O% s: N
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题2 y' N3 j% P$ x" F& w2 [9 z
/* Initialize MCASP1 */, [; I# S# D7 x
    mcasp = &MCASP_MODULE_1;
3 s* W0 H7 M/ }1 Y: k% r    mcasp->regs->GBLCTL  = 0;       // Reset% R0 ~. H, t9 q. I. R
    mcasp->regs->RGBLCTL = 0;       // Reset RX/ h1 _4 s: I; z3 z, N
    mcasp->regs->XGBLCTL = 0;       // Reset TX6 p$ @  q. j& v
    mcasp->regs->PWRDEMU = 1;       // Free-running
5 |) I/ @, L* X1 A& Z   // configure McASP0 receive registers7 ^. Q$ ^% x$ }$ H; ?! s
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
! i2 f, U4 g4 @$ [# `( x    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus6 ~" `$ S" Z5 P* e5 r1 Y' d% ]% w8 K
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
' A7 K  P( Q* G8 L3 H    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
0 W( N/ o$ n; e    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
8 Q  A% [* ~- v, v: V    mcasp->regs->RTDM       = 0x00000003; // Slots 0,19 I0 S; n) z9 i3 r7 }2 E
    mcasp->regs->RINTCTL    = 0x00000000; // Not used0 X! U7 c/ l  v4 l: c8 s
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
. Y3 g' u) M: {7 I/ t' ?7 v' `( ~1 b2 F9 m9 G% N' @' B( `! V8 A
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used. L% l1 [; Q6 t4 L1 l3 @
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus- h& G7 n4 }% K; R4 A+ ?  s
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
6 Y  \6 ]+ i+ l1 D! W    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16& h+ V, n% b" N
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
4 U9 n- W. y8 n! A/ @    mcasp->regs->XTDM       = 0x00000003; // Slots 0,11 \- \" O  G( a4 w4 K9 I
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
" H" g, }; a! `    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256; G4 H$ \% F! B0 j) c0 S; [2 X: B7 _
5 U9 x7 s# |& _$ {; s
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN, c$ A) d+ X5 E+ f
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
% n  E: x% r& n$ A( d& n# k/ ?1 ?    mcasp->regs->PFUNC      = 0;          // All MCASPs
  D2 G9 n4 n: ?  b* ^    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
& ^: ~5 o" k; ?8 m
+ q' D, X1 n$ @5 B$ Y* s    mcasp->regs->DITCTL     = 0x00000000; // Not used7 v) l5 J' c2 `7 L
    mcasp->regs->DLBCTL     = 0x00000000; // Not used9 g3 R. Y2 y( A
    mcasp->regs->AMUTE      = 0x00000000; // Not used
' M2 z5 E: r1 s. |- _
' k0 I8 ~" ]. E5 {7 W5 S/* Starting sections of the McASP*// C6 r7 `5 X* X% i
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; $ b9 j- U; m, Y, w/ v2 h3 j( v- C
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  1 Y) J! I# j6 Q, w- V! r
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
) k% ]: Q# {7 G1 z# [( p    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
4 d- a0 }7 H6 g; Q! a$ a1 t$ N; q& `
8 F7 Q* v0 C" Z6 a  s    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
; W7 k, _) G5 n) \* p8 m. E  k    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );5 A$ T2 g" o5 r
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
/ Y7 h. ^2 g7 K/ p( }' a    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
& n+ p1 a  G( ~$ A! Q( S5 {7 F$ F% L  d- ]
    mcasp->regs->XSTAT = 0x0000ffff;
1 B' ?" L) N1 y! K* w    mcasp->regs->RSTAT = 0x0000ffff; & z' S3 H# J& @5 R$ x

5 R# H0 k) p% P! o0 F; H& a9 Z    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
8 j' |; K  P4 z& Y0 v' r" y    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
$ x/ K, H0 q* O/ S2 Z    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON; , `4 N& S3 S: F
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );& _3 }* f4 i/ k& x. _
2 _3 N' F! q/ \, z9 u. k; h& t
    /* Write a 0, so that no underrun occurs after releasing the state machine */  ^) L1 e1 z* n/ E, E
    mcasp->regs->XBUF5 = 0;
' C5 v$ h, D. \  N6 |. Q" K0 k    mcasp->regs->RBUF0 = 0;6 A8 t& V3 W( g8 D4 U( O

) T, k; k$ F3 k    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; ( G+ p  M9 M! @' S% I
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
' m( I. U# d! h# G  ]    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; 9 q6 I) t, g2 W2 T  d; J$ B
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
% z0 f& f" G" S+ o7 Q* C1 v5 r# v$ W& @2 e  ~. R6 I& K1 j3 Z. b
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
! O& U* r5 L6 Y: M    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
2 i3 W3 h( D% b' E: r6 }$ d9 Z7 h    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
$ Q+ o& x- z$ n$ {4 o. p0 }7 N' k    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
" |( L( V. t( \, M5 c/ b2 Z- L$ a9 B6 V/ x) g" x. h7 _
    CSR = 0x0000;
+ S; _3 S# M4 R, N/ A' L$ Z    INTC_INTMUX1 = 0x3d;
* o- D: m" r  E5 y- l4 A    ISTP = (unsigned int)vectors;
' J: }5 @* h  q; h9 @$ @    ICR = 0xFFF0;  5 A, D* [3 ?0 g; c. H% o7 ]: c
    IER |= 0x12;  
" S5 n  p  I$ v$ Z2 }6 y6 J7 L    CSR |= 0x01;  . W2 n: w. S  R0 \& }$ R7 f. q$ y

" L, `" U- R" _5 E! K
; C, Z& M; y4 b: T
; Z1 P9 O( ^3 f" x- }" z8 ^( r还有就是两个输入输出函数:
% K4 e' W; @6 f3 E% r& Q4 i8 ivoid output_sample(Int32 out_data)" U! Y' D# {, _! l7 p# X
{
; V4 C# c3 x2 ^& g! |% y  AIC31_data.uint = out_data;  
5 E. l5 [6 S: M' O: o+ N  MCASP1_XBUF5_32BIT = AIC31_data.uint;0 J& u9 T7 t! W0 V+ K
}
. U6 u% A: A0 I& \
( b( O: `9 l9 w4 @/ r# z" Q/ C6 VInt32 input_sample(void)! X8 M3 G% ~3 n$ x) f, l
{  
' a: S9 Z! N. t  AIC31_data.uint = MCASP1_RBUF0_32BIT;
* D  \$ _! G( A+ D  return (AIC31_data.uint);7 ]7 H- X) S8 {6 l! t
}
/ Y$ Z0 n: x' v
* u7 ~5 q) [7 T9 n/ q! e
分享到:  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-27 14:19 , Processed in 0.041618 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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