#include <string.h>
#include <netdb.h>
#include <sys/stat.h>
#include <errno.h>
#include <stdio.h>
#include <Application.h>
#include <Roster.h>
#include <unistd.h>
#include <signal.h>
#include <sys/socket.h>
#include <arpa/inet.h>
#ifdef __HAIKU__
#include <fs_volume.h>
int mount(const char *filesystem, const char *where, const char *device, ulong flags, void *parameters, size_t len)
{
	(void) len;
	return fs_mount_volume(where, device, filesystem, flags, (const char *)parameters);
}
#endif

#define BUFSZ 1024

struct mount_nfs_params
{
	unsigned int serverIP;
	char *server;
	char *_export;
	uid_t uid;
	gid_t gid;
	char *hostname;
};

void usage (const char *exename);

void usage (const char *exename)
{
	printf ("usage: %s server:export mountpoint uid gid\n",exename);
}

int main (int argc, char **argv)
{
	char buf[BUFSZ];
	signal(SIGINT, SIG_IGN);
	signal(SIGHUP, SIG_IGN);

	//BApplication theApp ("application/x-vnd.barecode-mount_nfs");
	
	if (argc!=5)
	{
		usage(argv[0]);
		return 1;
	}	

	struct stat st;	
	if (stat(argv[2],&st)<B_NO_ERROR)
	{
		printf ("mountpoint does not exist\n");
		return 1;
	}
	
	char *colon=strchr(argv[1],':');
	
	if (colon==NULL)
	{
		usage(argv[0]);
		return 1;
	}

	int serverLength=colon-argv[1];
	char *server=new char[serverLength+1];
	memcpy (server,argv[1],serverLength);
	server[serverLength]=0;
	
	hostent *ent;
	
	ent=gethostbyname (server);
	
	if (ent==NULL)
	{
		printf ("could not get server ip\n");
		delete[] server;
		return 1;
	}

	unsigned int serverIP=ntohl(*((unsigned int *)ent->h_addr));

	mount_nfs_params params;

	params.serverIP=serverIP;
	params.server=server;
	params._export=colon+1;

	sscanf (argv[3],"%d",&params.uid);
	sscanf (argv[4],"%d",&params.gid);

	char hostname[256];
	gethostname (hostname,256);
	
	params.hostname=hostname;
	
	sprintf(buf, "nfs:%s:%s,uid=%u,gid=%u,hostname=%s", 
		inet_ntoa(*((struct in_addr *)ent->h_addr)),
		params._export,
		params.uid,
		params.gid,
		params.hostname);
		
	int result=mount ("nfs",argv[2],NULL,0,buf,strlen(buf));
	//int result=mount ("nfs",argv[2],NULL,0,&params,sizeof(params));

	delete[] server;
	
	if (result<B_NO_ERROR)
	{
		printf ("mount failed (%s)\n",strerror(result));
		return 1;
	}
	
	return 0;
}