// send a serial 1 on +strand+
void xmas_one(int strand_pin) {
PIN_LOW(strand_pin);
_delay_us(20);
PIN_HIGH(strand_pin);
_delay_us(8);
PIN_LOW(strand_pin);
}
// send a serial 0 on +strand+
void xmas_zero(int strand_pin) {
PIN_LOW(strand_pin);
_delay_us(10);
PIN_HIGH(strand_pin);
_delay_us(20);
PIN_LOW(strand_pin);
}
static void Write_Instruction( uint8_t cmd )
{
PIN_LOW( LCD_DC );
SELECT();
spi1_send_byte( cmd );
UNSELECT();
}
int sceKermit_driver_9160841C(int pin_n, int allow_callbacks)
{
/* lock the power source, no shutdown */
int res = sceKernelPowerLock(0);
/* check if valid */
if (res == 0)
{
/* wait? */
sub_00000908();
/* suspend interrupts */
int intr = sceKernelCpuSuspendIntr();
PIN_HIGH(0xBC300038, pin_n);
PIN_LOW(0xBC300050, pin_n);
PIN_HIGH(0xBC300050, pin_n);
/* resume all the interrupts */
sceKernelCpuResumeIntr(intr);
/* wait on work sema */
if (allow_callbacks) sceKernelWaitSemaCB(g_work_sema[pin_n], 1, NULL);
else sceKernelWaitSema(g_work_sema[pin_n], 1, NULL);
/* unlock power */
res = sceKernelPowerUnlock(0);
/* resolve +ve res to 0 */
if (res > 0) res = 0;
}
/* return the result */
return res;
}
static uint8_t ds_read_bit()
{
uint8_t i, b = 1;
/* Begin a read/write time slot
* pull line low for between 1us and 15us */
PIN_LOW();
PIN_OUT();
_delay_us(BEGIN_TIMESLOT);
PIN_IN();
_delay_us(DELAY_TIMESLOT);
/* If the sensor pulls the line low within
* the time slot the bit is 0 */
for(i = 0; i < TIMESLOT - BEGIN_TIMESLOT; i++)
{
if(!READ_PIN()) b = 0;
_delay_us(1);
}
_delay_us(RECOVERY);
return(b);
}
static void ds_write_bit(uint8_t b)
{
/* Begin a read/write time slot
* pull line low for between 1us and 15us */
PIN_LOW();
PIN_OUT();
_delay_us(BEGIN_TIMESLOT);
/* "1" is written by releasing the line immediatly */
if(b) PIN_IN();
/* Wait for the write slot to end and then release the line */
_delay_us(TIMESLOT - BEGIN_TIMESLOT);
PIN_IN();
_delay_us(RECOVERY);
}
static int ds_reset()
{
/* Reset pulse - pull line low for at least 480us */
PIN_LOW();
PIN_OUT();
_delay_us(RESET_PULSE);
PIN_IN();
/* The sensor should respond by pulling the line low
* after 15us to 60us for 60us to 240us. Wait for
* 80us for the line to go low */
_delay_us(RESET_WAIT_LOW);
if(READ_PIN()) return(DS_TIMEOUT);
_delay_us(RESET_PULSE - RESET_WAIT_LOW);
if(!READ_PIN()) return(DS_TIMEOUT);
return(DS_OK);
}
void BlueTooth::begin()
{
PIN_MODE_INPUT(HC05_STATUS);
PIN_MODE_OUTPUT(HC05_ENABLE);
PIN_MODE_OUTPUT(HC05_KEY);
// no programming needed
PIN_LOW(HC05_KEY);
// enable the HC-05
powerUp();
bool connected = isConnected();
printf_P(PSTR("BlueTooth: "));
if(!connected)
printf_P(PSTR("no "));
printf_P(PSTR("client connected\n"));
m_lastConnectStatus = connected;
}
// begin a serial packet on +strand+
void xmas_begin(int strand_pin) {
PIN_HIGH(strand_pin);
_delay_us(10);
PIN_LOW(strand_pin);
}
// end serial packet on +strand+
void xmas_end(int strand_pin) {
PIN_LOW(strand_pin);
_delay_us(30);
}
int sceKermit_driver_4F75AA05(u8 *data, u32 cmd_mode, u32 cmd, u32 argc, u32 allow_callback, u8 *resp)
{
/* check if we are not accepting kermit calls */
if (!g_enable_kermit)
{
/* wait 10ms */
sceKernelDelayThread(10 * 1000);
return 0;
}
/* lock the mutex, no timeout */
sceKernelLockMutex(g_mutex_id, 1, NULL);
/* update counter */
g_active_connections++;
/* release the mutex */
sceKernelUnlockMutex(g_mutex_id, 1);
/* use specific ID on modes KERMIT_MODE_AUDIO and mode 6. This is to improve parallelism and async */
if (cmd_mode == KERMIT_MODE_AUDIO) proc_n = 1;
else if (cmd_mode == 6) proc_n = 2;
else proc_n = 0;
/* construct sema timeout of 5 seconds */
u32 timeout = 5 * 1000 * 1000;
/* wait on sema */
int res = sceKernelWaitSema(g_access_sema[proc_n], 1, &timeout);
/* check if we error'd */
if (res != 0)
{
/* go the the clean up code */
goto exit;
}
/* read the message pipe */
res = sceKernelReceiveMsgPipe(g_pipe_id, &sema_id, sizeof(SceUID), 0, 0, 0);
/* check if error occured */
if (res != 0)
{
/* error, clean up and exit */
goto exit;
}
/* now set the command number */
g_command[proc_n].cmd_type = (cmd_mode << 16) | cmd;
/* DMA align the arg count. Max = 16 args */
u32 packet_size = ((argc + sizeof(u64) + 1) & 0xFFFFFFF8) * sizeof(u64);
/* store packet info */
packet.cmd = cmd;
packet.sema_id = sema_id;
packet.self = packet;
/* send data to kermit */
g_command[proc_n].kermit_addr = sub_00000A98(packet, packet_size);
/* wait? */
sub_00000908();
/* lock the power, prevent shutdown */
res = sceKernelPowerLock(0);
/* check if error occured */
if (res != 0)
{
/* error, clean up and exit */
goto exit;
}
/* suspend cpu interrupts */
int intr = sceKernelCpuSuspendIntr();
/* signal low, then high for the process */
PIN_LOW(0xBC300050, proc_n + 4);
PIN_HIGH(0xBC300050, proc_n + 4);
/* resume the CPU interrupts */
sceKernelCpuResumeIntr(intr);
/* check for callback permitting process */
if (allow_callback) sceKernelWaitSemaCB(sema_id, 1, NULL);
else sceKernelWaitSema(sema_id, 1, NULL);
/* send sema id back into pipe, act as a circular queue */
sceKernelSendMsgPipe(g_pipe_id, &sema_id, sizeof(SceUID), 0, 0, 0);
/* now, check if there is a response */
if (resp)
{
/* copy data from packet to response */
((u64 *)resp)[0] = ((u64 *)packet)[0];
}
/* unlock power */
res = sceKernelPowerUnlock(0);
/* exit and cleanup code */
exit:
/* lock mutex for exclusive access, no timeout */
sceKernelLockMutex(g_mutex_id, 1, NULL);
/* update counter */
g_active_connections--;
/* release the mutex */
sceKernelUnlockMutex(g_mutex_id, 1);
/* check result */
if (res >= 0) res = 0;
/* return result */
return res;
}
