while ( (spi_regs->SPI_SR & 0x1 << 9) == 0 );

while ( (spi_regs->SPI_SR & 0x1 << 1) == 0 );

/* spi test by jury093 */

#include <stdio.h>
#include <fcntl.h>
#include <stdlib.h>
#include <sys/mman.h>
#include <unistd.h>

#define PIO_PDR 0x04
#define PIO_OER 0x10 // may be not need
#define PIO_ASR 0x70


#define SPI_CR 0x00 // Control Register
#define SPI_MR 0x04 // Mode Register
#define SPI_RDR 0x08 // Receive Data Register
#define SPI_TDR 0x0c // Transmit Data Register
#define SPI_SR 0x10 // Status Register
#define SPI_IER 0x14 // Interrupt Enable Register
#define SPI_IDR 0x18 // Interrupt Disable Register
#define SPI_IMR 0x1c // Interrupt Mask Register
#define SPI_CSR0 0x30 // Chip Select Register

#define PMC_PCER 0x10
#define PMC_PCSR 0x18

#define spibase 0xfffa4000
#define pmcbase 0xfffffc00
#define gpiobase 0xfffff400
#define base1 (spibase)
#define base2 (pmcbase)
#define base3 (gpiobase)

void *base_spi;
void *base_pmc;
void *base_gpio;

int main(void)
{
//Задаем размер карты
unsigned long map_size = 4096Ul;
unsigned long map_mask = map_size - 1;
unsigned long stat;
int fd;
// try open /dev/mem ===============================================
if ((fd = open("/dev/mem", O_RDWR | O_SYNC)) == -1)
{
printf("Cannot open /dev/mem.\n");
exit(EXIT_FAILURE);
}
printf("/dev/mem opened.\n");

base_gpio = mmap(0, map_size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, base3 & ~map_mask);

if (base_gpio == (void *) -1)
{
printf("Memory mapping error.\n");
exit(EXIT_FAILURE);
}
base_gpio+=(base3 & map_mask);
printf("GPIO memory block mapped at address %p.\n", base_gpio);

*(int*)(base_gpio+PIO_OER) = 0x0000000e; // gpio mode out
*(int*)(base_gpio+PIO_PDR) = 0x0000000f; // disable gpio mode
*(int*)(base_gpio+PIO_ASR) = 0x0000000f; // pb0-pb3 alternative A

base_pmc = mmap(0, map_size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, base2 & ~map_mask);

if (base_gpio == (void *) -1)
{
printf("Memory mapping error.\n");
exit(EXIT_FAILURE);
}
base_pmc+=(base2 & map_mask);

printf("PMC memory block mapped at address %p.\n", base_pmc);

*(int*)(base_pmc+PMC_PCER) = 0x00004000; // spi clk enable
stat = *(int*)(base_pmc+PMC_PCSR);
printf("Status reg SR=%08x\n", stat);

base_spi = mmap(0, map_size, PROT_READ | PROT_WRITE, MAP_SHARED, fd, base1 & ~map_mask);

if (base_spi == (void *) -1)
{
printf("Memory mapping error.\n");
exit(EXIT_FAILURE);
}
base_spi+=(base1 & map_mask);
printf("SPI memory block mapped at address %p.\n", base_spi);

*(int*)(base_spi+SPI_CR) = 0x00000001; // spi enable
printf("SPI enable\n");
stat = *(int*)(base_spi+SPI_SR);
printf("Status reg SR=%X\n", stat);

*(int*)(base_spi+SPI_MR) = 0x000e0001; // mode master
*(int*)(base_spi+SPI_CSR0) = 0x0000ff00; // mode chip select0

*(int*)(base_spi+SPI_TDR) = 0x000e0000; // ncs0
*(int*)(base_spi+SPI_TDR) = 0x0000005a; // send data
stat = *(int*)(base_spi+SPI_SR);
printf("Status reg SR=%X\n", stat);

close(fd);
printf("nice work, bye!\n");
return 0;
}

/mnt/sda1 # ./spi_test
GPIO memory block mapped at address 0x40103400.
PMC memory block mapped at address 0x40176c00.
Status reg SR=02e0c03c
SPI memory block mapped at address 0x402df000.
SPI enable
Status reg SR=103FB
Status reg SR=100F1
nice work, bye!