#define STRCASECMP strcasecmp
#endif
-/* 16F627 */
-memRange p16f627_mem[] = {
- {0x20, 0x6f, 0x00, 0},
- {0xa0, 0xef, 0x00, 1},
- {0x120, 0x14f, 0x00, 2},
- {0x70, 0x7f, 0x180, 0},
- {-1, -1, -1, -1} /* end indicator */
-};
-memRange p16f627_sfr[] = {
- {0x00, 0x00, 0x180, 0},
- {0x01, 0x01, 0x100, 0},
- {0x02, 0x04, 0x180, 0},
- {0x05, 0x05, 0x000, 0},
- {0x06, 0x06, 0x100, 0},
- {0x81, 0x81, 0x100, 1},
- {0x85, 0x85, 0x000, 1},
- {0x86, 0x86, 0x100, 1},
- {0x0a, 0x0b, 0x180, 0},
- {0x0c, 0x0c, 0x000, 0},
- {0x0e, 0x12, 0x000, 0},
- {0x15, 0x1a, 0x000, 0},
- {0x1f, 0x1f, 0x000, 0},
- {0x8e, 0x8e, 0x000, 1},
- {0x92, 0x92, 0x000, 1},
- {0x98, 0x9d, 0x000, 1},
- {0x9f, 0x9f, 0x000, 1},
-
- {-1, -1, -1, -1} /* end indicator */
-};
-
-/* 16F84 */
-memRange p16f84_mem[] = {
- {0x0c, 0x4f, 0x80, 0},
- {-1, -1, -1, -1} /* end indicator */
-};
-memRange p16f84_sfr[] = {
- {0x01, 0x01, 0x00, 0},
- {0x02, 0x04, 0x80, 0},
- {0x05, 0x06, 0x00, 0},
- {0x81, 0x81, 0x00, 1},
- {0x85, 0x86, 0x00, 1},
- {0x08, 0x09, 0x00, 0},
- {0x88, 0x89, 0x00, 1},
- {0x0a, 0x0b, 0x80, 0},
- {-1, -1, -1, -1} /* end indicator */
-};
-
-/* 16F877 */
-memRange p16f877_mem[] = {
- {0x20, 0x6f, 0x00, 0},
- {0xa0, 0xef, 0x00, 1},
- {0x110, 0x16f, 0x00, 2},
- {0x190, 0x1ef, 0x00, 3},
- {0x70, 0x7f, 0x180, 0},
- {-1, -1, -1, -1} /* end indicator */
-};
-memRange p16f877_sfr[] = {
- {0x00, 0x00, 0x180, 0},
- {0x01, 0x01, 0x100, 0},
- {0x02, 0x04, 0x180, 0},
- {0x05, 0x05, 0x000, 0},
- {0x85, 0x85, 0x000, 1},
- {0x81, 0x81, 0x100, 1},
- {0x06, 0x06, 0x100, 0},
- {0x86, 0x86, 0x100, 1},
- {0x07, 0x09, 0x000, 0},
- {0x87, 0x89, 0x000, 1},
- {0x0a, 0x0b, 0x180, 0},
- {0x0c, 0x1f, 0x000, 0},
- {0x8c, 0x8e, 0x000, 1},
- {0x91, 0x94, 0x000, 1},
- {0x98, 0x99, 0x000, 1},
- {0x9e, 0x9f, 0x000, 1},
- {0x10c, 0x10f, 0x000, 2},
- {0x18c, 0x18f, 0x000, 3},
-
- {-1, -1, -1, -1} /* end indicator */
-};
-
-/* 16F873 */
-memRange p16f873_mem[] = {
- {0x20, 0x7f, 0x100, 0},
- {0xa0, 0xff, 0x100, 1},
- {-1, -1, -1, -1} /* end indicator */
-};
-memRange p16f873_sfr[] = {
- {0x00, 0x00, 0x180, 0},
- {0x01, 0x01, 0x100, 0},
- {0x02, 0x04, 0x180, 0},
- {0x05, 0x05, 0x000, 0},
- {0x85, 0x85, 0x000, 1},
- {0x81, 0x81, 0x100, 1},
- {0x06, 0x06, 0x100, 0},
- {0x86, 0x86, 0x100, 1},
- {0x07, 0x09, 0x000, 0},
- {0x87, 0x89, 0x000, 1},
- {0x0a, 0x0b, 0x180, 0},
- {0x0c, 0x1f, 0x000, 0},
- {0x8c, 0x8e, 0x000, 1},
- {0x91, 0x94, 0x000, 1},
- {0x98, 0x99, 0x000, 1},
- {0x9e, 0x9f, 0x000, 1},
- {0x10c, 0x10f, 0x000, 2},
- {0x18c, 0x18f, 0x000, 3},
-
- {-1, -1, -1, -1} /* end indicator */
-};
-
static PIC_device Pics[] = {
{
{"p16f627", "16f627", "pic16f627", "f627"}, /* processor name */
- p16f627_mem, /* ram mem map */
- p16f627_sfr, /* sfr mem map */
+ (memRange *)NULL,
+ (memRange *)NULL,
0, /* max ram address (calculated) */
0x80, /* Bank Mask */
},
{
{"p16f628", "16f628", "pic16f628", "f628"},
- p16f627_mem,
- p16f627_sfr,
+ (memRange *)NULL,
+ (memRange *)NULL,
0,
0x80,
},
{
{"p16f84", "16f84", "pic16f84", "f84"},
- p16f84_mem,
- p16f84_sfr,
+ (memRange *)NULL,
+ (memRange *)NULL,
0,
0x80,
},
{
{"p16f873", "16f873", "pic16f873", "f873"},
- p16f873_mem,
- p16f873_sfr,
+ (memRange *)NULL,
+ (memRange *)NULL,
0,
0x180,
},
{
{"p16f877", "16f877", "pic16f877", "f877"},
- p16f877_mem,
- p16f877_sfr,
+ (memRange *)NULL,
+ (memRange *)NULL,
0,
0x180,
},
+ {
+ {"p16f819", "16f819", "pic16f819", "f819"},
+ (memRange *)NULL,
+ (memRange *)NULL,
+ 0,
+ 0x80,
+ },
+
};
static int num_of_supported_PICS = sizeof(Pics)/sizeof(PIC_device);
static unsigned int config_word = DEFAULT_CONFIG_WORD;
-/*-----------------------------------------------------------------*
- *
- * void addMem(memRange *ranges,int type)
- *
- *
- *-----------------------------------------------------------------*/
-
-static void addMem(memRange *ranges,int type)
+void addMemRange(memRange *r, int type)
{
- memRange *r = ranges;
int i;
+ int alias = r->alias;
- do {
-
- int alias = r->alias;
-
- do {
+ if (pic->maxRAMaddress < 0) {
+ fprintf(stderr, "missing \"#pragma maxram\" setting\n");
+ return;
+ }
- for(i=r->start_address; i<= r->end_address; i++) {
- if(i <= pic->maxRAMaddress) {
- finalMapping[i | alias].isValid = 1;
- finalMapping[i | alias].alias = r->alias;
- finalMapping[i | alias].bank = r->bank;
- if(type) {
- /* hack for now */
- finalMapping[i | alias].isSFR = 1;
- } else
- finalMapping[i | alias].isSFR = 0;
+ do {
+ for (i=r->start_address; i<= r->end_address; i++) {
+ if ((i|alias) <= pic->maxRAMaddress) {
+ finalMapping[i | alias].isValid = 1;
+ finalMapping[i | alias].alias = r->alias;
+ finalMapping[i | alias].bank = r->bank;
+ if(type) {
+ /* hack for now */
+ finalMapping[i | alias].isSFR = 1;
+ } else {
+ finalMapping[i | alias].isSFR = 0;
}
+ } else {
+ fprintf(stderr, "WARNING: %s:%s memory at 0x%x is beyond max ram = 0x%x\n",
+ __FILE__,__FUNCTION__,(i|alias), pic->maxRAMaddress);
}
+ }
- /* Decrement alias */
- if(alias)
- alias -= ((alias & (alias - 1)) ^ alias);
- else
- alias--;
-
- } while(alias >= 0);
+ /* Decrement alias */
+ if (alias) {
+ alias -= ((alias & (alias - 1)) ^ alias);
+ } else {
+ alias--;
+ }
+
+ } while (alias >= 0);
+}
- r++;
+void setMaxRAM(int size)
+{
+ int i;
+ pic->maxRAMaddress = size;
+
+ if (pic->maxRAMaddress < 0) {
+ fprintf(stderr, "invalid \"#pragma maxram 0x%x\" setting\n",
+ pic->maxRAMaddress);
+ return;
+ }
- } while (r->start_address >= 0);
+ finalMapping = Safe_calloc(1+pic->maxRAMaddress,
+ sizeof(AssignedMemory));
+ /* Now initialize the finalMapping array */
+ for(i=0; i<=pic->maxRAMaddress; i++) {
+ finalMapping[i].reg = NULL;
+ finalMapping[i].isValid = 0;
+ }
}
/*-----------------------------------------------------------------*
if(!reg || !pic)
return 0;
- if(((reg->address | reg->alias) & pic->bankMask & bank) == bank)
+ if((int)((reg->address | reg->alias) & pic->bankMask & bank) == bank)
return 1;
return 0;
/*-----------------------------------------------------------------*
*-----------------------------------------------------------------*/
-static void addMaps(PIC_device *pPic)
-{
- int i;
- memRange *r;
-
- if(!pPic)
- return;
-
-
- /* First, find the maximum address */
-
- r = pPic->ram;
- pPic->maxRAMaddress = 0;
-
- do {
-
- if((r->end_address | r->alias) > pPic->maxRAMaddress)
- pPic->maxRAMaddress = r->end_address | r->alias;
-
- r++;
-
- } while (r->start_address >= 0);
-
-
-
- finalMapping = Safe_calloc(1+pPic->maxRAMaddress, sizeof(AssignedMemory));
-
- /* Now initialize the finalMapping array */
-
- for(i=0; i<=pPic->maxRAMaddress; i++) {
- finalMapping[i].reg = NULL;
- finalMapping[i].isValid = 0;
- }
-
- addMem(pPic->ram,0); /* add general purpose regs to the map */
- addMem(pPic->sfr,1); /* Add SFR's to the memmap */
-
-}
-
/*
* dump_map -- debug stuff
*/
}
-void dump_cblock(FILE *of)
+void dump_sfr(FILE *of)
{
+
int start=-1;
int addr=0;
int bank_base;
+ static int udata_flag=0;
//dump_map(); /* display the register map */
+ //fprintf(stdout,";dump_sfr \n");
+ if (pic->maxRAMaddress < 0) {
+ fprintf(stderr, "missing \"#pragma maxram\" setting\n");
+ return;
+ }
do {
* assumes that the first register in the contiguous group
* of registers represents the bank for the whole group */
- fprintf(of," cblock 0X%04X\t; Bank %d\n",start,finalMapping[start].bank);
+ if ( (start != addr) && (!udata_flag) ) {
+ udata_flag = 1;
+ //fprintf(of,"\tudata\n");
+ }
for( ; start < addr; start++) {
- if((finalMapping[start].reg) && !finalMapping[start].reg->isEmitted ) {
- fprintf(of,"\t%s",finalMapping[start].reg->name);
-
- /* If this register is aliased in multiple banks, then
- * mangle the variable name with the alias address: */
- if(finalMapping[start].alias & start)
- fprintf(of,"_%x",bank_base);
-
- if(finalMapping[start].instance)
- fprintf(of,"_%d",finalMapping[start].instance);
-
-
- fputc('\n',of);
-
- //finalMapping[start].reg->isEmitted = 1;
+ if((finalMapping[start].reg) &&
+ (!finalMapping[start].reg->isEmitted) &&
+ (!finalMapping[start].instance) &&
+ (!finalMapping[start].isSFR)) {
+
+ if (finalMapping[start].reg->isFixed) {
+ unsigned i;
+ for (i=0; i<finalMapping[start].reg->size; i++) {
+ fprintf(of,"%s\tEQU\t0x%04x\n",
+ finalMapping[start].reg->name,
+ finalMapping[start].reg->address+i);
+ }
+ } else {
+ fprintf(of,"%s\tres\t%i\n",
+ finalMapping[start].reg->name,
+ finalMapping[start].reg->size);
+ }
+ finalMapping[start].reg->isEmitted = 1;
}
}
- fprintf(of," endc\n");
-
start = -1;
}
exit(1);
}
-
- addMaps(pic);
+ pic->maxRAMaddress = -1;
+}
+/*-----------------------------------------------------------------*
+ *
+ *-----------------------------------------------------------------*/
+int picIsInitialized(void)
+{
+ if(pic && pic->maxRAMaddress > 0)
+ return 1;
+
+ return 0;
}
}
+/*-----------------------------------------------------------------*
+ *-----------------------------------------------------------------*/
int validAddress(int address, int reg_size)
{
int i;
+ if (pic->maxRAMaddress < 0) {
+ fprintf(stderr, "missing \"#pragma maxram\" setting\n");
+ return 0;
+ }
+ // fprintf(stderr, "validAddress: Checking 0x%04x\n",address);
if(address > pic->maxRAMaddress)
return 0;
return 1;
}
+/*-----------------------------------------------------------------*
+ *-----------------------------------------------------------------*/
void mapRegister(regs *reg)
{
- int i;
+ unsigned i;
int alias;
if(!reg || !reg->size) {
return;
}
+ if (pic->maxRAMaddress < 0) {
+ fprintf(stderr, "missing \"#pragma maxram\" setting\n");
+ return;
+ }
+
for(i=0; i<reg->size; i++) {
alias = finalMapping[reg->address].alias;
do {
- // fprintf(stdout,"mapping %s to address 0x%02x, reg size = %d\n",reg->name, (reg->address+alias+i),reg->size);
+ //fprintf(stdout,"mapping %s to address 0x%02x, reg size = %d\n",reg->name, (reg->address+alias+i),reg->size);
finalMapping[reg->address + alias + i].reg = reg;
finalMapping[reg->address + alias + i].instance = i;
} while (alias>=0);
}
- // fprintf(stderr,"%s - %s addr = 0x%03x, size %d\n",__FUNCTION__,reg->name, reg->address,reg->size);
+ //fprintf(stderr,"%s - %s addr = 0x%03x, size %d\n",__FUNCTION__,reg->name, reg->address,reg->size);
reg->isMapped = 1;
}
+/*-----------------------------------------------------------------*
+ *-----------------------------------------------------------------*/
int assignRegister(regs *reg, int start_address)
{
int i;
if(reg->isFixed) {
if (validAddress(reg->address,reg->size)) {
-
+ //fprintf(stderr,"%s - %s address = 0x%03x\n",__FUNCTION__,reg->name, reg->address);
mapRegister(reg);
return reg->address;
}
mapRegister(reg);
return reg->address;
}
- fprintf(stderr, "WARNING: Ignoring Out of Range register assignment at fixed address %d, %s\n",
- reg->address, reg->name);
+
+ //fprintf(stderr, "WARNING: Ignoring Out of Range register assignment at fixed address %d, %s\n",
+ // reg->address, reg->name);
} else {
}
}
- fprintf(stderr, "WARNING: No more RAM available\n");
+ fprintf(stderr, "WARNING: No more RAM available for %s\n",reg->name);
}
return -1;
}
+/*-----------------------------------------------------------------*
+ *-----------------------------------------------------------------*/
void assignFixedRegisters(set *regset)
{
regs *reg;
}
+/*-----------------------------------------------------------------*
+ *-----------------------------------------------------------------*/
void assignRelocatableRegisters(set *regset, int used)
{
//fprintf(stdout,"assigning %s isFixed=%d, wasUsed=%d\n",reg->name,reg->isFixed,reg->wasUsed);
- if((!reg->isFixed) && ( used || reg->wasUsed))
- address = assignRegister(reg,address);
-
+ if((!reg->isFixed) && ( used || reg->wasUsed)) {
+ /* If register have been reused then shall not print it a second time. */
+// Undefine REUSE_GPR in files pcode.c & device.c to prevent local function registers being reused.
+#define REUSE_GPR
+#ifdef REUSE_GPR
+ set *s;
+ int done = 0;
+ for (s = regset; s; s = s->next) {
+ regs *r;
+ r = s->item;
+ if (r == reg)
+ break;
+ if((!r->isFixed) && ( used || r->wasUsed)) {
+ if (r->rIdx == reg->rIdx) {
+ reg->address = r->address;
+ done = 1;
+ break;
+ }
+ }
+ }
+ if (!done)
+#endif // REUSE_GPR
+ address = assignRegister(reg,address);
+ }
}
}