sys/src/ucbcredel.c

Go to the documentation of this file.

// _Id: ucbcredel.c,v 1.15 2009-05-09 13:31:09 roart Exp $
// _Locker:  $

// Author. Roar Thronæs.
/**
   \file ucbcredel.c
   \brief QIO UCB routines for creation and deletion - TODO still more doc
   \author Roar Thronæs
*/

#include<ssdef.h>
#include<misc.h>
#include<crbdef.h>
#include<dyndef.h>

#include<linux/vmalloc.h>
#include<ucbdef.h>
#include<ddbdef.h>
#include<ssdef.h>
#include <ioc_routines.h>
#include <queue.h>
#include <linux/slab.h>

/**
   \brief link ucb into ddb list
*/

int ioc_std_link_ucb (struct _ucb *ucb) {
  struct _ucb * u = ucb;
  struct _ucb * next=u->ucb_l_ddb->ddb$ps_ucb;
  struct _ucb * prev;
 again:
  prev=next;
  next=prev->ucb_l_link;
  if (next==0) goto notagain;
  if (next->ucb_w_unit<u->ucb$w_unit) goto again;
  if (next->ucb_w_unit==u->ucb$w_unit) return SS$_OPINCOMPL;
 notagain:

  prev->ucb_l_link=u;
  u->ucb_l_link=next;

  u->ucb_l_crb->crb$l_refc++;

  return SS__NORMAL;
}

/**
   \brief copy ucb
   \param ucb
   \param new_ucb
*/

int ioc_std_copy_ucb (struct _ucb *src_ucb, struct _ucb **new_ucb) {
  int status;
  struct _ucb * u;
  int size;

  if (src_ucb->ucb_w_size) {
    size=src_ucb->ucb_w_size;
  } else {
    size=sizeof(struct _ucb);
    printk("ucb %x size zero\n");
  }
  u=kmalloc(size,GFP_KERNEL);
  memcpy(u,src_ucb,size);

  qhead_init(&u->ucb_l_fqfl);
  u->ucb_l_fr3=0;
  u->ucb_l_fr4=0;
  u->ucb_l_fpc=0;
  u->ucb_w_bufquo=0;
  // u->ucb_l_link=something
  qhead_init(&u->ucb_l_ioqfl);
  u->ucb_l_devsts=0;
  u->ucb_l_opcnt=0;
  u->ucb_l_svapte=0;
  u->ucb_l_boff=0;
  u->ucb_l_bcnt=0;

  /** set refcount 1 */
  u->ucb_l_refc=1;
  /** set device online */
  u->ucb_l_sts|=UCB$M_ONLINE;
  /** clear template bit */
  u->ucb_l_sts&=~UCB$M_TEMPLATE;
  /** set u->ucb_l_charge - MISSING */
  qhead_init(&u->ucb_l_mb_msgqfl); // probably this too?

  *new_ucb = u;
  return SS__NORMAL;
};

int ioc_std_create_ucb (struct _pcb *pcb, struct _ucb *ucb, struct _ucb **new_ucb_p) {
  int status;
  //struct _ucb * u=kmalloc(sizeof(struct _ucb),GFP_KERNEL);
  //memset(u,0,sizeof(struct _ucb));
  status=ioc_std_clone_ucb (ucb, new_ucb_p);
  return SS__NORMAL;
}

/**
   \brief clone a template ucb - see 5.2 21.5.2.2.2
   \param tmpl_ucb template ucb
   \param new_ucb
*/

int ioc_std_clone_ucb (struct _ucb *tmpl_ucb, struct _ucb **new_ucb) {
  int status;
  struct _ucb * u;
  status=ioc_std_copy_ucb(tmpl_ucb,new_ucb);
  u=*new_ucb;

  u->ucb_w_unit=tmpl_ucb->ucb$w_unit_seed;

  /** give unique unit number */
 again:
  if (++tmpl_ucb->ucb_w_unit_seed>9999) tmpl_ucb->ucb$w_unit_seed=0;
  /** link ucb into the ddb's device chain */
  status=ioc_std_link_ucb(u);
  if (status!=SS__NORMAL) goto again; // original weakness?

  return SS__NORMAL;
}

int init_ddb(struct _ddb * ddb, struct _ddt * ddt, struct _ucb * ucb, char * sddb) {
  memset(ddb,0,sizeof(struct _ddb));
  ddb->ddb_b_type=DYN$C_DDB;
  ddb->ddb_l_ddt=ddt; // check. remove later
  ddb->ddb_ps_ucb=ucb; // check. remove later
  ddb->ddb_t_name[0]=strlen(sddb);
  memcpy(&ddb->ddb_t_name[1],sddb,ddb->ddb$t_name[0]);
  return SS__NORMAL;
}

int init_ucb(struct _ucb * ucb, struct _ddb * ddb,struct _ddt * ddt, struct _crb *crb) {
  ucb->ucb_b_type=DYN$C_UCB;
  ucb->ucb_l_ddb=ddb;
  ucb->ucb_l_crb=crb;
  ucb->ucb_l_ddt=ddt;

  ucb->ucb_l_sts|=UCB$M_TEMPLATE; // check. (re)move later.

  ucb->ucb_w_unit=9999; // check. (re)move later.
  ucb->ucb_w_unit_seed=0; // check. (re)move later.

  return SS__NORMAL;
}

int init_crb(struct _crb * crb) {
  crb->crb_b_type=DYN$C_CRB;
  return SS__NORMAL;
}

// temporary stuff for dua

int ioc_std_copy_mscp_ucb (struct _ucb *src_ucb, struct _ucb **new_ucb) {
  int status;
  struct _ucb * u=kmalloc(sizeof(struct _mscp_ucb),GFP_KERNEL);
  memcpy(u,src_ucb,sizeof(struct _mscp_ucb));

  qhead_init(&u->ucb_l_fqfl);
  u->ucb_l_fr3=0;
  u->ucb_l_fr4=0;
  u->ucb_l_fpc=0;
  u->ucb_w_bufquo=0;
  // u->ucb_l_link=something
  qhead_init(&u->ucb_l_ioqfl);
  u->ucb_l_devsts=0;
  u->ucb_l_opcnt=0;
  u->ucb_l_svapte=0;
  u->ucb_l_boff=0;
  u->ucb_l_bcnt=0;

  u->ucb_l_refc=1;
  u->ucb_l_sts|=UCB$M_ONLINE;
  u->ucb_l_sts&=~UCB$M_TEMPLATE;
  // u->ucb_l_charge
  qhead_init(&u->ucb_l_mb_msgqfl); // probably this too?

  *new_ucb = u;
  return SS__NORMAL;
};

int ioc_std_clone_mscp_ucb (struct _ucb *tmpl_ucb, struct _ucb **new_ucb) {
  int status;
  struct _ucb * u;
  status=ioc_std_copy_mscp_ucb(tmpl_ucb,new_ucb);
  u=*new_ucb;

  u->ucb_w_unit=tmpl_ucb->ucb$w_unit_seed;

 again:
  if (++tmpl_ucb->ucb_w_unit_seed>9999) tmpl_ucb->ucb$w_unit_seed=0;
  status=ioc_std_link_ucb(u);
  if (status!=SS__NORMAL) goto again; // original weakness?

  ((struct _mscp_ucb *)u)->ucb_w_mscpunit=u->ucb$w_unit;

  return SS__NORMAL;
}

int ioc_delete_ucb() {
  printk("IOC_DELETE_UCB not impl\n");
}

---