amigan/phoned
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Uh, no shit?

Browse Source
This commit is contained in:
dcp1990 2005-06-26 15:55:58 +00:00
parent 66a07a3b72
commit bb1450b825
5 changed files with 31 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Makefile
View File

@ -1,8 +1,8 @@
# main makefile...
# $Amigan: phoned/Makefile,v 1.5 2005/06/19 05:51:07 dcp1990 Exp $
# $Amigan: phoned/Makefile,v 1.6 2005/06/26 15:55:58 dcp1990 Exp $
# Oh My Fucking God, this is such a big, unportable mess. Oh well.
# BSD Make > *
APPS=phonectl phoned lib scripts
APPS=phonectl phoned lib scripts xfone
APPSUF=${APPS:S/$/_app/}
APPSCLEAN=${APPS:S/$/_cl/}
all: ${APPSUF}

12
lib/sockstuff.c
View File

@ -27,7 +27,7 @@
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
/* $Amigan: phoned/lib/sockstuff.c,v 1.2 2005/06/26 15:51:22 dcp1990 Exp $ */
/* $Amigan: phoned/lib/sockstuff.c,v 1.3 2005/06/26 15:55:58 dcp1990 Exp $ */
#include <stdio.h>
#include <string.h>
#include <unistd.h>
@ -162,7 +162,7 @@ Tcl_Channel Udom_CreateChannel(sockfile, mask)
cdt->channel = Tcl_CreateChannel(&Udom_ChanType, chname, cdt, mask);
return cdt->channel;
}
int Udom_MakeSock (cdata, interp, argc, argv)
int Udom_Cmd (cdata, interp, argc, argv)
ClientData cdata;
Tcl_Interp *interp;
int argc;
@ -199,4 +199,10 @@ int Udom_MakeSock (cdata, interp, argc, argv)
Tcl_AppendResult(interp, Tcl_GetChannelName(res), (char*)NULL);
return TCL_OK;
}
int Udom_Init(interp)
Tcl_Interp *interp;
{
Tcl_CreateObjCommand(interp, "udom", Udom_Cmd, (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL);
return TCL_OK;
}

12
lib/tcl/sockstuff.c
View File

@ -27,7 +27,7 @@
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
/* $Amigan: phoned/lib/tcl/sockstuff.c,v 1.2 2005/06/26 15:51:22 dcp1990 Exp $ */
/* $Amigan: phoned/lib/tcl/sockstuff.c,v 1.3 2005/06/26 15:55:58 dcp1990 Exp $ */
#include <stdio.h>
#include <string.h>
#include <unistd.h>
@ -162,7 +162,7 @@ Tcl_Channel Udom_CreateChannel(sockfile, mask)
cdt->channel = Tcl_CreateChannel(&Udom_ChanType, chname, cdt, mask);
return cdt->channel;
}
int Udom_MakeSock (cdata, interp, argc, argv)
int Udom_Cmd (cdata, interp, argc, argv)
ClientData cdata;
Tcl_Interp *interp;
int argc;
@ -199,4 +199,10 @@ int Udom_MakeSock (cdata, interp, argc, argv)
Tcl_AppendResult(interp, Tcl_GetChannelName(res), (char*)NULL);
return TCL_OK;
}
int Udom_Init(interp)
Tcl_Interp *interp;
{
Tcl_CreateObjCommand(interp, "udom", Udom_Cmd, (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL);
return TCL_OK;
}

3
xfone/phoned.tcl
View File

@ -27,4 +27,5 @@
# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
# SUCH DAMAGE.
#
# $Amigan: phoned/xfone/phoned.tcl,v 1.1 2005/06/26 04:47:20 dcp1990 Exp $
# $Amigan: phoned/xfone/phoned.tcl,v 1.2 2005/06/26 15:55:58 dcp1990 Exp $
load ./udom.so

12
xfone/sockstuff.c
View File

@ -27,7 +27,7 @@
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
/* $Amigan: phoned/xfone/sockstuff.c,v 1.2 2005/06/26 15:51:22 dcp1990 Exp $ */
/* $Amigan: phoned/xfone/sockstuff.c,v 1.3 2005/06/26 15:55:58 dcp1990 Exp $ */
#include <stdio.h>
#include <string.h>
#include <unistd.h>
@ -162,7 +162,7 @@ Tcl_Channel Udom_CreateChannel(sockfile, mask)
cdt->channel = Tcl_CreateChannel(&Udom_ChanType, chname, cdt, mask);
return cdt->channel;
}
int Udom_MakeSock (cdata, interp, argc, argv)
int Udom_Cmd (cdata, interp, argc, argv)
ClientData cdata;
Tcl_Interp *interp;
int argc;
@ -199,4 +199,10 @@ int Udom_MakeSock (cdata, interp, argc, argv)
Tcl_AppendResult(interp, Tcl_GetChannelName(res), (char*)NULL);
return TCL_OK;
}
int Udom_Init(interp)
Tcl_Interp *interp;
{
Tcl_CreateObjCommand(interp, "udom", Udom_Cmd, (ClientData)NULL, (Tcl_CmdDeleteProc*)NULL);
return TCL_OK;
}