WebSVN – Kolibri OS – Diff – /drivers/audio/infinity/infinity.asm

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;                                                              ;;
-;; Copyright (C) KolibriOS team 2006-2011. All rights reserved. ;;
+;; Copyright (C) KolibriOS team 2006-2014. All rights reserved. ;;
 ;; Distributed under terms of the GNU General Public License    ;;
 ;;                                                              ;;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ; Serge 2006-2008
 ; email: infinity_sound@mail.ru
 format PE DLL native 0.05
-format MS COFF
-DEBUG             equ 1
-include 'proc32.inc'
+entry START
 include 'main.inc'
-include 'imports.inc'
+DEBUG             equ 1
 OS_BASE           equ 0x80000000
 CAPS_SSE2         equ 26
-PG_SW             equ 0x003
-public START
-public service_proc
-public version
+PG_SW             equ 0x003
 RT_INP_EMPTY      equ 0xFF000001
 RT_OUT_EMPTY      equ 0xFF000002
 DEV_PLAY          equ 1
 DEV_STOP          equ 2
 DEV_CALLBACK      equ 3
 DEV_GET_POS       equ 9
-struc IOCTL
-{  .handle        dd ?
+section '.flat' code readable executable
-   .io_code       dd ?
+include '../../struct.inc'
-   .input         dd ?
+include '../../macros.inc'
-   .inp_size      dd ?
+include '../../proc32.inc'
-   .output        dd ?
+include 'main.inc'
-   .out_size      dd ?
-}
+include '../../peimport.inc'
-virtual at 0
-  IOCTL IOCTL
-end virtual
 section '.flat' code readable align 16
-proc START stdcall, state:dword
+proc START c uses ebx esi edi, state:dword, cmdline:dword
         cmp     [state], 1
         jne     .exit
-        stdcall GetService, szSound
+        invoke  GetService, szSound
         test    eax, eax
         jz      .fail
         mov     [hSound], eax
 end if
 end if
         stdcall set_handler, [hSound], new_mix
         mov     [eng_state], SND_STOP
-        stdcall RegService, szInfinity, service_proc
+        invoke  RegService, szInfinity, service_proc
         ret
 .fail:
      if DEBUG
         mov     esi, msgFail
-        call    SysMsgBoardStr
+        invoke  SysMsgBoardStr
      end if
 .exit:
         xor     eax, eax
         ret
 .out_of_mem:
      if DEBUG
         mov     esi, msgMem
-        call    SysMsgBoardStr
+        invoke  SysMsgBoardStr
      end if
         xor     eax, eax
-        ret
-endp
-handle     equ  IOCTL.handle
-io_code    equ  IOCTL.io_code
-input      equ  IOCTL.input
-inp_size   equ  IOCTL.inp_size
-output     equ  IOCTL.output
-out_size   equ  IOCTL.out_size
         ret
 endp
 align 4
 srv_calls_end:
 proc service_proc stdcall, ioctl:dword
         mov     edi, [ioctl]
-        mov     eax, [edi+io_code]
+        mov     eax, [edi+IOCTL.io_code]
         cmp     eax, (srv_calls_end-srv_calls)/4
         ja      .fail
         cmp     eax, SND_DESTROY_BUFF
         jb      @F
 ;           cmp [edi+inp_size], 4
         mov     eax, -1
         ret
 align 4
 .srv_getversion:
-        mov     eax, [edi+output]
+        mov     eax, [edi+IOCTL.output]
-        cmp     [edi+out_size], 4
+        cmp     [edi+IOCTL.out_size], 4
         jne     .fail
         mov     eax, [eax]
         mov     [eax], dword API_VERSION
         xor     eax, eax
         ret
 align 4
 .snd_create_buff:
-        mov     ebx, [edi+input]
+        mov     ebx, [edi+IOCTL.input]
         stdcall CreateBuffer, [ebx], [ebx+4]
         mov     edi, [ioctl]
-        mov     ecx, [edi+output]
+        mov     ecx, [edi+IOCTL.output]
         mov     ecx, [ecx]
         mov     [ecx], ebx
         ret
 align 4
 .snd_getformat:
         movzx   eax, word [edx+STREAM.format]
-        mov     ecx, [edi+output]
+        mov     ecx, [edi+IOCTL.output]
         mov     ecx, [ecx]
         mov     [ecx], eax
         xor     eax, eax
 align 4
 .snd_getpos:
         stdcall GetBufferPos, edx
         mov     edi, [ioctl]
-        mov     ecx, [edi+output]
+        mov     ecx, [edi+IOCTL.output]
         mov     ecx, [ecx]
         mov     [ecx], ebx
         ret
         stdcall SetBufferVol, edx, [ebx+4], [ebx+8]
         ret
 align 4
 .snd_getvolume:
-        mov     eax, [edi+output]
+        mov     eax, [edi+IOCTL.output]
         mov     ecx, [eax]
         mov     eax, [eax+4]
         stdcall GetBufferVol, edx, ecx, eax
         ret
         ret
 align 4
 .snd_getpan:
         mov     eax, [edx+STREAM.pan]
-        mov     ebx, [edi+output]
+        mov     ebx, [edi+IOCTL.output]
         mov     ebx, [ebx]
         mov     [ebx], eax
         xor     eax, eax
         ret
 align 4
 .snd_getbuffsize:
         mov     eax, [edx+STREAM.in_size]
-        mov     ecx, [edi+output]
+        mov     ecx, [edi+IOCTL.output]
         mov     ecx, [ecx]
         mov     [ecx], eax
 .snd_getfreespace:
         test    [edx+STREAM.format], PCM_OUT
         jz      .fail
         mov     ebx, [edx+STREAM.in_free]
-        mov     ecx, [edi+output]
+        mov     ecx, [edi+IOCTL.output]
         mov     [ecx], ebx
         xor     eax, eax
         ret
 align 4
 .snd_settimebase:
-        cmp     [edi+inp_size], 12
+        cmp     [edi+IOCTL.inp_size], 12
         jne     .fail
         ret
 align 4
 .snd_gettimestamp:
-        cmp     [edi+out_size], 8
+        cmp     [edi+IOCTL.out_size], 8
         jne     .fail
         push    ebx            ;.input
         push    DEV_GET_POS    ;.code
         push    dword [hSound] ;.handle
         mov     eax, esp
-        stdcall ServiceHandler, eax
+        invoke  ServiceHandler, eax
         add     esp, 6*4
         pop     edi
         test    eax, eax
         jz      @F
         mov     dword [esp], 0  ; clear offset
 @@:
-        mov     edi, [edi+output]
+        mov     edi, [edi+IOCTL.output]
         emms
         fild    qword [edx+STREAM.time_stamp]
 .test_ring:
         test    eax, PCM_OUT+PCM_STATIC
         jnz     .fail
 .test_ok:
-        call    GetPid
+        invoke  GetPid
         mov     ebx, eax
         mov     eax, STREAM.sizeof
-        call    CreateObject
+        invoke  CreateObject
         test    eax, eax
         jz      .fail
         mov     [ring_size], ebx
         mov     eax, ebx
         shr     ebx, 12
         mov     [ring_pages], ebx
-        stdcall CreateRingBuffer, eax, PG_SW
+        invoke  CreateRingBuffer, eax, PG_SW
         mov     edi, [str]
         mov     ecx, [ring_size]
         jmp     .out_buff
 .static:
         mov     ecx, [size]
         add     ecx, 128         ;resampler required
         mov     [eax+STREAM.in_size], ecx
-        stdcall KernelAlloc, ecx
+        invoke  KernelAlloc, ecx
         mov     edi, [str]
         mov     [edi+STREAM.in_base], eax
         add     eax, 128
         mov     [edi+STREAM.in_free], ebx
         add     eax, ebx
         mov     [edi+STREAM.in_top], eax
 .out_buff:
-        stdcall AllocKernelSpace, dword 128*1024
+        invoke  AllocKernelSpace, dword 128*1024
         mov     edi, [str]
         mov     dword [edi+STREAM.time_stamp], ebx
         mov     dword [edi+STREAM.time_stamp+4], ebx
         mov     dword [edi+STREAM.last_ts], ebx
-        stdcall AllocPages, dword 64/4
+        invoke  AllocPages, dword 64/4
         mov     edi, [str]
         mov     ebx, [edi+STREAM.out_base]
         mov     ecx, 16
         or      eax, PG_SW
         push    eax
         push    ebx
-        call    CommitPages ;eax, ebx, ecx
+        invoke  CommitPages ;eax, ebx, ecx
         mov     ecx, 16
         pop     ebx
         pop     eax
         add     ebx, 64*1024
-        call    CommitPages    ;double mapped
+        invoke  CommitPages    ;double mapped
         mov     edi, [str]
         mov     ecx, (64*1024)/4
         rep stosd
         xor     esi, esi
         mov     ecx, MANUAL_DESTROY
-        call    CreateEvent
+        invoke  CreateEvent
         mov     ebx, [str]
         mov     ecx, [eax+STREAM.str_bk]
         mov     [ebx+STREAM.str_bk], ecx
         mov     [ecx+STREAM.str_fd], ebx
         popf
-        stdcall KernelFree, [eax+STREAM.in_base]
+        invoke  KernelFree, [eax+STREAM.in_base]
         mov     eax, [.handle]
-        stdcall KernelFree, [eax+STREAM.out_base]
+        invoke  KernelFree, [eax+STREAM.out_base]
         pop     eax              ;restore stack
-        call    DestroyObject    ;eax= stream
+        invoke  DestroyObject    ;eax= stream
         xor     eax, eax
         ret
 .fail:
         cmp     [state_saved], 0
         jne     @F
         lea     eax, [fpu_state+15]
         and     eax, -16
-        call    FpuSave
+        invoke  FpuSave
         mov     [state_saved], 1
 @@:
         stdcall refill, edx
 .wait:
         sti
         mov     edx, [str]
         mov     eax, [edx+STREAM.notify_event]
         mov     ebx, [edx+STREAM.notify_id]
-        call    WaitEvent   ;eax ebx
+        invoke  WaitEvent   ;eax ebx
         jmp     .main_loop
 .done:
         cmp     [state_saved], 1
         jne     @F
         lea     eax, [fpu_state+15]
         and     eax, -16
-        call    FpuRestore
+        invoke  FpuRestore
 @@:
         xor     eax, eax
         ret
 .fail:
         mov     edx, [str]
 .wait:
         mov     eax, [edx+STREAM.notify_event]
         mov     ebx, [edx+STREAM.notify_id]
-        call    WaitEvent   ;eax ebx
+        invoke  WaitEvent   ;eax ebx
         mov     edx, [str]
         cmp     [edx+STREAM.flags], SND_STOP
         mov     [edx+STREAM.flags], SND_STOP
         mov     eax, [edx+STREAM.notify_event]
         mov     ebx, [edx+STREAM.notify_id]
-        call    ClearEvent   ;eax ebx
+        invoke  ClearEvent   ;eax ebx
         xor     eax, eax
         mov     [inp_size], 4
         mov     [output], ebx
         mov     [out_size], 0
         lea     eax, [handler]
-        stdcall ServiceHandler, eax
+        invoke  ServiceHandler, eax
         ret
 endp
         mov     [inp_size], ebx
         mov     [output], ebx
         mov     [out_size], ebx
         lea     eax, [handle]
-        stdcall ServiceHandler, eax
+        invoke  ServiceHandler, eax
         ret
 endp
 vol_max       dd 0x00000000,0x00000000
 vol_min       dd 0x0000D8F0,0x0000D8F0
 pan_max       dd 0x00002710,0x00002710
-;stream_map    dd 0xFFFF       ; 16
-version       dd (5 shl 16) or SOUND_VERSION
+;stream_map    dd 0xFFFF       ; 16
 szInfinity    db 'INFINITY',0
 msgDestroy    db 'Destroy sound buffer', 13,10,0
 msgWaveout    db 'Play waveout', 13,10,0
 msgSetVolume  db 'Set volume',13,10,0
 end if
+align 4
+data fixups
+end data
-section '.data' data readable writable align 16
+section '.data' data readable writable
 play_list     rd 16
 mix_input     rd 16

Subversion Repositories Kolibri OS

(root)/drivers/audio/infinity/infinity.asm – Rev 2991 → 5077