#include "../Interface/shared_mem.h"

/// Shared memory symbol
extern shared_mem_t shared_mem;

#include "shared_memory.h"

shared_mem_t shared_mem;

#define PAGE_SHIFT 12
#define PAGE_SIZE (1UL << PAGE_SHIFT)
#define PAGE_MASK (~(PAGE_SIZE-1))

/// shared memory pointer
shared_mem_t *shared_mem;

char configure_mem_ptr()
{
int fd;
off_t target;
size_t length;

#ifdef TERMINAL_APP_LOG
printf("Starting logging server\n");
#endif

if ((fd = open("/dev/mem", O_RDWR | O_SYNC)) == -1) {
printf("ERROR: failed to open /dev/mem\napplication exit\n");
return 1;
}

#ifdef TERMINAL_APP_LOG
printf("Openned /dev/mem\n");
#endif

if ((int *)(target = (int) read_address_from_node()) == NULL) {
close(fd);
return 1;
}

#ifdef TERMINAL_APP_LOG
printf("Address read; address: 0x%04X\n", (unsigned int) target);
#endif

length = ((target + sizeof(shared_mem_t) + (PAGE_MASK)) & (PAGE_MASK)) - (target & (PAGE_MASK));

// map the shared memory
shared_mem = mmap(0, length, PROT_READ | PROT_WRITE, MAP_SHARED, fd, target & PAGE_MASK);

#ifdef TERMINAL_APP_LOG
printf("Mapped\n");
#endif

shared_mem+= target & PAGE_MASK;

return 0;
}

#include "shared_memory.h"

shared_mem_t shared_mem;

int read_function( char *page, char **start, off_t off,
int count, int *eof, void *data )
{
*((int *)page) = (int) &shared_mem;

return 4;
}

int *read_address_from_node()
{
FILE *pfile;
int val;
char *char_ptr, i;

pfile = fopen( PROC_NODE, "r" );

if (pfile == NULL) {
// no such file: we've got to exit then
printf("ERROR: module is not loaded - application exit\n");

return NULL;
}

char_ptr = (char *)&val;
// read 4 bytes of the address
for (i = 0; i < 4; i++) {
*char_ptr = fgetc(pfile);

if ((*char_ptr) == EOF) {
// that is inconsistent - we exit
printf("ERROR: reading only %d bytes of the address - application exit\n", i + 1);
val = (int)NULL;
break;
}

char_ptr++;
}

fclose (pfile);

return (int *) val;
}

int main(int argc, char *argv[])
{
// int i;
char *ptr;
// unsigned char val = 0x12;

if(configure_mem_ptr() != 0) return 1;

#ifdef TERMINAL_APP_LOG
printf("Pointer set\n");
#endif

ptr = (char *)shared_mem;

#ifdef TERMINAL_APP_LOG
if(ptr == NULL) printf("ptr pointer is NULL\n");
else printf("ptr is not NULL\n");
#endif
/*
for(i = 0; i < sizeof(shared_mem_t); i++){
if(*ptr != val) printf("E");
ptr++;
val++;
}
*/
printf("read_ind = %d\n", shared_mem->log_buff.read_ind);

printf("\nDone\n");

return 0;
}

#include <asm/memory.h>

phys_addr = virt_to_phys(virt_addr);