C6747利用McASP发送中断方式完成音频输入信号的直接输出 - OMAP-L138 - 嵌入式开发者社区 - 51ele.net
设为首页收藏本站

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
% }) `% h; A* E5 }$ [main文件:
0 I1 h5 b: O' j: Y! {interrupt void interrupt4(void)  : N0 \/ P3 {6 L; {9 q6 ~
{  u. P5 [; N! i. B3 U
  Uint32 sample;" U3 d# K5 v& {5 K
2 W) b) `# ?1 \) |7 P( {$ p6 x
  sample = input_sample(); // read L + R samples from ADC3 ^6 Q/ a0 f' ^; F5 W
  output_sample(sample);   // write L + R samples to DAC
4 l& d( z0 U6 M  return;/ f- r: \0 c& K3 a6 J( t
}  w' N$ M7 a; }$ b. E# U2 H
" E9 K. S8 u- j0 p! L8 d
int main( void )  d5 U5 `; w; @4 G
{2 o; W  J& x" H& G

, I) J) y) Q- W3 c( V) h/ ~    /* Initialize BSL */9 M$ P- H2 _* x; `. y6 {
    EVMC6747_init( );
5 ]) C5 X; ]4 I8 }3 l. w        /* Call evmc6747_intr function */
: W! S- Q( d- o) A0 m8 ?    aic3106_init( );
( `; K4 I  ~- M2 q5 \8 P        while(1);  W/ `# [9 D3 P: {9 _' ^
}! P7 O- I0 u- @" s" P$ q7 O

" k" I3 o- A; _- b, T! Y
, R- \, H) D# j6 {/ J$ Qaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
. z1 [9 T5 j+ }1 g/* Initialize MCASP1 */
: w: u/ y) y" e3 {, K( k    mcasp = &MCASP_MODULE_1;
0 U" z0 t: m# u; l$ o* d    mcasp->regs->GBLCTL  = 0;       // Reset7 O! x2 R( w, Z# @5 v  |+ Y0 P
    mcasp->regs->RGBLCTL = 0;       // Reset RX2 e, i" g. W- r- ~; u8 I
    mcasp->regs->XGBLCTL = 0;       // Reset TX  k+ ~# M! _  c# D
    mcasp->regs->PWRDEMU = 1;       // Free-running
% b1 Z+ X1 P4 Q, w, A2 s  |+ ?   // configure McASP0 receive registers6 E2 y: F6 T% b8 A" v% o. Q
    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
2 @# O" _8 K, O" b5 i$ ~    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
# y$ H2 D( N( x* b8 v    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word; P8 p4 G4 H0 U8 s# A6 T  O
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
. E9 r$ D5 v2 C- \9 N( M    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
+ A; v  ~& Q! V( E+ }2 p/ _0 r+ c    mcasp->regs->RTDM       = 0x00000003; // Slots 0,13 J+ B5 v3 B" f. G
    mcasp->regs->RINTCTL    = 0x00000000; // Not used4 ^$ ^2 ^+ b# `, o' ?8 J) q3 g% p
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256' V4 J1 |5 }: E1 j$ X

3 n' W# h( H1 ~9 V) O( [) \4 _    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used) p) N/ g' X: c5 t! e% f
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus% E( V2 h9 n: m8 b: k, w
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
6 p: C0 F; t5 e- T    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
6 g: o9 S' c0 a$ t; l9 b( b- K+ {$ z    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK$ P% h. J  C9 q9 ^' l
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,11 W* Q$ d2 r* V; s0 r
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit& E( t  e; \, h& z8 b! t% W. O' ^
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
0 X4 V# x# x$ ~1 ]( S& o
  B+ n+ R4 Z3 D$ X- `0 p( X3 Z    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
) p; @4 C& h1 f    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT; W( U& Z1 c9 ~/ t. Y5 y! G: O
    mcasp->regs->PFUNC      = 0;          // All MCASPs
8 S! M1 \  d: q( {6 J% v    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
+ n& e2 z' E4 V* j' ~& N
# \9 u6 a2 f# T6 z    mcasp->regs->DITCTL     = 0x00000000; // Not used
& h2 B/ E& H6 S: D2 c1 `    mcasp->regs->DLBCTL     = 0x00000000; // Not used
3 }2 T9 Y+ S/ z# c; X% |    mcasp->regs->AMUTE      = 0x00000000; // Not used
: ?! u' ^! u9 B1 C
$ w: W8 u7 c7 ~* y+ d9 @/* Starting sections of the McASP*/
' q! j& {/ N8 t4 [    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
( c; Q! c+ c0 w! e4 g# t& D/ E    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  & g% ^6 b+ G4 [- H
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
5 u" K  {  F2 D    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
& H2 J! p. j' w/ W5 d5 O4 U% }, p
- x5 M% X% |. O3 M    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
, }1 A6 u+ L( q- b8 f    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
! `8 E1 t0 v  j. Z" d5 M/ q( q7 F# m) w4 V    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
+ d6 e8 z( r1 _0 p2 U1 k- w/ f    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
1 C& G7 L' y/ s9 {% ?9 I4 A
% j$ D  R* h* q* R) h; Q8 Y. O    mcasp->regs->XSTAT = 0x0000ffff; ' C' k( H* s+ K( [0 B' Q
    mcasp->regs->RSTAT = 0x0000ffff; ( ~) H0 \# @( {) M. {0 T
9 Q0 C+ H! O" c- G, w$ f0 s
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;$ ~2 w- t1 d' e& Q- ?/ R
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
, Z8 i5 C3 ~- O) t    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
3 q; I6 n- T! S) n    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );- C" q. H) S  f6 j2 i8 g
# m0 p9 ]; l- @8 T2 R
    /* Write a 0, so that no underrun occurs after releasing the state machine */
/ B# R7 q9 R5 V3 O    mcasp->regs->XBUF5 = 0;
& q6 H  g  X" U- d! l    mcasp->regs->RBUF0 = 0;0 [1 Y& k! R5 P9 q3 ?. K5 N

0 {5 H, L" T5 v: t" O7 y' }1 U    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 6 v  C5 B3 I8 F7 }. O
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );
3 A5 T0 V$ e; `& R3 T" w0 B! Y    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; $ [) U3 S' h0 G% ?% N4 y
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );9 F; b. ?1 [$ \8 J# b* _$ w, W. _

  U; X& ^" d% |    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
- Q0 p& c% _4 S8 h0 o    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );6 W! [' o; o: d5 Y: H
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
( k/ W. i, c0 @0 V- l2 r    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );2 r/ @; W9 h* h) `

$ x. I+ l( E8 h  i/ v    CSR = 0x0000;
. Q* X$ v* W6 `* i$ e! B8 p    INTC_INTMUX1 = 0x3d;
/ [% J8 y8 m/ V9 Z9 i! s    ISTP = (unsigned int)vectors;# C, W- l6 G( x" w# ]5 W2 p* q: m
    ICR = 0xFFF0;  
6 U& }0 U& n, @2 @& f1 a  O( X6 u: ^    IER |= 0x12;  ) E: L3 A" l0 i( m& u2 h
    CSR |= 0x01;  
9 J" J% g( P. T/ q. l3 r" G& ^1 F+ D  O2 N

+ x5 ~" \9 f- ~0 {9 C; g! P
0 k0 o' `) J# u( e' _. |/ f还有就是两个输入输出函数:' C! n6 i( |+ n4 r1 ?
void output_sample(Int32 out_data)& b8 r6 \* f& g* G& `
{7 n; N: O. o+ e
  AIC31_data.uint = out_data;  
2 d7 C4 H1 G! Z  MCASP1_XBUF5_32BIT = AIC31_data.uint;
9 P: i' M7 A/ h# A}
- f7 F8 Q; Q# I/ U/ X: g) k4 n5 c3 W5 Y1 M7 K
Int32 input_sample(void)
4 {; l2 `5 n$ }6 |{  4 Y& o; \6 V: r$ A- |
  AIC31_data.uint = MCASP1_RBUF0_32BIT;6 F0 l  w2 h4 [6 C" R
  return (AIC31_data.uint);# s, K' [! n0 j
}9 }5 `! D1 @8 d

; o" u6 v. l  p3 R
分享到:  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, 2025-12-3 11:31 , Processed in 0.042467 second(s), 26 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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