Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 1 | /* This sefun is to provide a replacement for the efun seteuid(). |
| 2 | * Feel free to add it to your mudlibs, if you have much code relying on that. |
| 3 | */ |
| 4 | |
| 5 | #if ! __EFUN_DEFINED__(seteuid) |
| 6 | |
| 7 | #include <configuration.h> |
| 8 | |
| 9 | int seteuid(string str) |
| 10 | { |
Zesstra | ddddbf7 | 2021-05-14 16:52:16 +0200 | [diff] [blame] | 11 | object|lwobject ob = efun::previous_object(); |
| 12 | if(objectp(ob)) |
Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 13 | { |
Zesstra | ddddbf7 | 2021-05-14 16:52:16 +0200 | [diff] [blame] | 14 | if (!str) |
| 15 | { |
| 16 | efun::configure_object(ob, OC_EUID, 0); |
| 17 | return 1; |
| 18 | } |
| 19 | |
| 20 | if (efun::call_direct(__MASTER_OBJECT__, "valid_seteuid", ob, str) != 1) |
| 21 | return 0; |
| 22 | |
| 23 | efun::configure_object(ob, OC_EUID, str); |
Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 24 | return 1; |
| 25 | } |
Zesstra | ddddbf7 | 2021-05-14 16:52:16 +0200 | [diff] [blame] | 26 | else if (lwobjectp(ob)) |
| 27 | { |
| 28 | if (!str) |
| 29 | { |
| 30 | efun::configure_lwobject(ob, LC_EUID, 0); |
| 31 | return 1; |
| 32 | } |
Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 33 | |
Zesstra | ddddbf7 | 2021-05-14 16:52:16 +0200 | [diff] [blame] | 34 | if (efun::call_direct(__MASTER_OBJECT__, "privilege_violation", |
| 35 | "configure_lwobject", ob, ob, LC_EUID, str) != 1) |
| 36 | return 0; |
Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 37 | |
Zesstra | ddddbf7 | 2021-05-14 16:52:16 +0200 | [diff] [blame] | 38 | efun::configure_lwobject(ob, LC_EUID, str); |
| 39 | return 1; |
| 40 | |
| 41 | } |
| 42 | return 0; |
Zesstra | 7b2fbe7 | 2017-06-17 19:05:06 +0200 | [diff] [blame] | 43 | } |
| 44 | |
| 45 | #endif |