Zugriffsrechte: Zugriffsrechte (Allgemeines zu Perl)

Gast Gast

2004-09-02 17:29

Hallo @ alle,
habe mal eine Frage...ich würde mal gern wissen, wie ich mit Perl die Zugriffsrechte für einen Ordner mit dem Befehl chown auf bin:bin bekomme???
Wäre toll wenn ihr mir helfen könntet

mfg
andy999mueller

snarf

2004-09-02 17:53

User since
2003-08-14
77 Artikel
BenutzerIn
[default_avatar]

Hi,

Code: (dl )

chown 2 , 2 , $datei/$dir

... wobei Dir die Datei / der Ordner schon gehören sollte!

perldoc -f chown

Dirk\n\n

Crian

2004-09-02 18:02

User since
2003-08-04
5866 Artikel
ModeratorIn

Du kannst nicht einfach etwas irgendeinem anderen User unterjubeln, dafür brauchst Du root-Rechte.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

snarf

2004-09-02 18:17

User since
2003-08-14
77 Artikel
BenutzerIn
[default_avatar]

[quote=Crian,02.09.2004, 16:02]Du kannst nicht einfach etwas irgendeinem anderen User unterjubeln, dafür brauchst Du root-Rechte.[/quote]
Solange Du Owner-Rechte hast, kann Du so ziemlich alles mit Deinen Dateien machen.

Wenn Dir die Datei jedoch nicht gehört, dann brauchst Du root Rechte.

Dirk

betterworld

2004-09-02 19:00

User since
2003-08-21
2613 Artikel
ModeratorIn

user image

Nein snarf, versuch doch mal, jemandem ohne Root-Rechte eine Deiner
Dateien zu schenken.

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class

betterworld

2004-09-02 19:01

User since
2003-08-21
2613 Artikel
ModeratorIn

user image

Ich faende es aber cool, wenn es ginge, denn dann koennte ich endlich
das Quota-Problem an der Uni umgehen...

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class

Crian

2004-09-02 19:12

User since
2003-08-04
5866 Artikel
ModeratorIn

Stell Dir mal vor, dann könnte man ja irgendwelches belastende Zeug an andere User "verschenken" und sie dann belasten ;) *phöse*

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

snarf

2004-09-02 19:28

User since
2003-08-14
77 Artikel
BenutzerIn
[default_avatar]

[quote=betterworld,02.09.2004, 17:00]Nein snarf, versuch doch mal, jemandem ohne Root-Rechte eine Deiner
Dateien zu schenken.[/quote]
hab ich gerade ... ist kein Problem. Ich muss halt nur damit leben können, dass ich auf die Files u.U. keinen Zugriff mehr habe.

Sollte das BS abhängig bzw. Implementierungsabhängig sein? Ist mir jedenfalls in all den Jahren noch nicht untergekommen (seit anno 91 auf ner Nixdorf-Targon 35).

Oder sprechen wir hier generell von unscherschiedlichen Betriebssystemen (Unix, Windows, Mac etc etc)? Dann gelten meine Aussagen nur für Unix (Irix, HP-UX, Linux)

Rätselnde Grüsse, Dirk

pq

2004-09-02 20:16

User since
2003-08-04
12208 Artikel
Admin1

Code: (dl )

1
2
3

$ touch other_user
$ chown nobody other_user 
chown: Ändern des Eigentümers von ,,other_user": Die Operation ist nicht erlaubt

suse 9.1

Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live. -- Damian Conway in "Perl Best Practices"
lesen: Wiki:

Wie frage ich & perlintro Wiki:

brian's Leitfaden für jedes Perl-Problem

Crian

2004-09-03 00:28

User since
2003-08-04
5866 Artikel
ModeratorIn

Genau ...

Code: (dl )

1
2
3

crian@blitz:~> touch other_user
crian@blitz:~> chown clia other_user
chown: Ã„ndern des EigentÃ¼mers von &â€žother_user&â€œ: Die Operation ist nicht erlaubt

aber nicht verwunderlich, da auch SuSE 9.1 :-)

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite