6a0e2c12f38fca0281bd6ffe109ad1459d684a1f
[util-vserver.git] / util-vserver / lib / getvserverctx.c
1 // $Id$    --*- c -*--
2
3 // Copyright (C) 2003 Enrico Scholz <enrico.scholz@informatik.tu-chemnitz.de>
4 //  
5 // This program is free software; you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation; version 2 of the License.
8 //  
9 // This program is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 // GNU General Public License for more details.
13 //  
14 // You should have received a copy of the GNU General Public License
15 // along with this program; if not, write to the Free Software
16 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17
18
19 #ifdef HAVE_CONFIG_H
20 #  include <config.h>
21 #endif
22
23 #include "vserver.h"
24 #include "pathconfig.h"
25 #include "compat-c99.h"
26 #include "lib_internal/util.h"
27
28 #include <sys/types.h>
29 #include <sys/stat.h>
30 #include <fcntl.h>
31 #include <errno.h>
32 #include <string.h>
33 #include <unistd.h>
34
35 #ifdef VC_ENABLE_API_COMPAT
36 #include <fcntl.h>
37
38 static xid_t
39 extractLegacyXID(char const *dir, char const *basename)
40 {
41   size_t        l1 = strlen(dir);
42   size_t        l2 = strlen(basename);
43   char          path[l1 + l2 + sizeof("/.ctx")];
44   char *        ptr = path;
45   int           fd;
46   ssize_t       len;
47   xid_t         result = VC_NOXID;
48
49   ptr    = Xmemcpy(ptr, dir, l1);
50   *ptr++ = '/';
51   ptr    = Xmemcpy(ptr, basename, l2);
52   ptr    = Xmemcpy(ptr, ".ctx",    5);
53
54   fd = open(path, O_RDONLY);
55   if (fd==-1) return VC_NOXID;
56
57   len = lseek(fd, 0, SEEK_END);
58
59   if (len!=-1 && lseek(fd, 0, SEEK_SET)!=-1) {
60     char        buf[len+2];
61     char const  *pos = 0;
62
63     buf[0] = '\n';
64     
65     if (read(fd, buf+1, len+1)==len) {
66       buf[len+1] = '\0';
67       pos        = strstr(buf, "\nS_CONTEXT=");
68     }
69
70     if (pos) pos += 11;
71     if (*pos>='1' && *pos<='9')
72       result = atoi(pos);
73   }
74
75   close(fd);
76   return result;
77 }
78 #else
79 static xid_t
80 extractLegacyXID(char const UNUSED *dir, char const UNUSED *basename)
81 {
82   return VC_NOXID;
83 }
84 #endif
85
86
87 static xid_t
88 getCtxFromFile(char const *pathname)
89 {
90   int           fd;
91   off_t         len;
92
93   fd = open(pathname, O_RDONLY);
94
95   if (fd==-1) return VC_NOCTX;
96   if ((len=lseek(fd, 0, SEEK_END))==-1 ||
97       (len>50) ||
98       (lseek(fd, 0, SEEK_SET)==-1)) {
99     close(fd);
100     return VC_NOCTX;
101   }
102
103   {
104   char          buf[len+1];
105   char          *errptr;
106   xid_t         res;
107   
108   if (TEMP_FAILURE_RETRY(read(fd, buf, len+1))!=len) res = VC_NOCTX;
109   else {
110     buf[len] = '\0';
111
112     res = strtol(buf, &errptr, 10);
113     if (*errptr!='\0' && *errptr!='\n') res = VC_NOCTX;
114   }
115
116   close(fd);
117   return res;
118   }
119 }
120
121 xid_t
122 vc_getVserverCtx(char const *id, vcCfgStyle style, bool honor_static, bool *is_running)
123 {
124   size_t                l1 = strlen(id);
125   char                  buf[sizeof(CONFDIR "//") + l1 + sizeof("/context")];
126                             
127   if (style==vcCFG_NONE || style==vcCFG_AUTO)
128     style = vc_getVserverCfgStyle(id);
129
130   if (is_running) *is_running = false;
131
132   switch (style) {
133     case vcCFG_NONE             :  return VC_NOCTX;
134     case vcCFG_LEGACY           :
135       return extractLegacyXID(DEFAULT_PKGSTATEDIR, id);
136     case vcCFG_RECENT_SHORT     :
137     case vcCFG_RECENT_FULL      : {
138       size_t            idx = 0;
139       xid_t             res = 0;
140
141       if (style==vcCFG_RECENT_SHORT) {
142         memcpy(buf, CONFDIR "/", sizeof(CONFDIR "/")-1);
143         idx  = sizeof(CONFDIR "/") - 1;
144       }
145       memcpy(buf+idx, id, l1);    idx += l1;
146       memcpy(buf+idx, "/run", 5);       // appends '\0' too
147       
148       res = getCtxFromFile(buf);
149
150         // when context information could be read, we have to verify that
151         // it belongs to a running vserver and the both vservers are
152         // identically
153       if (res!=VC_NOCTX) {
154         char                    *cur_name;
155         struct vc_vx_info       info;
156
157           // determine the vserver which is associated with the xid
158           // resp. skip this step when the context does not exist
159         cur_name = (vc_get_vx_info(res, &info)!=-1 ?
160                     vc_getVserverByCtx_Internal(res, &style, 0, false) : 0);
161
162         buf[idx] = '\0';        // cut off the '/run' from the vserver name
163         res      = ((cur_name!=0 &&
164                      vc_compareVserverById(buf,      vcCFG_RECENT_FULL,
165                                           cur_name, vcCFG_RECENT_FULL)==0)
166                     ? res
167                     : VC_NOCTX);        // correct the value of 'res'
168           
169         free(cur_name);
170       }
171       
172       if (is_running)                   // fill 'is_running' information...
173         *is_running = res!=VC_NOCTX;
174       
175       if (res==VC_NOCTX && honor_static) {
176         memcpy(buf+idx, "/context", 9); // appends '\0' too
177
178         res = getCtxFromFile(buf);
179       }
180       
181       return res;
182     }
183     default                     :  return VC_NOCTX;
184   }
185 }