Diff for /embedtools/src/cfexec.c between versions 1.5 and 1.5.20.8

version 1.5, 2014/02/05 15:44:05 version 1.5.20.8, 2018/01/02 01:46:03
Line 12  terms: Line 12  terms:
 All of the documentation and software included in the ELWIX and AITNET  All of the documentation and software included in the ELWIX and AITNET
 Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>  Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
   
Copyright 2004 - 2014Copyright 2004 - 2018
         by Michael Pounov <misho@elwix.org>.  All rights reserved.          by Michael Pounov <misho@elwix.org>.  All rights reserved.
   
 Redistribution and use in source and binary forms, with or without  Redistribution and use in source and binary forms, with or without
Line 48  SUCH DAMAGE. Line 48  SUCH DAMAGE.
   
 cfg_root_t cfg;  cfg_root_t cfg;
 int Verbose, Timeout, kq;  int Verbose, Timeout, kq;
ait_val_t User, Mount, Dev, Chroot;ait_val_t User, Mount, Chroot;
char szSess[MAXPATHLEN], szConfig[MAXPATHLEN];char szSess[MAXPATHLEN], szSLCK[MAXPATHLEN], szConfig[MAXPATHLEN];
 extern char compiled[], compiledby[], compilehost[];  extern char compiled[], compiledby[], compilehost[];
   
   
Line 63  Usage() Line 63  Usage()
                 "\t-v\t\tVerbose ...\n"                  "\t-v\t\tVerbose ...\n"
                 "\t-c <dir>\tAfter execute chroot to dir [default=/]\n"                  "\t-c <dir>\tAfter execute chroot to dir [default=/]\n"
                 "\t-u <user>\tAfter execute suid to user [default=root]\n"                  "\t-u <user>\tAfter execute suid to user [default=root]\n"
                 "\t-d <dev>\tOther device [default=/dev/ufs/elwix]\n"  
                 "\t-m <mnt>\tOther mount dir [default=/]\n"                  "\t-m <mnt>\tOther mount dir [default=/]\n"
                 "\t-t <sec>\tTimeout for autolock mount dir after seconds [default=300]\n"                  "\t-t <sec>\tTimeout for autolock mount dir after seconds [default=300]\n"
                   "\t-L <reason>\tService lock and set RW state of device with reason\n"
                   "\t-U \t\tService unlock and set RO state of device\n"
                 "\n", compiled, compiledby, compilehost);                  "\n", compiled, compiledby, compilehost);
 }  }
   
   struct statfs *
   getmntpt(const char *name)
   {
           struct statfs *mntbuf;
           int i, mntsize;
   
           mntsize = getmntinfo(&mntbuf, MNT_NOWAIT);
           for (i = mntsize - 1; i >= 0; i--) {
                   if (!strcmp(mntbuf[i].f_mntfromname, name) ||
                       !strcmp(mntbuf[i].f_mntonname, name))
                           return &mntbuf[i];
           }
   
           return NULL;
   }
   
 static int  static int
 update(int flags)  update(int flags)
 {  {
         struct ufs_args mnt;          struct ufs_args mnt;
           struct statfs *mntfs = getmntpt(AIT_GET_STR(&Mount));
   
         memset(&mnt, 0, sizeof mnt);          memset(&mnt, 0, sizeof mnt);
        mnt.fspec = AIT_GET_STR(&Dev);        mnt.fspec = mntfs->f_mntfromname;
 #ifdef __NetBSD__  #ifdef __NetBSD__
        if (mount("ufs", AIT_GET_STR(&Mount), flags, &mnt, sizeof mnt) == -1) {        if (mount(mntfs->f_fstypename, mntfs->f_mntonname, flags, &mnt, sizeof mnt) == -1) {
 #else  #else
        if (mount("ufs", AIT_GET_STR(&Mount), flags, &mnt) == -1) {        if (mount(mntfs->f_fstypename, mntfs->f_mntonname, flags, &mnt) == -1) {
 #endif  #endif
                 printf("Error:: can`t update mount %s #%d - %s\n", AIT_GET_STR(&Mount),                   printf("Error:: can`t update mount %s #%d - %s\n", AIT_GET_STR(&Mount), 
                                 errno, strerror(errno));                                  errno, strerror(errno));
                 return -1;                  return -1;
         }          }
   
        VERB(5) printf("Info(5):: safe mount for device %s to %s operation (%s)\n",         VERB(5) printf("Info(5):: safe mount %s for device %s to %s operation (%s)\n", 
                        AIT_GET_STR(&Dev), AIT_GET_STR(&Mount), (flags & MNT_RDONLY) ? "ro" : "rw");                        mntfs->f_fstypename, mntfs->f_mntfromname, mntfs->f_mntonname, 
                         (flags & MNT_RDONLY) ? "ro" : "rw");
         return 0;          return 0;
 }  }
   
Line 124  mkevent(struct kevent *chg, struct kevent *evt) Line 143  mkevent(struct kevent *chg, struct kevent *evt)
         }          }
         VERB(3) printf("Created lock file %s\n", szSess);          VERB(3) printf("Created lock file %s\n", szSess);
   
        kq = kqueue();        if (chg && evt) {
        if (kq == -1) {                kq = kqueue();
                printf("Error:: can`t execute safe mount #%d - %s\n", errno, strerror(errno));                if (kq == -1) {
                close(f);                        printf("Error:: can`t execute safe mount #%d - %s\n", errno, strerror(errno));
                unlink(szSess);                        close(f);
                return -1;                        unlink(szSess);
        } else {                        return -1;
                memset(chg, 0, sizeof(struct kevent));                } else {
                memset(evt, 0, sizeof(struct kevent));                        memset(chg, 0, sizeof(struct kevent));
                         memset(evt, 0, sizeof(struct kevent));
   
                EV_SET(chg, f, EVFILT_VNODE, EV_ADD, NOTE_DELETE | NOTE_RENAME | NOTE_REVOKE,                         EV_SET(chg, f, EVFILT_VNODE, EV_ADD, NOTE_DELETE | NOTE_RENAME | NOTE_REVOKE, 
                                0, NULL);                                        0, NULL);
                 }
         }          }
   
         return f;          return f;
Line 145  static void Line 166  static void
 cleanexit()  cleanexit()
 {  {
         AIT_FREE_VAL(&User);          AIT_FREE_VAL(&User);
         AIT_FREE_VAL(&Dev);  
         AIT_FREE_VAL(&Mount);          AIT_FREE_VAL(&Mount);
         AIT_FREE_VAL(&Chroot);          AIT_FREE_VAL(&Chroot);
   
         cfgUnloadConfig(&cfg);          cfgUnloadConfig(&cfg);
 }  }
   
   static int
   s_unlck()
   {
           if (access(szSLCK, F_OK))
                   return 2;
   
           if (access(szSess, F_OK) && update(MNT_UPDATE | MNT_RDONLY) == -1)
                   return 8;
   
           unlink(szSLCK);
           VERB(3) printf("Unlock & deleted service lock file %s\n", szSLCK);
           return 0;
   }
   
   static int
   s_lck(const char *reason)
   {
           int f;
           char szStr[STRSIZ];
   
           if (!access(szSLCK, F_OK)) {
                   printf("cfexec already held service lock ...\n");
                   return 127;
           }
   
           f = open(szSLCK, O_CREAT | O_WRONLY | O_TRUNC, 0644);
           if (f == -1) {
                   printf("Error:: can`t service lock session #%d - %s\n", errno, strerror(errno));
                   return 4;
           } else {
                   memset(szStr, 0, sizeof szStr);
                   snprintf(szStr, sizeof szStr, "[%d] - %s", getpid(), reason);
                   write(f, szStr, strlen(szStr));
           }
           close(f);
   
           if (update(MNT_UPDATE) == -1) {
                   unlink(szSLCK);
                   return 5;
           }
   
           VERB(3) printf("Lock & created service lock file %s\n", szSLCK);
           return 0;
   }
   
   
 int  int
 main(int argc, char **argv)  main(int argc, char **argv)
 {  {
        char ch;        char ch, mod = 0, reason[STRSIZ];
         const char *err = NULL;          const char *err = NULL;
         struct kevent chg, evt;          struct kevent chg, evt;
         struct timespec ts;          struct timespec ts;
         pid_t pid;          pid_t pid;
        int f, stat = 0;        int f, ret = 0, stat = 0;
   
         strlcpy(szConfig, DEFAULT_CONFIG, MAXPATHLEN);          strlcpy(szConfig, DEFAULT_CONFIG, MAXPATHLEN);
         /* Load variables from config if exists */          /* Load variables from config if exists */
Line 180  main(int argc, char **argv) Line 245  main(int argc, char **argv)
                 }                  }
                 cfg_loadAttribute(&cfg, "cfexec", "suid", &User, DEFAULT_USER);                  cfg_loadAttribute(&cfg, "cfexec", "suid", &User, DEFAULT_USER);
                 cfg_loadAttribute(&cfg, "cfexec", "mount", &Mount, DEFAULT_MOUNT);                  cfg_loadAttribute(&cfg, "cfexec", "mount", &Mount, DEFAULT_MOUNT);
                 cfg_loadAttribute(&cfg, "cfexec", "device", &Dev, DEFAULT_DEVICE);  
                 cfg_loadAttribute(&cfg, "cfexec", "chroot", &Chroot, DEFAULT_CHROOT);                  cfg_loadAttribute(&cfg, "cfexec", "chroot", &Chroot, DEFAULT_CHROOT);
   
                 cfgUnloadConfig(&cfg);                  cfgUnloadConfig(&cfg);
Line 188  main(int argc, char **argv) Line 252  main(int argc, char **argv)
                 Timeout = atoi(DEFAULT_TIMEOUT);                  Timeout = atoi(DEFAULT_TIMEOUT);
                 AIT_SET_STR(&User, DEFAULT_USER);                  AIT_SET_STR(&User, DEFAULT_USER);
                 AIT_SET_STR(&Mount, DEFAULT_MOUNT);                  AIT_SET_STR(&Mount, DEFAULT_MOUNT);
                 AIT_SET_STR(&Dev, DEFAULT_DEVICE);  
                 AIT_SET_STR(&Chroot, DEFAULT_CHROOT);                  AIT_SET_STR(&Chroot, DEFAULT_CHROOT);
         }          }
   
         atexit(cleanexit);          atexit(cleanexit);
   
         /* Load variables from arguments if exists */          /* Load variables from arguments if exists */
        while ((ch = getopt(argc, argv, "hvu:c:d:m:t:")) != -1)        while ((ch = getopt(argc, argv, "hvUu:c:m:t:L:")) != -1)
                 switch (ch) {                  switch (ch) {
                         case 'v':                          case 'v':
                                 Verbose++;                                  Verbose++;
Line 206  main(int argc, char **argv) Line 269  main(int argc, char **argv)
                         case 'c':                          case 'c':
                                 AIT_SET_STR(&Chroot, optarg);                                  AIT_SET_STR(&Chroot, optarg);
                                 break;                                  break;
                         case 'd':  
                                 AIT_SET_STR(&Dev, optarg);  
                                 break;  
                         case 'm':                          case 'm':
                                 AIT_SET_STR(&Mount, optarg);                                  AIT_SET_STR(&Mount, optarg);
                                 break;                                  break;
                           case 'L':
                                   strlcpy(reason, optarg, sizeof reason);
                                   mod = 1;
                                   break;
                           case 'U':
                                   mod = -1;
                                   break;
                         case 't':                          case 't':
 #ifndef HAVE_STRTONUM  #ifndef HAVE_STRTONUM
                                 Timeout = (int) strtol(optarg, NULL, 0);                                  Timeout = (int) strtol(optarg, NULL, 0);
Line 234  main(int argc, char **argv) Line 301  main(int argc, char **argv)
   
         memset(szSess, 0, MAXPATHLEN);          memset(szSess, 0, MAXPATHLEN);
         snprintf(szSess, MAXPATHLEN, "%s%s-cfexec.LCK", DEFAULT_TMP, AIT_GET_STR(&Mount));          snprintf(szSess, MAXPATHLEN, "%s%s-cfexec.LCK", DEFAULT_TMP, AIT_GET_STR(&Mount));
           memset(szSLCK, 0, MAXPATHLEN);
           snprintf(szSLCK, MAXPATHLEN, "%s%s-SYS-cfexec.LCK", DEFAULT_TMP, AIT_GET_STR(&Mount));
   
        VERB(3) printf("Info(3):: Chroot=%s SUID=%s Device=%s Mount=%s Timeout=%d Session=%s\n",         /* we have request for service lock! */
                        AIT_GET_STR(&Chroot), AIT_GET_STR(&User), AIT_GET_STR(&Dev),         if (mod) {
                 VERB(3) printf("Info(3):: mode=%hhd\n", mod);
                 if (mod == -1)
                         ret = s_unlck();
                 else
                         ret = s_lck(reason);
                 return ret;
         }
 
         VERB(3) printf("Info(3):: Chroot=%s SUID=%s Mount=%s Timeout=%d Session=%s\n", 
                         AIT_GET_STR(&Chroot), AIT_GET_STR(&User), 
                         AIT_GET_STR(&Mount), Timeout, szSess);                          AIT_GET_STR(&Mount), Timeout, szSess);
   
         if (!access(szSess, F_OK)) {          if (!access(szSess, F_OK)) {
Line 254  main(int argc, char **argv) Line 333  main(int argc, char **argv)
                                 VERB(5) printf("Info(5):: Go safe mount.\n");                                  VERB(5) printf("Info(5):: Go safe mount.\n");
                                 setsid();                                  setsid();
   
                                if (update(MNT_UPDATE) == -1)                                if ((f = mkevent(&chg, &evt)) == -1)
                                         return 4;                                          return 4;
   
                                if ((f = mkevent(&chg, &evt)) == -1)                                if (update(MNT_UPDATE) == -1) {
                                        return 5;                                        stat = 5;
                                         goto skip;
                                 }
   
                                 if (Timeout) {                                  if (Timeout) {
                                         memset(&ts, 0, sizeof ts);                                          memset(&ts, 0, sizeof ts);
Line 271  main(int argc, char **argv) Line 352  main(int argc, char **argv)
                                                 stat = 7;                                                  stat = 7;
                                                 break;                                                  break;
                                         case 0:                                          case 0:
                                                   if (!access(szSLCK, F_OK)) {
                                                           VERB(1) printf("Timeout reached - service locked\n");
                                                           break;
                                                   }
                                                 VERB(1) printf("Timeout reached - secure mount\n");                                                  VERB(1) printf("Timeout reached - secure mount\n");
                                         default:                                          default:
                                                 VERB(1) printf("Lock file is deleted - secure mount\n");                                                  VERB(1) printf("Lock file is deleted - secure mount\n");
                                                if (update(MNT_UPDATE | MNT_RDONLY) == -1)                                                if (access(szSLCK, F_OK) && update(MNT_UPDATE | MNT_RDONLY) == -1)
                                                         stat = 8;                                                          stat = 8;
                                 }                                  }
skip:
                                 close(kq);                                  close(kq);
                                 close(f);                                  close(f);
                                 unlink(szSess);                                  unlink(szSess);
Line 291  main(int argc, char **argv) Line 376  main(int argc, char **argv)
                 sigprocmask(SIG_BLOCK, &sig, &oldsig);                  sigprocmask(SIG_BLOCK, &sig, &oldsig);
                 */                  */
   
                if (update(MNT_UPDATE) == -1)                if ((f = mkevent(NULL, NULL)) == -1)
                         return 4;                          return 4;
                   else
                           close(f);
   
                   if (update(MNT_UPDATE) == -1) {
                           unlink(szSess);
                           return 5;
                   }
   
                 switch ((pid = vfork())) {                  switch ((pid = vfork())) {
                         case -1:                          case -1:
                                 printf("Error:: can`t execute safe mount #%d - %s\n",                                   printf("Error:: can`t execute safe mount #%d - %s\n", 
                                                 errno, strerror(errno));                                                  errno, strerror(errno));
                                return 5;                                stat = 3;
                                 break;
                         case 0:                          case 0:
                                 VERB(5) printf("Go to running process %s\n", *argv);                                  VERB(5) printf("Go to running process %s\n", *argv);
                                 if (chroot(AIT_GET_STR(&Chroot)) == -1) {                                  if (chroot(AIT_GET_STR(&Chroot)) == -1) {
Line 311  main(int argc, char **argv) Line 404  main(int argc, char **argv)
                                         /* chdir("/"); */                                          /* chdir("/"); */
                                         execvp(*argv, argv);                                          execvp(*argv, argv);
                                 }                                  }
                                exit(127);                                _exit(127);
                                 break;                                  break;
                         default:                          default:
                                 waitpid(pid, &stat, 0);                                  waitpid(pid, &stat, 0);
                                   stat = WEXITSTATUS(stat);
                                 VERB(3) printf("Return code: %d\n", stat);                                  VERB(3) printf("Return code: %d\n", stat);
                                 if (stat == 32512)   
                                         stat = 127;  
   
                                if (update(MNT_UPDATE | MNT_RDONLY) == -1)                                if (access(szSLCK, F_OK) && update(MNT_UPDATE | MNT_RDONLY) == -1)
                                        return 8;                                        stat = 8;
                                 break;
                 }                  }
   
                   unlink(szSess);
         }          }
   
         return stat;          return stat;

Removed from v.1.5  
changed lines
  Added in v.1.5.20.8


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>