/*
 *
 * Copyright (C) 2002, 2003, 2008  Florian Boor <florian.boor@kernelconcepts.de>
 *               2004  Ole Reinhardt <ole.reinhardt@kernelconcepts.de>
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version
 * 2 of the License, or (at your option) any later version.
 * 
 * 	Configfile I/O routines, part of dynamic interface configuration.
 *
 *  Wireless LAN support added by Ole Reinhardt
 * 
 */

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <libintl.h>
#include <gpe/errorbox.h>
#include <net/if.h>
#include <sys/socket.h>

#include "cfgfile.h"
#include "network.h"
#include "tools/interface.h"

#define _(x) gettext(x)

static FILE* configfile;
static gchar** configtext;
static gint configlen;
NWInterface_t* iflist = NULL;
gint iflen = 0;

gint set_file_open(gint openon);
gint get_section_start(gchar* section);
gint get_section_end(gchar* section);
gint get_section_nr(G_CONST_RETURN gchar* section);
gint read_section(gint, NWInterface_t *Scheme);
gint rewrite_section(NWInterface_t *Scheme, gint startpos);

gint get_section_text(gchar* section);
gint get_file_text();
gint get_scheme_list();

gint write_sections();

/* some helper for parsing strings */
gchar last_char(gchar* s);
gint count_char(gchar* s, gchar c);
gint get_first_char(gchar* s);
gint get_param_val(gchar* line, gchar* param, gchar* value);
gchar *subst_val(gchar* line, gchar* value);

gchar* get_file_var(const gchar *file, const gchar *var)
{
  gchar *content;
  gchar **lines;
  gsize length;
  gchar *delim;
  gint i = 0;

  GError *err = NULL;

  delim = g_strdup ("\n");
  if (!g_file_get_contents (file, &content, &length, &err))
  {
	  fprintf(stderr,"Could not access file: %s.\n",file);
	  return NULL;
  }
  lines = g_strsplit (content, delim, 2048);
  g_free (delim);
  delim = NULL;
  g_free (content);
  while (lines[i])
    {
      if ((g_strrstr (g_strchomp(lines[i]), var))
	  && (!g_str_has_prefix (g_strchomp(lines[i]), "#")))
	{
		delim = g_strrstr(lines[i],"=");
		if (delim)
			delim = g_strdup(g_strchomp(delim)+1);
		if (!delim)
		{
			delim = g_strrstr(lines[i]," ");
			if (delim)
				delim = g_strdup(g_strchomp(delim)+1);
		}	
		break;
	}
      i++;
    }
	
  g_strfreev (lines);
  return delim;
}

gchar *subst_val(gchar* line, gchar* value)
{
	gchar param[255];
	gchar tmpval[255];
	
	if (get_first_char(value) != -1)
	{
		get_param_val(line,param,tmpval);
		free(line);
		line = g_strdup_printf("\t%s %s",param,value);
	}
	else	// remove line
	{
		line[0] = 0;
	}	
	return line;
}

gint get_param_val(gchar* line, gchar* param, gchar* value)
{
	gint st,sep,a,b;
	
	st=get_first_char(line);
	if (line[st] == '#') return -1; // mark comment 
	for (sep=st;sep<strlen(line);sep++)
		if (line[sep]==' ') break;
	for (a=sep;a<strlen(line);a++)
		if ((line[a]!=' ') && (line[a]!='\t')) break;
	for (b=a+1;b<strlen(line);b++)
		if ((line[b]=='\n') || (line[b]=='\0')) break;
	param=strncpy(param,&line[st],sep-st);
	param[sep-st]='\0';
	
	if ((b-a) > 0) value=strncpy(value,&line[a],b-a);	
	value[b-a]='\0';
	return 0;
}


gint read_section(gint iface, NWInterface_t *Iface)
{
	return 0;
}


gint get_first_char(gchar* s)
{
	gint i=0;
	for (i=0;i<strlen(s);i++)
		if ((s[i] != ' ') && (s[i] != '\t') && (s[i] != '\n') && (s[i] != '\0')) return i;
	return -1;
}


gint count_char(gchar* s, gchar c)
{
	gint a = 0;
	gint i;
	for (i=0;i<strlen(s);i++)
		if (s[i] == c) a++;
	return a;
}


gchar last_char(gchar* s)
{
	gint i;
	if (strlen(s)<=0) return (gchar)0;
	for (i=1;i<strlen(s);i++)
		if ((s[strlen(s)-i] != ' ') && (s[strlen(s)-i] != '\t')) return s[strlen(s)-i];
	return (gchar)0;
}


gint get_file_text()
{
	gchar* ret;
	gint i = 0;
	gchar buf[256];

	configtext=NULL;		
	do
	{
		ret = fgets(buf,255,configfile);
		if (ret) {
			i++;
			buf[255]='\0';
			configtext=realloc(configtext,i*sizeof(gchar*));
			configtext[i-1]=(gchar*)malloc(sizeof(gchar)*(strlen(ret)+2));				
			strcpy(configtext[i-1],buf);
		}
	}	
	while(ret != NULL);
	return i;	
}

void parse_key(NWInterface_t *iface, gchar* key)
{
	gchar* token = strtok(key, " ");
	gint key_was_last = TRUE;
	gint index_was_last = FALSE;
	gint keynr = 1;
	gchar lastkey[64] = "";
	
	while (token)
	{
		if (strcasecmp(token, "off") == 0) 
		{
			if (strlen(lastkey) > 0)
			{
				strncpy(iface->key[keynr-1], lastkey, 63);
				lastkey[0] = 0;
			}
			iface->encmode = ENC_OFF;
			key_was_last = FALSE;
			index_was_last = FALSE;
		} else
		if ((strcasecmp(token, "open") == 0) || (strcmp(token, "on")== 0))
		{
			if (strlen(lastkey) > 0)
			{
				strncpy(iface->key[keynr-1], lastkey, 63);
				lastkey[0] = 0;
			}
			iface->encmode = ENC_OPEN;
			key_was_last = FALSE;
			index_was_last = FALSE;
		} else
		if (strcasecmp(token, "restricted") == 0)
		{
			if (strlen(lastkey) > 0)
			{
				strncpy(iface->key[keynr-1], lastkey, 63);
				lastkey[0] = 0;
			}
			iface->encmode = ENC_RESTRICTED;
			key_was_last = FALSE;
			index_was_last = FALSE;
		} else
		if ((token[0] == '[') && (token[2] == ']'))
		{
			keynr = token[1] - '0';
			if (keynr < 1) keynr = 1;
			if (keynr > 4) keynr = 4;
			if (key_was_last)
			{
				iface->keynr = keynr;
			}
			else
			if (strlen(lastkey) > 0)
			{
				strncpy(iface->key[keynr-1], lastkey, 63);
				lastkey[0] = 0;
			}
			{
				index_was_last = TRUE;
			}
			key_was_last = FALSE;
		} else
		if ((strcasecmp(token, "key") == 0) || (strncasecmp(token, "enc", 3) == 0))
		{
			keynr = 1;
			if (strlen(lastkey) > 0)
			{
				strncpy(iface->key[keynr-1], lastkey, 63);
				lastkey[0] = 0;
			}
			key_was_last = TRUE;
			index_was_last = FALSE;
		} else
		{
			if (index_was_last)
			{
				strncpy(iface->key[keynr-1], token, 63);
			} else 
			{
				strncpy(lastkey, token, 63);
			}
			
			key_was_last = FALSE;
			index_was_last = FALSE;
		}
		
		token = strtok(NULL, " ");
	}
}

static gboolean
is_present_interface(gchar *ifname)
{
	struct interface *int_list, *ife;

	/* show devices for pan connections */
	if (g_str_has_prefix(ifname, "bnep"))
		return TRUE;
	
	int_list = if_getlist ();
	g_strstrip(ifname);

	for (ife = int_list; ife; ife = ife->next)
	{
		if (g_str_has_prefix(ifname, ife->name))
			return TRUE;
	}
	return FALSE;
}

gint get_scheme_list()
{
	gchar ifname[255]  = {0};
	gchar header[255]  = {0};
	gchar paramval[255];
	gchar option1[32] = {0};
	gchar option2[32] = {0};
	gint i, j, k;
	gint l=0;
	
	gchar buffer[256];
	gchar *sep;
	gchar *name;
	FILE *fd;	
	
	for (i=0;i<configlen;i++)
	{
		if (get_param_val(configtext[i],paramval,ifname) == -1) continue; 	// find interface definition?
		if (!strcmp("iface",paramval))
		{
			l++;
			k=0;
			memset(option1,0,32);
			memset(option2,0,32);
			
			for (j=0;j<strlen(configtext[i]);j++)
			{
				if (configtext[i][j]==' ') {
					switch (k) {
						case 0:header[j]='\0';
						break;
						case 1:ifname[j-strlen(header)-1]='\0';
						break;
						case 2:option1[j-strlen(header)-strlen(ifname)-2]='\0';
						break;
					}
					j++; k++;
				}
				if (j==(strlen(configtext[i])-1)) {
						option2[j-strlen(header)-strlen(ifname)-strlen(option1)-3]='\0';
						break;
					break;
				}
				switch (k) {
					case 0:header[j]=configtext[i][j];
					break;
					case 1:ifname[j-strlen(header)-1]=configtext[i][j];
					break;
					case 2:option1[j-strlen(header)-strlen(ifname)-2]=configtext[i][j];
					break;
					case 3:option2[j-strlen(header)-strlen(ifname)-strlen(option1)-3]=configtext[i][j];
					break;
				}
			}

			iflist=(NWInterface_t*)realloc(iflist,l*sizeof(NWInterface_t));
			memset(&iflist[l-1],'\0',sizeof(NWInterface_t));

			strcpy(iflist[l-1].name,ifname);
			iflist[l-1].ispresent = is_present_interface(ifname);
			
			iflist[l-1].isstatic = FALSE;
			iflist[l-1].isinet = FALSE;
			iflist[l-1].isloop = FALSE;
			iflist[l-1].isdhcp = FALSE;
			iflist[l-1].isppp = FALSE;
		
			// strstr could make this easier!
			if (!strcmp("inet",option1)) iflist[l-1].isinet = TRUE;
			if (!strcmp("inet",option2)) iflist[l-1].isinet = TRUE;
			if (!strcmp("static",option1)) iflist[l-1].isstatic = TRUE;
			if (!strcmp("static",option2)) iflist[l-1].isstatic = TRUE;
			if (!strcmp("loopback",option1)) iflist[l-1].isloop = TRUE;
			if (!strcmp("loopback",option2)) iflist[l-1].isloop= TRUE;
			if (!strcmp("dhcp",option1)) iflist[l-1].isdhcp = TRUE;
			if (!strcmp("dhcp",option2)) iflist[l-1].isdhcp= TRUE;
			if (!strcmp("ppp",option1)) iflist[l-1].isppp = TRUE;
			if (!strcmp("ppp",option2)) iflist[l-1].isppp= TRUE;

			strcpy(iflist[l-1].netmask,"\0");
			strcpy(iflist[l-1].network,"\0");
			strcpy(iflist[l-1].gateway,"\0");
			strcpy(iflist[l-1].broadcast,"\0");
			strcpy(iflist[l-1].hostname,"\0");
			strcpy(iflist[l-1].clientid,"\0");
			strcpy(iflist[l-1].provider,"\0");
			
			iflist[l-1].firstline=i;
			iflist[l-1].lastline=i;
			
			iflist[l-1].iswireless = FALSE;
			strcpy(iflist[l-1].essid, "any");
			iflist[l-1].mode = MODE_MANAGED;
			iflist[l-1].encmode = ENC_OFF;
			iflist[l-1].keynr = 1;
		}
		else // parse rest and find end
		{
			if (!iflist) continue; // we are before any sections
			if (!strcmp("address",paramval)) {
				strncpy(iflist[l-1].address,ifname, 31);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp("netmask",paramval)) {
				strncpy(iflist[l-1].netmask,ifname, 31);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp("gateway",paramval)) {
				strncpy(iflist[l-1].gateway,ifname, 31);
					iflist[l-1].lastline=i;
			} else
			if (!strcmp("broadcast",paramval)) {
				strncpy(iflist[l-1].broadcast,ifname, 31);
					iflist[l-1].lastline=i;
			} else
			if (!strcmp("network",paramval)) {
				strncpy(iflist[l-1].network,ifname, 31);
					iflist[l-1].lastline=i;
			} else
			if (!strcmp("hostname",paramval)) {
				strncpy(iflist[l-1].hostname,ifname, 254);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp("client",paramval)) {
				strncpy(iflist[l-1].clientid,ifname, 39);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp("provider",paramval)) {
				strncpy(iflist[l-1].provider,ifname, 39);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp(paramval, "wireless_essid")) {
				strncpy(iflist[l-1].essid, ifname, 31);		
				iflist[l-1].lastline=i;
			} else
			if (!strcmp(paramval, "wireless_channel")) {
				strncpy(iflist[l-1].channel, ifname, 31);
				iflist[l-1].lastline=i;
			} else
			if (!strcmp(paramval, "wireless_mode")) {
				if (strcasecmp(ifname, "managed") == 0)
					iflist[l-1].mode = MODE_MANAGED; else 
					iflist[l-1].mode = MODE_ADHOC;
				iflist[l-1].lastline=i;
			} else
			if ((strcmp(paramval, "wireless_key")==0) || 
			    (strcmp(paramval, "wireless_enc")==0))
			{
				parse_key(&iflist[l-1], ifname);
				iflist[l-1].lastline=i;
			} 
		} // else
	} // for

	iflen = l;

	fd = fopen(_PATH_PROCNET_WIRELESS, "r");
	if (fd)
	{
		fgets(buffer, 256, fd);		// chuck first two lines;
		fgets(buffer, 256, fd);
		while (!feof(fd)) {
			if (fgets(buffer, 256, fd) == NULL)
				break;
			name = buffer;
			sep = strrchr(buffer, ':');
			if (sep) *sep = 0;
			while(*name == ' ') name++;
	
			for (i = 0; i < iflen; i++)
			{
				if (!strcmp (name, iflist[i].name))
				{
					iflist[i].iswireless = TRUE;
				}
			}
		}
		fclose(fd);
	}
	return l;
}


gint get_section_nr(G_CONST_RETURN gchar* section)
{
	gint i;
	for (i=0;i<iflen;i++)
		if (!strcmp(iflist[i].name,section)) return i;
	return -1;
}


gint get_section_start(gchar* section)
{
	int i;
	for (i=0;i<iflen;i++)
		if (!strcmp(iflist[i].name,section)) return iflist[i].firstline;
	return -1;
}


gint get_section_end(gchar* section)
{
	gint i;
	for (i=0;i<iflen;i++)
		if (!strcmp(iflist[i].name,section)) return iflist[i].lastline;
	return -1;
}


gint set_file_open(gint openon)
{
	if (openon){
		configfile = fopen(NET_CONFIGFILE,"r");
		if (configfile)
			configlen = get_file_text();
		fclose(configfile);
	}
	else
	{
		configfile = NULL;
		free(configtext);
	}
	return (gint)configfile;
}


void add_line(gint pos, gchar* line)
{
	gint a;
	gchar *tmp;
	configlen++;
	configtext=realloc(configtext,configlen*sizeof(gchar*));
	configtext[configlen-1] = (gchar*)malloc(sizeof(gchar)*(strlen(line)+1));
	tmp = configtext[configlen-1];
	for (a=configlen-1;a>pos;a--)
	{
		configtext[a]=configtext[a-1];
	}
	
	configtext[pos] = tmp;
	strcpy(configtext[pos],line);
}


gchar *get_iflist()
{
	gint i;
	gchar *result = malloc(256*sizeof(gchar));
	result[0] = '\0';
	for (i=0;i<iflen;i++)
	{
		strncat(result,iflist[i].name,255);
		strncat(result," ",255);
	}
	return result;
}

void get_wifikey_string(NWInterface_t iface, gchar** key)
{
	gint nokeys = FALSE;
	gint count;
	gchar *lkey = g_strdup(""), *t;
	
	
	if ((strlen(iface.key[0]) == 0) && 
	    (strlen(iface.key[1]) == 0) && 
	    (strlen(iface.key[2]) == 0) && 
	    (strlen(iface.key[3]) == 0)) 
	{
		iface.encmode = ENC_OFF;
		nokeys = TRUE;
	}
	
	if (strlen(iface.key[iface.keynr-1]) == 0)
		for (iface.keynr = 1; iface.keynr <=4; iface.keynr++)
			if (strlen(iface.key[iface.keynr-1]) != 0) break;
				
	if (!nokeys)
	{
		for (count = 0; count < 4; count++)
			if (strlen(iface.key[count]) > 0)
			{
				t = lkey;
				lkey = g_strdup_printf("%s key %s [%d]", lkey, iface.key[count], count+1);
				g_free(t);
			}
		
		t = lkey;
		lkey = g_strdup_printf(" %s key [%d]", lkey, iface.keynr);
		g_free(t);
	}
	
	t = lkey;
	switch (iface.encmode)
	{
		case ENC_OPEN: lkey = g_strdup_printf ("%s key open", lkey); break;
		case ENC_RESTRICTED: lkey = g_strdup_printf("%s key restricted", lkey); break;
		case ENC_OFF: lkey = g_strdup_printf("%s key off", lkey); break;
		default: lkey = g_strdup_printf("%s key off", lkey); break;
	}
	g_free(t);

 	*key = lkey;
}

gint write_sections()
{
	gint i,j;
	gint l=0;
	gint in_section = FALSE;
	gchar outstr[255];
	gchar paramval[255];
	gchar ifname[255];
	gint svd[14];
	gint lastwpos = 0;
	gint last_i;
	gchar *key;
	
	for (i=0;i<configlen;i++)
	{
		get_param_val(configtext[i],paramval,ifname);	// get next tokens
		/* handled by hotplug
		if (!strcmp("auto",paramval))
		{
			auto_set = TRUE;
			free(configtext[i]);
			configtext[i] = g_strdup_printf("auto %s\n",get_iflist());
		}
		*/
		if (!strcmp("iface",paramval))
		{
			in_section = TRUE;
			l++;
			memset(&svd,(gint)0,14*sizeof(gint));
			lastwpos = i;
			sprintf(outstr,"iface %s",	iflist[l-1].name);
			if (iflist[l-1].isinet) strcat(outstr," inet");
			if (iflist[l-1].isstatic) strcat(outstr," static");
			if (iflist[l-1].isloop) strcat(outstr," loopback");
			if (iflist[l-1].isppp) strcat(outstr," ppp");
			if (iflist[l-1].isdhcp) strcat(outstr," dhcp");
			strcat(outstr,"\n\0"); // tm?
			if (iflist[l-1].status != NWSTATE_REMOVED) 
			{
				configtext[i]=realloc(configtext[i],strlen(outstr)+1);
				strcpy(configtext[i],outstr);
			}
			else configtext[i][0]='\0';					
		}
		else 
		{
			if (!in_section) continue; // we are before any sections
			
			if (iflist[l-1].status == NWSTATE_REMOVED) // line belongs to a erased section
			{
				configtext[i][0]='\0';
				continue;
			} else
			
			if (!strcmp("address",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].address);
				svd[Saddress]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("netmask",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].netmask);
				svd[Snetmask]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("gateway",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].gateway);
				svd[Sgateway]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("broadcast",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].broadcast);
				svd[Sbroadcast]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("network",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].network);			
				svd[Snetwork]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("hostname",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].hostname);
				svd[Shostname]=TRUE;
				lastwpos = i;
			} else			
			if (!strcmp("client",paramval))
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].clientid);
				svd[Sclientid]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("provider",paramval)) 
			{
				configtext[i] = subst_val(configtext[i],iflist[l-1].provider);
				svd[Sprovider]=TRUE;
				lastwpos = i;
			} else
			if (!strcmp("wireless_essid", paramval))
			{
				configtext[i] = subst_val(configtext[i], iflist[l-1].essid);
				svd[Swifiessid] = TRUE;
				lastwpos = i;
			} else
			if (!strcmp("wireless_mode", paramval))
			{
				configtext[i] = subst_val(configtext[i], iflist[l-1].mode == MODE_MANAGED ? "managed" : "ad-hoc");
				svd[Swifimode] = TRUE;
				lastwpos = i;
			}
			if (!strcmp("wireless_channel", paramval))
			{
				configtext[i] = subst_val(configtext[i], iflist[l-1].channel);
				svd[Swifichannel] = TRUE;
				lastwpos = i;
			} else
			if (!strcmp("wireless_key", paramval))
			{
				get_wifikey_string(iflist[l-1], &key);
				configtext[i] = subst_val(configtext[i], key); 
 				g_free(key);
				svd[Swifikey] = TRUE;
				lastwpos = i;
			}
			
		} // else
			// handle new parameters at section end
			if ((i == iflist[l-1].lastline) && (iflist[l-1].status !=NWSTATE_REMOVED))
			{
				last_i = i;
				in_section = FALSE;
				lastwpos++;
				if ((!svd[Saddress]) && (get_first_char(iflist[l-1].address)>=0))
				{
					sprintf(outstr,"\taddress %s",iflist[l-1].address);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Snetmask]) && (get_first_char(iflist[l-1].netmask)>=0))
				{
					sprintf(outstr,"\tnetmask %s",iflist[l-1].netmask);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Snetwork]) && (get_first_char(iflist[l-1].network)>=0))
				{
					sprintf(outstr,"\tnetwork %s",iflist[l-1].network);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Sbroadcast]) && (get_first_char(iflist[l-1].broadcast)>=0))
				{
					sprintf(outstr,"\tbroadcast %s",iflist[l-1].broadcast);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Shostname]) && (get_first_char(iflist[l-1].hostname)>=0))
				{
					sprintf(outstr,"\thostname %s",iflist[l-1].hostname);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Sclientid]) && (get_first_char(iflist[l-1].clientid)>=0))
				{
					sprintf(outstr,"\tclient %s",iflist[l-1].clientid);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Sprovider]) && (get_first_char(iflist[l-1].provider)>=0))
				{
					sprintf(outstr,"\tprovider %s",iflist[l-1].provider);
					add_line(lastwpos,outstr);
					i++;
				}
				if ((!svd[Sgateway]) && (get_first_char(iflist[l-1].gateway)>=0))
				{
					sprintf(outstr,"\tgateway %s",iflist[l-1].gateway);
					add_line(lastwpos,outstr);
					i++;
				}
				if (iflist[l-1].iswireless)
				{
					if (!svd[Swifiessid])
					{
						sprintf(outstr,"\twireless_essid %s",iflist[l-1].essid);
						add_line(lastwpos,outstr);
						i++;
					}
					if (!svd[Swifimode]) 
					{
						sprintf(outstr,"\twireless_mode %s",iflist[l-1].mode == MODE_MANAGED ? "managed" : "ad-hoc");
						add_line(lastwpos,outstr);
						i++;
					} 
					if ((!svd[Swifichannel]) && (strlen (iflist[l-1].channel) > 0))
					{
						sprintf(outstr,"\twireless_channel %s",iflist[l-1].channel);
						add_line(lastwpos,outstr);
						i++;
					} 
					if (!svd[Swifikey])
					{
						get_wifikey_string(iflist[l-1], &key);
						sprintf(outstr,"\twireless_key %s",key);
						add_line(lastwpos,outstr);
						i++;
					} 
				}					
				for (j=l;j<iflen;j++)
					iflist[j].lastline+=(i-last_i);
			} // if last line
	} // for

	// add new sections
	for (i=0;i<iflen;i++)
		if (iflist[i].status==NWSTATE_NEW)
		{
			sprintf(outstr,"iface %s",	iflist[i].name);
			if (iflist[i].isinet) strcat(outstr," inet");
			if (iflist[i].isstatic) strcat(outstr," static");
			if (iflist[i].isloop) strcat(outstr," loopback");
			if (iflist[i].isppp) strcat(outstr," ppp");
			if (iflist[i].isdhcp) strcat(outstr," dhcp");
			strcat(outstr,"\n\0"); 
			add_line(configlen,outstr);
			if (get_first_char(iflist[i].address)>=0)
			{
				sprintf(outstr,"\taddress %s",iflist[i].address);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].netmask)>=0)
			{
				sprintf(outstr,"\tnetmask %s",iflist[i].netmask);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].network)>=0)
			{
				sprintf(outstr,"\tnetwork %s",iflist[i].network);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].broadcast)>=0)
			{
				sprintf(outstr,"\tbroadcast %s",iflist[i].broadcast);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].hostname)>=0)
			{
				sprintf(outstr,"\thostname %s",iflist[i].hostname);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].clientid)>=0)
			{
				sprintf(outstr,"\tclient %s",iflist[i].clientid);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].provider)>=0)
			{
				sprintf(outstr,"\tprovider %s",iflist[i].provider);
				add_line(configlen,outstr);
			}
			if (get_first_char(iflist[i].gateway)>=0)
			{
				sprintf(outstr,"\tgateway %s",iflist[i].gateway);
				add_line(configlen,outstr);
			}
		
			if (iflist[i].iswireless)
			{
				sprintf(outstr,"\twireless_essid %s",iflist[i].essid);
				add_line(configlen,outstr);
				
				sprintf(outstr,"\twireless_mode %s",iflist[i].mode == MODE_MANAGED ? "managed" : "ad-hoc");
				add_line(configlen,outstr);
	
				if (strlen (iflist[i].channel) > 0)
				{
					sprintf(outstr,"\twireless_channel %s",iflist[i].channel);
					add_line(configlen,outstr);
				} 
				get_wifikey_string(iflist[i], &key);
 				sprintf(outstr,"\twireless_key %s",key);
				g_free(key);
				add_line(configlen,outstr);
			}					
			
		} //if status
	
	/* handle auto line if not yet done */
	/*if (auto_set == FALSE) 
	{
		add_line(configlen,g_strdup_printf("auto %s\n",get_iflist()));
	}
	*/
	// write file
	configfile = fopen(NET_NEWFILE,"w");
	if (configfile)
	{
		for (i=0;i<configlen;i++)
		{
			if (configtext[i][0] != '\0')
			{
				if (count_char(configtext[i],'\n')>0)
					fprintf(configfile,"%s",configtext[i]);
				else
					fprintf(configfile,"%s\n",configtext[i]);
			}	
		}
		fclose(configfile);
	}
	else
		gpe_error_box(_("No write access to network configuration."));
			
	return l;	
}