Initial import
[samba] / source / 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 char *systime(time_t t)
73 {
74         static fstring s;
75         struct tm *tm;
76
77         tm = localtime(&t);
78         
79         fstr_sprintf(s, "%02d%02d%02d%02d%04d.%02d", 
80                  tm->tm_mon+1, tm->tm_mday, tm->tm_hour, 
81                  tm->tm_min, tm->tm_year + 1900, tm->tm_sec);
82         return s;
83 }
84
85 int net_time_usage(int argc, const char **argv)
86 {
87         d_printf(
88 "net time\n\tdisplays time on a server\n\n"\
89 "net time system\n\tdisplays time on a server in a format ready for /bin/date\n\n"\
90 "net time set\n\truns /bin/date with the time from the server\n\n"\
91 "net time zone\n\tdisplays the timezone in hours from GMT on the remote computer\n\n"\
92 "\n");
93         net_common_flags_usage(argc, argv);
94         return -1;
95 }
96
97 /* try to set the system clock using /bin/date */
98 static int net_time_set(int argc, const char **argv)
99 {
100         time_t t = nettime(NULL);
101         char *cmd;
102         int result;
103
104         if (t == 0) return -1;
105         
106         /* yes, I know this is cheesy. Use "net time system" if you want to 
107            roll your own. I'm putting this in as it works on a large number
108            of systems and the user has a choice in whether its used or not */
109         asprintf(&cmd, "/bin/date %s", systime(t));
110         result = system(cmd);
111         if (result)
112                 d_fprintf(stderr, "%s failed.  Error was (%s)\n",
113                         cmd, strerror(errno));
114         free(cmd);
115
116         return result;
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         struct functable func[] = {
160                 {"SYSTEM", net_time_system},
161                 {"SET", net_time_set},
162                 {"ZONE", net_time_zone},
163                 {NULL, NULL}
164         };
165
166         if (!opt_host && !opt_have_ip && 
167             !find_master_ip(opt_target_workgroup, &opt_dest_ip)) {
168                 d_fprintf(stderr, "Could not locate a time server.  Try "\
169                                  "specifying a target host.\n");
170                 net_time_usage(argc,argv);
171                 return -1;
172         }
173
174         if (argc != 0) {
175                 return net_run_function(argc, argv, func, net_time_usage);
176         }
177
178         /* default - print the time */
179         t = cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, NULL);
180         if (t == 0) return -1;
181
182         d_printf("%s", ctime(&t));
183         return 0;
184 }