ahx_rpc.c

/*
# _____     ___ ____     ___ ____
#  ____|   |    ____|   |        | |____|
# |     ___|   |____ ___|    ____| |    \    PS2DEV Open Source Project.
#-----------------------------------------------------------------------
# Copyright 2001-2004, ps2dev - http://www.ps2dev.org
# Licenced under Academic Free License version 2.0
# Review ps2sdk README & LICENSE files for further details.
*/

/**
 * @file
 * AHX EE-side RPC code.
 */

#include <tamtypes.h>
#include <kernel.h>
#include <sifrpc.h>
#include <stdarg.h>
#include <string.h>
#include <stdlib.h>
#include <fcntl.h>
#include <unistd.h>
#include <stdio.h>
#include <loadfile.h>
#include "ahx_rpc.h"

static unsigned sbuff[64] __attribute__((aligned (64)));
static struct t_SifRpcClientData cd0;
/** EE mapped IOP mem */
#define IOP_MEM	0xbc000000
char* songbuffer_addr;
int ahx_init_done = 0;

/** Read/Write IOP Mem
 *
 * This is an internal function used to read and write
 * directly to IOP memory (write songdata to iop etc)
 */
void iop_readwrite(void *addr, void *buf, u32 size, u32 read)
{
	DI();
	ee_kmode_enter();
	if (read) memcpy(buf, (void *)((u8 *)addr + IOP_MEM), size); else memcpy((void *)((u8 *)addr + IOP_MEM), buf, size);
	ee_kmode_exit();
	EI();
}

int AHX_Init()
{
	// struct t_SifDmaTransfer sdt;

	// if already init'd, exit
	if (ahx_init_done) return 0;
	int bind_retry = 100;
	// bind rpc
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1; // bind error
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
		if (--bind_retry < 1) return -SCE_EBINDMISS;
	}

	SifCallRpc(&cd0,AHX_INIT,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);

	songbuffer_addr = (char*)sbuff[1];

	// set flag, init done
	ahx_init_done = 1;
	return 0;
}

int AHX_Play()
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	SifCallRpc(&cd0,AHX_PLAY,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int AHX_Pause()
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	SifCallRpc(&cd0,AHX_PAUSE,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int AHX_SubSong(int songNo)
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	sbuff[0] = (unsigned)songNo;
	SifCallRpc(&cd0,AHX_PAUSE,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int AHX_SetVolume(int volumePercentage)
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	sbuff[0] = (unsigned)volumePercentage;
	SifCallRpc(&cd0,AHX_QUIT,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int  AHX_SetBoost(int boostValue)
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	sbuff[0] = (unsigned)boostValue;
	SifCallRpc(&cd0,AHX_SETBOOST,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int  AHX_ToggleOversampling()
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	SifCallRpc(&cd0,AHX_OVERSAMPLING,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int AHX_Quit()
{
	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}
	SifCallRpc(&cd0,AHX_QUIT,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);
	return 0;
}

int AHX_LoadSongBuffer(char* songdata, int songsize)
{
	// write song data to IOP song buffer
	iop_readwrite(songbuffer_addr, songdata, songsize, 0);

	while(1){
		int i;

		if (SifBindRpc( &cd0, AHX_IRX, 0) < 0) return -1;
 		if (cd0.server != 0) break;
    	i = 0x10000;
    	while(i--);
	}

	// set oversample and boost
	sbuff[0] = (unsigned)songsize;

	// call rpc
	SifCallRpc(&cd0,AHX_LOADSONG,0,(void*)(&sbuff[0]),64,(void*)(&sbuff[0]),64,NULL,NULL);

	// return number of sub-songs
	return (int)sbuff[1];
}

int AHX_LoadSong(char* filename)
{
	int fd, fdSize;
	char* buffer;

	fd = open(filename, O_RDONLY);
	if(fd < 0)
	{
		 printf("ERROR LOADING SONG\n");
		 return -1;
	}
	fdSize = lseek(fd, 0, SEEK_END);
	lseek(fd, 0, SEEK_SET);
	buffer = malloc(fdSize);
	if(!buffer)
	{
		 printf("ERROR ALLOCATING SONG MEMORY SONG\n");
		 return -1;
	}
	read(fd, buffer, fdSize);
	close(fd);
	return AHX_LoadSongBuffer(buffer, fdSize);
}