2 * Copyright (c) 1997-1999 Erez Zadok
3 * Copyright (c) 1989 Jan-Simon Pendry
4 * Copyright (c) 1989 Imperial College of Science, Technology & Medicine
5 * Copyright (c) 1989 The Regents of the University of California.
8 * This code is derived from software contributed to Berkeley by
9 * Jan-Simon Pendry at Imperial College, London.
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. All advertising materials mentioning features or use of this software
20 * must display the following acknowledgment:
21 * This product includes software developed by the University of
22 * California, Berkeley and its contributors.
23 * 4. Neither the name of the University nor the names of its contributors
24 * may be used to endorse or promote products derived from this software
25 * without specific prior written permission.
27 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
28 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
29 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
30 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
31 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
32 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
33 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
34 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
35 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
36 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
41 * $Id: stubs.c,v 1.3 1999/01/13 23:31:19 ezk Exp $
43 * HLFSD was written at Columbia University Computer Science Department, by
44 * Erez Zadok <ezk@cs.columbia.edu> and Alexander Dupuy <dupuy@cs.columbia.edu>
45 * It is being distributed under the same terms and conditions as amd does.
50 #endif /* HAVE_CONFIG_H */
57 static nfsfattr rootfattr
= {NFDIR
, 0040555, 2, 0, 0, 512, 512, 0,
59 static nfsfattr slinkfattr
= {NFLNK
, 0120777, 1, 0, 0, NFS_MAXPATHLEN
, 512, 0,
60 (NFS_MAXPATHLEN
+ 1) / 512, 0, SLINKID
};
61 /* user name file attributes */
62 static nfsfattr un_fattr
= {NFLNK
, 0120777, 1, 0, 0, NFS_MAXPATHLEN
, 512, 0,
63 (NFS_MAXPATHLEN
+ 1) / 512, 0, INVALIDID
};
64 static int getcreds(struct svc_req
*, uid_t
*, gid_t
*);
66 static am_nfs_fh slink
;
67 static am_nfs_fh un_fhandle
;
73 am_nfs_fh
*root_fhp
= &root
;
76 /* initialize NFS file handles for hlfsd */
78 hlfsd_init_filehandles(void)
83 memcpy(root
.fh_data
, &ui
, sizeof(ui
));
86 memcpy(slink
.fh_data
, &ui
, sizeof(ui
));
89 memcpy(un_fhandle
.fh_data
, &ui
, sizeof(ui
));
94 nfsproc_null_2_svc(voidp argp
, struct svc_req
*rqstp
)
102 /* compare if two filehandles are equal */
104 eq_fh(const am_nfs_fh
*fh1
, const am_nfs_fh
*fh2
)
106 return (!memcmp((char *) fh1
, (char *) fh2
, sizeof(am_nfs_fh
)));
111 nfsproc_getattr_2_svc(am_nfs_fh
*argp
, struct svc_req
*rqstp
)
113 static nfsattrstat res
;
114 uid_t uid
= (uid_t
) INVALIDID
;
115 gid_t gid
= (gid_t
) INVALIDID
;
119 rootfattr
.na_ctime
= startup
;
120 rootfattr
.na_mtime
= startup
;
121 slinkfattr
.na_ctime
= startup
;
122 slinkfattr
.na_mtime
= startup
;
123 un_fattr
.na_ctime
= startup
;
124 un_fattr
.na_mtime
= startup
;
127 if (eq_fh(argp
, &root
)) {
128 res
.ns_status
= NFS_OK
;
129 res
.ns_u
.ns_attr_u
= rootfattr
;
130 } else if (eq_fh(argp
, &slink
)) {
132 #ifndef MNT2_NFS_OPT_SYMTTL
134 * This code is needed to defeat Solaris 2.4's (and newer) symlink
135 * values cache. It forces the last-modified time of the symlink to be
136 * current. It is not needed if the O/S has an nfs flag to turn off the
137 * symlink-cache at mount time (such as Irix 5.x and 6.x). -Erez.
139 if (++slinkfattr
.na_mtime
.nt_useconds
== 0)
140 ++slinkfattr
.na_mtime
.nt_seconds
;
141 #endif /* not MNT2_NFS_OPT_SYMTTL */
143 res
.ns_status
= NFS_OK
;
144 res
.ns_u
.ns_attr_u
= slinkfattr
;
147 if (getcreds(rqstp
, &uid
, &gid
) < 0) {
148 res
.ns_status
= NFSERR_STALE
;
151 if (gid
!= hlfs_gid
) {
152 res
.ns_status
= NFSERR_STALE
;
154 memset((char *) &uid
, 0, sizeof(int));
155 uid
= *(u_int
*) argp
->fh_data
;
156 if (plt_search(uid
) != (uid2home_t
*) NULL
) {
157 res
.ns_status
= NFS_OK
;
158 un_fattr
.na_fileid
= uid
;
159 res
.ns_u
.ns_attr_u
= un_fattr
;
161 dlog("nfs_getattr: successful search for uid=%ld, gid=%ld",
162 (long) uid
, (long) gid
);
164 } else { /* not found */
165 res
.ns_status
= NFSERR_STALE
;
174 nfsproc_setattr_2_svc(nfssattrargs
*argp
, struct svc_req
*rqstp
)
176 static nfsattrstat res
= {NFSERR_ROFS
};
183 nfsproc_root_2_svc(voidp argp
, struct svc_req
*rqstp
)
192 nfsproc_lookup_2_svc(nfsdiropargs
*argp
, struct svc_req
*rqstp
)
194 static nfsdiropres res
;
196 uid_t uid
= (uid_t
) INVALIDID
;
197 gid_t gid
= (gid_t
) INVALIDID
;
201 rootfattr
.na_ctime
= startup
;
202 rootfattr
.na_mtime
= startup
;
203 slinkfattr
.na_ctime
= startup
;
204 slinkfattr
.na_mtime
= startup
;
205 un_fattr
.na_ctime
= startup
;
206 un_fattr
.na_mtime
= startup
;
209 if (eq_fh(&argp
->da_fhandle
, &slink
)) {
210 res
.dr_status
= NFSERR_NOTDIR
;
214 if (eq_fh(&argp
->da_fhandle
, &root
)) {
215 if (argp
->da_name
[0] == '.' &&
216 (argp
->da_name
[1] == '\0' ||
217 (argp
->da_name
[1] == '.' &&
218 argp
->da_name
[2] == '\0'))) {
219 res
.dr_u
.dr_drok_u
.drok_fhandle
= root
;
220 res
.dr_u
.dr_drok_u
.drok_attributes
= rootfattr
;
221 res
.dr_status
= NFS_OK
;
225 if (STREQ(argp
->da_name
, slinkname
)) {
226 res
.dr_u
.dr_drok_u
.drok_fhandle
= slink
;
227 res
.dr_u
.dr_drok_u
.drok_attributes
= slinkfattr
;
228 res
.dr_status
= NFS_OK
;
232 if (getcreds(rqstp
, &uid
, &gid
) < 0 || gid
!= hlfs_gid
) {
233 res
.dr_status
= NFSERR_NOENT
;
237 /* if gets here, gid == hlfs_gid */
238 if ((idx
= untab_index(argp
->da_name
)) < 0) {
239 res
.dr_status
= NFSERR_NOENT
;
241 } else { /* entry found and gid is permitted */
242 un_fattr
.na_fileid
= untab
[idx
].uid
;
243 res
.dr_u
.dr_drok_u
.drok_attributes
= un_fattr
;
244 memset((char *) &un_fhandle
, 0, sizeof(am_nfs_fh
));
245 *(u_int
*) un_fhandle
.fh_data
= (u_int
) untab
[idx
].uid
;
246 strncpy((char *) &un_fhandle
.fh_data
[sizeof(int)],
248 sizeof(am_nfs_fh
) - sizeof(int));
249 res
.dr_u
.dr_drok_u
.drok_fhandle
= un_fhandle
;
250 res
.dr_status
= NFS_OK
;
252 dlog("nfs_lookup: successful lookup for uid=%ld, gid=%ld: username=%s",
253 (long) uid
, (long) gid
, untab
[idx
].username
);
257 } /* end of "if (eq_fh(argp->dir.data, root.data)) {" */
259 res
.dr_status
= NFSERR_STALE
;
264 getcreds(struct svc_req
*rp
, uid_t
*u
, gid_t
*g
)
266 struct authunix_parms
*aup
= (struct authunix_parms
*) NULL
;
267 #ifdef HAVE_RPC_AUTH_DES_H
268 struct authdes_cred
*adp
;
269 #endif /* HAVE_RPC_AUTH_DES_H */
271 switch (rp
->rq_cred
.oa_flavor
) {
274 aup
= (struct authunix_parms
*) rp
->rq_clntcred
;
279 #ifdef HAVE_RPC_AUTH_DES_H
281 adp
= (struct authdes_cred
*) rp
->rq_clntcred
;
282 *g
= INVALIDID
; /* some unknown group id */
283 if (sscanf(adp
->adc_fullname
.name
, "unix.%lu@", (u_long
*) u
) == 1)
286 #endif /* HAVE_RPC_AUTH_DES_H */
289 *u
= *g
= INVALIDID
; /* just in case */
290 svcerr_weakauth(nfsxprt
);
294 return 0; /* everything is ok */
299 nfsproc_readlink_2_svc(am_nfs_fh
*argp
, struct svc_req
*rqstp
)
301 static nfsreadlinkres res
;
302 uid_t userid
= (uid_t
) INVALIDID
;
303 gid_t groupid
= hlfs_gid
+ 1; /* anything not hlfs_gid */
305 char *path_val
= (char *) NULL
;
307 static uid_t last_uid
= (uid_t
) INVALIDID
;
309 if (eq_fh(argp
, &root
)) {
310 res
.rlr_status
= NFSERR_ISDIR
;
311 } else if (eq_fh(argp
, &slink
)) {
312 if (getcreds(rqstp
, &userid
, &groupid
) < 0)
313 return (nfsreadlinkres
*) NULL
;
315 gettimeofday((struct timeval
*) &slinkfattr
.na_atime
, (struct timezone
*) 0);
317 res
.rlr_status
= NFS_OK
;
318 if (groupid
== hlfs_gid
) {
319 res
.rlr_u
.rlr_data_u
= DOTSTRING
;
320 } else if (!(res
.rlr_u
.rlr_data_u
= path_val
= homedir(userid
))) {
322 * parent process (fork in homedir()) continues
323 * processing, by getting a NULL returned as a
324 * "special". Child returns result.
326 return (nfsreadlinkres
*) NULL
;
329 } else { /* check if asked for user mailbox */
331 if (getcreds(rqstp
, &userid
, &groupid
) < 0) {
332 return (nfsreadlinkres
*) NULL
;
335 if (groupid
== hlfs_gid
) {
336 memset((char *) &userid
, 0, sizeof(int));
337 userid
= *(u_int
*) argp
->fh_data
;
338 username
= (char *) &argp
->fh_data
[sizeof(int)];
339 if (!(res
.rlr_u
.rlr_data_u
= mailbox(userid
, username
)))
340 return (nfsreadlinkres
*) NULL
;
342 res
.rlr_status
= NFSERR_STALE
;
346 /* print info, but try to avoid repetitions */
347 if (userid
!= last_uid
) {
348 plog(XLOG_USER
, "mailbox for uid=%ld, gid=%ld is %s",
349 (long) userid
, (long) groupid
, (char *) res
.rlr_u
.rlr_data_u
);
353 /* I don't think will pass this if -D nofork */
354 if (serverpid
== getpid())
357 if (!svc_sendreply(nfsxprt
, (XDRPROC_T_TYPE
) xdr_readlinkres
, (SVC_IN_ARG_TYPE
) &res
))
358 svcerr_systemerr(nfsxprt
);
361 * Child exists here. We need to determine which
362 * exist status to return. The exit status
363 * is gathered using wait() and determines
364 * if we returned $HOME/.hlfsspool or $ALTDIR. The parent
365 * needs this info so it can update the lookup table.
367 if (path_val
&& alt_spooldir
&& STREQ(path_val
, alt_spooldir
))
368 retval
= 1; /* could not get real home dir (or uid 0 user) */
374 * If asked for -D nofork, then must return the value,
375 * NOT exit, or else the main hlfsd server exits.
376 * Bug where is that status information being collected?
387 nfsproc_read_2_svc(nfsreadargs
*argp
, struct svc_req
*rqstp
)
389 static nfsreadres res
= {NFSERR_ACCES
};
396 nfsproc_writecache_2_svc(voidp argp
, struct svc_req
*rqstp
)
405 nfsproc_write_2_svc(nfswriteargs
*argp
, struct svc_req
*rqstp
)
407 static nfsattrstat res
= {NFSERR_ROFS
};
414 nfsproc_create_2_svc(nfscreateargs
*argp
, struct svc_req
*rqstp
)
416 static nfsdiropres res
= {NFSERR_ROFS
};
423 nfsproc_remove_2_svc(nfsdiropargs
*argp
, struct svc_req
*rqstp
)
425 static nfsstat res
= {NFSERR_ROFS
};
432 nfsproc_rename_2_svc(nfsrenameargs
*argp
, struct svc_req
*rqstp
)
434 static nfsstat res
= {NFSERR_ROFS
};
441 nfsproc_link_2_svc(nfslinkargs
*argp
, struct svc_req
*rqstp
)
443 static nfsstat res
= {NFSERR_ROFS
};
450 nfsproc_symlink_2_svc(nfssymlinkargs
*argp
, struct svc_req
*rqstp
)
452 static nfsstat res
= {NFSERR_ROFS
};
459 nfsproc_mkdir_2_svc(nfscreateargs
*argp
, struct svc_req
*rqstp
)
461 static nfsdiropres res
= {NFSERR_ROFS
};
468 nfsproc_rmdir_2_svc(nfsdiropargs
*argp
, struct svc_req
*rqstp
)
470 static nfsstat res
= {NFSERR_ROFS
};
477 nfsproc_readdir_2_svc(nfsreaddirargs
*argp
, struct svc_req
*rqstp
)
479 static nfsreaddirres res
;
480 static nfsentry slinkent
= {SLINKID
, 0, {SLINKCOOKIE
}};
481 static nfsentry dotdotent
= {ROOTID
, "..", {DOTDOTCOOKIE
}, &slinkent
};
482 static nfsentry dotent
= {ROOTID
, ".", {DOTCOOKIE
}, &dotdotent
};
484 slinkent
.ne_name
= slinkname
;
486 if (eq_fh(&argp
->rda_fhandle
, &slink
)) {
487 res
.rdr_status
= NFSERR_NOTDIR
;
488 } else if (eq_fh(&argp
->rda_fhandle
, &root
)) {
489 gettimeofday((struct timeval
*) &rootfattr
.na_atime
, (struct timezone
*) 0);
491 res
.rdr_status
= NFS_OK
;
492 switch (argp
->rda_cookie
[0]) {
494 res
.rdr_u
.rdr_reply_u
.dl_entries
= &dotent
;
497 res
.rdr_u
.rdr_reply_u
.dl_entries
= &dotdotent
;
500 res
.rdr_u
.rdr_reply_u
.dl_entries
= &slinkent
;
503 res
.rdr_u
.rdr_reply_u
.dl_entries
= (nfsentry
*) 0;
506 res
.rdr_u
.rdr_reply_u
.dl_eof
= TRUE
;
508 res
.rdr_status
= NFSERR_STALE
;
515 nfsproc_statfs_2_svc(am_nfs_fh
*argp
, struct svc_req
*rqstp
)
517 static nfsstatfsres res
= {NFS_OK
};
519 res
.sfr_u
.sfr_reply_u
.sfrok_tsize
= 1024;
520 res
.sfr_u
.sfr_reply_u
.sfrok_bsize
= 1024;
523 * Some "df" programs automatically assume that file systems
524 * with zero blocks are meta-filesystems served by automounters.
526 res
.sfr_u
.sfr_reply_u
.sfrok_blocks
= 0;
527 res
.sfr_u
.sfr_reply_u
.sfrok_bfree
= 0;
528 res
.sfr_u
.sfr_reply_u
.sfrok_bavail
= 0;