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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
4 c7 r. O$ y+ A/ p8 F3 Q  _main文件:; \7 i' z$ k2 y$ W( w
interrupt void interrupt4(void)  
+ p% p2 o. W: \{
) |; m: w* @" W  Uint32 sample;
) S: Q* {7 R& K2 O3 W% G
, M% Z" o3 H+ g4 ~- G0 t6 @  sample = input_sample(); // read L + R samples from ADC& ?0 E% u$ R  x! Z
  output_sample(sample);   // write L + R samples to DAC " |: `& P( |- j3 k. m
  return;# Z: E' l# K5 N+ U# m8 G" ^
}, _1 h" ]# k# s4 c
( P) K, D6 u8 ~' ~
int main( void )$ Q7 z8 X6 {4 e( j( I4 _+ Z
{
, i" F# Q% J( x) p, I$ R
/ g; Z9 [& H- f1 n    /* Initialize BSL */  C, @2 |+ M0 ^; x
    EVMC6747_init( );, m# u. e5 \3 A: w" T9 h  _6 A
        /* Call evmc6747_intr function */: _/ U* Y8 B- f7 `( T- H# M' z
    aic3106_init( );7 z. o  g- I. h) L( F/ {* I
        while(1);
6 f/ i0 {- |3 D# f# A0 F% J}
$ v2 c  H8 d. B9 ^# h0 F+ A/ W7 ~' F! P% x" X1 @* s6 F
1 ^* A4 n, L( F, K* [& ^
aic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题$ H# k# j$ n3 h  r
/* Initialize MCASP1 */7 \" ]  i9 {: D' _  z
    mcasp = &MCASP_MODULE_1;5 }- M# A% T0 `" V  i
    mcasp->regs->GBLCTL  = 0;       // Reset
5 X! s$ s% t& Q/ a    mcasp->regs->RGBLCTL = 0;       // Reset RX
) V1 O8 k6 J2 p# i! r' P' a. J    mcasp->regs->XGBLCTL = 0;       // Reset TX
: m- N5 ?  X2 C3 [* y7 f2 v    mcasp->regs->PWRDEMU = 1;       // Free-running4 u: ?- F% J: p, t- [* l' S
   // configure McASP0 receive registers
9 `0 g# R' R) v7 q$ E( ]! h    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
8 Y( h5 ?: H5 _9 w( P& {    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus8 L) M3 v8 a2 L  ^1 T" A
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word1 N8 j( p4 U* u' T2 t( N. |) ]
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)
! o4 _  p' @$ [    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)' C5 w; k% r3 I% Y! l3 o# w
    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1" R9 V- m1 |  r
    mcasp->regs->RINTCTL    = 0x00000000; // Not used+ N0 O. x2 B# o4 a2 m# l1 |
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
+ i. Q/ q( C$ \, T0 p3 e% f# I
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used
: E. F, `' l1 X    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus* L0 d! R$ J9 ^' q+ c$ v
    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word) P/ X( `  u- Y- E# t2 Y( S, b8 B+ D
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-168 O% D* v% X  H: G
    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
& O( C* m* b% v6 J1 l  X( s& r    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1( T, c6 \) O+ s0 ?' B# I7 j9 X
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
. F( V, ~4 X+ A. p( M7 |5 p8 f    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
* T  c. c$ b# Y/ [+ p) R% J# r8 `& y( y- `
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN" K- {& i: c! v! n, j! C9 U; [
    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
2 e. f. n! |& [: Y2 y    mcasp->regs->PFUNC      = 0;          // All MCASPs! ?  J/ \7 ?& {! @$ {
    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1( J6 x, l: y& R

. J. _  N5 z6 a5 P    mcasp->regs->DITCTL     = 0x00000000; // Not used& f$ x# v& @) Q6 z% p* Y
    mcasp->regs->DLBCTL     = 0x00000000; // Not used2 }% ?  P- A  W0 H
    mcasp->regs->AMUTE      = 0x00000000; // Not used
9 g* b8 ~* w  K- Y" Y% b  ^. _- W0 K; k3 J1 |9 ]& f! W
/* Starting sections of the McASP*/) x) m3 y9 ^* _
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON;
0 o1 F8 i, k( {! o! \4 p    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  ' h; U9 u! j7 O+ B" j8 _
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON; $ {3 h2 N8 O; O% z0 u! R2 @
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );% @& I1 W4 V$ I2 _6 ~
7 A) }7 i8 G. ]4 J6 g
    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; % o& i$ i0 H$ A3 h; ~6 u
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );
& k% N3 u4 h. G6 `: D; o    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON;
) P* x# o6 D( c: h$ u1 O    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );
, h1 u$ Y' |' `
$ ^, U  I+ L5 @    mcasp->regs->XSTAT = 0x0000ffff; & D1 a" O% z3 ?6 A' _) Z2 s3 p
    mcasp->regs->RSTAT = 0x0000ffff;
4 u- h* Y- b1 m! X6 X4 S/ i: t4 g. U  v
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;
/ k, B* p6 N, T2 r    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );  x/ b( t- N, Z) j& ^
    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
* j4 ~4 S2 E0 H5 c; a8 q  o    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );
- f2 ?% }, M4 T2 b0 `' C- I/ ]% U6 d
    /* Write a 0, so that no underrun occurs after releasing the state machine */
6 U' B- y) U8 a, q, i- T" q( f    mcasp->regs->XBUF5 = 0;
. O6 E/ L6 }7 [% f& S    mcasp->regs->RBUF0 = 0;
5 U/ S) }: J3 }  Z7 B" U: Q8 E+ ^; M5 H: Q" h, B
    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON;
$ E% H9 |4 x+ P# A& S    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );0 c) E) j$ P- f, B
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON;
9 ~3 D& d4 Y, S% o3 `4 t6 C& J) U    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );+ K9 M% f% B, K' r. |; \2 F4 k

! H. J3 M1 K. _1 B. i) q    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
5 j7 I9 n, y1 K    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );4 b" o# u$ m7 Y1 O7 j
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
! F* a% E6 k8 X# R% J    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );& S0 K/ k0 p/ S) {

$ S  O8 u. J/ W) c; h8 O9 b# M    CSR = 0x0000;+ Y( P0 J9 i# s
    INTC_INTMUX1 = 0x3d;
9 O/ o) }* y' E: @    ISTP = (unsigned int)vectors;
8 P' B5 @9 `1 i# u. B9 E4 r    ICR = 0xFFF0;  
# |% ?2 a% P- p    IER |= 0x12;  : s* K) E& ]/ I( x
    CSR |= 0x01;  
4 b8 P6 S. R1 Q" v7 V. \/ J9 m5 v' T# Q, q% l0 b3 O! E
3 d7 f! ]% E/ P5 z3 e# k8 k
: C  Z# K- L. J' v0 y! u
还有就是两个输入输出函数:7 E- q* n' b. m2 y7 b  Z
void output_sample(Int32 out_data)* l* q* f4 \* \0 r  {: c# I1 @
{& s; B2 s7 I2 I# _) M
  AIC31_data.uint = out_data;  
0 r* o6 M3 }& L2 H$ J7 Z: K  MCASP1_XBUF5_32BIT = AIC31_data.uint;* P) R; s: b1 J2 t9 K7 a5 _+ B
}- ^; j& f5 E, A+ h
2 T) U8 \( W: _! D& j
Int32 input_sample(void)
& O- J$ c* A5 S1 f; h{  
2 U( E; `& ?% C: `( ]8 d  AIC31_data.uint = MCASP1_RBUF0_32BIT;* K$ j* S- Y% Q" {
  return (AIC31_data.uint);
- B: a; c- |# z}
  ^5 r6 v5 E& U% W! k  {5 C* G# _
" t; D, ?! t) @. U* N
分享到:  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-5 14:57 , Processed in 0.041864 second(s), 25 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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