p4ruby 2022.1.2359956-x64-mingw-ucrt

data/ext/P4/p4mapmaker.cpp

@@ -0,0 +1,459 @@
+/*******************************************************************************
+
+Copyright (c) 2008, Perforce Software, Inc.  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.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS 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 PERFORCE SOFTWARE, INC. 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.
+
+*******************************************************************************/
+
+/*******************************************************************************
+ * Name		: p4mapmaker.cpp
+ *
+ * Author	: Tony Smith <tony@perforce.com> 
+ *
+ * Description	: Class to encapsulate Perforce map manipulation from Ruby
+ *
+ ******************************************************************************/
+#include <ruby.h>
+#include "undefdups.h"
+#include <p4/clientapi.h>
+#include <p4/mapapi.h>
+#include <p4/debug.h>
+#include "p4rubydebug.h"
+#include "p4utils.h"
+#include "p4mapmaker.h"
+
+
+P4MapMaker::P4MapMaker()
+{
+    map = new MapApi;
+}
+
+P4MapMaker::~P4MapMaker()
+{
+    delete map;
+}
+
+P4MapMaker::P4MapMaker( const P4MapMaker &m )
+{
+    StrBuf	l, r;
+    const StrPtr *s;
+    MapType	t;
+    int 	i;
+
+    map = new MapApi;
+    for( i = 0; i < m.map->Count(); i++ )
+    {
+	s = m.map->GetLeft( i );
+	if( !s ) break;
+	l = *s;
+
+	s = m.map->GetRight( i );
+	if( !s ) break;
+	r = *s;
+
+	t = m.map->GetType( i );
+
+	map->Insert( l, r, t );
+    }
+}
+    
+
+P4MapMaker * 
+P4MapMaker::Join( P4MapMaker *l, P4MapMaker *r)
+{
+    P4MapMaker *m = new P4MapMaker();
+    delete m->map;
+
+    m->map = MapApi::Join( l->map, r->map );
+    return m;
+}
+
+void
+P4MapMaker::Insert( VALUE m )
+{
+    StrBuf	in;
+    StrBuf	lbuf;
+    StrBuf	r;
+    StrRef	l;
+    MapType	t = MapInclude;
+
+    in = StringValuePtr( m );
+    SplitMapping( in, lbuf, r );
+
+    l = lbuf.Text();
+
+    // Look for mapType in lhs only. 
+    if( l[ 0 ] == '-' )
+    {
+	l += 1;
+	t = MapExclude;
+    }
+    else if( l[ 0 ] == '+' )
+    {
+	l += 1;
+	t = MapOverlay;
+    }
+
+    map->Insert( l, r, t );
+}
+
+
+void
+P4MapMaker::Insert( VALUE l, VALUE r )
+{
+    StrBuf	left;
+    StrBuf	right;
+    StrBuf *	dest = &left;
+    int		quoted = 0;
+    int		index = 0;
+
+    const char *p;
+    MapType	t = MapInclude;
+
+    p = StringValuePtr( l );
+    for( ; ; )
+    {
+	for( index = 0; *p; p++ )
+	{
+	    switch( *p )
+	    {
+	    case '"':
+		quoted = !quoted;
+		break;
+
+	    case ' ':
+	    case '\t':
+		// Embedded whitespace ok; leading not.
+		if( quoted || index )
+		{
+		    dest->Extend( *p );
+		    index++;
+		}
+		break;
+
+	    case '-':
+		if( !index )
+		    t = MapExclude;
+		else 
+		    dest->Extend( *p );
+		index++;
+		break;
+		
+	    case '+':
+		if( !index )
+		    t = MapOverlay;
+		else 
+		    dest->Extend( *p );
+		index++;
+		break;
+
+	    default:
+		dest->Extend( *p );
+		index++;
+	    }
+	}
+
+	if( dest == &right )
+	    break;
+
+	dest = &right;
+	p = StringValuePtr( r );
+	quoted = 0;
+    }
+    left.Terminate();
+    right.Terminate();
+
+    map->Insert( left, right, t );
+}
+
+int
+P4MapMaker::Count()
+{
+    return map->Count();
+}
+
+void
+P4MapMaker::Clear()
+{
+    map->Clear();
+}
+
+void
+P4MapMaker::Reverse()
+{
+    MapApi *		nmap = new MapApi;
+    const StrPtr *	l;
+    const StrPtr *	r;
+    MapType		t;
+
+    for( int i = 0; i < map->Count(); i++ )
+    {
+	l = map->GetLeft( i );
+	r = map->GetRight( i );
+	t = map->GetType( i );
+
+	nmap->Insert( *r, *l, t );
+    }
+
+    delete map;
+    map = nmap;
+}
+	
+VALUE
+P4MapMaker::Translate( VALUE p, int fwd )
+{
+    StrBuf	from;
+    StrBuf	to;
+    MapDir	dir = MapLeftRight;
+
+    if( !fwd )
+	dir = MapRightLeft;
+
+    from = StringValuePtr( p );
+    if( map->Translate( from, to, dir ) )
+	return P4Utils::ruby_string( to.Text(), to.Length() );
+    return Qnil;
+}
+
+VALUE
+P4MapMaker::Lhs()
+{
+    VALUE		a = rb_ary_new();
+    StrBuf		s;
+    const StrPtr *	l;
+    MapType		t;
+    int			quote;
+
+    for( int i = 0; i < map->Count(); i++ )
+    {
+	s.Clear();
+	quote = 0;
+
+	l = map->GetLeft( i );
+	t = map->GetType( i );
+
+	if( l->Contains( StrRef( " " ) ) )
+	{
+	    quote++;
+	    s << "\"";
+	}
+
+	switch( t )
+	{
+	case MapInclude:
+	    break;
+	case MapExclude:
+	    s << "-";
+	    break;
+	case MapOverlay:
+	    s << "+";
+	};
+
+	s << l->Text();
+	if( quote ) s << "\"";
+
+	rb_ary_push( a, P4Utils::ruby_string( s.Text(), s.Length() ) );
+    }
+    return a;
+}
+
+VALUE
+P4MapMaker::Rhs()
+{
+    VALUE		a = rb_ary_new();
+    StrBuf		s;
+    const StrPtr *	r;
+    int			quote;
+
+    for( int i = 0; i < map->Count(); i++ )
+    {
+	s.Clear();
+	quote = 0;
+
+	r = map->GetRight( i );
+
+	if( r->Contains( StrRef( " " ) ) )
+	{
+	    quote++;
+	    s << "\"";
+	}
+
+	s << r->Text();
+	if( quote ) s << "\"";
+
+	rb_ary_push( a, P4Utils::ruby_string( s.Text(), s.Length() ) );
+    }
+    return a;
+}
+
+VALUE
+P4MapMaker::ToA()
+{
+    VALUE		a = rb_ary_new();
+    StrBuf		s;
+    const StrPtr *	l;
+    const StrPtr *	r;
+    MapType		t;
+    int			quote;
+
+    for( int i = 0; i < map->Count(); i++ )
+    {
+	s.Clear();
+	quote = 0;
+
+	l = map->GetLeft( i );
+	r = map->GetRight( i );
+	t = map->GetType( i );
+
+	if( l->Contains( StrRef( " " ) ) ||
+	    r->Contains( StrRef( " " ) ) )
+	{
+	    quote++;
+	    s << "\"";
+	}
+
+	switch( t )
+	{
+	case MapInclude:
+	    break;
+	case MapExclude:
+	    s << "-";
+	    break;
+	case MapOverlay:
+	    s << "+";
+	};
+
+	s << l->Text();
+
+	if( quote ) s << "\" \"";
+	else s << " ";
+
+	s << r->Text();
+	if( quote ) s << "\"";
+
+	rb_ary_push( a, P4Utils::ruby_string( s.Text(), s.Length() ) );
+    }
+    return a;
+}
+
+void
+P4MapMaker::Inspect( StrBuf &b )
+{
+    if( !map->Count() )
+    {
+	b << "(empty)";
+	return;
+    }
+
+    const StrPtr *l, *r;
+    int	  t;
+
+    b << "\n";
+
+    for( int i = 0; i < map->Count(); i++ )
+    {
+
+	l = map->GetLeft( i );
+	r = map->GetRight( i );
+	t = map->GetType( i );
+
+	b << "\t";
+	switch( t )
+	{
+	case MapExclude:
+	    b << "-";
+	    break;
+
+	case MapOverlay:
+	    b << "+";
+	    break;
+
+	case MapInclude:
+	    break;
+	}
+
+	b << l->Text();
+	b << " ";
+	b << r->Text();
+	b << "\n";
+    }
+}
+
+//
+// Take a single string containing either a half-map, or both halves of
+// a mapping and split it in two. If there's only one half of a mapping in
+// the input, then l, and r are set to the same value as 'in'. If 'in'
+// contains two halves, then they are split.
+//
+void
+P4MapMaker::SplitMapping( const StrPtr &in, StrBuf &l, StrBuf &r )
+{
+    char *	pos;
+    int		quoted = 0;
+    int		split = 0;
+    StrBuf *	dest = &l;
+
+    pos = in.Text();
+
+    l.Clear();
+    r.Clear();
+
+    while( *pos )
+    {
+	switch( *pos )
+	{
+	case '"':
+	    quoted = !quoted;
+	    break;
+
+	case ' ':
+	    if( !quoted && !split )
+	    {
+		// whitespace in the middle. skip it, and start updating
+		// the destination
+		split = 1;
+		dest->Terminate();
+		dest = &r;
+	    }
+	    else if( !quoted )
+	    {
+		// Trailing space on rhs. ignore
+	    }
+	    else
+	    {
+		// Embedded space
+		dest->Extend( *pos );
+	    }
+	    break;
+
+	default:
+	    dest->Extend( *pos );
+	}
+	pos++;
+    }
+    l.Terminate();
+    r.Terminate();
+
+    if( !r.Length() )
+	r = l;
+}

data/ext/P4/p4mapmaker.h

@@ -0,0 +1,69 @@
+/*******************************************************************************
+
+Copyright (c) 2008, Perforce Software, Inc.  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.
+
+THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS 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 PERFORCE SOFTWARE, INC. 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.
+
+*******************************************************************************/
+
+/*******************************************************************************
+ * Name		: p4mapmaker.h
+ *
+ * Author	: Tony Smith <tony@perforce.com> 
+ *
+ * Description	: Class to encapsulate Perforce map manipulation from Ruby
+ *
+ ******************************************************************************/
+
+class MapApi;
+class P4MapMaker
+{
+    public:
+	P4MapMaker();
+	P4MapMaker( const P4MapMaker &m );
+
+	~P4MapMaker();
+
+	static P4MapMaker * Join( P4MapMaker *l, P4MapMaker *r);
+
+	void		Insert( VALUE m );
+	void		Insert( VALUE l, VALUE r );
+
+	void		Reverse();
+	void		Clear();
+	int		Count();
+	VALUE		Translate( VALUE p, int fwd = 1 );
+	VALUE		Lhs();
+	VALUE		Rhs();
+	VALUE		ToA();
+
+	void		Inspect( StrBuf &b );
+
+	// We hold no references to Ruby objects, so no GC to do...
+	void		GCMark() {}
+
+    private:
+	void		SplitMapping( const StrPtr &in, StrBuf &l, StrBuf &r );
+	MapApi *	map;
+};
+
+