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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:( Z0 P& z9 y/ {4 V, w* o6 r+ i+ Z
main文件:- {8 R8 e# p' U* Q( ~- \
interrupt void interrupt4(void)  
! b6 J  z  G! P3 {6 {5 q' F{
8 j. W4 g9 W2 z4 ]- E  Uint32 sample;
( X2 U+ y' O) m& X. L9 j1 H$ h6 k& R: C" P4 p- L7 `0 y& J1 a. h
  sample = input_sample(); // read L + R samples from ADC
$ f$ @+ K  R4 R7 E3 z9 ^, q5 w  output_sample(sample);   // write L + R samples to DAC & x# s: I$ B% H/ H% Q$ `( j
  return;, q- Y2 j* q+ [. X
}0 L9 D4 V1 z0 q' t1 o* k, f

0 l! z8 @" p! {int main( void )8 i* @! P2 _- c/ g
{
. F9 u% n- j7 `& t7 p# F. Z: l
6 A# k9 q/ ^) _$ ~; N    /* Initialize BSL */7 q4 ^3 {$ p+ }+ O( c4 e
    EVMC6747_init( );! L. G1 X$ Q0 S4 X
        /* Call evmc6747_intr function */4 _' i8 s& V% x& ~2 H( m" G
    aic3106_init( );: R- p7 o3 T- ~* `  B4 {
        while(1);
; ~$ i# Z/ c7 g2 ]}
$ D/ r$ A" x# ^+ l6 {4 ]
* C1 {. {6 G- q7 I
# v& \8 f6 `% w, r+ yaic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题
$ t/ T. M3 f) Y! _6 S2 f& t/* Initialize MCASP1 */& B: I" e  e$ K3 q, W' a, J- k; b
    mcasp = &MCASP_MODULE_1;" J$ i  ]2 g) \
    mcasp->regs->GBLCTL  = 0;       // Reset: y3 u: g% v0 A# z$ F, q
    mcasp->regs->RGBLCTL = 0;       // Reset RX/ D# v+ Q3 W( _; M; h
    mcasp->regs->XGBLCTL = 0;       // Reset TX
6 k. y- Q! J+ O/ B. o    mcasp->regs->PWRDEMU = 1;       // Free-running9 R+ q8 @. A8 ^6 d& v
   // configure McASP0 receive registers
2 P0 G) X( q# X$ Q7 m    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
+ _* y$ D& t3 |9 x    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
+ w+ I; F, \8 x. ?! z, `/ r    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word
7 I5 D; Y0 v+ A3 \' n8 \* x    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
% A$ w. |( U: M) i6 Q6 _    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side), G! C$ B* U' q2 t
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1
6 k: q/ o# L% i/ G0 J    mcasp->regs->RINTCTL    = 0x00000000; // Not used
" L$ Z5 ?# S# r9 g  U6 K# L    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
/ i) r2 K* C* {2 W$ n5 \$ k; R3 `7 i( k2 c9 t
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used9 [# A. k% X& q
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
4 i# n5 @' J+ p* i    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word
0 c+ Y6 b$ C$ |% x6 D7 H6 H    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16/ T/ v. W3 W* U1 O/ d
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK  p8 e+ {+ l) h7 d
    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1
# q4 Y" X6 S  ^' e  O; R/ F5 W    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit% m* s/ o/ I" Q% A. a
    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256+ u" h/ o$ u9 o9 _1 l
/ C! _  C& }6 o. g$ X" z6 E5 d
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
7 F2 t' B% m( l5 Q1 N    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT1 S4 d% S) m4 g9 ?& M
    mcasp->regs->PFUNC      = 0;          // All MCASPs
, J6 [& t' |& K5 S1 o2 v3 s    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
: R4 @3 S; U0 s0 D. E  h+ c- v: \9 M9 S5 M+ G% ?, h
    mcasp->regs->DITCTL     = 0x00000000; // Not used
! E9 Z' K$ g' c' }) |+ D; `* x2 W" E    mcasp->regs->DLBCTL     = 0x00000000; // Not used* X/ @* Y  n6 M. f
    mcasp->regs->AMUTE      = 0x00000000; // Not used* q, k! [4 j0 U2 O, g
/ _4 V- G" `( {+ l
/* Starting sections of the McASP*/* T. y; f6 C3 r
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
8 D- N6 A, E/ j+ A, q' p, r    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  
% `9 I0 l% P: j+ {, }5 k    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
" ?) \9 w( ?1 o    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );  y2 L4 \* I- f( n3 z. |: L7 D

# H* D+ m) V6 }; x3 r7 e! G    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON;
! w! l, h& G  b$ A  h    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
( |6 }9 p& c2 }  Q6 u2 m# E    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
& N( B3 R1 O) K5 E1 w! R' t    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );: O8 |6 _2 ^% U* Z
, u" c6 D/ o7 _# N# t) C1 x8 F% P
    mcasp->regs->XSTAT = 0x0000ffff;
& O; _9 q2 l3 e+ ~: Z/ C( ^4 |$ f/ i    mcasp->regs->RSTAT = 0x0000ffff;
0 F. m: w* z- R/ ^+ N
% C% ?+ d8 ?2 T9 E    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
1 H1 ~7 U8 `3 h4 M- W- {    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );0 n8 ^9 Z$ }( X9 h3 T4 @5 s, l
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
" A6 l  v9 i+ B' f( U1 S) o    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );& M& W! n+ n- A7 p; K" Y% v

/ ?5 ?6 V: j* _2 _6 g1 _6 x    /* Write a 0, so that no underrun occurs after releasing the state machine */) k- \( v0 L" Y. u, r
    mcasp->regs->XBUF5 = 0;
; g- c  H2 Z! u' {! C6 ?    mcasp->regs->RBUF0 = 0;
3 r- Q/ N! H, B2 b3 ]: g, ]) f3 L  F6 f- `  \
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; 0 K; |( g& O- z! H
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );5 ?9 |) H* }; [6 o4 ?
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
1 P" |) t5 C) p- `5 z    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );& D& a9 q/ `" l7 ^! E3 {( o
8 z: G% g5 g# E  k0 v- Y4 I
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
" `# F4 S7 N, h8 `1 H* x    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );
5 |7 w( w6 v( o    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON; $ D$ V; s/ e% R' A
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );
% e, F3 @) D- ^1 @" y7 p- y$ O
1 o, K2 h5 o: S2 Z. Z3 R( R- r3 ^5 E    CSR = 0x0000;& u4 e. c  l- K9 p$ E8 R- D$ b" m
    INTC_INTMUX1 = 0x3d;
  k. k8 m9 D# [' V    ISTP = (unsigned int)vectors;% ^% d: T2 F) b" T4 Q' |  s
    ICR = 0xFFF0;  7 y1 n* z  V, ~3 P& v. p$ V' t
    IER |= 0x12;  & i6 j5 F7 s: q1 g2 o
    CSR |= 0x01;  , |6 \: P6 |1 \, L8 z
+ Q. B  m$ e7 E6 H; W

% g! i2 n! t" L# X3 R$ ^3 G& T' d3 S" I
% C; f4 ?' @; u) E还有就是两个输入输出函数:
8 d7 A0 D( ~, \5 {7 Avoid output_sample(Int32 out_data)
9 s/ a8 c7 R1 N5 y{2 C# }  E- R8 B: j. N# s) R
  AIC31_data.uint = out_data;  3 y3 t' s5 p, z/ }. o
  MCASP1_XBUF5_32BIT = AIC31_data.uint;+ G/ ^& `% t5 I/ p% A" r# ^
}
, L- W. K8 B" B5 Q
5 v( v9 a6 a" n7 {' ^: kInt32 input_sample(void)
2 _! u! d" v4 p/ b5 R{  
, |: V: e7 m. X  AIC31_data.uint = MCASP1_RBUF0_32BIT;
- i; m* W- H7 ~- f. M: ~! ]5 w  ?+ f  return (AIC31_data.uint);
3 c4 [0 L# S% o' \3 B- E' C8 U}
9 d& L, U4 [' N. I: A% Q& A# n- c
: A1 x( X! }' V* L- q/ E$ V
分享到:  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-6-17 06:35 , Processed in 0.036694 second(s), 24 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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