Add qemu 2.4.0

[kvmfornfv.git] / qemu / roms / u-boot / board / hymod / env.c

diff --git a/qemu/roms/u-boot/board/hymod/env.c b/qemu/roms/u-boot/board/hymod/env.c
new file mode 100644 (file)
index 0000000..66c5115
--- /dev/null
+++ b/qemu/roms/u-boot/board/hymod/env.c
@@ -0,0 +1,221 @@
+/*
+ * (C) Copyright 2003
+ * Murray Jensen, CSIRO-MIT, <Murray.Jensen@csiro.au>
+ *
+ * SPDX-License-Identifier:    GPL-2.0+
+ */
+
+#include <common.h>
+#include <linux/ctype.h>
+
+DECLARE_GLOBAL_DATA_PTR;
+
+/* imports from fetch.c */
+extern int fetch_and_parse (char *, ulong, int (*)(uchar *, uchar *));
+
+/* this is relative to the root of the server's tftp directory */
+static char *def_global_env_path = "/hymod/global_env";
+
+static int
+env_callback (uchar *name, uchar *value)
+{
+       hymod_conf_t *cp = &gd->bd->bi_hymod_conf;
+       char ov[CONFIG_SYS_CBSIZE], nv[CONFIG_SYS_CBSIZE], *p, *q, *nn, c, *curver, *newver;
+       int override = 1, append = 0, remove = 0, nnl, ovl, nvl;
+
+       nn = (char *)name;
+
+       if (*nn == '-') {
+               override = 0;
+               nn++;
+       }
+
+       while (isblank(*nn))
+               nn++;
+
+       if ((nnl = strlen (nn)) == 0) {
+               printf ("Empty name in global env file\n");
+               return (0);
+       }
+
+       if ((c = nn[nnl - 1]) == '+' || c == '-') {
+               if (c == '+')
+                       append = 1;
+               else
+                       remove = 1;
+               nn[--nnl] = '\0';
+       }
+
+       while (nnl > 0 && isblank(nn[nnl - 1]))
+               nn[--nnl] = '\0';
+       if (nnl == 0) {
+               printf ("Empty name in global env file\n");
+               return (0);
+       }
+
+       p = (char *)value;
+       q = nv;
+
+       while (isblank(*p))
+               p++;
+
+       nvl = strlen (p);
+       while (nvl > 0 && isblank(p[nvl - 1]))
+               p[--nvl] = '\0';
+
+       while ((*q = *p++) != '\0') {
+               if (*q == '%') {
+                       switch (*p++) {
+
+                       case '\0':      /* whoops - back up */
+                               p--;
+                               break;
+
+                       case '%':       /* a single percent character */
+                               q++;
+                               break;
+
+                       case 's':       /* main board serial number as string */
+                               q += sprintf (q, "%010lu",
+                                       cp->main.eeprom.serno);
+                               break;
+
+                       case 'S':       /* main board serial number as number */
+                               q += sprintf (q, "%lu", cp->main.eeprom.serno);
+                               break;
+
+                       default:        /* ignore any others */
+                               break;
+                       }
+               }
+               else
+                       q++;
+       }
+
+       if ((nvl = q - nv) == 0) {
+               setenv (nn, NULL);
+               return (1);
+       }
+
+       if ((curver = getenv ("global_env_version")) == NULL)
+               curver = "unknown";
+
+       if ((newver = getenv ("new_genv_version")) == NULL || \
+           strcmp (curver, newver) == 0) {
+               if (strcmp (nn, "version") == 0)
+                       setenv ("new_genv_version", nv);
+               return (1);
+       }
+
+       if ((p = getenv (nn)) != NULL) {
+
+               strcpy (ov, p);
+               ovl = strlen (ov);
+
+               if (append) {
+
+                       if (strstr (ov, nv) == NULL) {
+
+                               printf ("Appending '%s' to env var '%s'\n",
+                                       nv, nn);
+
+                               while (nvl >= 0) {
+                                       nv[ovl + 1 + nvl] = nv[nvl];
+                                       nvl--;
+                               }
+
+                               nv[ovl] = ' ';
+
+                               while (--ovl >= 0)
+                                       nv[ovl] = ov[ovl];
+
+                               setenv (nn, nv);
+                       }
+
+                       return (1);
+               }
+
+               if (remove) {
+
+                       if (strstr (ov, nv) != NULL) {
+
+                               printf ("Removing '%s' from env var '%s'\n",
+                                       nv, nn);
+
+                               while ((p = strstr (ov, nv)) != NULL) {
+                                       q = p + nvl;
+                                       if (*q == ' ')
+                                               q++;
+                                       strcpy(p, q);
+                               }
+
+                               setenv (nn, ov);
+                       }
+
+                       return (1);
+               }
+
+               if (!override || strcmp (ov, nv) == 0)
+                       return (1);
+
+               printf ("Re-setting env cmd '%s' from '%s' to '%s'\n",
+                       nn, ov, nv);
+       }
+       else
+               printf ("Setting env cmd '%s' to '%s'\n", nn, nv);
+
+       setenv (nn, nv);
+       return (1);
+}
+
+void
+hymod_check_env (void)
+{
+       char *p, *path, *curver, *newver;
+       int firsttime = 0, needsave = 0;
+
+       if (getenv ("global_env_loaded") == NULL) {
+               puts ("*** global environment has never been loaded\n");
+               puts ("*** fetching from server");
+               firsttime = 1;
+       }
+       else if ((p = getenv ("always_check_env")) != NULL &&
+           strcmp (p, "yes") == 0)
+               puts ("*** checking for updated global environment");
+       else
+               return;
+
+       puts (" (Control-C to Abort)\n");
+
+       if ((path = getenv ("global_env_path")) == NULL || *path == '\0')
+               path = def_global_env_path;
+
+       if (fetch_and_parse (path, CONFIG_SYS_LOAD_ADDR, env_callback) == 0) {
+               puts ("*** Fetch of global environment failed!\n");
+               return;
+       }
+
+       if ((newver = getenv ("new_genv_version")) == NULL) {
+               puts ("*** Version number not set - contents ignored!\n");
+               return;
+       }
+
+       if ((curver = getenv ("global_env_version")) == NULL || \
+           strcmp (curver, newver) != 0) {
+               setenv ("global_env_version", newver);
+               needsave = 1;
+       }
+       else
+               printf ("*** Global environment up-to-date (ver %s)\n", curver);
+
+       setenv ("new_genv_version", NULL);
+
+       if (firsttime) {
+               setenv ("global_env_loaded", "yes");
+               needsave = 1;
+       }
+
+       if (needsave)
+               puts ("\n*** Remember to run the 'saveenv' "
+                       "command to save the changes\n\n");
+}