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

嵌入式开发者社区

 找回密码
 立即注册

QQ登录

只需一步,快速开始

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

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

[复制链接]

1

主题

1

帖子

23

积分

新手上路

Rank: 1

积分
23
跳转到指定楼层
楼主
发表于 2016-3-15 16:07:18 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
C6747和C6748感觉差不多,我想实现McASP发送中断方式控制音频信号,在轮询的例程基础上改的,轮询程序可以实现,但是中断一直实现不了,也找不到错误,求大神帮忙!下边是主要程序:
$ [/ `' \, `3 ?' A4 Kmain文件:
2 T" S6 n2 `/ ~1 K4 V0 yinterrupt void interrupt4(void)  + T1 A4 a# W$ A8 P9 ^  G7 }
{
- v; i( A( o6 `: q- R& F  H4 w  Uint32 sample;
; D: P/ @3 w" p* i4 S7 B6 L" [1 h* a( p5 J3 y8 a  b5 @2 R
  sample = input_sample(); // read L + R samples from ADC  F9 D7 c/ [8 H' ~' g' s; x
  output_sample(sample);   // write L + R samples to DAC - G3 V- a  a0 i" I$ B" D/ K8 N
  return;( F2 ~7 E) W: B
}
# C1 V/ b0 O9 U5 [- p3 U* n5 q
* Q) p6 g) Z( V0 ^int main( void )
" t0 w) A( L$ h, A7 Y! v; X{
& s# d; K+ l  }
1 S3 i+ P3 v) c* n0 b% y$ h    /* Initialize BSL */$ ^) w2 w. l4 g9 o
    EVMC6747_init( );& J7 K4 r& I6 ?7 ]$ {
        /* Call evmc6747_intr function */. t* J+ [, a" V( M+ E
    aic3106_init( );8 j6 m$ m: m% r& L- U$ V
        while(1);
% [' H  T( f% Q" p, h}
) Y: I  \( e8 }$ j( n# w  @0 \" i- p/ |4 z

: Q. G: t. W/ raic3106_init文件的一部分,McASP配置部分,采用内部时钟,I2S方式,同步传输。音频芯片的配置应该没问题3 G* C  `! k* s. [# ?
/* Initialize MCASP1 */
. v& S  L+ R: F+ S    mcasp = &MCASP_MODULE_1;
7 e. z! W7 v# [1 Q    mcasp->regs->GBLCTL  = 0;       // Reset
% m+ I: ]* ^( G- j6 q2 V# ]+ q  e    mcasp->regs->RGBLCTL = 0;       // Reset RX; h" Z! d% \+ T$ E
    mcasp->regs->XGBLCTL = 0;       // Reset TX/ D& C, s% n; \( |# k. L. v
    mcasp->regs->PWRDEMU = 1;       // Free-running0 k: w$ t) l, m! h: T# K0 M
   // configure McASP0 receive registers
2 n7 [. Y% _9 @' e7 U    mcasp->regs->RMASK      = 0xFFFFFFFF; // No padding used
  ?' V/ c& v# H' b  K: j    mcasp->regs->RFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus; {# n! E9 f# b& |6 T$ b+ V
    mcasp->regs->AFSRCTL    = 0x00000112; // 2TDM, 1bit Falling, External FS, word, D+ q& r! p3 {2 O( i: t0 \
    mcasp->regs->ACLKRCTL   = 0x000000AF; // Rising INTERNAL CLK,(from tx side)9 @/ s' {) m+ ~# A: R3 W9 n, e- u
    mcasp->regs->AHCLKRCTL  = 0x00000000; // INT CLK (from tx side)
! @& }" m+ G$ n: l) W& ^& G    mcasp->regs->RTDM       = 0x00000003; // Slots 0,1' I8 C, Z$ H8 ]
    mcasp->regs->RINTCTL    = 0x00000000; // Not used, W. f3 N% F# x" }
    mcasp->regs->RCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256
+ q% {- u( J7 Z0 T0 e# ]. `$ F/ _* u* [; \  }0 E! l
    mcasp->regs->XMASK      = 0xFFFFFFFF; // No padding used  T. W2 t$ f& y+ {; k3 d
    mcasp->regs->XFMT       = 0x00018078; // MSB 16bit, 0-delay, no pad, CFGBus
  o  T2 `- I; O; t/ ^- I) p    mcasp->regs->AFSXCTL    = 0x00000112; // 2TDM, 1bit Rising edge INTERNAL FS, word/ X- r9 v* q3 L
    mcasp->regs->ACLKXCTL   = 0x000000AF; // ASYNC, Rising INTERNAL CLK, div-by-16
3 a7 j4 @2 Z  a. z    mcasp->regs->AHCLKXCTL  = 0x00000000; // EXT CLK
: {+ U( y/ y9 k. A6 M' A; Q3 A) R    mcasp->regs->XTDM       = 0x00000003; // Slots 0,1& c+ ~8 J+ i' Y* u3 t  |' H
    mcasp->regs->XINTCTL    = 0x00000020; // interrupt on transmit
9 {8 C* h, @4 i; _    mcasp->regs->XCLKCHK    = 0x00FF0008; // 255-MAX 0-MIN, div-by-256" w+ n- z: d3 K# p" l' U" ?) k% m
6 a) E2 T+ h( d) o& n
    mcasp->regs->SRCTL5     = 0x000D;     // MCASP1.AXR1[5] --> DIN
( J' V: w0 K  p    mcasp->regs->SRCTL0     = 0x000E;     // MCASP1.AXR1[0] <-- DOUT
3 W# d( b" C8 a' }; r$ L$ J+ Z    mcasp->regs->PFUNC      = 0;          // All MCASPs
4 a* q9 _0 N) ]4 F1 D. C! S: Q7 O& s    mcasp->regs->PDIR       = 0x14000020; // All inputs except AXR0[5], ACLKX1, AFSX1
! V( P+ U6 X, w6 }
) c3 o* z5 a; [# E3 w    mcasp->regs->DITCTL     = 0x00000000; // Not used1 m6 ~- p1 [7 a# D/ I
    mcasp->regs->DLBCTL     = 0x00000000; // Not used% Q6 m8 @0 x) r/ k. G. ~+ h
    mcasp->regs->AMUTE      = 0x00000000; // Not used
+ I! Q( L2 Z* E8 @+ @$ p, i. a7 u
0 h7 _: u" X4 x( ?/* Starting sections of the McASP*/$ e! f7 T8 t  [
    mcasp->regs->XGBLCTL |= GBLCTL_XHCLKRST_ON; 0 U( I- d9 P$ L5 O" i6 v
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XHCLKRST_ON ) != GBLCTL_XHCLKRST_ON );  4 K. H; {9 h1 N1 \! A5 a
    mcasp->regs->RGBLCTL |= GBLCTL_RHCLKRST_ON;
3 h* Z" V1 U: p, {0 _. r    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RHCLKRST_ON ) != GBLCTL_RHCLKRST_ON );
8 m, s7 |' U" w
$ t# n, Y# Y2 K& X. ~" `0 C+ _    mcasp->regs->XGBLCTL |= GBLCTL_XCLKRST_ON; , D! K9 Y& p3 p! k9 q* x
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XCLKRST_ON ) != GBLCTL_XCLKRST_ON );( \$ |/ s- ]+ m' \
    mcasp->regs->RGBLCTL |= GBLCTL_RCLKRST_ON; ! U; u. |+ ?% d$ @
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RCLKRST_ON ) != GBLCTL_RCLKRST_ON );4 Y! e) C, ]: @7 |$ H4 v1 {

) v/ s$ h& N7 Y: C- a    mcasp->regs->XSTAT = 0x0000ffff;
+ m5 f0 B! i9 ]! g    mcasp->regs->RSTAT = 0x0000ffff;
+ Z; I. @, D) T3 J: l& h7 C% }+ D! T. n. h4 X9 E! k
    mcasp->regs->XGBLCTL |= GBLCTL_XSRCLR_ON;7 V* r2 H2 \4 c2 V4 z
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSRCLR_ON ) != GBLCTL_XSRCLR_ON );
3 }/ p( u% }- c/ Q% L3 A    mcasp->regs->RGBLCTL |= GBLCTL_RSRCLR_ON;
! v! ^- |- ^' S$ V4 w. B) x' x    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSRCLR_ON ) != GBLCTL_RSRCLR_ON );9 Y" a' w5 l: e/ U2 Z& n

/ U6 g3 T9 d0 Z  \8 L    /* Write a 0, so that no underrun occurs after releasing the state machine */) Y  b  Y& r1 y* X
    mcasp->regs->XBUF5 = 0;8 w6 H: k) y3 v' I4 B+ A: l) i4 B
    mcasp->regs->RBUF0 = 0;
- [% E, J: d* n1 i: Y
6 l" K) y1 ]$ h; G$ D; r    mcasp->regs->XGBLCTL |= GBLCTL_XSMRST_ON; * j1 q* e: [5 P$ \& \. ]9 L7 ]( c
    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XSMRST_ON ) != GBLCTL_XSMRST_ON );! |& E$ O/ D$ m) u  p
    mcasp->regs->RGBLCTL |= GBLCTL_RSMRST_ON; : W* b+ v5 o4 Q) U8 s7 D% n# R
    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RSMRST_ON ) != GBLCTL_RSMRST_ON );
" |7 p6 R4 a7 j0 C- ~4 M3 E0 [5 h$ o. G
    mcasp->regs->XGBLCTL |= GBLCTL_XFRST_ON;
: ?2 @; L( S8 w% u# z5 k& O    while ( ( mcasp->regs->XGBLCTL & GBLCTL_XFRST_ON ) != GBLCTL_XFRST_ON );8 C/ \2 P3 ?* }
    mcasp->regs->RGBLCTL |= GBLCTL_RFRST_ON;
% P: |: f! K( v  W    while ( ( mcasp->regs->RGBLCTL & GBLCTL_RFRST_ON ) != GBLCTL_RFRST_ON );7 M/ W# e  H1 j% Q
, ^: u. _8 `9 v" d- l5 B5 y
    CSR = 0x0000;8 S  z% ^1 A0 C1 c# S; D
    INTC_INTMUX1 = 0x3d;
- a  X9 a/ p/ Y- C" _' L1 f    ISTP = (unsigned int)vectors;" f7 @; d, x0 V6 E( I% z% F
    ICR = 0xFFF0;  ; r3 ~8 K3 w- _4 W- C3 }1 E% B9 Y
    IER |= 0x12;  1 M3 G; o3 t. C/ B
    CSR |= 0x01;  
% Z5 \; e* j! n  y; R8 q' ?( l. @5 {! _* Y3 l+ N
! n, S# z1 Q( j1 N6 N  s' S; m- e
" Y* p6 ~# I3 D
还有就是两个输入输出函数:: G& X% V; ?* O1 L- S3 B' t! t
void output_sample(Int32 out_data)0 \# s( B' E# @% _6 t; O
{
% V7 ^# x7 }. s9 D# U: H  AIC31_data.uint = out_data;  
5 {# i; F" {# J% g, V  MCASP1_XBUF5_32BIT = AIC31_data.uint;% d! E! {! q& O3 \3 ~+ I% j
}
4 [1 L! |* s, Z8 w& t& m. N, B) U% S6 V0 m+ e) J; Y
Int32 input_sample(void)
2 L' a9 |5 n; A. B{  & }7 s6 @$ O% N
  AIC31_data.uint = MCASP1_RBUF0_32BIT;
' M+ J$ v9 w  [  return (AIC31_data.uint);: u8 B# ]  e7 c% l
}
% r3 f/ O3 x7 S1 E
4 p6 B% @6 @8 j) m9 [& u7 w' A7 c
分享到:  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-11-9 04:57 , Processed in 0.037676 second(s), 23 queries .

Powered by Discuz! X3.2

© 2001-2015 Comsenz Inc.

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