blob: fde428d97991271b243d6bee4fdef3efcf2e3ae9 [file] [log] [blame]
wdenk6dd652f2003-06-19 23:40:20 +00001/*
2 * (C) Copyright 2003
3 * Murray Jensen, CSIRO-MIT, <Murray.Jensen@csiro.au>
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
22 */
23
24#include <common.h>
Jason Hobbs4d91a6e2011-08-23 11:06:54 +000025#include <linux/ctype.h>
wdenk6dd652f2003-06-19 23:40:20 +000026
Wolfgang Denkd87080b2006-03-31 18:32:53 +020027DECLARE_GLOBAL_DATA_PTR;
28
wdenk6dd652f2003-06-19 23:40:20 +000029/* imports from fetch.c */
30extern int fetch_and_parse (char *, ulong, int (*)(uchar *, uchar *));
31
32/* this is relative to the root of the server's tftp directory */
33static char *def_global_env_path = "/hymod/global_env";
34
35static int
36env_callback (uchar *name, uchar *value)
37{
wdenk6dd652f2003-06-19 23:40:20 +000038 hymod_conf_t *cp = &gd->bd->bi_hymod_conf;
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020039 char ov[CONFIG_SYS_CBSIZE], nv[CONFIG_SYS_CBSIZE], *p, *q, *nn, c, *curver, *newver;
wdenk6dd652f2003-06-19 23:40:20 +000040 int override = 1, append = 0, remove = 0, nnl, ovl, nvl;
41
Wolfgang Denk77ddac92005-10-13 16:45:02 +020042 nn = (char *)name;
wdenk6dd652f2003-06-19 23:40:20 +000043
44 if (*nn == '-') {
45 override = 0;
46 nn++;
47 }
48
Jason Hobbs4d91a6e2011-08-23 11:06:54 +000049 while (isblank(*nn))
wdenk6dd652f2003-06-19 23:40:20 +000050 nn++;
51
52 if ((nnl = strlen (nn)) == 0) {
53 printf ("Empty name in global env file\n");
54 return (0);
55 }
56
57 if ((c = nn[nnl - 1]) == '+' || c == '-') {
58 if (c == '+')
59 append = 1;
60 else
61 remove = 1;
62 nn[--nnl] = '\0';
63 }
64
Jason Hobbs4d91a6e2011-08-23 11:06:54 +000065 while (nnl > 0 && isblank(nn[nnl - 1]))
wdenk6dd652f2003-06-19 23:40:20 +000066 nn[--nnl] = '\0';
67 if (nnl == 0) {
68 printf ("Empty name in global env file\n");
69 return (0);
70 }
71
Wolfgang Denk77ddac92005-10-13 16:45:02 +020072 p = (char *)value;
wdenk6dd652f2003-06-19 23:40:20 +000073 q = nv;
74
Jason Hobbs4d91a6e2011-08-23 11:06:54 +000075 while (isblank(*p))
wdenk6dd652f2003-06-19 23:40:20 +000076 p++;
77
78 nvl = strlen (p);
Jason Hobbs4d91a6e2011-08-23 11:06:54 +000079 while (nvl > 0 && isblank(p[nvl - 1]))
wdenk6dd652f2003-06-19 23:40:20 +000080 p[--nvl] = '\0';
81
82 while ((*q = *p++) != '\0') {
83 if (*q == '%') {
84 switch (*p++) {
85
86 case '\0': /* whoops - back up */
87 p--;
88 break;
89
90 case '%': /* a single percent character */
91 q++;
92 break;
93
94 case 's': /* main board serial number as string */
95 q += sprintf (q, "%010lu",
96 cp->main.eeprom.serno);
97 break;
98
99 case 'S': /* main board serial number as number */
100 q += sprintf (q, "%lu", cp->main.eeprom.serno);
101 break;
102
103 default: /* ignore any others */
104 break;
105 }
106 }
107 else
108 q++;
109 }
110
111 if ((nvl = q - nv) == 0) {
112 setenv (nn, NULL);
113 return (1);
114 }
115
116 if ((curver = getenv ("global_env_version")) == NULL)
117 curver = "unknown";
118
119 if ((newver = getenv ("new_genv_version")) == NULL || \
120 strcmp (curver, newver) == 0) {
121 if (strcmp (nn, "version") == 0)
122 setenv ("new_genv_version", nv);
123 return (1);
124 }
125
126 if ((p = getenv (nn)) != NULL) {
127
128 strcpy (ov, p);
129 ovl = strlen (ov);
130
131 if (append) {
132
133 if (strstr (ov, nv) == NULL) {
134
135 printf ("Appending '%s' to env var '%s'\n",
136 nv, nn);
137
138 while (nvl >= 0) {
139 nv[ovl + 1 + nvl] = nv[nvl];
140 nvl--;
141 }
142
143 nv[ovl] = ' ';
144
145 while (--ovl >= 0)
146 nv[ovl] = ov[ovl];
147
148 setenv (nn, nv);
149 }
150
151 return (1);
152 }
153
154 if (remove) {
155
156 if (strstr (ov, nv) != NULL) {
157
158 printf ("Removing '%s' from env var '%s'\n",
159 nv, nn);
160
161 while ((p = strstr (ov, nv)) != NULL) {
162 q = p + nvl;
163 if (*q == ' ')
164 q++;
165 strcpy(p, q);
166 }
167
168 setenv (nn, ov);
169 }
170
171 return (1);
172 }
173
174 if (!override || strcmp (ov, nv) == 0)
175 return (1);
176
177 printf ("Re-setting env cmd '%s' from '%s' to '%s'\n",
178 nn, ov, nv);
179 }
180 else
181 printf ("Setting env cmd '%s' to '%s'\n", nn, nv);
182
183 setenv (nn, nv);
184 return (1);
185}
186
187void
188hymod_check_env (void)
189{
190 char *p, *path, *curver, *newver;
191 int firsttime = 0, needsave = 0;
192
193 if (getenv ("global_env_loaded") == NULL) {
194 puts ("*** global environment has never been loaded\n");
195 puts ("*** fetching from server");
196 firsttime = 1;
197 }
198 else if ((p = getenv ("always_check_env")) != NULL &&
199 strcmp (p, "yes") == 0)
200 puts ("*** checking for updated global environment");
201 else
202 return;
203
204 puts (" (Control-C to Abort)\n");
205
206 if ((path = getenv ("global_env_path")) == NULL || *path == '\0')
207 path = def_global_env_path;
208
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200209 if (fetch_and_parse (path, CONFIG_SYS_LOAD_ADDR, env_callback) == 0) {
wdenk6dd652f2003-06-19 23:40:20 +0000210 puts ("*** Fetch of global environment failed!\n");
211 return;
212 }
213
214 if ((newver = getenv ("new_genv_version")) == NULL) {
215 puts ("*** Version number not set - contents ignored!\n");
216 return;
217 }
218
219 if ((curver = getenv ("global_env_version")) == NULL || \
220 strcmp (curver, newver) != 0) {
221 setenv ("global_env_version", newver);
222 needsave = 1;
223 }
224 else
225 printf ("*** Global environment up-to-date (ver %s)\n", curver);
226
227 setenv ("new_genv_version", NULL);
228
229 if (firsttime) {
230 setenv ("global_env_loaded", "yes");
231 needsave = 1;
232 }
233
234 if (needsave)
235 puts ("\n*** Remember to run the 'saveenv' "
236 "command to save the changes\n\n");
237}