15af32e75SAxel Dörfler /* 25af32e75SAxel Dörfler ** Copyright 2004, Jérôme Duval. All rights reserved. 35af32e75SAxel Dörfler ** Distributed under the terms of the Haiku License. 45af32e75SAxel Dörfler */ 55af32e75SAxel Dörfler 65af32e75SAxel Dörfler #include <time.h> 75af32e75SAxel Dörfler #include <errno.h> 85af32e75SAxel Dörfler #include "syscalls.h" 95af32e75SAxel Dörfler 105af32e75SAxel Dörfler 115af32e75SAxel Dörfler int 125af32e75SAxel Dörfler stime(const time_t *tp) 135af32e75SAxel Dörfler { 145af32e75SAxel Dörfler status_t status; 155af32e75SAxel Dörfler 165af32e75SAxel Dörfler if (tp == NULL) { 175af32e75SAxel Dörfler errno = EINVAL; 185af32e75SAxel Dörfler return -1; 195af32e75SAxel Dörfler } 20*24df6592SIngo Weinhold 21*24df6592SIngo Weinhold status = _kern_set_real_time_clock((bigtime_t)*tp * 1000000); 225af32e75SAxel Dörfler if (status < B_OK) { 235af32e75SAxel Dörfler errno = status; 245af32e75SAxel Dörfler return -1; 255af32e75SAxel Dörfler } 265af32e75SAxel Dörfler return 0; 275af32e75SAxel Dörfler } 285af32e75SAxel Dörfler 29