This commit was manufactured by cvs2svn to create branch 'SAMBA_3_0'.(This used to...
[kai/samba.git] / source3 / utils / net_time.c
1 /* 
2    Samba Unix/Linux SMB client library 
3    net time command
4    Copyright (C) 2001 Andrew Tridgell (tridge@samba.org)
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2 of the License, or
9    (at your option) any later version.
10    
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software
18    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
19
20 #include "includes.h"
21 #include "../utils/net.h"
22
23
24 /*
25   return the time on a server. This does not require any authentication
26 */
27 static time_t cli_servertime(const char *host, struct in_addr *ip, int *zone)
28 {
29         struct nmb_name calling, called;
30         time_t ret = 0;
31         extern pstring global_myname;
32         struct cli_state *cli = NULL;
33
34         cli = cli_initialise(NULL);
35         if (!cli) goto done;
36
37         if (!cli_connect(cli, host, ip)) {
38                 fprintf(stderr,"Can't contact server\n");
39                 goto done;
40         }
41
42         make_nmb_name(&calling, global_myname, 0x0);
43         if (host) {
44                 make_nmb_name(&called, host, 0x20);
45         } else {
46                 make_nmb_name(&called, "*SMBSERVER", 0x20);
47         }
48
49         if (!cli_session_request(cli, &calling, &called)) {
50                 fprintf(stderr,"Session request failed\n");
51                 goto done;
52         }
53         if (!cli_negprot(cli)) {
54                 fprintf(stderr,"Protocol negotiation failed\n");
55                 goto done;
56         }
57
58         ret = cli->servertime;
59         if (zone) *zone = cli->serverzone;
60
61 done:
62         if (cli) cli_shutdown(cli);
63         return ret;
64 }
65
66 /* find the servers time on the opt_host host */
67 static time_t nettime(int *zone)
68 {
69         extern BOOL opt_have_ip;
70         extern struct in_addr opt_dest_ip;
71         extern char *opt_host; 
72         return cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, zone);
73 }
74
75 /* return a time as a string ready to be passed to /bin/date */
76 static char *systime(time_t t)
77 {
78         static char s[100];
79         struct tm *tm;
80
81         tm = localtime(&t);
82         
83         snprintf(s, sizeof(s), "%02d%02d%02d%02d%04d.%02d", 
84                  tm->tm_mon+1, tm->tm_mday, tm->tm_hour, 
85                  tm->tm_min, tm->tm_year + 1900, tm->tm_sec);
86         return s;
87 }
88
89 int net_time_usage(int argc, const char **argv)
90 {
91         d_printf(
92 "net time\n\tdisplays time on a server\n\n"\
93 "net time system\n\tdisplays time on a server in a format ready for /bin/date\n\n"\
94 "net time set\n\truns /bin/date with the time from the server\n\n"\
95 "net time zone\n\tdisplays the timezone in hours from GMT on the remote computer\n\n"\
96 "\n");
97         net_common_flags_usage(argc, argv);
98         return -1;
99 }
100
101 /* try to set the system clock using /bin/date */
102 static int net_time_set(int argc, const char **argv)
103 {
104         time_t t = nettime(NULL);
105         char *cmd;
106
107         if (t == 0) return -1;
108         
109         /* yes, I know this is cheesy. Use "net time system" if you want to 
110            roll your own. I'm putting this in as it works on a large number
111            of systems and the user has a choice in whether its used or not */
112         asprintf(&cmd, "/bin/date %s", systime(t));
113         system(cmd);
114         free(cmd);
115
116         return 0;
117 }
118
119 /* display the time on a remote box in a format ready for /bin/date */
120 static int net_time_system(int argc, const char **argv)
121 {
122         time_t t = nettime(NULL);
123
124         if (t == 0) return -1;
125
126         printf("%s\n", systime(t));
127
128         return 0;
129 }
130
131 /* display the time on a remote box in a format ready for /bin/date */
132 static int net_time_zone(int argc, const char **argv)
133 {
134         int zone = 0;
135         int hours, mins;
136         char zsign;
137         time_t t;
138
139         t = nettime(&zone);
140
141         if (t == 0) return -1;
142
143         zsign = (zone > 0) ? '-' : '+';
144         if (zone < 0) zone = -zone;
145
146         zone /= 60;
147         hours = zone / 60;
148         mins = zone % 60;
149
150         printf("%c%02d%02d\n", zsign, hours, mins);
151
152         return 0;
153 }
154
155 /* display or set the time on a host */
156 int net_time(int argc, const char **argv)
157 {
158         time_t t;
159         extern BOOL opt_have_ip;
160         extern struct in_addr opt_dest_ip;
161         extern char *opt_host; 
162         struct functable func[] = {
163                 {"SYSTEM", net_time_system},
164                 {"SET", net_time_set},
165                 {"ZONE", net_time_zone},
166                 {NULL, NULL}
167         };
168
169         if (!opt_host && !opt_have_ip) {
170                 d_printf("You must specify a hostname or IP\n");
171                 net_time_usage(argc,argv);
172                 return -1;
173         }
174
175         if (argc != 0) {
176                 return net_run_function(argc, argv, func, net_time_usage);
177         }
178
179         /* default - print the time */
180         t = cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, NULL);
181         if (t == 0) return -1;
182
183         d_printf("%s", ctime(&t));
184         return 0;
185 }