Du kan inte välja fler än 25 ämnen Ämnen måste starta med en bokstav eller siffra, kan innehålla bindestreck ('-') och vara max 35 tecken långa.
 
 
 
 

76 rader
1.6 KiB

  1. #!/usr/bin/perl
  2. #
  3. # Autore: Federico Di Cesare
  4. # Data: 20/01/2017
  5. # Descrizione: script per l'inserimento di un utente in MajorNet dal captive portal (tramite frontendproc)
  6. #
  7. #Require
  8. require '/etc/mnvars.pl';
  9. require '/usr/local/majormin/useradmin/userLibNew.pl';
  10. require '/usr/local/majormin/useradmin/userlib.pl';
  11. #Variabili
  12. my $uid = $ARGV[0];
  13. my $password = $ARGV[1];
  14. my $mail = "";
  15. my $displayname= "";
  16. if ($ARGV[2] ne "") {
  17. $displayname = $ARGV[2];
  18. #chop($displayname);
  19. }
  20. if ($ARGV[3] ne "") {
  21. $mail = $ARGV[3] ;
  22. }
  23. if ($uid ne "") {
  24. my %in = ( displayName => $displayname, uid => $uid , userPassword => $password, mail => $mail);
  25. #Aggiungo un utente
  26. my %res = &addUser(\%in);
  27. print "$res{'return'};";
  28. if ($res{'return'} eq 0) {
  29. print "OK";
  30. }
  31. if ($res{'return'} eq 1) {
  32. print "MaxUserReached";
  33. }
  34. if ($res{'return'} eq 2) {
  35. print "InsufResources";
  36. }
  37. if ($res{'return'} eq 3) {
  38. delete $res{'return'};
  39. while (my ($key, $value) = each(%res)) {
  40. if ($value eq 1) {
  41. print "$key nullValue ";
  42. } else {
  43. print "$key $in{$key} errorChars acceptedChars $value";
  44. }
  45. }
  46. }
  47. if ($res{'return'} eq 4) {
  48. print "systemUser";
  49. }
  50. if ($res{'return'} eq 5) {
  51. print "checkUID";
  52. }
  53. # Variabile che indica il risultato dell'operazione
  54. # * -1: errore durante l'operazione
  55. # * 0: operazione avvenuta con successo (creazione)
  56. # * 5: operazione avvenuta con successo (modifica)
  57. # * 1: raggiunto il numero massimo di utenti possibili
  58. # * 2: raggiunto il numero massimo di licenze possibili
  59. # * 3: inseriti dei campi non corretti
  60. # * 4: inserito un UID riservato per il sistema
  61. }