home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / compress / misc / xfh / source.lha / src / Packet.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-03-09  |  3.8 KB  |  122 lines
  1. /* Packet.c - general, lo-level packet handling routines.
  2.    Copyright (C) 1991, 1992, 1993 Kristian Nielsen.
  3.  
  4.    This file is part of XFH, the compressing file system handler.
  5.  
  6.    This program is free software; you can redistribute it and/or modify
  7.    it under the terms of the GNU General Public License as published by
  8.    the Free Software Foundation; either version 2 of the License, or
  9.    (at your option) any later version.
  10.  
  11.    This program is distributed in the hope that it will be useful,
  12.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.    GNU General Public License for more details.
  15.  
  16.    You should have received a copy of the GNU General Public License
  17.    along with this program; if not, write to the Free Software
  18.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.            */
  19.  
  20. #include <exec/types.h>
  21. #include <exec/ports.h>
  22. #include <dos/dos.h>
  23. #include <dos/dosextens.h>
  24.  
  25. #include <proto/exec.h>
  26.  
  27. #include <stdarg.h>
  28.  
  29. /*
  30.  * Send an already allocate packet, with given arguments, to a handler.
  31.  * retport is the port that the packet should return to. This function will
  32.  * NOT wait for the packet to return. numarg specifies how many arguments
  33.  * follow after it (arguments will be treated as LONG).
  34.  *
  35.  * Use this function for doing async IO with DOS handlers.
  36.  */
  37.  
  38. void putpkt(struct StandardPacket *pkt,struct MsgPort *procid,
  39.            struct MsgPort *retport,LONG type,int numarg,...){
  40.    va_list vl;
  41.    LONG *p;
  42.    
  43.    /* Allow for variable number of parameters in a packet. */
  44.    va_start(vl,numarg);
  45.    
  46.    /* Set up fields for packet handling. */
  47.    pkt->sp_Msg.mn_Node.ln_Succ=pkt->sp_Msg.mn_Node.ln_Pred=NULL;
  48.    pkt->sp_Msg.mn_Node.ln_Name=(char *)&pkt->sp_Pkt;
  49.    pkt->sp_Msg.mn_Node.ln_Type=NT_MESSAGE;
  50.    pkt->sp_Msg.mn_Node.ln_Pri=0;
  51.    pkt->sp_Msg.mn_ReplyPort=NULL;
  52.    pkt->sp_Msg.mn_Length=sizeof(*pkt);
  53.    pkt->sp_Pkt.dp_Port=retport;
  54.    pkt->sp_Pkt.dp_Link=&pkt->sp_Msg;
  55.  
  56.    /* Set up packet args. First the packet request type. */
  57.    pkt->sp_Pkt.dp_Type=type;
  58.    
  59.    /* Handle each of the arguments in turn. */
  60.    p=&pkt->sp_Pkt.dp_Arg1;
  61.    while(numarg--){
  62.       *p++=va_arg(vl,LONG);
  63.    }
  64.    
  65.    /* And finally, set the packet off on its way to the handler. */
  66.    PutMsg(procid,&pkt->sp_Msg);
  67.    
  68.    va_end(vl);
  69. }
  70.  
  71.  
  72. /*
  73.  * Send an already allocated packet to an AmigaDOS handler using
  74.  * supplied arguments, wait for the reply and return dp_Res1 & dp_Res2.
  75.  *
  76.  * Use this for doing syncronous IO just like dos.library, but using
  77.  * a private message port.
  78.  */
  79.  
  80. LONG dopkt(struct StandardPacket *pkt,struct MsgPort *procid,
  81.            struct MsgPort *retport,LONG *res2,LONG type,int numarg,...){
  82.    va_list vl;
  83.    LONG *p;
  84.    struct Message *msg;
  85.    
  86.    /* Set up fields for packet handling. */
  87.    pkt->sp_Msg.mn_Node.ln_Succ=pkt->sp_Msg.mn_Node.ln_Pred=NULL;
  88.    pkt->sp_Msg.mn_Node.ln_Name=(char *)&pkt->sp_Pkt;
  89.    pkt->sp_Msg.mn_Node.ln_Type=NT_MESSAGE;
  90.    pkt->sp_Msg.mn_Node.ln_Pri=0;
  91.    pkt->sp_Msg.mn_ReplyPort=NULL;
  92.    pkt->sp_Msg.mn_Length=sizeof(*pkt);
  93.    pkt->sp_Pkt.dp_Port=retport;
  94.    pkt->sp_Pkt.dp_Link=&pkt->sp_Msg;
  95.  
  96.    /* Set up packet args. First the packet request type. */
  97.    pkt->sp_Pkt.dp_Type=type;
  98.    
  99.    /* Handle each of the arguments in turn. */
  100.    /* Allow for variable number of parameters in a packet. */
  101.    va_start(vl,numarg);   
  102.    p=&pkt->sp_Pkt.dp_Arg1;
  103.    while(numarg--){
  104.       *p++=va_arg(vl,LONG);
  105.    }
  106.    va_end(vl);
  107.    
  108.    /* And finally, set the packet off on its way to the handler. */
  109.    PutMsg(procid,&pkt->sp_Msg);
  110.    
  111.    /*
  112.     * Wait for the reply. NOTE: Make SURE no other messages arrive first
  113.     * at this port!
  114.     */
  115.    while(!(msg=GetMsg(retport))) WaitPort(retport);
  116.    
  117.    if(res2)  /* Allow for NULL 'don't care' pointer. */
  118.       *res2=pkt->sp_Pkt.dp_Res2;
  119.    return pkt->sp_Pkt.dp_Res1;
  120. }
  121.  
  122.