Overview
| Comment: | Added more functionality to the "reboot" syscall wrapper |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
f7f4d0aee8dd8df0d3322bea4891c5c1 |
| User & Date: | rkeene on 2015-04-07 17:36:16 |
| Other Links: | manifest | tags |
Context
|
2015-05-17
| ||
| 04:16 | Implemented "rmmod" check-in: 20d82b1585 user: rkeene tags: trunk | |
|
2015-04-07
| ||
| 17:36 | Added more functionality to the "reboot" syscall wrapper check-in: f7f4d0aee8 user: rkeene tags: trunk | |
|
2015-02-18
| ||
| 02:45 | Added more whitespace separators to module argument parameters check-in: 4ea5feb1d3 user: rkeene tags: trunk | |
Changes
Modified tuapi.c from [2a68e00137] to [197b72911d].
| ︙ | ︙ | |||
793 794 795 796 797 798 799 |
return(TCL_ERROR);
}
return(TCL_OK);
}
static int tuapi_reboot(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
| > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | | | > > > | | > > > | 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 |
return(TCL_ERROR);
}
return(TCL_OK);
}
static int tuapi_reboot(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
Tcl_Obj *cmd_obj;
int cmd;
int reboot_ret;
if (objc == 2) {
cmd_obj = objv[1];
switch (tuapi_internal_simplehash_obj(cmd_obj)) {
case 0x2be1946: /* LINUX_REBOOT_CMD_CAD_OFF */
case 0x666e6344: /* RB_DISABLE_CAD */
case 0x9e3ce644: /* DISABLE_CAD */
cmd = RB_DISABLE_CAD;
break;
case 0xe8057c4e: /* LINUX_REBOOT_CMD_CAD_ON */
case 0xf8dc444: /* RB_ENABLE_CAD */
case 0x1a7d6144: /* ENABLE_CAD */
cmd = RB_ENABLE_CAD;
break;
case 0x95bfa454: /* LINUX_REBOOT_CMD_HALT */
case 0x3210da4d: /* RB_HALT_SYSTEM */
case 0xca425f4d: /* HALT_SYSTEM */
case 0x9106654: /* HALT */
cmd = RB_HALT_SYSTEM;
break;
case 0xdb55d8c6: /* LINUX_REBOOT_CMD_POWER_OFF */
case 0xf07700c6: /* RB_POWER_OFF */
case 0x645ce1c6: /* POWER_OFF */
cmd = 0x4321fedc;
break;
case 0x73ff83d4: /* LINUX_REBOOT_CMD_RESTART */
case 0x3cd0e254: /* RB_AUTOBOOT */
case 0xb9f8b5d4: /* AUTOBOOT */
case 0x3a357fd4: /* RESTART */
case 0x5852add4: /* REBOOT */
cmd = RB_AUTOBOOT;
break;
default:
Tcl_SetObjResult(interp, Tcl_NewStringObj("unknown or ambiguous subcommand: must be DISABLE_CAD, ENABLE_CAD, HALT, POWER_OFF, or RESTART", -1));
return(TCL_ERROR);
}
} else if (objc == 1) {
cmd = RB_AUTOBOOT;
} else {
Tcl_SetObjResult(interp, Tcl_NewStringObj("wrong # args: should be \"::tuapi::syscall::reboot ?command?", -1));
return(TCL_ERROR);
}
switch (cmd) {
case RB_ENABLE_CAD:
case RB_DISABLE_CAD:
/* No need to sync for these operations */
break;
default:
sync();
break;
}
reboot_ret = reboot(cmd);
if (reboot_ret != 0) {
Tcl_SetObjResult(interp, Tcl_NewStringObj(strerror(errno), -1));
return(TCL_ERROR);
}
return(TCL_OK);
}
static int tuapi_eject(ClientData cd, Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[]) {
Tcl_SetObjResult(interp, Tcl_NewStringObj("not implemented", -1));
return(TCL_ERROR);
}
|
| ︙ | ︙ |