Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision c394b872

Von Moritz Bunkus vor mehr als 14 Jahren hinzugefügt

  • ID c394b87234f29076cdcf0ee8c3c2abab6208a1c7
  • Vorgänger 56e57179
  • Nachfolger df956e31

Administrierbarkeit der webdav-user-Dateien entfernt

Hinweis zum Grund aus doc/Changelog:

- Die Möglichkeit, den Zugriff auf die WebDAV-Verzeichnisse für
jeden Benutzer einzustellen, wurde ersatzlos entfernt. Grund ist,
dass das dafür benötigte Benutzerpasswort bei
LDAP-Authentifizierung nicht bekannt ist. Es wird Administratoren,
die eine solche Zugriffskontrolle benötigen, empfohlen, die
Authentifizierungsmodule des Webservers entsprechend zu
konfigurieren. Bei Apache sind dies die Module mod_auth_pgsql für
in der Datenbank gespeicherte Passwörter und mod_authnz_ldap für
Authentifizierung gegenüber externen LDAP-Servern.

Fix für Bug 1326.

Unterschiede anzeigen:

SL/AM.pm
1544 1544
    $auth->create_or_refresh_session();
1545 1545
  }
1546 1546

  
1547
  if ($webdav) {
1548
    my @webdavdirs =
1549
      qw(angebote bestellungen rechnungen anfragen lieferantenbestellungen einkaufsrechnungen);
1550
    foreach my $directory (@webdavdirs) {
1551
      my $file = "webdav/" . $directory . "/webdav-user";
1552
      my $newfile;
1553
      if ($myconfig->{$directory}) {
1554
        open(HTACCESS, "$file") or die "cannot open webdav-user $!\n";
1555
        while (<HTACCESS>) {
1556
          my ($login, $password) = split(/:/, $_);
1557
          if ($login ne $form->{login}) {
1558
            $newfile .= $_;
1559
          }
1560
        }
1561
        close(HTACCESS);
1562
        open(HTACCESS, "> $file") or die "cannot open webdav-user $!\n";
1563
        $newfile .= $myconfig->{login} . ":" . $myconfig->{password} . "\n";
1564
        print(HTACCESS $newfile);
1565
        close(HTACCESS);
1566
      } else {
1567
        $form->{$directory} = 0;
1568
        open(HTACCESS, "$file") or die "cannot open webdav-user $!\n";
1569
        while (<HTACCESS>) {
1570
          my ($login, $password) = split(/:/, $_);
1571
          if ($login ne $form->{login}) {
1572
            $newfile .= $_;
1573
          }
1574
        }
1575
        close(HTACCESS);
1576
        open(HTACCESS, "> $file") or die "cannot open webdav-user $!\n";
1577
        print(HTACCESS $newfile);
1578
        close(HTACCESS);
1579
      }
1580
    }
1581
  }
1582

  
1583 1547
  $main::lxdebug->leave_sub();
1584 1548

  
1585 1549
  return $rc;

Auch abrufbar als: Unified diff