sys/src/sysgetdvi.c

Go to the documentation of this file.

// _Id: sysgetdvi.c,v 1.16 2007-05-30 08:30:15 roart Exp $
// _Locker:  $

// Author. Roar Thronæs.

#include<linux/linkage.h>

#include<starlet.h>
#include<ssdef.h>
#include<dvidef.h>
#include<system_data_cells.h>
#include<misc.h>
#include<ddbdef.h>
#include<pridef.h>
#include<ucbdef.h>
#include <exe_routines.h>
#include <ioc_routines.h>
#include <sch_routines.h>

#include<linux/sched.h> 

struct _generic_64 {
  long long l;
};

asmlinkage int exe_getdvi(unsigned int efn, unsigned short int chan, void *devnam, void *itmlst, struct _iosb *iosb, void (*astadr)(), int astprm, struct _generic_64 *nullarg);

asmlinkage int exe_getdvi_wrap(struct struct_getdvi *s) {
  return exe_getdvi(s->efn,s->chan,s->devnam,s->itmlst,s->iosb,s->astadr,s->astprm,s->nullarg);
}

struct _ddb * contxt=0;

asmlinkage int exe_getdvi(unsigned int efn, unsigned short int chan, void *devnam, void *itmlst, struct _iosb *iosb, void (*astadr)(), int astprm, struct _generic_64 *nullarg) {

  struct _ddb * d;
  struct item_list_3 * it=itmlst;
  struct _ucb * u = 0;

  exe_clref(efn);
  // check and do with iosb
  // check quota 
  // check chan no?
  // then check devnam

  if (chan==0 && devnam!=0) {
    struct return_values r,r2;
    int status=ioc_search(&r,devnam);
    if (status==SS__NORMAL)
      u=r.val1;
    else
      return status;
  }
  if (chan!=0) {
    struct _ccb * c = &ctl_gl_ccbbase[chan];
    u = c->ccb_l_ucb;
  }

  // check itemcode with dvsdef defs
  if (contxt)
    d=contxt;
  else
    d=ioc_gl_devlist;
  // sch_iolockr
  while (it->item_code) {
    int * bufaddr_int = it->bufaddr;
    switch (it->item_code) {
    case DVI__FULLDEVNAM:
    case DVI__DEVNAM:
      if (chan!=0 || u!=0 ) {
        struct _ddb * d = u->ucb_l_ddb;
        memcpy(it->bufaddr, &d->ddb_t_name[1], 3);
        if (d->ddb_t_name[1] != 'd')
          snprintf(&it->bufaddr[3],3,"%d",u->ucb_w_unit);
        else
          snprintf(&it->bufaddr[3],3,"%03d",u->ucb_w_unit);
      } else {
        memcpy(it->bufaddr,&d->ddb_t_name[1],15);
      }
      if (it->retlenaddr) {
        short int * len = it->retlenaddr;
        *len = strlen(it->bufaddr);
      }
      break;
    case DVI__UNIT:
      *bufaddr_int=u->ucb_w_unit;
      break;
    case DVI__PID:
      *bufaddr_int=1; // telnetd needs to have this at non-zero
      //memcpy(it->bufaddr, &u->ucb_l_pid, 4);
      break;
    case DVI__OWNUIC:
      {
        int i=0;
        memcpy(it->bufaddr, &i, 4); // implement later
      }
      break;
    case DVI__NEXTDEVNAM:
    case DVI__ROOTDEVNAM:
    case DVI__VOLCOUNT:
    case DVI__VOLNUMBER:
      {
        int i=0;
        memcpy(it->bufaddr, &i, 4); // implement later
      }
      break;
    case DVI__DEVCLASS:
      {
        int * i = it->bufaddr;
        *i=u->ucb_b_devclass;
      }
      break;
    case DVI__DEVCHAR:
      {
        int * i = it->bufaddr;
        *i=u->ucb_l_devchar;
      }
      break;
    case DVI__MAXBLOCK:
      {
        int * i = it->bufaddr;
        *i=((struct _dt_ucb *)u)->ucb_l_maxblock;
      }
      break;
    case DVI__DEVTYPE:
      {
        int * i = it->bufaddr;
        *i=u->ucb_b_devtype;
      }
      break;
    default:
      printk("getdvi item_code %x not implemented\n",it->item_code);
      break;
    }
    it++;
  }

  struct _pcb * pcb = ctl_gl_pcb;
  sch_postef(pcb->pcb$l_pid, PRI$_NULL, efn);

  if (iosb)
    iosb->iosb_w_status=SS$_NORMAL;

  contxt=d->ddb_ps_link;
  if (contxt==0) 
    return SS__NOMOREDEV;

  return SS__NORMAL;

}

asmlinkage int exe_getdviw(unsigned int efn, unsigned short int chan, void *devnam, void *itmlst, struct _iosb *iosb, void (*astadr)(), int astprm, struct _generic_64 *nullarg) {

  /* I think this is about it */

  int status=exe_getdvi(efn,chan,devnam,itmlst,iosb,astadr,astprm,nullarg);
  if ((status&1)==0) return status;
  return exe_synch(efn,iosb);

}

asmlinkage int exe_getdviw_wrap(struct struct_getdvi *s) {
  return exe_getdviw(s->efn,s->chan,s->devnam,s->itmlst,s->iosb,s->astadr,s->astprm,s->nullarg);
}

asmlinkage int exe_device_scan(void *return_devnam, unsigned short int *retlen, void *search_devnam, void *itmlst, unsigned long long *contxt) {
  struct _ddb * d;
  struct item_list_3 * it=itmlst;
  // check itemcode with dvsdef defs
  if (*contxt)
    d=*contxt;
  else
    d=ioc_gl_devlist;
  // sch_iolockr
 again:
  ioc_scan_iodb_usrctx(&d);
  if (d==0)
    return SS__NOMOREDEV;

  while (it->item_code) {
    switch (it->item_code) {
    case DVI__DEVNAM:
      memcpy(it->bufaddr,&d->ddb_t_name[1],15);
      break;

    }
    it++;
  }
  return SS__NORMAL;
  
}

---