summaryrefslogtreecommitdiffstats
path: root/sys/nwfs/nwfs_subr.c
diff options
context:
space:
mode:
Diffstat (limited to 'sys/nwfs/nwfs_subr.c')
-rw-r--r--sys/nwfs/nwfs_subr.c711
1 files changed, 0 insertions, 711 deletions
diff --git a/sys/nwfs/nwfs_subr.c b/sys/nwfs/nwfs_subr.c
deleted file mode 100644
index d3e212d..0000000
--- a/sys/nwfs/nwfs_subr.c
+++ /dev/null
@@ -1,711 +0,0 @@
-/*
- * Copyright (c) 1999, 2001 Boris Popov
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- * 1. Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * 2. Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in the
- * documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by Boris Popov.
- * 4. Neither the name of the author nor the names of any co-contributors
- * may be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
- * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
- * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
- * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
- * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
- * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
- * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
- * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
- * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- * SUCH DAMAGE.
- *
- * $FreeBSD$
- */
-#include <sys/param.h>
-#include <sys/systm.h>
-#include <sys/kernel.h>
-#include <sys/malloc.h>
-#include <machine/clock.h>
-#include <sys/time.h>
-
-#include <netncp/ncp.h>
-#include <netncp/ncp_conn.h>
-#include <netncp/ncp_ncp.h>
-#include <netncp/ncp_subr.h>
-#include <netncp/ncp_rq.h>
-#include <netncp/nwerror.h>
-
-#include <nwfs/nwfs.h>
-#include <nwfs/nwfs_node.h>
-#include <nwfs/nwfs_subr.h>
-
-#define NCP_INFOSZ (sizeof(struct nw_entry_info) - 257)
-
-MALLOC_DEFINE(M_NWFSDATA, "NWFS data", "NWFS private data");
-
-static int
-ncp_extract_file_info(struct nwmount *nmp, struct ncp_rq *rqp,
- struct nw_entry_info *target, int withname)
-{
- u_int8_t name_len;
-
- md_get_mem(&rqp->rp, (caddr_t)target, NCP_INFOSZ, MB_MSYSTEM);
- if (!withname)
- return 0;
- md_get_uint8(&rqp->rp, &name_len);
- target->nameLen = name_len;
- md_get_mem(&rqp->rp, (caddr_t)target->entryName, name_len, MB_MSYSTEM);
- target->entryName[name_len] = '\0';
- ncp_path2unix(target->entryName, target->entryName, name_len, &nmp->m.nls);
- return 0;
-}
-
-int
-ncp_initsearch(struct vnode *dvp,struct proc *p,struct ucred *cred)
-{
- struct nwmount *nmp = VTONWFS(dvp);
- struct ncp_conn *conn = NWFSTOCONN(nmp);
- struct nwnode *np = VTONW(dvp);
- struct ncp_rq *rqp;
- u_int8_t volnum = nmp->n_volume;
- u_int32_t dirent = np->n_fid.f_id;
- int error;
-
- NCPNDEBUG("vol=%d,dir=%d\n", volnum, dirent);
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 2); /* subfunction */
- mb_put_uint8(&rqp->rq, nmp->name_space);
- mb_put_uint8(&rqp->rq, 0); /* reserved */
- ncp_rq_dbase_path(rqp, volnum, dirent, 0, NULL, NULL);
- rqp->nr_minrplen = sizeof(np->n_seq);
- error = ncp_request(rqp);
- if (error)
- return error;
- md_get_mem(&rqp->rp, (caddr_t)&np->n_seq, sizeof(np->n_seq), MB_MSYSTEM);
- ncp_rq_done(rqp);
- return 0;
-}
-
-int
-ncp_search_for_file_or_subdir(struct nwmount *nmp,
- struct nw_search_seq *seq,
- struct nw_entry_info *target,
- struct proc *p,struct ucred *cred)
-{
- struct ncp_conn *conn = NWFSTOCONN(nmp);
- struct ncp_rq *rqp;
- int error;
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 3); /* subfunction */
- mb_put_uint8(&rqp->rq, nmp->name_space);
- mb_put_uint8(&rqp->rq, 0); /* data stream */
- mb_put_uint16le(&rqp->rq, 0xffff); /* Search attribs */
- mb_put_uint32le(&rqp->rq, IM_ALL); /* return info mask */
- mb_put_mem(&rqp->rq, (caddr_t)seq, 9, MB_MSYSTEM);
- mb_put_uint8(&rqp->rq, 2); /* 2 byte pattern */
- mb_put_uint8(&rqp->rq, 0xff); /* following is a wildcard */
- mb_put_uint8(&rqp->rq, '*');
- rqp->nr_minrplen = sizeof(*seq) + 1 + NCP_INFOSZ + 1;
- error = ncp_request(rqp);
- if (error)
- return error;
- md_get_mem(&rqp->rp, (caddr_t)seq, sizeof(*seq), MB_MSYSTEM);
- md_get_uint8(&rqp->rp, NULL); /* skip */
- error = ncp_extract_file_info(nmp, rqp, target, 1);
- ncp_rq_done(rqp);
- return error;
-}
-
-/*
- * Returns information for a (one-component) name relative to the specified
- * directory.
- */
-int
-ncp_obtain_info(struct nwmount *nmp, u_int32_t dirent,
- int namelen, char *path, struct nw_entry_info *target,
- struct proc *p,struct ucred *cred)
-{
- struct ncp_conn *conn=NWFSTOCONN(nmp);
- struct ncp_rq *rqp;
- int error;
- u_char volnum = nmp->n_volume, ns;
-
- if (target == NULL) {
- NCPFATAL("target == NULL\n");
- return EINVAL;
- }
- ns = (path == NULL || path[0] == 0) ? NW_NS_DOS : nmp->name_space;
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 6); /* subfunction */
- mb_put_uint8(&rqp->rq, ns);
- mb_put_uint8(&rqp->rq, ns); /* DestNameSpace */
- mb_put_uint16le(&rqp->rq, 0xff); /* get all */
- mb_put_uint32le(&rqp->rq, IM_ALL);
- ncp_rq_dbase_path(rqp, volnum, dirent, namelen, path, &nmp->m.nls);
- error = ncp_request(rqp);
- if (error)
- return error;
- error = ncp_extract_file_info(nmp, rqp, target, path != NULL);
- ncp_rq_done(rqp);
- return error;
-}
-/*
- * lookup name pointed by cnp in directory dvp and return file info in np.
- * May be I should create a little cache, but another way is to minimize
- * number of calls, on other hand, in multiprocess environment ...
- */
-int
-ncp_lookup(struct vnode *dvp, int len, char *name, struct nw_entry_info *fap,
- struct proc *p,struct ucred *cred)
-{
- struct nwmount *nmp;
- struct nwnode *dnp = VTONW(dvp);
- struct ncp_conn *conn;
- int error;
-
- if (!dvp || dvp->v_type != VDIR) {
- nwfs_printf("dvp is NULL or not a directory.\n");
- return (ENOENT);
- }
- nmp = VTONWFS(dvp);
- conn = NWFSTOCONN(nmp);
-
- if (len == 1 && name[0] == '.') {
- if (dnp->n_flag & NVOLUME) {
- error = ncp_obtain_info(nmp, dnp->n_fid.f_id, 0, NULL,
- fap, p, cred);
- } else {
- error = ncp_obtain_info(nmp, dnp->n_fid.f_parent,
- dnp->n_nmlen, dnp->n_name, fap, p, cred);
- }
- return error;
- } else if (len == 2 && name[0] == '.' && name[1] == '.') {
- printf("%s: knows NOTHING about '..'\n", __FUNCTION__);
- return EIO;
- } else {
- error = ncp_obtain_info(nmp, dnp->n_fid.f_id,
- len, name, fap, p, cred);
- }
- return error;
-}
-
-static void ConvertToNWfromDWORD(u_int32_t sfd, ncp_fh *fh);
-static void
-ConvertToNWfromDWORD(u_int32_t sfd, ncp_fh *fh) {
- fh->val1 = (fh->val.val32 = sfd);
- return;
-}
-
-/*
- * If both dir and name are NULL, then in target there's already a looked-up
- * entry that wants to be opened.
- */
-int
-ncp_open_create_file_or_subdir(struct nwmount *nmp,struct vnode *dvp,int namelen,
- char *name, int open_create_mode, u_int32_t create_attributes,
- int desired_acc_rights, struct ncp_open_info *nop,
- struct proc *p,struct ucred *cred)
-{
-
- struct ncp_conn *conn=NWFSTOCONN(nmp);
- struct ncp_rq *rqp;
- u_int16_t search_attribs = SA_ALL & (~SA_SUBDIR_FILES);
- u_int8_t volnum;
- u_int32_t dirent;
- int error;
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- volnum = nmp->n_volume;
- dirent = VTONW(dvp)->n_fid.f_id;
- if ((create_attributes & aDIR) != 0) {
- search_attribs |= SA_SUBDIR_FILES;
- }
- mb_put_uint8(&rqp->rq, 1);/* subfunction */
- mb_put_uint8(&rqp->rq, nmp->name_space);
- mb_put_uint8(&rqp->rq, open_create_mode);
- mb_put_uint16le(&rqp->rq, search_attribs);
- mb_put_uint32le(&rqp->rq, IM_ALL);
- mb_put_uint32le(&rqp->rq, create_attributes);
- /*
- * The desired acc rights seem to be the inherited rights mask for
- * directories
- */
- mb_put_uint16le(&rqp->rq, desired_acc_rights);
- ncp_rq_dbase_path(rqp, volnum, dirent, namelen, name, &nmp->m.nls);
- error = ncp_request(rqp);
- if (error) {
- if (error == NWE_FILE_NO_CREATE_PRIV)
- error = EACCES;
- return error;
- }
- md_get_uint32le(&rqp->rp, &nop->origfh);
- md_get_uint8(&rqp->rp, &nop->action);
- md_get_uint8(&rqp->rp, NULL); /* skip */
- error = ncp_extract_file_info(nmp, rqp, &nop->fattr, 1);
- ncp_rq_done(rqp);
- ConvertToNWfromDWORD(nop->origfh, &nop->fh);
- return error;
-}
-
-int
-ncp_close_file(struct ncp_conn *conn, ncp_fh *fh,struct proc *p,struct ucred *cred)
-{
- struct ncp_rq *rqp;
- int error;
-
- error = ncp_rq_alloc(66, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 0);
- mb_put_mem(&rqp->rq, (caddr_t)fh, 6, MB_MSYSTEM);
- error = ncp_request(rqp);
- if (error)
- return error;
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_DeleteNSEntry(struct nwmount *nmp, u_int32_t dirent,
- int namelen,char *name,struct proc *p,struct ucred *cred)
-{
- struct ncp_rq *rqp;
- int error;
- struct ncp_conn *conn=NWFSTOCONN(nmp);
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 8); /* subfunction */
- mb_put_uint8(&rqp->rq, nmp->name_space);
- mb_put_uint8(&rqp->rq, 0); /* reserved */
- mb_put_uint16le(&rqp->rq, SA_ALL); /* search attribs: all */
- ncp_rq_dbase_path(rqp, nmp->n_volume, dirent, namelen, name, &nmp->m.nls);
- error = ncp_request(rqp);
- if (!error)
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_nsrename(struct ncp_conn *conn, int volume, int ns, int oldtype,
- struct ncp_nlstables *nt,
- nwdirent fdir, char *old_name, int oldlen,
- nwdirent tdir, char *new_name, int newlen,
- struct proc *p, struct ucred *cred)
-{
- struct ncp_rq *rqp;
- int error;
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 4);
- mb_put_uint8(&rqp->rq, ns);
- mb_put_uint8(&rqp->rq, 1); /* RRenameToMySelf */
- mb_put_uint16le(&rqp->rq, oldtype);
- /* source Handle Path */
- mb_put_uint8(&rqp->rq, volume);
- mb_put_mem(&rqp->rq, (c_caddr_t)&fdir, sizeof(fdir), MB_MSYSTEM);
- mb_put_uint8(&rqp->rq, 1);
- mb_put_uint8(&rqp->rq, 1); /* 1 source component */
- /* dest Handle Path */
- mb_put_uint8(&rqp->rq, volume);
- mb_put_mem(&rqp->rq, (c_caddr_t)&tdir, sizeof(tdir), MB_MSYSTEM);
- mb_put_uint8(&rqp->rq, 1);
- mb_put_uint8(&rqp->rq, 1); /* 1 destination component */
- ncp_rq_pathstring(rqp, oldlen, old_name, nt);
- ncp_rq_pathstring(rqp, newlen, new_name, nt);
- error = ncp_request(rqp);
- if (!error)
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_modify_file_or_subdir_dos_info(struct nwmount *nmp, struct vnode *vp,
- u_int32_t info_mask,
- struct nw_modify_dos_info *info,
- struct proc *p,struct ucred *cred)
-{
- struct nwnode *np=VTONW(vp);
- struct ncp_rq *rqp;
- u_int8_t volnum = nmp->n_volume;
- u_int32_t dirent = np->n_fid.f_id;
- struct ncp_conn *conn=NWFSTOCONN(nmp);
- int error;
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 7); /* subfunction */
- mb_put_uint8(&rqp->rq, nmp->name_space);
- mb_put_uint8(&rqp->rq, 0); /* reserved */
- mb_put_uint16le(&rqp->rq, SA_ALL); /* search attribs: all */
- mb_put_uint32le(&rqp->rq, info_mask);
- mb_put_mem(&rqp->rq, (caddr_t)info, sizeof(*info), MB_MSYSTEM);
- ncp_rq_dbase_path(rqp, volnum, dirent, 0, NULL, NULL);
- error = ncp_request(rqp);
- if (!error)
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_setattr(vp, vap, cred, procp)
- struct vnode *vp;
- struct vattr *vap;
- struct ucred *cred;
- struct proc *procp;
-{
- struct nwmount *nmp=VTONWFS(vp);
- struct nwnode *np=VTONW(vp);
- struct ncp_open_info nwn;
- struct ncp_conn *conn=NWFSTOCONN(nmp);
- struct nw_modify_dos_info info;
- struct ncp_rq *rqp;
- int error = 0, info_mask;
-
- if (vap->va_size != VNOVAL) {
- error = ncp_open_create_file_or_subdir(nmp, vp, 0, NULL, OC_MODE_OPEN, 0,
- AR_WRITE | AR_READ, &nwn,procp,cred);
- if (error)
- return error;
- error = ncp_rq_alloc(73, conn, procp, cred, &rqp);
- if (error) {
- ncp_close_file(conn, &nwn.fh, procp, cred);
- return error;
- }
- mb_put_uint8(&rqp->rq, 0);
- mb_put_mem(&rqp->rq, (caddr_t)&nwn.fh, 6, MB_MSYSTEM);
- mb_put_uint32be(&rqp->rq, vap->va_size);
- mb_put_uint16be(&rqp->rq, 0);
- error = ncp_request(rqp);
- np->n_vattr.va_size = np->n_size = vap->va_size;
- if (!error)
- ncp_rq_done(rqp);
- ncp_close_file(conn, &nwn.fh, procp, cred);
- if (error)
- return error;
- }
- info_mask = 0;
- bzero(&info, sizeof(info));
-
- if (vap->va_mtime.tv_sec != VNOVAL) {
- info_mask |= (DM_MODIFY_TIME | DM_MODIFY_DATE);
- ncp_unix2dostime(&vap->va_mtime, nmp->m.tz, &info.modifyDate, &info.modifyTime, NULL);
- }
- if (vap->va_atime.tv_sec != VNOVAL) {
- info_mask |= (DM_LAST_ACCESS_DATE);
- ncp_unix2dostime(&vap->va_atime, nmp->m.tz, &info.lastAccessDate, NULL, NULL);
- }
- if (info_mask) {
- error = ncp_modify_file_or_subdir_dos_info(nmp, vp, info_mask, &info,procp,cred);
- }
- return (error);
-}
-
-int
-ncp_get_volume_info_with_number(struct ncp_conn *conn,
- int n, struct ncp_volume_info *target,
- struct proc *p,struct ucred *cred)
-{
- struct ncp_rq *rqp;
- u_int32_t tmp32;
- u_int8_t len;
- int error;
-
- error = ncp_rq_alloc_subfn(22, 44, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq,n);
- error = ncp_request(rqp);
- if (error)
- return error;
- md_get_uint32le(&rqp->rp, &target->total_blocks);
- md_get_uint32le(&rqp->rp, &target->free_blocks);
- md_get_uint32le(&rqp->rp, &target->purgeable_blocks);
- md_get_uint32le(&rqp->rp, &target->not_yet_purgeable_blocks);
- md_get_uint32le(&rqp->rp, &target->total_dir_entries);
- md_get_uint32le(&rqp->rp, &target->available_dir_entries);
- md_get_uint32le(&rqp->rp, &tmp32);
- md_get_uint8(&rqp->rp, &target->sectors_per_block);
- bzero(&target->volume_name, sizeof(target->volume_name));
- md_get_uint8(&rqp->rp, &len);
- if (len > NCP_VOLNAME_LEN) {
- error = ENAMETOOLONG;
- } else {
- md_get_mem(&rqp->rp, (caddr_t)&target->volume_name, len, MB_MSYSTEM);
- }
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_get_namespaces(struct ncp_conn *conn, u_int32_t volume, int *nsf,
- struct proc *p,struct ucred *cred)
-{
- struct ncp_rq *rqp;
- int error;
- u_int8_t ns;
- u_int16_t nscnt;
-
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 24); /* Subfunction: Get Loaded Name Spaces */
- mb_put_uint16le(&rqp->rq, 0); /* reserved */
- mb_put_uint8(&rqp->rq, volume);
- error = ncp_request(rqp);
- if (error)
- return error;
- md_get_uint16le(&rqp->rp, &nscnt);
- *nsf = 0;
- while (nscnt-- > 0) {
- md_get_uint8(&rqp->rp, &ns);
- *nsf |= 1 << ns;
- }
- ncp_rq_done(rqp);
- return error;
-}
-
-int
-ncp_lookup_volume(struct ncp_conn *conn, char *volname,
- u_char *volNum, u_int32_t *dirEnt,
- struct proc *p,struct ucred *cred)
-{
- struct ncp_rq *rqp;
- u_int32_t tmp32;
- int error;
-
- NCPNDEBUG("looking up vol %s\n", volname);
- error = ncp_rq_alloc(87, conn, p, cred, &rqp);
- if (error)
- return error;
- mb_put_uint8(&rqp->rq, 22); /* Subfunction: Generate dir handle */
- mb_put_uint8(&rqp->rq, 0); /* src name space */
- mb_put_uint8(&rqp->rq, 0); /* dst name space, always zero */
- mb_put_uint16le(&rqp->rq, 0); /* dstNSIndicator (Jn) */
-
- mb_put_uint8(&rqp->rq, 0); /* faked volume number */
- mb_put_uint32be(&rqp->rq, 0); /* faked dir_base */
- mb_put_uint8(&rqp->rq, 0xff); /* Don't have a dir_base */
- mb_put_uint8(&rqp->rq, 1); /* 1 path component */
- ncp_rq_pstring(rqp, volname);
- error = ncp_request(rqp);
- if (error)
- return error;
- md_get_uint32le(&rqp->rp, &tmp32);
- md_get_uint32le(&rqp->rp, dirEnt);
- md_get_uint8(&rqp->rp, volNum);
- ncp_rq_done(rqp);
- return error;
-}
-
-/*
- * Time & date conversion routines taken from msdosfs. Although leap
- * year calculation is bogus, it's sufficient before 2100 :)
- */
-/*
- * This is the format of the contents of the deTime field in the direntry
- * structure.
- * We don't use bitfields because we don't know how compilers for
- * arbitrary machines will lay them out.
- */
-#define DT_2SECONDS_MASK 0x1F /* seconds divided by 2 */
-#define DT_2SECONDS_SHIFT 0
-#define DT_MINUTES_MASK 0x7E0 /* minutes */
-#define DT_MINUTES_SHIFT 5
-#define DT_HOURS_MASK 0xF800 /* hours */
-#define DT_HOURS_SHIFT 11
-
-/*
- * This is the format of the contents of the deDate field in the direntry
- * structure.
- */
-#define DD_DAY_MASK 0x1F /* day of month */
-#define DD_DAY_SHIFT 0
-#define DD_MONTH_MASK 0x1E0 /* month */
-#define DD_MONTH_SHIFT 5
-#define DD_YEAR_MASK 0xFE00 /* year - 1980 */
-#define DD_YEAR_SHIFT 9
-/*
- * Total number of days that have passed for each month in a regular year.
- */
-static u_short regyear[] = {
- 31, 59, 90, 120, 151, 181,
- 212, 243, 273, 304, 334, 365
-};
-
-/*
- * Total number of days that have passed for each month in a leap year.
- */
-static u_short leapyear[] = {
- 31, 60, 91, 121, 152, 182,
- 213, 244, 274, 305, 335, 366
-};
-
-/*
- * Variables used to remember parts of the last time conversion. Maybe we
- * can avoid a full conversion.
- */
-static u_long lasttime;
-static u_long lastday;
-static u_short lastddate;
-static u_short lastdtime;
-/*
- * Convert the unix version of time to dos's idea of time to be used in
- * file timestamps. The passed in unix time is assumed to be in GMT.
- */
-void
-ncp_unix2dostime(tsp, tzoff, ddp, dtp, dhp)
- struct timespec *tsp;
- int tzoff;
- u_int16_t *ddp;
- u_int16_t *dtp;
- u_int8_t *dhp;
-{
- u_long t;
- u_long days;
- u_long inc;
- u_long year;
- u_long month;
- u_short *months;
-
- /*
- * If the time from the last conversion is the same as now, then
- * skip the computations and use the saved result.
- */
- t = tsp->tv_sec - tzoff * 60 - tz.tz_minuteswest * 60 -
- (wall_cmos_clock ? adjkerntz : 0);
- t &= ~1;
- if (lasttime != t) {
- lasttime = t;
- lastdtime = (((t / 2) % 30) << DT_2SECONDS_SHIFT)
- + (((t / 60) % 60) << DT_MINUTES_SHIFT)
- + (((t / 3600) % 24) << DT_HOURS_SHIFT);
-
- /*
- * If the number of days since 1970 is the same as the last
- * time we did the computation then skip all this leap year
- * and month stuff.
- */
- days = t / (24 * 60 * 60);
- if (days != lastday) {
- lastday = days;
- for (year = 1970;; year++) {
- inc = year & 0x03 ? 365 : 366;
- if (days < inc)
- break;
- days -= inc;
- }
- months = year & 0x03 ? regyear : leapyear;
- for (month = 0; days >= months[month]; month++)
- ;
- if (month > 0)
- days -= months[month - 1];
- lastddate = ((days + 1) << DD_DAY_SHIFT)
- + ((month + 1) << DD_MONTH_SHIFT);
- /*
- * Remember dos's idea of time is relative to 1980.
- * unix's is relative to 1970. If somehow we get a
- * time before 1980 then don't give totally crazy
- * results.
- */
- if (year > 1980)
- lastddate += (year - 1980) << DD_YEAR_SHIFT;
- }
- }
- if (dtp)
- *dtp = lastdtime;
- if (dhp)
- *dhp = (tsp->tv_sec & 1) * 100 + tsp->tv_nsec / 10000000;
-
- *ddp = lastddate;
-}
-
-/*
- * The number of seconds between Jan 1, 1970 and Jan 1, 1980. In that
- * interval there were 8 regular years and 2 leap years.
- */
-#define SECONDSTO1980 (((8 * 365) + (2 * 366)) * (24 * 60 * 60))
-
-static u_short lastdosdate;
-static u_long lastseconds;
-
-/*
- * Convert from dos' idea of time to unix'. This will probably only be
- * called from the stat(), and fstat() system calls and so probably need
- * not be too efficient.
- */
-void
-ncp_dos2unixtime(dd, dt, dh, tzoff, tsp)
- u_int dd;
- u_int dt;
- u_int dh;
- int tzoff;
- struct timespec *tsp;
-{
- u_long seconds;
- u_long month;
- u_long year;
- u_long days;
- u_short *months;
-
- if (dd == 0) {
- /*
- * Uninitialized field, return the epoch.
- */
- tsp->tv_sec = 0;
- tsp->tv_nsec = 0;
- return;
- }
- seconds = (((dt & DT_2SECONDS_MASK) >> DT_2SECONDS_SHIFT) << 1)
- + ((dt & DT_MINUTES_MASK) >> DT_MINUTES_SHIFT) * 60
- + ((dt & DT_HOURS_MASK) >> DT_HOURS_SHIFT) * 3600
- + dh / 100;
- /*
- * If the year, month, and day from the last conversion are the
- * same then use the saved value.
- */
- if (lastdosdate != dd) {
- lastdosdate = dd;
- days = 0;
- year = (dd & DD_YEAR_MASK) >> DD_YEAR_SHIFT;
- days = year * 365;
- days += year / 4 + 1; /* add in leap days */
- if ((year & 0x03) == 0)
- days--; /* if year is a leap year */
- months = year & 0x03 ? regyear : leapyear;
- month = (dd & DD_MONTH_MASK) >> DD_MONTH_SHIFT;
- if (month < 1 || month > 12) {
- month = 1;
- }
- if (month > 1)
- days += months[month - 2];
- days += ((dd & DD_DAY_MASK) >> DD_DAY_SHIFT) - 1;
- lastseconds = (days * 24 * 60 * 60) + SECONDSTO1980;
- }
- tsp->tv_sec = seconds + lastseconds + tz.tz_minuteswest * 60 +
- tzoff * 60 + (wall_cmos_clock ? adjkerntz : 0);
- tsp->tv_nsec = (dh % 100) * 10000000;
-}
OpenPOWER on IntegriCloud