t_list * realmlist_load(char const * filename)
{
FILE * fp;
unsigned int line;
unsigned int pos;
unsigned int len;
t_addr * raddr;
char * temp, *temp2;
char * buff;
char * name;
char * desc;
t_realm * realm;
t_list * list_head = NULL;
if (!filename)
{
eventlog(eventlog_level_error,__FUNCTION__,"got NULL filename");
return NULL;
}
if (!(fp = fopen(filename,"r")))
{
eventlog(eventlog_level_error,__FUNCTION__,"could not open realm file \"%s\" for reading (fopen: %s)",filename,pstrerror(errno));
return NULL;
}
list_head = list_create();
for (line=1; (buff = file_get_line(fp)); line++)
{
for (pos=0; buff[pos]=='\t' || buff[pos]==' '; pos++);
if (buff[pos]=='\0' || buff[pos]=='#')
{
continue;
}
if ((temp = strrchr(buff,'#')))
{
unsigned int endpos;
*temp = '\0';
len = strlen(buff)+1;
for (endpos=len-1; buff[endpos]=='\t' || buff[endpos]==' '; endpos--);
buff[endpos+1] = '\0';
}
/* skip any separators */
for (temp = buff; *temp && (*temp == ' ' || *temp == '\t');temp++);
if (*temp != '"') {
eventlog(eventlog_level_error,__FUNCTION__,"malformed line %u in file \"%s\" (no realmname)",line,filename);
continue;
}
temp2 = temp + 1;
/* find the next " */
for (temp = temp2; *temp && *temp != '"';temp++);
if (*temp != '"' || temp == temp2) {
eventlog(eventlog_level_error,__FUNCTION__,"malformed line %u in file \"%s\" (no realmname)",line,filename);
continue;
}
/* save the realmname */
*temp = '\0';
name = xstrdup(temp2);
/* eventlog(eventlog_level_trace, __FUNCTION__,"found realmname: %s",name); */
/* skip any separators */
for(temp = temp + 1; *temp && (*temp == '\t' || *temp == ' ');temp++);
if (*temp == '"') { /* we have realm description */
temp2 = temp + 1;
/* find the next " */
for(temp = temp2;*temp && *temp != '"';temp++);
if (*temp != '"' || temp == temp2) {
eventlog(eventlog_level_error,__FUNCTION__,"malformed line %u in file \"%s\" (no valid description)",line,filename);
xfree(name);
continue;
}
/* save the description */
*temp = '\0';
desc = xstrdup(temp2);
/* eventlog(eventlog_level_trace, __FUNCTION__,"found realm desc: %s",desc); */
/* skip any separators */
for(temp = temp + 1; *temp && (*temp == ' ' || *temp == '\t');temp++);
} else desc = xstrdup("\0");
temp2 = temp;
/* find out where address ends */
for(temp = temp2 + 1; *temp && *temp != ' ' && *temp != '\t';temp++);
if (*temp) *temp++ = '\0'; /* if is not the end of the file, end addr and move forward */
/* eventlog(eventlog_level_trace, __FUNCTION__,"found realm ip: %s",temp2); */
if (!(raddr = addr_create_str(temp2,0,BNETD_REALM_PORT))) /* 0 means "this computer" */ {
eventlog(eventlog_level_error,__FUNCTION__,"invalid address value for field 3 on line %u in file \"%s\"",line,filename);
xfree(name);
xfree(desc);
continue;
}
if (!(realm = realm_create(name,desc,addr_get_ip(raddr),addr_get_port(raddr))))
{
eventlog(eventlog_level_error,__FUNCTION__,"could not create realm");
addr_destroy(raddr);
xfree(name);
xfree(desc);
continue;
}
addr_destroy(raddr);
xfree(name);
xfree(desc);
list_prepend_data(list_head,realm);
}
file_get_line(NULL); // clear file_get_line buffer
if (fclose(fp)<0)
eventlog(eventlog_level_error,__FUNCTION__,"could not close realm file \"%s\" after reading (fclose: %s)",filename,pstrerror(errno));
return list_head;
}
extern int realmlist_create(char const * filename)
{
FILE * fp;
unsigned int line;
unsigned int pos;
unsigned int len;
t_addr * raddr;
char * temp;
char * buff;
char * name;
char * desc;
char * addr;
t_realm * realm;
if (!filename)
{
eventlog(eventlog_level_error,"realmlist_create","got NULL filename");
return -1;
}
if (!(realmlist_head = list_create()))
{
eventlog(eventlog_level_error,"realmlist_create","could not create list");
return -1;
}
if (!(fp = fopen(filename,"r")))
{
eventlog(eventlog_level_error,"realmlist_create","could not open realm file \"%s\" for reading (fopen: %s)",filename,strerror(errno));
list_destroy(realmlist_head);
realmlist_head = NULL;
return -1;
}
for (line=1; (buff = file_get_line(fp)); line++)
{
for (pos=0; buff[pos]=='\t' || buff[pos]==' '; pos++);
if (buff[pos]=='\0' || buff[pos]=='#')
{
free(buff);
continue;
}
if ((temp = strrchr(buff,'#')))
{
unsigned int endpos;
*temp = '\0';
len = strlen(buff)+1;
for (endpos=len-1; buff[endpos]=='\t' || buff[endpos]==' '; endpos--);
buff[endpos+1] = '\0';
}
len = strlen(buff)+1;
if (!(name = malloc(len)))
{
eventlog(eventlog_level_error,"realmlist_create","could not allocate memory for name");
free(buff);
continue;
}
if (!(desc = malloc(len)))
{
eventlog(eventlog_level_error,"realmlist_create","could not allocate memory for desc");
free(name);
free(buff);
continue;
}
if (!(addr = malloc(len)))
{
eventlog(eventlog_level_error,"realmlist_create","could not allocate memory for desc");
free(desc);
free(name);
free(buff);
continue;
}
if (sscanf(buff," \"%[^\"]\" \"%[^\"]\" %s",name,desc,addr)!=3)
{
if (sscanf(buff," \"%[^\"]\" \"\" %s",name,addr)==2)
desc[0] = '\0';
else
{
eventlog(eventlog_level_error,"realmlist_create","malformed line %u in file \"%s\"",line,filename);
free(addr);
free(desc);
free(name);
free(buff);
continue;
}
}
free(buff);
if (!(raddr = addr_create_str(addr,0,BNETD_REALM_PORT))) /* 0 means "this computer" */
{
eventlog(eventlog_level_error,"realmlist_create","invalid address value for field 3 on line %u in file \"%s\"",line,filename);
free(addr);
free(desc);
free(name);
continue;
}
free(addr);
if (!(realm = realm_create(name,desc,addr_get_ip(raddr),addr_get_port(raddr))))
{
eventlog(eventlog_level_error,"realmlist_create","could not create realm");
addr_destroy(raddr);
free(desc);
free(name);
continue;
}
addr_destroy(raddr);
free(desc);
free(name);
if (list_prepend_data(realmlist_head,realm)<0)
{
eventlog(eventlog_level_error,"realmlist_create","could not prepend realm");
realm_destroy(realm);
continue;
}
}
if (fclose(fp)<0)
eventlog(eventlog_level_error,"realmlist_create","could not close realm file \"%s\" after reading (fclose: %s)",filename,strerror(errno));
return 0;
}