r23784: use the GPLv3 boilerplate as recommended by the FSF and the license text
[tprouty/samba.git] / 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 3 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, see <http://www.gnu.org/licenses/>.  */
18
19 #include "includes.h"
20 #include "utils/net.h"
21
22
23 /*
24   return the time on a server. This does not require any authentication
25 */
26 static time_t cli_servertime(const char *host, struct in_addr *ip, int *zone)
27 {
28         struct nmb_name calling, called;
29         time_t ret = 0;
30         struct cli_state *cli = NULL;
31         NTSTATUS status;
32
33         cli = cli_initialise();
34         if (!cli) {
35                 goto done;
36         }
37
38         status = cli_connect(cli, host, ip);
39         if (!NT_STATUS_IS_OK(status)) {
40                 fprintf(stderr,"Can't contact server %s. Error %s\n", host, nt_errstr(status));
41                 goto done;
42         }
43
44         make_nmb_name(&calling, global_myname(), 0x0);
45         if (host) {
46                 make_nmb_name(&called, host, 0x20);
47         } else {
48                 make_nmb_name(&called, "*SMBSERVER", 0x20);
49         }
50
51         if (!cli_session_request(cli, &calling, &called)) {
52                 fprintf(stderr,"Session request failed\n");
53                 goto done;
54         }
55         if (!cli_negprot(cli)) {
56                 fprintf(stderr,"Protocol negotiation failed\n");
57                 goto done;
58         }
59
60         ret = cli->servertime;
61         if (zone) *zone = cli->serverzone;
62
63 done:
64         if (cli) {
65                 cli_shutdown(cli);
66         }
67         return ret;
68 }
69
70 /* find the servers time on the opt_host host */
71 static time_t nettime(int *zone)
72 {
73         return cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, zone);
74 }
75
76 /* return a time as a string ready to be passed to /bin/date */
77 static const char *systime(time_t t)
78 {
79         static fstring s;
80         struct tm *tm;
81
82         tm = localtime(&t);
83         if (!tm) {
84                 return "unknown";
85         }
86         
87         fstr_sprintf(s, "%02d%02d%02d%02d%04d.%02d", 
88                  tm->tm_mon+1, tm->tm_mday, tm->tm_hour, 
89                  tm->tm_min, tm->tm_year + 1900, tm->tm_sec);
90         return s;
91 }
92
93 int net_time_usage(int argc, const char **argv)
94 {
95         d_printf(
96 "net time\n\tdisplays time on a server\n\n"\
97 "net time system\n\tdisplays time on a server in a format ready for /bin/date\n\n"\
98 "net time set\n\truns /bin/date with the time from the server\n\n"\
99 "net time zone\n\tdisplays the timezone in hours from GMT on the remote computer\n\n"\
100 "\n");
101         net_common_flags_usage(argc, argv);
102         return -1;
103 }
104
105 /* try to set the system clock using /bin/date */
106 static int net_time_set(int argc, const char **argv)
107 {
108         time_t t = nettime(NULL);
109         char *cmd;
110         int result;
111
112         if (t == 0) return -1;
113         
114         /* yes, I know this is cheesy. Use "net time system" if you want to 
115            roll your own. I'm putting this in as it works on a large number
116            of systems and the user has a choice in whether its used or not */
117         asprintf(&cmd, "/bin/date %s", systime(t));
118         result = system(cmd);
119         if (result)
120                 d_fprintf(stderr, "%s failed.  Error was (%s)\n",
121                         cmd, strerror(errno));
122         free(cmd);
123
124         return result;
125 }
126
127 /* display the time on a remote box in a format ready for /bin/date */
128 static int net_time_system(int argc, const char **argv)
129 {
130         time_t t = nettime(NULL);
131
132         if (t == 0) return -1;
133
134         printf("%s\n", systime(t));
135
136         return 0;
137 }
138
139 /* display the time on a remote box in a format ready for /bin/date */
140 static int net_time_zone(int argc, const char **argv)
141 {
142         int zone = 0;
143         int hours, mins;
144         char zsign;
145         time_t t;
146
147         t = nettime(&zone);
148
149         if (t == 0) return -1;
150
151         zsign = (zone > 0) ? '-' : '+';
152         if (zone < 0) zone = -zone;
153
154         zone /= 60;
155         hours = zone / 60;
156         mins = zone % 60;
157
158         printf("%c%02d%02d\n", zsign, hours, mins);
159
160         return 0;
161 }
162
163 /* display or set the time on a host */
164 int net_time(int argc, const char **argv)
165 {
166         time_t t;
167         struct functable func[] = {
168                 {"SYSTEM", net_time_system},
169                 {"SET", net_time_set},
170                 {"ZONE", net_time_zone},
171                 {NULL, NULL}
172         };
173
174         if (!opt_host && !opt_have_ip && 
175             !find_master_ip(opt_target_workgroup, &opt_dest_ip)) {
176                 d_fprintf(stderr, "Could not locate a time server.  Try "\
177                                  "specifying a target host.\n");
178                 net_time_usage(argc,argv);
179                 return -1;
180         }
181
182         if (argc != 0) {
183                 return net_run_function(argc, argv, func, net_time_usage);
184         }
185
186         /* default - print the time */
187         t = cli_servertime(opt_host, opt_have_ip? &opt_dest_ip : NULL, NULL);
188         if (t == 0) return -1;
189
190         d_printf("%s", ctime(&t));
191         return 0;
192 }