#!/usr/bin/perl
#
# Autore: Federico Di Cesare
# Data: 20/01/2017
# Descrizione: script per l'inserimento di un utente in MajorNet dal captive portal (tramite frontendproc)
#

#Require
require '/etc/mnvars.pl';
require '/usr/local/majormin/useradmin/userLibNew.pl';
require '/usr/local/majormin/useradmin/userlib.pl';
#Variabili
my $uid = $ARGV[0];
my $password = $ARGV[1];
my $mail = "";
my $displayname= "";
if ($ARGV[2] ne "") {
	$displayname = $ARGV[2];
	#chop($displayname);
}
if ($ARGV[3] ne "") {
	$mail = $ARGV[3] ;
	
}


if ($uid ne "") {
	
	my %in = ( displayName => $displayname, uid => $uid , userPassword => $password, mail => $mail);

	#Aggiungo un utente
	my %res = &addUser(\%in);
	print "$res{'return'};";
	if ($res{'return'} eq 0) {
		print "OK";
		
	}
	if ($res{'return'} eq 1) {
		print "MaxUserReached";
		
	}
	if ($res{'return'} eq 2) {
		print "InsufResources";
		
	}
	if ($res{'return'} eq 3) {
		delete $res{'return'};
		
		while (my ($key, $value) = each(%res)) {
			if ($value eq 1) {
				print "$key nullValue ";
			} else {
				print "$key $in{$key} errorChars  acceptedChars  $value";	
			}
		}
	}
	if ($res{'return'} eq 4) {
		print "systemUser";
	}
	if ($res{'return'} eq 5) {
		print "checkUID";
		
	}

	# Variabile che indica il risultato dell'operazione
	#       * -1: errore durante l'operazione
	#       * 0: operazione avvenuta con successo (creazione)
	#       * 5: operazione avvenuta con successo (modifica)
	#       * 1: raggiunto il numero massimo di utenti possibili
	#       * 2: raggiunto il numero massimo di licenze possibili
	#       * 3: inseriti dei campi non corretti
	#       * 4: inserito un UID riservato per il sistema
	
}