f6486286a65f466b885fb6e1d96063253adcee9f
[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         struct cli_state *cli = NULL;
32
33         cli = cli_initialise(NULL);
34         if (!cli) goto done;
35
36         if (!cli_connect(cli, host, ip)) {
37                 fprintf(stderr,"Can't contact server\n");
38                 goto done;
39         }
40
41         make_nmb_name(&calling, global_myname(), 0x0);
42         if (host) {
43                 make_nmb_name(&called, host, 0x20);
44         } else {
45                 make_nmb_name(&called, "*SMBSERVER", 0x20);
46         }
47
48         if (!cli_session_request(cli, &calling, &called)) {
49                 fprintf(stderr,"Session request failed\n");
50                 goto done;
51         }
52         if (!cli_negprot(cli)) {
53                 fprintf(stderr,"Protocol negotiation failed\n");
54                 goto done;
55         }
56
57         ret = cli->servertime;
58         if (zone) *zone = cli->serverzone;
59
60 done:
61         if (cli) cli_shutdown(cli);
62         return ret;
63 }
64
65 /* find the servers time on the opt_host host */
66 static time_t nettime(int *zone)
67 {
68         return cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, zone);
69 }
70
71 /* return a time as a string ready to be passed to /bin/date */
72 static const char *systime(time_t t)
73 {
74         static fstring s;
75         struct tm *tm;
76
77         tm = localtime(&t);
78         if (!tm) {
79                 return "unknown";
80         }
81         
82         fstr_sprintf(s, "%02d%02d%02d%02d%04d.%02d", 
83                  tm->tm_mon+1, tm->tm_mday, tm->tm_hour, 
84                  tm->tm_min, tm->tm_year + 1900, tm->tm_sec);
85         return s;
86 }
87
88 int net_time_usage(int argc, const char **argv)
89 {
90         d_printf(
91 "net time\n\tdisplays time on a server\n\n"\
92 "net time system\n\tdisplays time on a server in a format ready for /bin/date\n\n"\
93 "net time set\n\truns /bin/date with the time from the server\n\n"\
94 "net time zone\n\tdisplays the timezone in hours from GMT on the remote computer\n\n"\
95 "\n");
96         net_common_flags_usage(argc, argv);
97         return -1;
98 }
99
100 /* try to set the system clock using /bin/date */
101 static int net_time_set(int argc, const char **argv)
102 {
103         time_t t = nettime(NULL);
104         char *cmd;
105         int result;
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         result = system(cmd);
114         if (result)
115                 d_fprintf(stderr, "%s failed.  Error was (%s)\n",
116                         cmd, strerror(errno));
117         free(cmd);
118
119         return result;
120 }
121
122 /* display the time on a remote box in a format ready for /bin/date */
123 static int net_time_system(int argc, const char **argv)
124 {
125         time_t t = nettime(NULL);
126
127         if (t == 0) return -1;
128
129         printf("%s\n", systime(t));
130
131         return 0;
132 }
133
134 /* display the time on a remote box in a format ready for /bin/date */
135 static int net_time_zone(int argc, const char **argv)
136 {
137         int zone = 0;
138         int hours, mins;
139         char zsign;
140         time_t t;
141
142         t = nettime(&zone);
143
144         if (t == 0) return -1;
145
146         zsign = (zone > 0) ? '-' : '+';
147         if (zone < 0) zone = -zone;
148
149         zone /= 60;
150         hours = zone / 60;
151         mins = zone % 60;
152
153         printf("%c%02d%02d\n", zsign, hours, mins);
154
155         return 0;
156 }
157
158 /* display or set the time on a host */
159 int net_time(int argc, const char **argv)
160 {
161         time_t t;
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             !find_master_ip(opt_target_workgroup, &opt_dest_ip)) {
171                 d_fprintf(stderr, "Could not locate a time server.  Try "\
172                                  "specifying a target host.\n");
173                 net_time_usage(argc,argv);
174                 return -1;
175         }
176
177         if (argc != 0) {
178                 return net_run_function(argc, argv, func, net_time_usage);
179         }
180
181         /* default - print the time */
182         t = cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, NULL);
183         if (t == 0) return -1;
184
185         d_printf("%s", ctime(&t));
186         return 0;
187 }